cast5 does now work

1 files changed, 108 insertions, 0 deletions

diff --git a/tools/cast5test.c b/tools/cast5test.c
new file mode 100644
index 000000000..04e24d7e5
--- /dev/null
+++ b/tools/cast5test.c
@@ -0,0 +1,108 @@
+/* cast5test.c - CAST5 test program
+ *	Copyright (C) 1998 Free Software Foundation, Inc.
+ *
+ * This file is part of GNUPG.
+ *
+ * GNUPG is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * GNUPG is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program; if not, write to the Free Software
+ * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA
+ */
+
+#include <config.h>
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+#ifdef __MINGW32__
+  #include <io.h>
+  #include <fcntl.h>
+#endif
+
+#include "util.h"
+#include "cipher.h"
+#include "i18n.h"
+
+static void
+my_usage(void)
+{
+    fprintf(stderr, "usage: cast5test [-e][-d] key\n");
+    exit(1);
+}
+
+const char *
+strusage( int level )
+{
+    return default_strusage(level);
+}
+
+static void
+i18n_init(void)
+{
+  #ifdef ENABLE_NLS
+    #ifdef HAVE_LC_MESSAGES
+       setlocale( LC_MESSAGES, "" );
+    #else
+       setlocale( LC_ALL, "" );
+    #endif
+    bindtextdomain( PACKAGE, G10_LOCALEDIR );
+    textdomain( PACKAGE );
+  #endif
+}
+
+int
+main(int argc, char **argv)
+{
+    int encode=0;
+    CAST5_context ctx;
+    char buf[100];
+    int n, size=100;
+
+  #ifdef __MINGW32__
+    setmode( fileno(stdin), O_BINARY );
+    setmode( fileno(stdout), O_BINARY );
+  #endif
+
+    i18n_init();
+    if( argc > 1 && !strcmp(argv[1], "-e") ) {
+	encode++;
+	argc--; argv++;
+    }
+    else if( argc > 1 && !strcmp(argv[1], "-E") ) {
+	encode++;
+	argc--; argv++;
+	size = 10;
+    }
+    else if( argc > 1 && !strcmp(argv[1], "-d") ) {
+	argc--; argv++;
+    }
+    else if( argc > 1 && !strcmp(argv[1], "-D") ) {
+	argc--; argv++;
+	size = 10;
+    }
+    if( argc != 2 )
+	my_usage();
+    argc--; argv++;
+
+    cast5_setkey( &ctx, *argv, strlen(*argv) );
+    cast5_setiv( &ctx, NULL );
+    while( (n = fread( buf, 1, size, stdin )) > 0 ) {
+	if( encode )
+	    cast5_encode_cfb( &ctx, buf, buf, n );
+	else
+	    cast5_decode_cfb( &ctx, buf, buf, n );
+	if( fwrite( buf, 1, n, stdout) != n )
+	    log_fatal("write error\n");
+    }
+
+    return 0;
+}
+