]> git.saurik.com Git - apple/libc.git/blobdiff - gen/crypt.c
Libc-763.13.tar.gz
[apple/libc.git] / gen / crypt.c
index 33ef553b77847a7c3fd1086e331ca3e339d706be..f1edfd9753fdba6ebccb752e0c703286a284a25c 100644 (file)
  */
 
 
+#include <sys/cdefs.h>
 #include <unistd.h>
 #include <limits.h>
+#include <sys/types.h>
 #include <pwd.h>
 #include <stdlib.h>
 
@@ -83,7 +85,7 @@
 /*
  * define "MUST_ALIGN" if your compiler cannot load/store
  * long integers at arbitrary (e.g. odd) memory locations.
- * (Either that or never pass unaligned addresses to des_cipher!)
+ * (Either that or never pass unaligned addresses to __crypt_des_cipher!)
  */
 #if !defined(vax)
 #define        MUST_ALIGN
  * define "LONG_IS_32_BITS" only if sizeof(long)==4.
  * This avoids use of bit fields (your compiler may be sloppy with them).
  */
-#if !defined(cray)
+#if !defined(cray) && (LONG_BIT == 32)
 #define        LONG_IS_32_BITS
 #endif
 
 
 /*
  * define "LARGEDATA" to get faster permutations, by using about 72 kilobytes
- * of lookup tables.  This speeds up des_setkey() and des_cipher(), but has
+ * of lookup tables.  This speeds up __crypt_des_setkey() and __crypt_des_cipher(), but has
  * little effect on crypt().
  */
 #if defined(notdef)
 #ifndef STATIC
 #define        STATIC  static
 #endif
+#ifndef BUILDING_VARIANT
 STATIC void init_des(), init_perm(), permute();
-STATIC int des_cipher(), des_setkey();
 #ifdef DEBUG
-STATIC prtab();
+#include <stdio.h>
+STATIC void prtab();
 #endif
+#endif /* BUILDING_VARIANT */
+__private_extern__ int __crypt_des_cipher(), __crypt_des_setkey();
 
 /* ==================================== */
 
@@ -316,6 +321,7 @@ typedef union {
 #define        PERM3264(d,d0,d1,cpp,p)                         \
        { C_block tblk; permute(cpp,&tblk,p,4); LOAD (d,d0,d1,tblk); }
 
+#ifndef BUILDING_VARIANT
 STATIC void permute(cp, out, p, chars_in)
        unsigned char *cp;
        C_block *out;
@@ -334,11 +340,18 @@ STATIC void permute(cp, out, p, chars_in)
        } while (--chars_in > 0);
        STORE(D,D0,D1,*out);
 }
+#endif /* BUILDING_VARIANT */
 #endif /* LARGEDATA */
 
+#ifndef BUILDING_VARIANT
+__private_extern__ int __crypt_des_setkey_called = 0;
+#else /* BUILDING_VARIANT */
+__private_extern__ int __crypt_des_setkey_called;
+#endif /* BUILDING_VARIANT */
 
 /* =====  (mostly) Standard DES Tables ==================== */
 
+#ifndef BUILDING_VARIANT
 static unsigned char IP[] = {          /* initial permutation */
        58, 50, 42, 34, 26, 18, 10,  2,
        60, 52, 44, 36, 28, 20, 12,  4,
@@ -523,7 +536,7 @@ crypt(key, setting)
                        key++;
                keyblock.b[i] = t;
        }
-       if (des_setkey((char *)keyblock.b))     /* also initializes "a64toi" */
+       if (__crypt_des_setkey((char *)keyblock.b))     /* also initializes "a64toi" */
                return (NULL);
 
        encp = &cryptresult[0];
