home *** CD-ROM | disk | FTP | other *** search
/ gondwana.ecr.mu.oz.au/pub/ / Graphics.tar / Graphics / athena / eBones-p9.patch.Z / eBones-p9.patch
Text File  |  1990-10-25  |  39KB  |  1,409 lines
  1. diff -r -c ../oBones/src/Imakefile src/Imakefile
  2. *** ../oBones/src/Imakefile    Wed Nov  8 00:39:57 1989
  3. --- src/Imakefile    Tue Sep 11 10:37:28 1990
  4. ***************
  5. *** 25,31 ****
  6. --- 25,36 ----
  7.       make ${MFLAGS} regression
  8.   
  9.   # add more simple regression tests here.
  10. + #ifdef NOENCRYPTION
  11.   regression:
  12. + #else
  13. + regression:
  14. +     lib/des/destest
  15. + #endif
  16.   
  17.   
  18.   clean-imake:
  19. diff -r -c ../oBones/src/Makefile src/Makefile
  20. *** ../oBones/src/Makefile    Tue Oct  3 06:37:39 1989
  21. --- src/Makefile    Tue Sep 11 12:22:06 1990
  22. ***************
  23. *** 156,162 ****
  24.   # add more simple regression tests here.
  25.   
  26.   regression:
  27. !     lib/des/verify
  28.   
  29.   clean-imake:
  30.       cd util/imake; make clean
  31. --- 156,162 ----
  32.   # add more simple regression tests here.
  33.   
  34.   regression:
  35. !     lib/des/destest
  36.   
  37.   clean-imake:
  38.       cd util/imake; make clean
  39. diff -r -c ../oBones/src/admin/kdb_edit.c src/admin/kdb_edit.c
  40. *** ../oBones/src/admin/kdb_edit.c    Mon Sep 10 16:08:45 1990
  41. --- src/admin/kdb_edit.c    Mon Sep 10 16:31:29 1990
  42. ***************
  43. *** 242,260 ****
  44. --- 242,273 ----
  45.           }
  46.           /* password */
  47.           if (editpw) {
  48. + #ifdef NOENCRYPTION
  49.           placebo_read_pw_string(pw_str, sizeof pw_str,
  50.               "\nNew Password: ", TRUE);
  51. + #else
  52. +                 des_read_pw_string(pw_str, sizeof pw_str,
  53. +             "\nNew Password: ", TRUE);
  54. + #endif
  55.           if (!strcmp(pw_str, "RANDOM")) {
  56.               printf("\nRandom password [y] ? ");
  57.               gets(temp);
  58.               if (!strcmp("n", temp) || !strcmp("N", temp)) {
  59.               /* no, use literal */
  60. + #ifdef NOENCRYPTION
  61.               bzero(new_key, sizeof(C_Block));
  62.               new_key[0] = 127;
  63. + #else
  64. +             string_to_key(pw_str, new_key);
  65. + #endif
  66.               bzero(pw_str, sizeof pw_str);    /* "RANDOM" */
  67.               } else {
  68. + #ifdef NOENCRYPTION
  69.               bzero(new_key, sizeof(C_Block));
  70.               new_key[0] = 127;
  71. + #else
  72. +             random_key(new_key);
  73. + #endif
  74.               bzero(pw_str, sizeof pw_str);
  75.               }
  76.           } else if (!strcmp(pw_str, "NULL")) {
  77. ***************
  78. *** 262,269 ****
  79. --- 275,286 ----
  80.               gets(temp);
  81.               if (!strcmp("n", temp) || !strcmp("N", temp)) {
  82.               /* no, use literal */
  83. + #ifdef NOENCRYPTION
  84.               bzero(new_key, sizeof(C_Block));
  85.               new_key[0] = 127;
  86. + #else
  87. +             string_to_key(pw_str, new_key);
  88. + #endif
  89.               bzero(pw_str, sizeof pw_str);    /* "NULL" */
  90.               } else {
  91.   
  92. ***************
  93. *** 272,279 ****
  94. --- 289,300 ----
  95.               goto null_key;
  96.               }
  97.           } else {
  98. + #ifdef NOENCRYPTION
  99.               bzero(new_key, sizeof(C_Block));
  100.               new_key[0] = 127;
  101. + #else
  102. +             string_to_key(pw_str,new_key);
  103. + #endif
  104.               bzero(pw_str, sizeof pw_str);
  105.           }
  106.   
  107. diff -r -c ../oBones/src/admin/kdb_init.c src/admin/kdb_init.c
  108. *** ../oBones/src/admin/kdb_init.c    Wed Nov  8 00:38:33 1989
  109. --- src/admin/kdb_init.c    Mon Sep 10 16:32:17 1990
  110. ***************
  111. *** 137,144 ****
  112. --- 137,148 ----
  113.       principal.key_high = 0;
  114.       break;
  115.       case RANDOM_KEY:
  116. + #ifdef NOENCRYPTION
  117.       bzero(new_key, sizeof(C_Block));
  118.       new_key[0] = 127;
  119. + #else
  120. +     random_key(new_key);
  121. + #endif
  122.       kdb_encrypt_key (new_key, new_key, master_key, master_key_schedule,
  123.                ENCRYPT);
  124.       bcopy(new_key, &principal.key_low, 4);
  125. diff -r -c ../oBones/src/admin/kdb_util.c src/admin/kdb_util.c
  126. *** ../oBones/src/admin/kdb_util.c    Mon Sep 10 16:09:44 1990
  127. --- src/admin/kdb_util.c    Mon Sep 10 16:33:12 1990
  128. ***************
  129. *** 386,391 ****
  130. --- 386,396 ----
  131.     bcopy((char *)&(p->key_low), (char *)key, 4);
  132.     bcopy((char *)&(p->key_high), (char *)(((long *) key) + 1), 4);
  133.   
  134. + #ifndef NOENCRYPTION
  135. +   des_pcbc_encrypt((des_cblock *)key,(des_cblock *)key,
  136. +     (long)sizeof(des_cblock),master_key_schedule,
  137. +     (des_cblock *)master_key_schedule,DECRYPT);
  138. + #endif
  139.   
  140.     /* make new key, new style */
  141.     kdb_encrypt_key (key, key, master_key, master_key_schedule, ENCRYPT);
  142. ***************
  143. *** 431,436 ****
  144. --- 436,445 ----
  145.     bcopy((char *)&principal_data[0].key_low, (char *)key_from_db, 4);
  146.     bcopy((char *)&principal_data[0].key_high,
  147.       (char *)(((long *) key_from_db) + 1), 4);
  148. + #ifndef NOENCRYPTION
  149. +   des_pcbc_encrypt(key_from_db,key_from_db,(long)sizeof(key_from_db),
  150. +     master_key_schedule,(des_cblock *)master_key_schedule,DECRYPT);
  151. + #endif
  152.     /* the decrypted database key had better equal the master key */
  153.     n = bcmp((char *) master_key, (char *) key_from_db,
  154.          sizeof(master_key));
  155. diff -r -c ../oBones/src/appl/bsd/login.c src/appl/bsd/login.c
  156. *** ../oBones/src/appl/bsd/login.c    Mon Sep 10 16:06:55 1990
  157. --- src/appl/bsd/login.c    Tue Sep 11 14:02:05 1990
  158. ***************
  159. *** 333,339 ****
  160. --- 333,343 ----
  161.           int krbval;
  162.           char realm[REALM_SZ];
  163.           int kpass_ok,lpass_ok;
  164. + #ifdef NOENCRYPTION
  165.   #define read_long_pw_string placebo_read_pw_string
  166. + #else
  167. + #define read_long_pw_string des_read_pw_string
  168. + #endif
  169.           int read_long_pw_string();
  170.   #endif
  171.           ioctlval = 0;
  172. diff -r -c ../oBones/src/appl/bsd/rcp.c src/appl/bsd/rcp.c
  173. *** ../oBones/src/appl/bsd/rcp.c    Wed Nov  8 00:38:44 1989
  174. --- src/appl/bsd/rcp.c    Tue Sep 11 15:01:17 1990
  175. ***************
  176. *** 66,74 ****
  177. --- 66,82 ----
  178.   char    krb_realm[REALM_SZ];
  179.   void    try_normal();
  180.   char    **save_argv(), *strsave(), *krb_realmofhost();
  181. + #ifdef NOENCRYPTION
  182.   #define    des_read    read
  183.   #define    des_write    write
  184. + #else
  185. + int encryptflag=0;
  186. + #endif
  187. + #ifdef ultrix
  188. + #define    UCB_RCP    "/usr/ucb/rcp.ucb"
  189. + #else
  190.   #define    UCB_RCP    "/bin/rcp.ucb"
  191. + #endif
  192.   #else /* !KERBEROS */
  193.   #define    des_read    read
  194.   #define    des_write    write
  195. ***************
  196. *** 162,167 ****
  197. --- 170,180 ----
  198.                 usage();
  199.               strncpy(krb_realm,*argv,REALM_SZ);
  200.               goto next_arg;
  201. + #ifndef NOENCRYPTION
  202. +             case 'x':
  203. +             encryptflag++;
  204. +                 break;
  205. + #endif
  206.   #endif KERBEROS
  207.               /* The rest of these are not for users. */
  208.               case 'd':
  209. ***************
  210. *** 204,210 ****
  211. --- 217,227 ----
  212.   #ifdef KERBEROS
  213.       (void) sprintf(cmd, "rcp%s%s%s%s",
  214.                  iamrecursive ? " -r" : "", pflag ? " -p" : "", 
  215. + #ifdef NOENCRYPTION
  216.                  "",
  217. + #else
  218. +                encryptflag?" -x":"",
  219. + #endif
  220.                  targetshouldbedirectory ? " -d" : "");
  221.   #else /* !KERBEROS */
  222.       (void) sprintf(cmd, "rcp%s%s%s",
  223. ***************
  224. *** 322,327 ****
  225. --- 339,349 ----
  226.           (rem == -1) ? "rcmd protocol failure" : krb_err_txt[rem]);
  227.                           rem = -1;
  228.                       } else {
  229. + #ifndef NOENCRYPTION
  230. +                         if (encryptflag)
  231. +                             send_auth(host,krb_realm);
  232. + #endif
  233. + 
  234.                       }
  235.                       if (rem<0)
  236.                           try_normal(orig_argv);
  237. ***************
  238. *** 421,426 ****
  239. --- 443,453 ----
  240.           (rem == -1) ? "rcmd protocol failure" : krb_err_txt[rem]);
  241.                       rem = -1;
  242.                   } else {
  243. + #ifndef NOENCRYPTION
  244. +                     if (encryptflag)
  245. +                         send_auth(host,krb_realm);
  246. + #endif
  247. + 
  248.                   }
  249.                   if (rem<0)
  250.                       try_normal(orig_argv);
  251. ***************
  252. *** 944,950 ****
  253. --- 971,981 ----
  254.   {
  255.   #ifdef KERBEROS
  256.           fprintf(stderr,
  257. + #ifdef NOENCRYPTION
  258.   "Usage: rcp [-p] [-k realm] f1 f2; or:\n\trcp [-r] [-p] [-k realm] f1 ... fn d2\n");
  259. + #else
  260. + "Usage: rcp [-p] [-x] [-k realm] f1 f2; or:\n\trcp [-r] [-p] [-x] [-k realm] f1 ... fn d2\n");
  261. + #endif
  262.   #else /* !KERBEROS */
  263.       fputs("usage: rcp [-p] f1 f2; or: rcp [-rp] f1 ... fn d2\n", stderr);
  264.   #endif
  265. ***************
  266. *** 978,983 ****
  267. --- 1009,1018 ----
  268.   {
  269.       register int i;
  270.   
  271. + #ifndef NOENCRYPTION
  272. +         if (!encryptflag)
  273. + #endif
  274. +         {
  275.           fprintf(stderr,"trying normal rcp (%s)\n", UCB_RCP);
  276.           fflush(stderr);
  277.           /* close all but stdin, stdout, stderr */
  278. ***************
  279. *** 985,990 ****
  280. --- 1020,1026 ----
  281.               (void) close(i);
  282.           execv(UCB_RCP, argv);
  283.           perror("exec");
  284. +         }
  285.       exit(1);
  286.   }
  287.   
  288. ***************
  289. *** 1018,1022 ****
  290. --- 1054,1144 ----
  291.       return(ret);
  292.   }
  293.   
  294. + #ifndef NOENCRYPTION
  295. + int send_auth(h,r)
  296. + char *h;
  297. + char *r;
  298. +     {
  299. +     int lslen,fslen,i;
  300. +     long opts;
  301. + 
  302. +     lslen=sizeof(struct sockaddr_in);
  303. +     if (getsockname(sock,&local,&lslen) < 0)
  304. +         {
  305. +         perror("getsockname");
  306. +         exit(1);
  307. +         }
  308. +     fslen=sizeof(struct sockaddr_in);
  309. +     if (getpeername(sock,&foreign,&fslen) < 0)
  310. +         {
  311. +         perror("getpeername");
  312. +         exit(1);
  313. +         }
  314. +     if ((r == NULL) || (*r == '\0'))
  315. +         r=krb_realmofhost(h);
  316. +     opts=KOPT_DO_MUTUAL;
  317. +     if ((rem=krb_sendauth(opts,sock,&ticket,"rcmd",h,r,
  318. +         (unsigned long)getpid(),&msg_data,&cred,schedule,&local,
  319. +         &foreign,"KCMDV0.1")) != KSUCCESS)
  320. +         {
  321. +         fprintf(stderr,"krb_sendauth failure: %s\n",
  322. +             krb_err_txt[rem]);
  323. +         exit(1);
  324. +         }
  325. +     }
  326. + 
  327. + int answer_auth()
  328. +     {
  329. +     int lslen,fslen,status;
  330. +     long opts;
  331. +     char inst[INST_SZ],v[9];
  332. + 
  333. +     lslen=sizeof(struct sockaddr_in);
  334. +     if (getsockname(rem,&local,&lslen) < 0)
  335. +         {
  336. +         perror("getsockname");
  337. +         exit(1);
  338. +         }
  339. +     fslen=sizeof(struct sockaddr_in);
  340. +     if(getpeername(rem,&foreign,&fslen) < 0)
  341. +         {
  342. +         perror("getperrname");
  343. +         exit(1);
  344. +         }
  345. +     strcpy(inst,"*");
  346. +     opts=KOPT_DO_MUTUAL;
  347. +     if ((status=krb_recvauth(opts,rem,&ticket,"rcmd",inst,&foreign,&local,
  348. +         &kdata,"",schedule,v)) != KSUCCESS)
  349. +         {
  350. +         fprintf(stderr,"krb_recvauth failure: %s\n",
  351. +             krb_err_txt[status]);
  352. +         exit(1);
  353. +         }
  354. +     }
  355. + 
  356. + int des_read(fd,buf,len)
  357. + int fd;
  358. + char *buf;
  359. + int len;
  360. +         {
  361. +         if (encryptflag)
  362. +                 return(des_enc_read(fd,buf,len,schedule,
  363. +             (iamremote?kdata.session:cred.session)));
  364. +         else
  365. +                 return(read(fd,buf,len));
  366. +         }
  367. + 
  368. + int des_write(fd,buf,len)
  369. + int fd;
  370. + char *buf;
  371. + int len;
  372. +         {
  373. +         if (encryptflag)
  374. +                 return(des_enc_write(fd,buf,len,schedule,
  375. +             (iamremote?kdata.session:cred.session)));
  376. +         else
  377. +                 return(write(fd,buf,len));
  378. +         }
  379. + #endif
  380.   
  381.   #endif KERBEROS
  382. diff -r -c ../oBones/src/appl/bsd/rlogin.c src/appl/bsd/rlogin.c
  383. *** ../oBones/src/appl/bsd/rlogin.c    Mon Sep 10 15:42:33 1990
  384. --- src/appl/bsd/rlogin.c    Tue Sep 11 10:49:40 1990
  385. ***************
  386. *** 114,121 ****
  387. --- 114,125 ----
  388.   #ifdef KERBEROS
  389.   void try_normal();
  390.   char krb_realm[REALM_SZ];
  391. + #ifndef NOENCRYPTION
  392. + int encryptflag=0;
  393. + #else
  394.   #define des_read read
  395.   #define des_write write
  396. + #endif
  397.   CREDENTIALS cred;
  398.   Key_schedule schedule;
  399.   MSG_DAT msg_data;
  400. ***************
  401. *** 261,266 ****
  402. --- 265,279 ----
  403.           argv++, argc--;
  404.           goto another;
  405.       }
  406. + #ifndef NOENCRYPTION
  407. +     if ((argc > 0) && (strcmp(*argv,"-x") == 0))
  408. +         {
  409. +         encryptflag++;
  410. +         argv++;
  411. +         argc--;
  412. +         goto another;
  413. +         }
  414. + #endif
  415.   #endif KERBEROS
  416.       if (host == 0)
  417.           goto usage;
  418. ***************
  419. *** 277,285 ****
  420. --- 290,308 ----
  421.        * attempt to login with Kerberos. 
  422.        * If we fail at any step,  use the standard rlogin
  423.        */
  424. + #ifndef NOENCRYPTION
  425. +     if (encryptflag)
  426. +         sp=getservbyname("eklogin","tcp");
  427. +     else
  428. + #endif
  429.           sp = getservbyname("klogin","tcp");
  430.       if (sp == 0) {
  431. + #ifdef NOENCRYPTION
  432.           fprintf(stderr, "rlogin: klogin/tcp: unknown service\n");
  433. + #else
  434. +         fprintf(stderr,"rlogin: %s/tcp: unknown service\n",
  435. +             encryptflag?"eklogin":"klogin");
  436. + #endif
  437.           
  438.           try_normal(orig_argv);
  439.       }
  440. ***************
  441. *** 308,313 ****
  442. --- 331,340 ----
  443.   
  444.   #ifdef KERBEROS
  445.       rem=KSUCCESS;
  446. + #ifndef NOENCRYPTION
  447. +     if (encryptflag) authopts=KOPT_DO_MUTUAL;
  448. +     else
  449. + #endif
  450.       {
  451.   #ifdef ATHENA_COMPAT
  452.           authopts = KOPT_DO_OLDSTYLE;
  453. ***************
  454. *** 381,387 ****
  455. --- 408,418 ----
  456.   #ifdef ATHENA
  457.       fprintf (stderr,
  458.   "usage: rlogin host [-option] [-option...] [-k realm ] [-t ttytype] [-l username]\n");
  459. + #ifdef NOENCRYPTION
  460.           fprintf (stderr, "     where option is e, 7, 8, noflow, n, a, or c\n");
  461. + #else
  462. +         fprintf (stderr, "     where option is e, 7, 8, noflow, n, a, c or x\n");
  463. + #endif
  464.   #else !ATHENA
  465.       fprintf (stderr,
  466.   "usage: rlogin host [ -ex ] [-k realm ] [-l username] [ -8 ] [ -L ]\n");
  467. ***************
  468. *** 937,942 ****
  469. --- 968,976 ----
  470.   {
  471.       register char *host;
  472.   
  473. + #ifndef NOENCRYPTION
  474. +     if (encryptflag) exit(1);
  475. + #endif
  476.       fprintf(stderr,"trying normal rlogin (%s)\n",
  477.           UCB_RLOGIN);
  478.       fflush(stderr);
  479. ***************
  480. *** 962,964 ****
  481. --- 996,1022 ----
  482.       prf("\007Connection closed.");
  483.       done(1);
  484.   }
  485. + 
  486. + #ifndef NOENCRYPTION
  487. + int des_read(fd,buf,len)
  488. + int fd;
  489. + char *buf;
  490. + int len;
  491. +     {
  492. +     if (encryptflag)
  493. +         return(des_enc_read(fd,buf,len,schedule,cred.session));
  494. +     else
  495. +         return(read(fd,buf,len));
  496. +     }
  497. + 
  498. + int des_write(fd,buf,len)
  499. + int fd;
  500. + char *buf;
  501. + int len;
  502. +     {
  503. +     if (encryptflag)
  504. +         return(des_enc_write(fd,buf,len,schedule,cred.session));
  505. +     else
  506. +         return(write(fd,buf,len));
  507. +     }
  508. + #endif
  509. diff -r -c ../oBones/src/appl/bsd/rlogind.c src/appl/bsd/rlogind.c
  510. *** ../oBones/src/appl/bsd/rlogind.c    Wed Nov  8 00:38:46 1989
  511. --- src/appl/bsd/rlogind.c    Tue Sep 11 12:24:10 1990
  512. ***************
  513. *** 75,82 ****
  514. --- 75,87 ----
  515.   KTEXT        ticket;
  516.   Key_schedule    schedule;
  517.   void        do_krb_login();
  518. + #ifdef NOENCRYPTION
  519.   #define    des_read    read
  520.   #define    des_write    write
  521. + #else
  522. + #define des_read(a,b,c)        ((eklogin)?des_enc_read(a,b,c,schedule,kdata->session):read(a,b,c))
  523. + #define des_write(a,b,c)    ((eklogin)?des_enc_write(a,b,c,schedule,kdata->session):write(a,b,c))
  524. + #endif
  525.   #else /* !KERBEROS */
  526.   #define    des_read    read
  527.   #define    des_write    write
  528. ***************
  529. *** 117,124 ****
  530. --- 122,135 ----
  531.        * If the name of the program is "eklogind", all data passing over
  532.        * the network pipe are encrypted.
  533.        */
  534. + 
  535. + #ifdef NOENCRYPTION
  536.       klogin = (!strcmp(*argv,"eklogind") ||
  537.             !strcmp(*argv,"klogind"));    /* pass -k flag to login */
  538. + #else
  539. +     eklogin=!strcmp(*argv,"eklogind");
  540. +     klogin=!strcmp(*argv,"klogind");
  541. + #endif
  542.       Klogin = !strcmp(*argv,"Klogind");    /* pass -K flag to login */
  543.       /* 
  544.        * if klogin, Klogin, and eklogin are zero (ie, the program name was
  545. ***************
  546. *** 126,136 ****
  547. --- 137,157 ----
  548.        */
  549.   
  550.   #ifndef LOG_AUTH /* 4.2 syslog */
  551. + #ifdef NOENCRYPTION
  552.       openlog(klogin ? "klogind" : (Klogin ? "Klogind" : "rlogind"),
  553.           LOG_PID);
  554.   #else
  555. +     openlog(eklogin?"eklogind":(klogin?"klogind":
  556. +         (Klogin?"Klogind":"rlogind")),LOG_PID);
  557. + #endif
  558. + #else
  559. + #ifdef NOENCRYPTION
  560.       openlog(klogin ? "klogind" : (Klogin ? "Klogind" : "rlogind"),
  561.           LOG_PID | LOG_AUTH, LOG_AUTH);
  562. + #else
  563. +        openlog(eklogin ? "eklogind" : (klogin ? "klogind" :
  564. +            (Klogin ? "Klogind" : "rlogind")),LOG_PID|LOG_AUTH,LOG_AUTH);
  565. + #endif
  566.   #endif /* 4.2 syslog */
  567.   #else
  568.   #ifndef LOG_AUTH /* 4.2 syslog */
  569. ***************
  570. *** 187,193 ****
  571. --- 208,218 ----
  572.   #ifdef KERBEROS
  573.       /* Don't care about reserved port for kerberos logins */
  574.       if (fromp->sin_family != AF_INET ||
  575. + #ifdef NOENCRYPTION
  576.           (!klogin && !Klogin &&
  577. + #else
  578. +         (!klogin && !Klogin && !eklogin &&
  579. + #endif
  580.            (fromp->sin_port >= IPPORT_RESERVED ||
  581.            fromp->sin_port < IPPORT_RESERVED/2)))
  582.   #else /* !KERBEROS */
  583. ***************
  584. *** 279,284 ****
  585. --- 304,321 ----
  586.               execl(LOGIN_PROGRAM, "login", "-k", hp->h_name, 0);
  587.           } else if (Klogin) {
  588.               execl(LOGIN_PROGRAM, "login", "-K", hp->h_name, 0);
  589. + #ifndef NOENCRYPTION
  590. +         } else if (eklogin)
  591. +             {
  592. +             struct passwd *pw;
  593. + 
  594. +             pw=getpwnam(lusername);
  595. +             if ((pw != NULL) && (pw->pw_uid == 0))
  596. +                 syslog(LOG_INFO,"root login (eklogin) from %s (%s.%s@%s",
  597. +                     hp->h_name,kdata->pname,kdata->pinst,
  598. +                     kdata->prealm);
  599. +             execl(LOGIN_PROGRAM,"login","-e",lusername,0);
  600. + #endif
  601.           } else {
  602.               execl(LOGIN_PROGRAM, "login", "-r", hp->h_name, 0);
  603.           }
  604. diff -r -c ../oBones/src/appl/sample/simple_client.c src/appl/sample/simple_client.c
  605. *** ../oBones/src/appl/sample/simple_client.c    Wed Nov  8 00:38:40 1989
  606. --- src/appl/sample/simple_client.c    Mon Sep 10 17:12:27 1990
  607. ***************
  608. *** 165,171 ****
  609. --- 165,176 ----
  610.   
  611.       /* PREPARE KRB_MK_PRIV MESSAGE */
  612.   
  613. + #ifdef NOENCRYPTION
  614.       bzero((char *)sched, sizeof(sched));
  615. + #else
  616. +     /* Get key schedule for session key */
  617. +     des_key_sched(cred->session, sched);
  618. + #endif
  619.   
  620.       /* Make the encrypted message */
  621.       len = krb_mk_priv(MSG, ktxt->dat, strlen(MSG)+1,
  622. diff -r -c ../oBones/src/appl/sample/simple_server.c src/appl/sample/simple_server.c
  623. *** ../oBones/src/appl/sample/simple_server.c    Wed Nov  8 00:38:40 1989
  624. --- src/appl/sample/simple_server.c    Mon Sep 10 17:13:26 1990
  625. ***************
  626. *** 135,141 ****
  627. --- 135,146 ----
  628.       
  629.       /* NOW GET ENCRYPTED MESSAGE */
  630.   
  631. + #ifdef NOENCRYPTION
  632.       bzero((char *)sched, sizeof(sched));
  633. + #else
  634. +     /* need key schedule for session key */
  635. +     des_key_sched(ad.session, sched);
  636. + #endif
  637.   
  638.       /* use "recvfrom" so we know client's address */
  639.       i = sizeof(c_sock);
  640. diff -r -c ../oBones/src/kadmin/kadm_ser_wrap.c src/kadmin/kadm_ser_wrap.c
  641. *** ../oBones/src/kadmin/kadm_ser_wrap.c    Wed Nov  8 00:39:52 1989
  642. --- src/kadmin/kadm_ser_wrap.c    Mon Sep 10 17:18:51 1990
  643. ***************
  644. *** 136,148 ****
  645. --- 136,156 ----
  646.   #define clr_cli_secrets() {bzero((char *)sess_sched, sizeof(sess_sched)); bzero((char *)ad.session, sizeof(ad.session));}
  647.   
  648.       in_st = *dat + *dat_len - r_len;
  649. + #ifdef NOENCRYPTION
  650.       ncksum = 0;
  651. + #else
  652. +     ncksum = quad_cksum(in_st, (u_long *)0, (long) r_len, 0, ad.session);
  653. + #endif
  654.       if (ncksum!=ad.checksum) {        /* yow, are we correct yet */
  655.       clr_cli_secrets();
  656.       errpkt(dat, dat_len,KADM_BAD_CHK);
  657.       return KADM_BAD_CHK;
  658.       }
  659. + #ifdef NOENCRYPTION
  660.       bzero(sess_sched, sizeof(sess_sched));
  661. + #else
  662. +     des_key_sched(ad.session, sess_sched);
  663. + #endif
  664.       if (retc = (int) krb_rd_priv(in_st, r_len, sess_sched, ad.session, 
  665.                    &server_parm.recv_addr,
  666.                    &server_parm.admin_addr, &msg_st)) {
  667. diff -r -c ../oBones/src/kadmin/kadmin.c src/kadmin/kadmin.c
  668. *** ../oBones/src/kadmin/kadmin.c    Wed Nov  8 00:39:49 1989
  669. --- src/kadmin/kadmin.c    Tue Sep 11 12:26:45 1990
  670. ***************
  671. *** 489,495 ****
  672. --- 489,499 ----
  673.       }
  674.   }
  675.   
  676. + #ifdef NOENCRYPTION
  677.   #define read_long_pw_string placebo_read_pw_string
  678. + #else
  679. + #define read_long_pw_string des_read_pw_string
  680. + #endif
  681.   extern int read_long_pw_string();
  682.   
  683.   int
  684. ***************
  685. *** 599,605 ****
  686. --- 603,613 ----
  687.           printf("Null passwords are not allowed; try again.\n");
  688.       } while (strlen(new_passwd) == 0);
  689.   
  690. + #ifdef NOENCRYPTION
  691.       bzero((char *) newkey, sizeof(newkey));
  692. + #else
  693. +     des_string_to_key(new_passwd, newkey);
  694. + #endif
  695.       bzero(new_passwd, sizeof(new_passwd));
  696.   
  697.       bcopy((char *) newkey,(char *)low,4);
  698. ***************
  699. *** 607,613 ****
  700. --- 615,623 ----
  701.   
  702.       bzero((char *) newkey, sizeof(newkey));
  703.   
  704. + #ifdef NOENCRYPTION
  705.       *low = 1;
  706. + #endif
  707.   
  708.       if (byteswap != DONTSWAP) {
  709.       *low = htonl(*low);
  710. diff -r -c ../oBones/src/kadmin/kpasswd.c src/kadmin/kpasswd.c
  711. *** ../oBones/src/kadmin/kpasswd.c    Wed Nov  8 00:39:50 1989
  712. --- src/kadmin/kpasswd.c    Mon Sep 10 17:24:50 1990
  713. ***************
  714. *** 51,57 ****
  715. --- 51,61 ----
  716.       
  717.       void get_pw_new_key();
  718.       
  719. + #ifdef NOENCRYPTION
  720.   #define read_long_pw_string placebo_read_pw_string
  721. + #else
  722. + #define read_long_pw_string des_read_pw_string
  723. + #endif
  724.       int read_long_pw_string();
  725.       
  726.       bzero(name, sizeof(name));
  727. ***************
  728. *** 211,218 ****
  729. --- 215,226 ----
  730.           printf("Null passwords are not allowed; try again.\n");
  731.       } while (strlen(pword) == 0);
  732.       
  733. + #ifdef NOENCRYPTION
  734.       bzero((char *) new_key, sizeof(des_cblock));
  735.       new_key[0] = (unsigned char) 1;
  736. + #else
  737. +     (void) des_string_to_key(pword, new_key);
  738. + #endif
  739.       bzero(pword, sizeof(pword));
  740.   }
  741.   
  742. diff -r -c ../oBones/src/kadmin/ksrvutil.c src/kadmin/ksrvutil.c
  743. *** ../oBones/src/kadmin/ksrvutil.c    Wed Nov  8 00:39:53 1989
  744. --- src/kadmin/ksrvutil.c    Tue Sep 11 11:02:30 1990
  745. ***************
  746. *** 37,43 ****
  747. --- 37,47 ----
  748.   #include <errno.h>
  749.   #include <kadm.h>
  750.   
  751. + #ifdef NOENCRYPTION
  752.   #define read_long_pw_string placebo_read_pw_string
  753. + #else /* NOENCRYPTION */
  754. + #define read_long_pw_string des_read_pw_string
  755. + #endif /* NOENCRYPTION */
  756.   int read_long_pw_string();
  757.   
  758.   #define SRVTAB_MODE 0600    /* rw------- */
  759. ***************
  760. *** 556,563 ****
  761. --- 560,571 ----
  762.                         KADM_SINST, 1, keyfile)) == KSUCCESS) &&
  763.       ((status = kadm_init_link("changepw", KRB_MASTER, srealm)) == 
  764.        KADM_SUCCESS)) {
  765. + #ifdef NOENCRYPTION
  766.       (void) bzero((char *) new_key, sizeof(des_cblock));
  767.       new_key[0] = (unsigned char) 1;
  768. + #else /* NOENCRYPTION */
  769. +     (void) des_random_key(new_key);
  770. + #endif /* NOENCRYPTION */
  771.       return(KADM_SUCCESS);
  772.       }
  773.       
  774. ***************
  775. *** 573,580 ****
  776. --- 581,592 ----
  777.       if (read_long_pw_string(password, sizeof(password)-1, "Password: ", 1))
  778.       leave("Error reading password.", 1);
  779.   
  780. + #ifdef NOENCRYPTION
  781.       (void) bzero((char *) key, sizeof(des_cblock));
  782.       key[0] = (unsigned char) 1;
  783. + #else /* NOENCRYPTION */
  784. +     (void) des_string_to_key(password, key);
  785. + #endif /* NOENCRYPTION */
  786.       (void) bzero((char *)password, sizeof(password));
  787.   }    
  788.   
  789. diff -r -c ../oBones/src/kuser/ksu.c src/kuser/ksu.c
  790. *** ../oBones/src/kuser/ksu.c    Wed Nov  8 00:38:52 1989
  791. --- src/kuser/ksu.c    Tue Sep 11 08:39:04 1990
  792. ***************
  793. *** 89,95 ****
  794. --- 89,99 ----
  795.       char *user, *shell, *username, *cleanenv[2], *nargv[4], **np;
  796.       char namebuf[50], shellbuf[MAXPATHLEN];
  797.       char *crypt(), *getpass(), *getenv(), *getlogin(), *rindex(), *strcpy();
  798. + #ifdef NOENCRYPTION
  799.   #define read_long_pw_string placebo_read_pw_string
  800. + #else
  801. + #define read_long_pw_string des_read_pw_string
  802. + #endif
  803.       int read_long_pw_string();
  804.       char pw_buf[MAXPWSIZE];
  805.       char   *mytty;
  806. diff -r -c ../oBones/src/lib/Imakefile src/lib/Imakefile
  807. *** ../oBones/src/lib/Imakefile    Wed Nov  8 00:39:22 1989
  808. --- src/lib/Imakefile    Tue Sep 11 08:40:28 1990
  809. ***************
  810. *** 11,14 ****
  811. --- 11,18 ----
  812.   
  813.   #define have_subdirs
  814.   CODE=Imakefile
  815. + #ifdef NOENCRYPTION
  816.   SUBDIRS= krb kdb kadm knet acl
  817. + #else /* Do encryption */
  818. + SUBDIRS= des krb kdb kadm knet acl
  819. + #endif /* NOENCRYPTION */
  820. diff -r -c ../oBones/src/lib/kadm/kadm_cli_wrap.c src/lib/kadm/kadm_cli_wrap.c
  821. *** ../oBones/src/lib/kadm/kadm_cli_wrap.c    Mon Sep 10 16:00:04 1990
  822. --- src/lib/kadm/kadm_cli_wrap.c    Tue Aug  7 17:14:52 1990
  823. ***************
  824. *** 317,323 ****
  825. --- 317,328 ----
  826.        sizeof(u_long) (for the size indication) from total size */
  827.   
  828.       act_len += vts_long((u_long) priv_len, &act_st, act_len);
  829. + #ifdef NOENCRYPTION
  830.       cksum = 0;
  831. + #else
  832. +     cksum = quad_cksum(priv_pak, (u_long *)0, (long)priv_len, 0,
  833. +                sess_key);
  834. + #endif
  835.       if (retdat = krb_mk_req(&authent, client_parm.sname, client_parm.sinst,
  836.                   client_parm.krbrlm, (long)cksum)) {
  837.           /* authenticator? */
  838. ***************
  839. *** 396,402 ****
  840. --- 401,412 ----
  841.           return stat + krb_err_base;
  842.       bcopy((char *) cred.session, (char *) s_k, sizeof(des_cblock));
  843.       bzero((char *) cred.session, sizeof(des_cblock));
  844. + #ifdef NOENCRYPTION
  845.       bzero(s_s, sizeof(des_key_schedule));
  846. + #else
  847. +     if (stat = key_sched(s_k,s_s))
  848. +         return(stat+krb_err_base);
  849. + #endif
  850.       return KADM_SUCCESS;
  851.   }                       /* This code "works" */
  852.   
  853. diff -r -c ../oBones/src/lib/kdb/krb_kdb_utils.c src/lib/kdb/krb_kdb_utils.c
  854. *** ../oBones/src/lib/kdb/krb_kdb_utils.c    Wed Nov  8 00:39:19 1989
  855. --- src/lib/kdb/krb_kdb_utils.c    Tue Sep 11 08:45:25 1990
  856. ***************
  857. *** 35,42 ****
  858. --- 35,47 ----
  859.     int kfile;
  860.   
  861.     if (prompt)  {
  862. + #ifdef NOENCRYPTION
  863.         placebo_read_password(master_key,
  864.                   "\nEnter Kerberos master key: ", 0);
  865. + #else
  866. +       des_read_password(master_key,
  867. +                  "\nEnter Kerberos master key: ", 0);
  868. + #endif
  869.         printf ("\n");
  870.     }
  871.     else {
  872. ***************
  873. *** 51,56 ****
  874. --- 56,64 ----
  875.       close(kfile);
  876.     }
  877.   
  878. + #ifndef NOENCRYPTION
  879. +   key_sched(master_key,master_key_sched);
  880. + #endif
  881.     return (0);
  882.   }
  883.   
  884. ***************
  885. *** 126,130 ****
  886. --- 134,143 ----
  887.        int e_d_flag;
  888.   {
  889.   
  890. + #ifdef NOENCRYPTION
  891.     bcopy(in, out, sizeof(C_Block));
  892. + #else
  893. +   pcbc_encrypt(in,out,(long)sizeof(C_Block),master_key_sched,master_key,
  894. +      e_d_flag);
  895. + #endif
  896.   }
  897. diff -r -c ../oBones/src/lib/krb/create_ciph.c src/lib/krb/create_ciph.c
  898. *** ../oBones/src/lib/krb/create_ciph.c    Wed Nov  8 00:39:11 1989
  899. --- src/lib/krb/create_ciph.c    Tue Sep 11 12:27:50 1990
  900. ***************
  901. *** 101,106 ****
  902. --- 101,111 ----
  903.   
  904.       c->length = (((ptr - (char *) c->dat) + 7) / 8) * 8;
  905.   
  906. + #ifndef NOENCRYPTION
  907. +     key_sched(key,key_s);
  908. +     pcbc_encrypt((C_Block *)c->dat,(C_Block *)c->dat,(long) c->length,key_s,
  909. +     key,ENCRYPT);
  910. + #endif /* NOENCRYPTION */
  911.   
  912.       return(KSUCCESS);
  913.   }
  914. diff -r -c ../oBones/src/lib/krb/create_ticket.c src/lib/krb/create_ticket.c
  915. *** ../oBones/src/lib/krb/create_ticket.c    Wed Nov  8 00:38:54 1989
  916. --- src/lib/krb/create_ticket.c    Tue Sep 11 11:18:35 1990
  917. ***************
  918. *** 123,127 ****
  919. --- 123,132 ----
  920.           return KFAILURE /* XXX */;
  921.       }
  922.   
  923. + #ifndef NOENCRYPTION
  924. +     key_sched(key,key_s);
  925. +     pcbc_encrypt((C_Block *)tkt->dat,(C_Block *)tkt->dat,(long)tkt->length,
  926. +     key_s,key,ENCRYPT);
  927. + #endif
  928.       return 0;
  929.   }
  930. diff -r -c ../oBones/src/lib/krb/decomp_ticket.c src/lib/krb/decomp_ticket.c
  931. *** ../oBones/src/lib/krb/decomp_ticket.c    Wed Nov  8 00:38:55 1989
  932. --- src/lib/krb/decomp_ticket.c    Tue Sep 11 08:51:30 1990
  933. ***************
  934. *** 68,73 ****
  935. --- 68,77 ----
  936.       unsigned char *uptr;
  937.       char *ptr = (char *)tkt->dat;
  938.   
  939. + #ifndef NOENCRYPTION
  940. +     pcbc_encrypt((C_Block *)tkt->dat,(C_Block *)tkt->dat,(long)tkt->length,
  941. +     key_s,key,DECRYPT);
  942. + #endif /* ! NOENCRYPTION */
  943.   
  944.       *flags = *ptr;              /* get flags byte */
  945.       ptr += sizeof(*flags);
  946. diff -r -c ../oBones/src/lib/krb/get_ad_tkt.c src/lib/krb/get_ad_tkt.c
  947. *** ../oBones/src/lib/krb/get_ad_tkt.c    Wed Nov  8 00:38:57 1989
  948. --- src/lib/krb/get_ad_tkt.c    Tue Sep 11 13:39:33 1990
  949. ***************
  950. *** 182,187 ****
  951. --- 182,192 ----
  952.   
  953.       bcopy((char *) pkt_cipher(rpkt),(char *) (cip->dat),cip->length);
  954.   
  955. + #ifndef NOENCRYPTION
  956. +     key_sched(cr.session,key_s);
  957. +     pcbc_encrypt((C_Block *)cip->dat,(C_Block *)cip->dat,(long)cip->length,
  958. +     key_s,cr.session,DECRYPT);
  959. + #endif
  960.       /* Get rid of all traces of key */
  961.       bzero((char *) cr.session, sizeof(key));
  962.       bzero((char *) key_s, sizeof(key_s));
  963. diff -r -c ../oBones/src/lib/krb/get_in_tkt.c src/lib/krb/get_in_tkt.c
  964. *** ../oBones/src/lib/krb/get_in_tkt.c    Wed Nov  8 00:38:58 1989
  965. --- src/lib/krb/get_in_tkt.c    Tue Sep 11 11:29:40 1990
  966. ***************
  967. *** 49,56 ****
  968. --- 49,63 ----
  969.       char *user, *instance, *realm, *passwd;
  970.       C_Block key;
  971.   {
  972. + #ifdef NOENCRYPTION
  973.       if (!passwd)
  974.       placebo_read_password(key, "Password: ", 0);
  975. + #else
  976. +     if (passwd)
  977. +     string_to_key(passwd,key);
  978. +     else
  979. +     des_read_password(key,"Password: ",0);
  980. + #endif
  981.       return (0);
  982.   }
  983.   
  984. ***************
  985. *** 80,85 ****
  986. --- 87,93 ----
  987.                             passwd_to_key, NULL, password));
  988.   }
  989.   
  990. + #ifdef NOENCRYPTION
  991.   /*
  992.    * $Source: /mit/kerberos/src/lib/krb/RCS/get_in_tkt.c,v $
  993.    * $Author: jtkohl $
  994. ***************
  995. *** 280,282 ****
  996. --- 288,291 ----
  997.       longjmp(env,1);
  998.   }
  999.   #endif
  1000. + #endif /* NOENCRYPTION */
  1001. diff -r -c ../oBones/src/lib/krb/krb_get_in_tkt.c src/lib/krb/krb_get_in_tkt.c
  1002. *** ../oBones/src/lib/krb/krb_get_in_tkt.c    Wed Nov  8 00:39:00 1989
  1003. --- src/lib/krb/krb_get_in_tkt.c    Tue Sep 11 13:42:15 1990
  1004. ***************
  1005. *** 47,52 ****
  1006. --- 47,55 ----
  1007.       C_Block key;        /* Key for decrypting cipher */
  1008.       Key_schedule key_s;
  1009.   
  1010. + #ifndef NOENCRYPTION
  1011. +     /* Attempt to decrypt it */
  1012. + #endif
  1013.       
  1014.       /* generate a key */
  1015.       
  1016. ***************
  1017. *** 57,62 ****
  1018. --- 60,70 ----
  1019.           return(rc);
  1020.       }
  1021.       
  1022. + #ifndef NOENCRYPTION
  1023. +     key_sched(key,key_s);
  1024. +     pcbc_encrypt((C_Block *)cip->dat,(C_Block *)cip->dat,
  1025. +          (long) cip->length,key_s,key,DES_DECRYPT);
  1026. + #endif /* !NOENCRYPTION */
  1027.       /* Get rid of all traces of key */
  1028.       bzero((char *)key,sizeof(key));
  1029.       bzero((char *)key_s,sizeof(key_s));
  1030. diff -r -c ../oBones/src/lib/krb/mk_priv.c src/lib/krb/mk_priv.c
  1031. *** ../oBones/src/lib/krb/mk_priv.c    Wed Nov  8 00:39:03 1989
  1032. --- src/lib/krb/mk_priv.c    Tue Sep 11 09:19:12 1990
  1033. ***************
  1034. *** 80,85 ****
  1035. --- 80,88 ----
  1036.    *            HOST_BYTE_ORDER        byte order in low bit
  1037.    *
  1038.    * 4 bytes        c_length        length of data
  1039. + #ifndef NOENCRYPT
  1040. +  * we encrypt from here with pcbc_encrypt
  1041. + #endif
  1042.    * 
  1043.    * 4 bytes        length            length of user data
  1044.    * length        in            user data
  1045. ***************
  1046. *** 133,139 ****
  1047. --- 136,146 ----
  1048.       bcopy((char *)&length,(char *)p,sizeof(length));
  1049.       p += sizeof(length);
  1050.   
  1051. + #ifdef NOENCRYPTION
  1052.       /* make all the stuff contiguous for checksum */
  1053. + #else
  1054. +     /* make all the stuff contiguous for checksum and encryption */
  1055. + #endif
  1056.       bcopy((char *)in,(char *)p,(int) length);
  1057.       p += length;
  1058.   
  1059. ***************
  1060. *** 191,196 ****
  1061. --- 198,206 ----
  1062.       /* stuff the length */
  1063.       bcopy((char *) &c_length,(char *)c_length_ptr,sizeof(c_length));
  1064.   
  1065. + #ifndef NOENCRYPTION
  1066. +     pcbc_encrypt((C_Block *)q,(C_Block *)q,(long)(p-q),schedule,key,ENCRYPT);
  1067. + #endif /* NOENCRYPTION */
  1068.   
  1069.       return (q - out + c_length);        /* resulting size */
  1070.   }
  1071. diff -r -c ../oBones/src/lib/krb/mk_req.c src/lib/krb/mk_req.c
  1072. *** ../oBones/src/lib/krb/mk_req.c    Wed Nov  8 00:39:09 1989
  1073. --- src/lib/krb/mk_req.c    Tue Sep 11 09:22:57 1990
  1074. ***************
  1075. *** 155,160 ****
  1076. --- 155,166 ----
  1077.       /* Fill to a multiple of 8 bytes for DES */
  1078.       req_id->length = ((req_id->length+7)/8)*8;
  1079.   
  1080. + #ifndef NOENCRYPTION
  1081. +     key_sched(cr.session,key_s);
  1082. +     pcbc_encrypt((C_Block *)req_id->dat,(C_Block *)req_id->dat,
  1083. +     (long)req_id->length,key_s,cr.session,ENCRYPT);
  1084. +     bzero((char *) key_s, sizeof(key_s));
  1085. + #endif /* NOENCRYPTION */
  1086.   
  1087.       /* Copy it into the authenticator */
  1088.       bcopy((char *)(req_id->dat),(char *)(authent->dat+authent->length),
  1089. diff -r -c ../oBones/src/lib/krb/mk_safe.c src/lib/krb/mk_safe.c
  1090. *** ../oBones/src/lib/krb/mk_safe.c    Wed Nov  8 00:38:59 1989
  1091. --- src/lib/krb/mk_safe.c    Tue Sep 11 09:24:51 1990
  1092. ***************
  1093. *** 153,160 ****
  1094. --- 153,164 ----
  1095.       bcopy((char *)&msg_time_sec,(char *)p,sizeof(msg_time_sec));
  1096.       p += sizeof(msg_time_sec);
  1097.   
  1098. + #ifdef NOENCRYPTION
  1099.       cksum = 0;
  1100.       bzero(big_cksum, sizeof(big_cksum));
  1101. + #else
  1102. +     cksum=quad_cksum(q,big_cksum,p-q,2,key);
  1103. + #endif
  1104.       if (krb_debug)
  1105.           printf("\ncksum = %u",cksum);
  1106.   
  1107. diff -r -c ../oBones/src/lib/krb/rd_priv.c src/lib/krb/rd_priv.c
  1108. *** ../oBones/src/lib/krb/rd_priv.c    Wed Nov  8 00:39:08 1989
  1109. --- src/lib/krb/rd_priv.c    Tue Sep 11 09:27:20 1990
  1110. ***************
  1111. *** 111,116 ****
  1112. --- 111,119 ----
  1113.   
  1114.       q = p;            /* mark start of encrypted stuff */
  1115.   
  1116. + #ifndef NOENCRYPTION
  1117. +     pcbc_encrypt((C_Block *)q,(C_Block *)q,(long)c_length,schedule,key,DECRYPT);
  1118. + #endif
  1119.   
  1120.       /* safely get application data length */
  1121.       bcopy((char *) p,(char *)&(m_data->app_length),
  1122. ***************
  1123. *** 125,130 ****
  1124. --- 128,136 ----
  1125.           > in_length)
  1126.           return RD_AP_MODIFIED;
  1127.   
  1128. + #ifndef NOENCRYPTION
  1129. +     /* we're now at the decrypted application data */
  1130. + #endif
  1131.       m_data->app_data = p;
  1132.   
  1133.       p += m_data->app_length;
  1134. diff -r -c ../oBones/src/lib/krb/rd_req.c src/lib/krb/rd_req.c
  1135. *** ../oBones/src/lib/krb/rd_req.c    Wed Nov  8 00:39:04 1989
  1136. --- src/lib/krb/rd_req.c    Tue Sep 11 09:28:09 1990
  1137. ***************
  1138. *** 71,78 ****
  1139. --- 71,86 ----
  1140.       char *key;
  1141.       int cvt;
  1142.   {
  1143. + #ifdef NOENCRYPTION
  1144.       bzero(ky, sizeof(ky));
  1145.       return KSUCCESS;
  1146. + #else
  1147. +     if (cvt)
  1148. +     string_to_key(key,ky);
  1149. +     else
  1150. +     bcopy(key,(char *)ky,8);
  1151. +     return(des_key_sched(ky,serv_key));
  1152. + #endif
  1153.   }
  1154.   
  1155.   
  1156. ***************
  1157. *** 199,204 ****
  1158. --- 207,217 ----
  1159.                  strcmp(st_rlm,realm) || (st_kvno != s_kvno))) {
  1160.           if (*fn == 0) fn = KEYFILE;
  1161.           st_kvno = s_kvno;
  1162. + #ifndef NOENCRYPTION
  1163. +     if (read_service_key(service,instance,realm,s_kvno,fn,(char *)skey))
  1164. +         return(RD_AP_UNDEC);
  1165. +     if (status=krb_set_key((char *)skey,0)) return(status);
  1166. + #endif
  1167.           (void) strcpy(st_rlm,realm);
  1168.           (void) strcpy(st_nam,service);
  1169.           (void) strcpy(st_inst,instance);
  1170. ***************
  1171. *** 213,218 ****
  1172. --- 226,234 ----
  1173.       if (krb_ap_req_debug)
  1174.           log("ticket->length: %d",tkt->length);
  1175.   
  1176. + #ifndef NOENCRYPTION
  1177. +     /* Decrypt and take apart ticket */
  1178. + #endif
  1179.   
  1180.       if (decomp_ticket(tkt,&ad->k_flags,ad->pname,ad->pinst,ad->prealm,
  1181.                         &(ad->address),ad->session, &(ad->life),
  1182. ***************
  1183. *** 233,238 ****
  1184. --- 249,259 ----
  1185.       return(RD_AP_MODIFIED);
  1186.       bcopy(ptr + tkt->length, (char *)(req_id->dat),req_id->length);
  1187.   
  1188. + #ifndef NOENCRYPTION
  1189. +     key_sched(ad->session,seskey_sched);
  1190. +     pcbc_encrypt((C_Block *)req_id->dat,(C_Block *)req_id->dat,
  1191. +     (long)req_id->length,seskey_sched,ad->session,DES_DECRYPT);
  1192. + #endif /* NOENCRYPTION */
  1193.   
  1194.   #define check_ptr() if ((ptr - (char *) req_id->dat) > req_id->length) return(RD_AP_MODIFIED);
  1195.   
  1196. diff -r -c ../oBones/src/lib/krb/rd_safe.c src/lib/krb/rd_safe.c
  1197. *** ../oBones/src/lib/krb/rd_safe.c    Wed Nov  8 00:39:06 1989
  1198. --- src/lib/krb/rd_safe.c    Tue Sep 11 09:28:34 1990
  1199. ***************
  1200. *** 167,173 ****
  1201. --- 167,177 ----
  1202.       bcopy((char *)p,(char *)big_cksum,sizeof(big_cksum));
  1203.       if (swap_bytes) swap_u_16(big_cksum);
  1204.   
  1205. + #ifdef NOENCRYPTION
  1206.       bzero(calc_cksum, sizeof(calc_cksum));
  1207. + #else
  1208. +     quad_cksum(q,calc_cksum,p-q,2,key);
  1209. + #endif
  1210.   
  1211.       if (krb_debug)
  1212.           printf("\ncalc_cksum = %u, received cksum = %u",
  1213. diff -r -c ../oBones/src/lib/krb/recvauth.c src/lib/krb/recvauth.c
  1214. *** ../oBones/src/lib/krb/recvauth.c    Mon Sep 10 16:10:56 1990
  1215. --- src/lib/krb/recvauth.c    Tue Sep 11 09:29:01 1990
  1216. ***************
  1217. *** 252,257 ****
  1218. --- 252,260 ----
  1219.          for return to the client */
  1220.       cksum = kdata->checksum + 1;
  1221.       cksum = htonl(cksum);
  1222. + #ifndef NOENCRYPTION
  1223. +     key_sched(kdata->session,schedule);
  1224. + #endif
  1225.       priv_len = krb_mk_priv((unsigned char *)&cksum,
  1226.                      tmp_buf,
  1227.                      (unsigned long) sizeof(cksum),
  1228. diff -r -c ../oBones/src/lib/krb/sendauth.c src/lib/krb/sendauth.c
  1229. *** ../oBones/src/lib/krb/sendauth.c    Mon Sep 10 16:11:24 1990
  1230. --- src/lib/krb/sendauth.c    Tue Sep 11 09:33:17 1990
  1231. ***************
  1232. *** 214,219 ****
  1233. --- 214,222 ----
  1234.           return(errno);
  1235.   
  1236.       /* ...and decrypt it */
  1237. + #ifndef NOENCRYPTION
  1238. +     key_sched(cred->session,schedule);
  1239. + #endif
  1240.       if (cc = krb_rd_priv(priv_buf,(unsigned long) tkt_len, schedule,
  1241.                    cred->session, faddr, laddr, msg_data))
  1242.           return(cc);
  1243. diff -r -c ../oBones/src/lib/krb/util.c src/lib/krb/util.c
  1244. *** ../oBones/src/lib/krb/util.c    Wed Nov  8 00:39:06 1989
  1245. --- src/lib/krb/util.c    Tue Sep 11 09:34:08 1990
  1246. ***************
  1247. *** 45,51 ****
  1248. --- 45,55 ----
  1249.              x->checksum, x->time_sec);
  1250.   #endif /* lint */
  1251.       printf("[8] =");
  1252. + #ifdef NOENCRYPTION
  1253.       placebo_cblock_print(x->session);
  1254. + #else
  1255. +     des_cblock_print_file(x->session,stdout);
  1256. + #endif
  1257.       /* skip reply for now */
  1258.   }
  1259.   
  1260. ***************
  1261. *** 55,60 ****
  1262. --- 59,65 ----
  1263.    * Printed format is:  " 0x { x, x, x, x, x, x, x, x }"
  1264.    */
  1265.   
  1266. + #ifdef NOENCRYPTION
  1267.   placebo_cblock_print(x)
  1268.       des_cblock x;
  1269.   {
  1270. ***************
  1271. *** 69,71 ****
  1272. --- 74,77 ----
  1273.       }
  1274.       printf(" }");
  1275.   }
  1276. + #endif
  1277. diff -r -c ../oBones/src/server/kerberos.c src/server/kerberos.c
  1278. *** ../oBones/src/server/kerberos.c    Mon Sep 10 15:46:07 1990
  1279. --- src/server/kerberos.c    Tue Sep 11 11:41:45 1990
  1280. ***************
  1281. *** 430,437 ****
  1282.           /* Bound requested lifetime with service and user */
  1283.           lifetime = min(req_life, ((u_long) s_name_data.max_life));
  1284.           lifetime = min(lifetime, ((u_long) a_name_data.max_life));
  1285. -         bzero(session_key, sizeof(C_Block));
  1286.   
  1287.           /* unseal server's key from master key */
  1288.           bcopy(&s_name_data.key_low, key, 4);
  1289.           bcopy(&s_name_data.key_high, ((long *) key) + 1, 4);
  1290. --- 430,441 ----
  1291.           /* Bound requested lifetime with service and user */
  1292.           lifetime = min(req_life, ((u_long) s_name_data.max_life));
  1293.           lifetime = min(lifetime, ((u_long) a_name_data.max_life));
  1294.   
  1295. + #ifdef NOENCRYPTION
  1296. +         bzero(session_key, sizeof(C_Block));
  1297. + #else
  1298. +         random_key(session_key);
  1299. + #endif
  1300.           /* unseal server's key from master key */
  1301.           bcopy(&s_name_data.key_low, key, 4);
  1302.           bcopy(&s_name_data.key_high, ((long *) key) + 1, 4);
  1303. ***************
  1304. *** 552,563 ****
  1305.           /* unseal server's key from master key */
  1306.           bcopy(&s_name_data.key_low, key, 4);
  1307.           bcopy(&s_name_data.key_high, ((long *) key) + 1, 4);
  1308. - #ifndef NOENCRYPTION
  1309.           kdb_encrypt_key(key, key, master_key,
  1310.                   master_key_schedule, DECRYPT);
  1311.           /* construct and seal the ticket */
  1312.   
  1313.           bzero(session_key, sizeof(C_Block));
  1314.   #endif
  1315.   
  1316.           krb_create_ticket(tk, k_flags, ad->pname, ad->pinst,
  1317. --- 556,569 ----
  1318.           /* unseal server's key from master key */
  1319.           bcopy(&s_name_data.key_low, key, 4);
  1320.           bcopy(&s_name_data.key_high, ((long *) key) + 1, 4);
  1321.           kdb_encrypt_key(key, key, master_key,
  1322.                   master_key_schedule, DECRYPT);
  1323.           /* construct and seal the ticket */
  1324.   
  1325. + #ifdef NOENCRYPTION
  1326.           bzero(session_key, sizeof(C_Block));
  1327. + #else
  1328. +         random_key(session_key);
  1329.   #endif
  1330.   
  1331.           krb_create_ticket(tk, k_flags, ad->pname, ad->pinst,
  1332. diff -r -c ../oBones/src/slave/kprop.c src/slave/kprop.c
  1333. *** ../oBones/src/slave/kprop.c    Mon Sep 10 16:07:02 1990
  1334. --- src/slave/kprop.c    Tue Sep 11 11:42:43 1990
  1335. ***************
  1336. *** 390,396 ****
  1337. --- 390,405 ----
  1338.               close (s);
  1339.               continue;    /*** NEXT SLAVE ***/
  1340.           }
  1341. + #ifdef NOENCRYPTION
  1342.           bzero((char *)session_sched, sizeof(session_sched));
  1343. + #else
  1344. +         if (key_sched (cred.session, session_sched)) {
  1345. +             fprintf (stderr, "%s: can't make key schedule.",
  1346. +                  cs->name);
  1347. +             close (s);
  1348. +             continue;    /*** NEXT SLAVE ***/
  1349. +         }
  1350. + #endif
  1351.           /* SAFE (quad_cksum) and CLEAR are just not good enough */
  1352.           cksum = 0;
  1353.   #ifdef not_working_yet
  1354. diff -r -c ../oBones/src/slave/kpropd.c src/slave/kpropd.c
  1355. *** ../oBones/src/slave/kpropd.c    Wed Nov  8 00:39:56 1989
  1356. --- src/slave/kpropd.c    Tue Sep 11 11:43:49 1990
  1357. ***************
  1358. *** 353,359 ****
  1359. --- 353,366 ----
  1360.         Key_schedule session_sched;
  1361.   
  1362.         if (private)
  1363. + #ifdef NOENCRYPTION
  1364.       bzero((char *)session_sched, sizeof(session_sched));
  1365. + #else
  1366. +     if (key_sched (ad->session, session_sched)) {
  1367. +       klog (L_KRB_PERR, "kpropd: can't make key schedule");
  1368. +       SlowDeath();
  1369. +     }
  1370. + #endif
  1371.   
  1372.         while (1) {
  1373.       n = krb_net_read (in, &length, sizeof length);
  1374. ***************
  1375. *** 445,450 ****
  1376. --- 452,460 ----
  1377.           klog(L_KRB_PERR, errmsg);
  1378.           SlowDeath();
  1379.           }
  1380. + #ifndef NOENCRYPTION
  1381. +         cksum += cbc_cksum(buf, obuf, n, key_sched, key_sched);
  1382. + #endif
  1383.         }
  1384.       return cksum;
  1385.   }
  1386. diff -r -c ../oBones/src/util/imake.includes/config.Imakefile src/util/imake.includes/config.Imakefile
  1387. *** ../oBones/src/util/imake.includes/config.Imakefile    Mon Sep 10 16:12:04 1990
  1388. --- src/util/imake.includes/config.Imakefile    Tue Sep 11 14:04:54 1990
  1389. ***************
  1390. *** 129,138 ****
  1391. --- 129,145 ----
  1392.   ACL_LIB=$(BUILDTOP)/lib/acl/libacl.a
  1393.   ACL_LIBDEP=$(ACL_LIB)
  1394.   
  1395. + #ifdef NOENCRYPTION
  1396.   NOENCFLAG=-DNOENCRYPTION
  1397.   DES_LIBDEP=
  1398.   DES_LIB=
  1399.   DES_LINTLIB=
  1400. + #else /* Do encryption */
  1401. + NOENCFLAG=
  1402. + DES_LIB=$(BUILDTOP)/lib/des/libdes.a
  1403. + DES_LIBDEP=$(DES_LIB)
  1404. + DES_LINTLIB=$(BUILDTOP)/lib/des/llib-ldes.ln
  1405. + #endif /* NOENCRYPTION */
  1406.   
  1407.   #ifdef NDBM
  1408.   DBMFLAG=-DNDBM
  1409.