cast5 does now work
[gnupg.git] / tools / cast5test.c
1 /* cast5test.c - CAST5 test program
2  *      Copyright (C) 1998 Free Software Foundation, Inc.
3  *
4  * This file is part of GNUPG.
5  *
6  * GNUPG is free software; you can redistribute it and/or modify
7  * it under the terms of the GNU General Public License as published by
8  * the Free Software Foundation; either version 2 of the License, or
9  * (at your option) any later version.
10  *
11  * GNUPG is distributed in the hope that it will be useful,
12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14  * GNU General Public License for more details.
15  *
16  * You should have received a copy of the GNU General Public License
17  * along with this program; if not, write to the Free Software
18  * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA
19  */
20
21 #include <config.h>
22 #include <stdio.h>
23 #include <stdlib.h>
24 #include <string.h>
25 #ifdef __MINGW32__
26   #include <io.h>
27   #include <fcntl.h>
28 #endif
29
30 #include "util.h"
31 #include "cipher.h"
32 #include "i18n.h"
33
34 static void
35 my_usage(void)
36 {
37     fprintf(stderr, "usage: cast5test [-e][-d] key\n");
38     exit(1);
39 }
40
41 const char *
42 strusage( int level )
43 {
44     return default_strusage(level);
45 }
46
47 static void
48 i18n_init(void)
49 {
50   #ifdef ENABLE_NLS
51     #ifdef HAVE_LC_MESSAGES
52        setlocale( LC_MESSAGES, "" );
53     #else
54        setlocale( LC_ALL, "" );
55     #endif
56     bindtextdomain( PACKAGE, G10_LOCALEDIR );
57     textdomain( PACKAGE );
58   #endif
59 }
60
61 int
62 main(int argc, char **argv)
63 {
64     int encode=0;
65     CAST5_context ctx;
66     char buf[100];
67     int n, size=100;
68
69   #ifdef __MINGW32__
70     setmode( fileno(stdin), O_BINARY );
71     setmode( fileno(stdout), O_BINARY );
72   #endif
73
74     i18n_init();
75     if( argc > 1 && !strcmp(argv[1], "-e") ) {
76         encode++;
77         argc--; argv++;
78     }
79     else if( argc > 1 && !strcmp(argv[1], "-E") ) {
80         encode++;
81         argc--; argv++;
82         size = 10;
83     }
84     else if( argc > 1 && !strcmp(argv[1], "-d") ) {
85         argc--; argv++;
86     }
87     else if( argc > 1 && !strcmp(argv[1], "-D") ) {
88         argc--; argv++;
89         size = 10;
90     }
91     if( argc != 2 )
92         my_usage();
93     argc--; argv++;
94
95     cast5_setkey( &ctx, *argv, strlen(*argv) );
96     cast5_setiv( &ctx, NULL );
97     while( (n = fread( buf, 1, size, stdin )) > 0 ) {
98         if( encode )
99             cast5_encode_cfb( &ctx, buf, buf, n );
100         else
101             cast5_decode_cfb( &ctx, buf, buf, n );
102         if( fwrite( buf, 1, n, stdout) != n )
103             log_fatal("write error\n");
104     }
105
106     return 0;
107 }
108