🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: fj.lang.c
Article #529

Re: Re: Q:暗号化

#529
From: Kusakabe Youichi
Date: Sun, 29 Mar 1998 00:00
52 lines
1901 bytes
:  $B0E9f2=$K$D$$$F$O$[$H$s$I2?$bCN$i$J$$$N$G!"0E9f2=$=$N$b$N$K$D$$$FJY6/$7$?J}(B
: $B$,$$$$$H$$$&$N$O$=$N$H$*$j$G$9!#BeI=E*$JJ}K!$r$$$/$D$+65$($F$$$?$@$1$k$H$"$j(B
: $B$,$?$$$G$9!#(B

$B!VBeI=E*$JJ}K!$r65$($F!W$b$i$&A0$KK\$0$i$$FI$s$@$i(B?

: $B0E9f2=$H!"0E9f2rFI$K2?$+6&DL$N%-!<$r;H$C$F!"(B
: $B$=$N%-!<$,$o$+$i$J$1$l$P0E9f2rFI$,$G$-$J$$!"$H$$$&DxEY$N$b$N$,(B
: $B=PMh$l$P$$$$$J$!!"$H;W$C$F$$$^$9!#(B

$B%F%-%9%H$rF~NO$H$7$FM?$($?$H$-$K=PNO$,%F%-%9%H$G$J$/$F$h$$$J$i(B
#include	<stdio.h>
#if	MSDOS
#include	<fcntl.h>
#endif
#define	MAXKEY		64
main(argc, argv)
int	argc;
char	**argv;
{
	int	keylen[MAXKEY], keyoff[MAXKEY];
	int	c, i;

	if (--argc > MAXKEY) {
		(void)fprintf(stderr, "xor: too many keys\n");
		exit(1);
	}
	++argv;
#if	MSDOS
	(void)setmode(fileno(stdin), O_BINARY);
	(void)setmode(fileno(stdout), O_BINARY);
#endif
	for (i = 0; i < argc; i++) {
		if ((keylen[i] = strlen(argv[i])) == 0)
			keylen[i] = 1;
		keyoff[i] = 0;
	}
	while ((c = getchar()) != EOF) {
		for (i = 0; i < argc; i++) {
			c ^= argv[i][keyoff[i]];
			keyoff[i] = (keyoff[i] + 1) % keylen[i];
		}
		(void)putchar(c);
	}
}
$BDxEY$G$$$$$C$F$3$H(B? ;-)

  $B%X(B_$B%X(B   ________________________
$B%_!&!&(B $B%_(B  void@merope.opus.or.jp
 (  $B!k(B )$B!A(B            $BF|2<ItM[0l(B
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Technical Details
Message-ID: <1998Mar29.102513.7337@merope.opus.or.jp>
Path: arc1-ca.pugleaf.net!unknown!not-for-mail
References: <6fkn4d$h5r$1@news1.dti.ne.jp> <1998Mar29.064143.5242@merope.opus.or.jp> <6fktaf$n6e$1@news1.dti.ne.jp>

Show Full Headers
Complete Article Headers
X-Google-Language: Japanese,JIS
X-Google-Thread: 106434,d7a1f9e0b2aa78a4
X-Google-Attributes: gid106434,public
From: void@merope.opus.or.jp (Kusakabe Youichi)
Subject: Re: Re: Q:暗号化
Date: 1998/03/29
Message-ID: <1998Mar29.102513.7337@merope.opus.or.jp>
X-Deja-AN: 338788992
References: <6fkn4d$h5r$1@news1.dti.ne.jp> <1998Mar29.064143.5242@merope.opus.or.jp> <6fktaf$n6e$1@news1.dti.ne.jp>
Organization: Macintosh User Group PLEIADES in opus
Newsgroups: fj.lang.c