17c478bd9Sstevel@tonic-gate /*
27c478bd9Sstevel@tonic-gate * CDDL HEADER START
37c478bd9Sstevel@tonic-gate *
47c478bd9Sstevel@tonic-gate * The contents of this file are subject to the terms of the
57c478bd9Sstevel@tonic-gate * Common Development and Distribution License, Version 1.0 only
67c478bd9Sstevel@tonic-gate * (the "License"). You may not use this file except in compliance
77c478bd9Sstevel@tonic-gate * with the License.
87c478bd9Sstevel@tonic-gate *
97c478bd9Sstevel@tonic-gate * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
107c478bd9Sstevel@tonic-gate * or http://www.opensolaris.org/os/licensing.
117c478bd9Sstevel@tonic-gate * See the License for the specific language governing permissions
127c478bd9Sstevel@tonic-gate * and limitations under the License.
137c478bd9Sstevel@tonic-gate *
147c478bd9Sstevel@tonic-gate * When distributing Covered Code, include this CDDL HEADER in each
157c478bd9Sstevel@tonic-gate * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
167c478bd9Sstevel@tonic-gate * If applicable, add the following below this CDDL HEADER, with the
177c478bd9Sstevel@tonic-gate * fields enclosed by brackets "[]" replaced with your own identifying
187c478bd9Sstevel@tonic-gate * information: Portions Copyright [yyyy] [name of copyright owner]
197c478bd9Sstevel@tonic-gate *
207c478bd9Sstevel@tonic-gate * CDDL HEADER END
217c478bd9Sstevel@tonic-gate */
227c478bd9Sstevel@tonic-gate /* Copyright (c) 1984, 1986, 1987, 1988, 1989 AT&T */
237c478bd9Sstevel@tonic-gate /* All Rights Reserved */
247c478bd9Sstevel@tonic-gate
257c478bd9Sstevel@tonic-gate
267c478bd9Sstevel@tonic-gate /*
277c478bd9Sstevel@tonic-gate * Copyright 2004 Sun Microsystems, Inc. All rights reserved.
287c478bd9Sstevel@tonic-gate * Use is subject to license terms.
297c478bd9Sstevel@tonic-gate */
307c478bd9Sstevel@tonic-gate
317c478bd9Sstevel@tonic-gate /*
327c478bd9Sstevel@tonic-gate * A one-rotor machine designed along the lines of Enigma
337c478bd9Sstevel@tonic-gate * but considerably trivialized.
347c478bd9Sstevel@tonic-gate */
357c478bd9Sstevel@tonic-gate
367c478bd9Sstevel@tonic-gate #define ECHO 010
377c478bd9Sstevel@tonic-gate #include <stdio.h>
387c478bd9Sstevel@tonic-gate #include <stdlib.h>
397c478bd9Sstevel@tonic-gate #include <unistd.h>
407c478bd9Sstevel@tonic-gate #include <string.h>
417c478bd9Sstevel@tonic-gate #include <crypt.h>
427c478bd9Sstevel@tonic-gate #include <errno.h>
437c478bd9Sstevel@tonic-gate
447c478bd9Sstevel@tonic-gate #define ROTORSZ 256
457c478bd9Sstevel@tonic-gate #define MASK 0377
467c478bd9Sstevel@tonic-gate char t1[ROTORSZ];
477c478bd9Sstevel@tonic-gate char t2[ROTORSZ];
487c478bd9Sstevel@tonic-gate char t3[ROTORSZ];
497c478bd9Sstevel@tonic-gate
507c478bd9Sstevel@tonic-gate static void
setup(pw)517c478bd9Sstevel@tonic-gate setup(pw)
527c478bd9Sstevel@tonic-gate char *pw;
537c478bd9Sstevel@tonic-gate {
547c478bd9Sstevel@tonic-gate int ic, i, k, temp;
557c478bd9Sstevel@tonic-gate unsigned random;
567c478bd9Sstevel@tonic-gate char buf[13];
577c478bd9Sstevel@tonic-gate long seed;
587c478bd9Sstevel@tonic-gate char *ret;
597c478bd9Sstevel@tonic-gate int err;
607c478bd9Sstevel@tonic-gate
617c478bd9Sstevel@tonic-gate (void) strncpy(buf, pw, 8);
627c478bd9Sstevel@tonic-gate buf[8] = buf[0];
637c478bd9Sstevel@tonic-gate buf[9] = buf[1];
647c478bd9Sstevel@tonic-gate errno = 0;
657c478bd9Sstevel@tonic-gate ret = des_crypt(buf, &buf[8]);
667c478bd9Sstevel@tonic-gate if (ret == NULL) {
677c478bd9Sstevel@tonic-gate err = errno;
687c478bd9Sstevel@tonic-gate (void) fprintf(stderr, "crypt: setup failed, unable to"
697c478bd9Sstevel@tonic-gate " initialize rotors: %s\n", strerror(err));
707c478bd9Sstevel@tonic-gate exit(1);
717c478bd9Sstevel@tonic-gate }
727c478bd9Sstevel@tonic-gate (void) strncpy(buf, ret, 13);
737c478bd9Sstevel@tonic-gate seed = 123;
747c478bd9Sstevel@tonic-gate for (i = 0; i < 13; i++)
757c478bd9Sstevel@tonic-gate seed = seed*buf[i] + i;
767c478bd9Sstevel@tonic-gate for (i = 0; i < ROTORSZ; i++) {
777c478bd9Sstevel@tonic-gate t1[i] = i;
787c478bd9Sstevel@tonic-gate t3[i] = 0;
797c478bd9Sstevel@tonic-gate }
807c478bd9Sstevel@tonic-gate for (i = 0; i < ROTORSZ; i++) {
817c478bd9Sstevel@tonic-gate seed = 5*seed + buf[i%13];
827c478bd9Sstevel@tonic-gate random = seed % 65521;
837c478bd9Sstevel@tonic-gate k = ROTORSZ-1 - i;
847c478bd9Sstevel@tonic-gate ic = (random&MASK)%(k+1);
857c478bd9Sstevel@tonic-gate random >>= 8;
867c478bd9Sstevel@tonic-gate temp = t1[k];
877c478bd9Sstevel@tonic-gate t1[k] = t1[ic];
887c478bd9Sstevel@tonic-gate t1[ic] = temp;
897c478bd9Sstevel@tonic-gate if (t3[k] != 0) continue;
907c478bd9Sstevel@tonic-gate ic = (random&MASK) % k;
917c478bd9Sstevel@tonic-gate while (t3[ic] != 0) ic = (ic+1) % k;
927c478bd9Sstevel@tonic-gate t3[k] = ic;
937c478bd9Sstevel@tonic-gate t3[ic] = k;
947c478bd9Sstevel@tonic-gate }
957c478bd9Sstevel@tonic-gate for (i = 0; i < ROTORSZ; i++)
967c478bd9Sstevel@tonic-gate t2[t1[i]&MASK] = i;
977c478bd9Sstevel@tonic-gate }
987c478bd9Sstevel@tonic-gate
997c478bd9Sstevel@tonic-gate int
main(int argc,char ** argv)1007c478bd9Sstevel@tonic-gate main(int argc, char **argv)
1017c478bd9Sstevel@tonic-gate {
1027c478bd9Sstevel@tonic-gate extern int optind;
1037c478bd9Sstevel@tonic-gate char *p1;
1047c478bd9Sstevel@tonic-gate int i, n1, n2, nchar;
1057c478bd9Sstevel@tonic-gate int c;
1067c478bd9Sstevel@tonic-gate struct {
1077c478bd9Sstevel@tonic-gate long offset;
1087c478bd9Sstevel@tonic-gate unsigned int count;
1097c478bd9Sstevel@tonic-gate } header;
1107c478bd9Sstevel@tonic-gate int pflag = 0;
1117c478bd9Sstevel@tonic-gate int kflag = 0;
1127c478bd9Sstevel@tonic-gate char *buf;
1137c478bd9Sstevel@tonic-gate char key[8];
114*a59d1975SRichard Lowe char keyvar[] = "CrYpTkEy=XXXXXXXX";
1157c478bd9Sstevel@tonic-gate char *s;
1167c478bd9Sstevel@tonic-gate
1177c478bd9Sstevel@tonic-gate if (argc < 2) {
1187c478bd9Sstevel@tonic-gate if ((buf = (char *)getpass("Enter key:")) == NULL) {
1197c478bd9Sstevel@tonic-gate (void) fprintf(stderr, "Cannot open /dev/tty\n");
1207c478bd9Sstevel@tonic-gate exit(1);
1217c478bd9Sstevel@tonic-gate }
1227c478bd9Sstevel@tonic-gate setup(buf);
1237c478bd9Sstevel@tonic-gate } else {
1247c478bd9Sstevel@tonic-gate while ((c = getopt(argc, argv, "pk")) != EOF)
1257c478bd9Sstevel@tonic-gate switch (c) {
1267c478bd9Sstevel@tonic-gate case 'p':
1277c478bd9Sstevel@tonic-gate /* notify editor that exec has succeeded */
1287c478bd9Sstevel@tonic-gate if (write(1, "y", 1) != 1)
1297c478bd9Sstevel@tonic-gate exit(1);
1307c478bd9Sstevel@tonic-gate if (read(0, key, 8) != 8)
1317c478bd9Sstevel@tonic-gate exit(1);
1327c478bd9Sstevel@tonic-gate setup(key);
1337c478bd9Sstevel@tonic-gate pflag = 1;
1347c478bd9Sstevel@tonic-gate break;
1357c478bd9Sstevel@tonic-gate case 'k':
1367c478bd9Sstevel@tonic-gate if ((s = getenv("CrYpTkEy")) == (char *)NULL) {
1377c478bd9Sstevel@tonic-gate (void) fprintf(stderr,
1387c478bd9Sstevel@tonic-gate "CrYpTkEy not set.\n");
1397c478bd9Sstevel@tonic-gate exit(1);
1407c478bd9Sstevel@tonic-gate }
1417c478bd9Sstevel@tonic-gate (void) strncpy(key, s, 8);
1427c478bd9Sstevel@tonic-gate setup(key);
1437c478bd9Sstevel@tonic-gate kflag = 1;
1447c478bd9Sstevel@tonic-gate break;
1457c478bd9Sstevel@tonic-gate case '?':
1467c478bd9Sstevel@tonic-gate (void) fprintf(stderr,
1477c478bd9Sstevel@tonic-gate "usage: crypt [ -k ] [ key]\n");
1487c478bd9Sstevel@tonic-gate exit(2);
1497c478bd9Sstevel@tonic-gate }
1507c478bd9Sstevel@tonic-gate if (pflag == 0 && kflag == 0) {
1517c478bd9Sstevel@tonic-gate (void) strncpy(keyvar+9, argv[optind], 8);
1527c478bd9Sstevel@tonic-gate (void) putenv(keyvar);
1537c478bd9Sstevel@tonic-gate (void) execlp("crypt", "crypt", "-k", 0);
1547c478bd9Sstevel@tonic-gate }
1557c478bd9Sstevel@tonic-gate }
1567c478bd9Sstevel@tonic-gate if (pflag)
1577c478bd9Sstevel@tonic-gate for (;;) {
1587c478bd9Sstevel@tonic-gate if ((nchar = read(0, (char *)&header, sizeof (header)))
1597c478bd9Sstevel@tonic-gate != sizeof (header))
1607c478bd9Sstevel@tonic-gate exit(nchar);
1617c478bd9Sstevel@tonic-gate n1 = (int)(header.offset&MASK);
1627c478bd9Sstevel@tonic-gate n2 = (int)((header.offset >> 8) &MASK);
1637c478bd9Sstevel@tonic-gate nchar = header.count;
1647c478bd9Sstevel@tonic-gate buf = (char *)malloc(nchar);
1657c478bd9Sstevel@tonic-gate p1 = buf;
1667c478bd9Sstevel@tonic-gate if (read(0, buf, nchar) != nchar)
1677c478bd9Sstevel@tonic-gate exit(1);
1687c478bd9Sstevel@tonic-gate while (nchar--) {
1697c478bd9Sstevel@tonic-gate *p1 = t2[(t3[(t1[(*p1 + n1)&MASK]+
1707c478bd9Sstevel@tonic-gate n2)&MASK] - n2)&MASK] - n1;
1717c478bd9Sstevel@tonic-gate n1++;
1727c478bd9Sstevel@tonic-gate if (n1 == ROTORSZ) {
1737c478bd9Sstevel@tonic-gate n1 = 0;
1747c478bd9Sstevel@tonic-gate n2++;
1757c478bd9Sstevel@tonic-gate if (n2 == ROTORSZ) n2 = 0;
1767c478bd9Sstevel@tonic-gate }
1777c478bd9Sstevel@tonic-gate p1++;
1787c478bd9Sstevel@tonic-gate }
1797c478bd9Sstevel@tonic-gate nchar = header.count;
1807c478bd9Sstevel@tonic-gate if (write(1, buf, nchar) != nchar)
1817c478bd9Sstevel@tonic-gate exit(1);
1827c478bd9Sstevel@tonic-gate free(buf);
1837c478bd9Sstevel@tonic-gate }
1847c478bd9Sstevel@tonic-gate
1857c478bd9Sstevel@tonic-gate n1 = 0;
1867c478bd9Sstevel@tonic-gate n2 = 0;
1877c478bd9Sstevel@tonic-gate
1887c478bd9Sstevel@tonic-gate while ((i = getchar()) >= 0) {
1897c478bd9Sstevel@tonic-gate i = t2[(t3[(t1[(i+n1)&MASK]+n2)&MASK]-n2)&MASK]-n1;
1907c478bd9Sstevel@tonic-gate (void) putchar(i);
1917c478bd9Sstevel@tonic-gate n1++;
1927c478bd9Sstevel@tonic-gate if (n1 == ROTORSZ) {
1937c478bd9Sstevel@tonic-gate n1 = 0;
1947c478bd9Sstevel@tonic-gate n2++;
1957c478bd9Sstevel@tonic-gate if (n2 == ROTORSZ) n2 = 0;
1967c478bd9Sstevel@tonic-gate }
1977c478bd9Sstevel@tonic-gate }
1987c478bd9Sstevel@tonic-gate return (0);
1997c478bd9Sstevel@tonic-gate }
200