@@ -533,7 +546,7 @@ crypt(key, setting)
                 * Involve the rest of the password 8 characters at a time.
                 */
                while (*key) {
-                       if (des_cipher((char *)&keyblock,
+                       if (__crypt_des_cipher((char *)&keyblock,
                            (char *)&keyblock, 0L, 1))
                                return (NULL);
                        for (i = 0; i < 8; i++) {
@@ -541,7 +554,7 @@ crypt(key, setting)
                                        key++;
                                keyblock.b[i] ^= t;
                        }
-                       if (des_setkey((char *)keyblock.b))
+                       if (__crypt_des_setkey((char *)keyblock.b))
                                return (NULL);
                }
 
@@ -572,7 +585,7 @@ crypt(key, setting)
                salt = (salt<<6) | a64toi[t];
        }
        encp += salt_size;
-       if (des_cipher((char *)&constdatablock, (char *)&rsltblock,
+       if (__crypt_des_cipher((char *)&constdatablock, (char *)&rsltblock,
            salt, num_iter))
                return (NULL);
 
@@ -601,7 +614,7 @@ crypt(key, setting)
 
 
 /*
- * The Key Schedule, filled in by des_setkey() or setkey().
+ * The Key Schedule, filled in by __crypt_des_setkey() or setkey().
  */
 #define        KS_SIZE 16
 static C_block KS[KS_SIZE];
@@ -609,7 +622,7 @@ static C_block      KS[KS_SIZE];
 /*
  * Set up the key schedule from the key.
  */
-STATIC int des_setkey(key)
+__private_extern__ int __crypt_des_setkey(key)
        register const char *key;
 {
        register DCL_BLOCK(K, K0, K1);
@@ -632,6 +645,7 @@ STATIC int des_setkey(key)
                PERM6464(K,K0,K1,(unsigned char *)key,ptabp);
                STORE(K&~0x03030303L, K0&~0x03030303L, K1, *(C_block *)key);
        }
+       __crypt_des_setkey_called = 1;
        return (0);
 }
 
@@ -643,7 +657,7 @@ STATIC int des_setkey(key)
  * NOTE: the performance of this routine is critically dependent on your
  * compiler and machine architecture.
  */
-STATIC int des_cipher(in, out, salt, num_iter)
+__private_extern__ int __crypt_des_cipher(in, out, salt, num_iter)
        const char *in;
        char *out;
        long salt;
@@ -655,7 +669,8 @@ STATIC int des_cipher(in, out, salt, num_iter)
 #endif
        register long L0, L1, R0, R1, k;
        register C_block *kp;
-       register int ks_inc, loop_count;
+       register int loop_count;
+       ssize_t ks_inc;
        C_block B;
 
        L0 = salt;
@@ -931,11 +946,16 @@ STATIC void init_perm(perm, p, chars_in, chars_out)
                }
        }
 }
+#endif /* BUILDING_VARIANT */
 
 /*
  * "setkey" routine (for backwards compatibility)
  */
+#if __DARWIN_UNIX03
+void setkey(key)
+#else /* !__DARWIN_UNIX03 */
 int setkey(key)
+#endif /* __DARWIN_UNIX03 */
        register const char *key;
 {
        register int i, j, k;
@@ -949,19 +969,33 @@ int setkey(key)
                }
                keyblock.b[i] = k;
        }
-       return (des_setkey((char *)keyblock.b));
+#if __DARWIN_UNIX03
+       __crypt_des_setkey((char *)keyblock.b);
+#else /* !__DARWIN_UNIX03 */
+       return (__crypt_des_setkey((char *)keyblock.b));
+#endif /* __DARWIN_UNIX03 */
 }
 
 /*
  * "encrypt" routine (for backwards compatibility)
  */
+#if __DARWIN_UNIX03
+void encrypt(block, flag)
+#else /* !__DARWIN_UNIX03 */
 int encrypt(block, flag)
+#endif /* __DARWIN_UNIX03 */
        register char *block;
        int flag;
 {
        register int i, j, k;
        C_block cblock;
 
+       /* Prevent encrypt from crashing if setkey was never called.
+        * This does not make a good cypher */
+       if (!__crypt_des_setkey_called) {
+               cblock.b32.i0 = cblock.b32.i1 = 0;
+               __crypt_des_setkey((char *)cblock.b);
+       }
        for (i = 0; i < 8; i++) {
                k = 0;
                for (j = 0; j < 8; j++) {
@@ -970,8 +1004,12 @@ int encrypt(block, flag)
                }
                cblock.b[i] = k;
        }
-       if (des_cipher((char *)&cblock, (char *)&cblock, 0L, (flag ? -1: 1)))
+       if (__crypt_des_cipher((char *)&cblock, (char *)&cblock, 0L, (flag ? -1: 1)))
+#if __DARWIN_UNIX03
+               return;
+#else /* !__DARWIN_UNIX03 */
                return (1);
+#endif /* __DARWIN_UNIX03 */
        for (i = 7; i >= 0; i--) {
                k = cblock.b[i];
                for (j = 7; j >= 0; j--) {
@@ -979,11 +1017,14 @@ int encrypt(block, flag)
                        k >>= 1;
                }
        }
+#if !__DARWIN_UNIX03
        return (0);
+#endif /* !__DARWIN_UNIX03 */
 }
 
+#ifndef BUILDING_VARIANT
 #ifdef DEBUG
-STATIC
+STATIC void
 prtab(s, t, num_rows)
        char *s;
        unsigned char *t;
@@ -1001,3 +1042,4 @@ prtab(s, t, num_rows)
        (void)printf("\n");
 }
 #endif
+#endif /* BUILDING_VARIANT */