1  
       2  /*
       3   * This crypt(3) validation program shipped with UFC-crypt
       4   * is derived from one distributed with Phil Karns PD DES package.
       5   *
       6   * @(#)cert.c	1.8 11 Aug 1996
       7   */
       8  
       9  #include <stdio.h>
      10  #include <stdlib.h>
      11  #include "crypt.h"
      12  
      13  /* This file tests the deprecated setkey/encrypt interface.  */
      14  #include <shlib-compat.h>
      15  #if TEST_COMPAT (libcrypt, GLIBC_2_0, GLIBC_2_28)
      16  
      17  #define libcrypt_version_reference(symbol, version) \
      18    _libcrypt_version_reference (symbol, VERSION_libcrypt_##version)
      19  #define _libcrypt_version_reference(symbol, version) \
      20    __libcrypt_version_reference (symbol, version)
      21  #define __libcrypt_version_reference(symbol, version) \
      22    __asm__ (".symver " #symbol ", " #symbol "@" #version)
      23  
      24  extern void setkey (const char *);
      25  extern void encrypt (const char *, int);
      26  libcrypt_version_reference (setkey, GLIBC_2_0);
      27  libcrypt_version_reference (encrypt, GLIBC_2_0);
      28  
      29  int totfails = 0;
      30  
      31  int main (int argc, char *argv[]);
      32  void get8 (char *cp);
      33  void put8 (char *cp);
      34  void good_bye (void) __attribute__ ((noreturn));
      35  
      36  void
      37  good_bye (void)
      38  {
      39    if(totfails == 0) {
      40      printf("Passed DES validation suite\n");
      41      exit(0);
      42    } else {
      43      printf("%d failures during DES validation suite!!!\n", totfails);
      44      exit(1);
      45    }
      46  }
      47  
      48  int
      49  main (int argc, char *argv[])
      50  {
      51  	char key[64],plain[64],cipher[64],answer[64];
      52  	int i;
      53  	int fail;
      54  
      55  	for(;!feof(stdin);){
      56  
      57  		get8(key);
      58  		printf(" K: "); put8(key);
      59  		setkey(key);
      60  
      61  		get8(plain);
      62  		printf(" P: "); put8(plain);
      63  
      64  		get8(answer);
      65  		printf(" C: "); put8(answer);
      66  
      67  		for(i=0;i<64;i++)
      68  			cipher[i] = plain[i];
      69  		encrypt(cipher, 0);
      70  
      71  		for(i=0;i<64;i++)
      72  			if(cipher[i] != answer[i])
      73  				break;
      74  		fail = 0;
      75  		if(i != 64){
      76  			printf(" Encrypt FAIL");
      77  			fail++; totfails++;
      78  		}
      79  
      80  		encrypt(cipher, 1);
      81  
      82  		for(i=0;i<64;i++)
      83  			if(cipher[i] != plain[i])
      84  				break;
      85  		if(i != 64){
      86  			printf(" Decrypt FAIL");
      87  			fail++; totfails++;
      88  		}
      89  
      90  		if(fail == 0)
      91  			printf(" OK");
      92  		printf("\n");
      93  	}
      94  	good_bye();
      95  }
      96  void
      97  get8 (char *cp)
      98  {
      99  	int i,j,t;
     100  
     101  	for(i=0;i<8;i++){
     102  		if (scanf("%2x",&t) < 1)
     103  		  {
     104  		    if(ferror(stdin))
     105  		      totfails++;
     106  		  }
     107  		if(feof(stdin))
     108  		  good_bye();
     109  		for(j=0; j<8 ; j++) {
     110  		  *cp++ = (t & (0x01 << (7-j))) != 0;
     111  		}
     112  	}
     113  }
     114  void
     115  put8 (char *cp)
     116  {
     117  	int i,j,t;
     118  
     119  	for(i=0;i<8;i++){
     120  	  t = 0;
     121  	  for(j = 0; j<8; j++)
     122  	    t = (t<<1) | *cp++;
     123  	  printf("%02x", t);
     124  	}
     125  }
     126  
     127  #else /* encrypt and setkey are not available.  */
     128  
     129  int
     130  main (void)
     131  {
     132    return 77; /* UNSUPPORTED */
     133  }
     134  
     135  #endif