diff options
Diffstat (limited to 'src/lib/libcrypto/idea')
-rw-r--r-- | src/lib/libcrypto/idea/Makefile | 92 | ||||
-rw-r--r-- | src/lib/libcrypto/idea/Makefile.ssl | 91 | ||||
-rw-r--r-- | src/lib/libcrypto/idea/ideatest.c | 232 | ||||
-rw-r--r-- | src/lib/libcrypto/idea/version | 12 |
4 files changed, 427 insertions, 0 deletions
diff --git a/src/lib/libcrypto/idea/Makefile b/src/lib/libcrypto/idea/Makefile new file mode 100644 index 0000000000..6b8e530d9d --- /dev/null +++ b/src/lib/libcrypto/idea/Makefile | |||
@@ -0,0 +1,92 @@ | |||
1 | # | ||
2 | # OpenSSL/crypto/idea/Makefile | ||
3 | # | ||
4 | |||
5 | DIR= idea | ||
6 | TOP= ../.. | ||
7 | CC= cc | ||
8 | INCLUDES= | ||
9 | CFLAG=-g | ||
10 | INSTALL_PREFIX= | ||
11 | OPENSSLDIR= /usr/local/ssl | ||
12 | INSTALLTOP=/usr/local/ssl | ||
13 | MAKEDEPPROG= makedepend | ||
14 | MAKEDEPEND= $(TOP)/util/domd $(TOP) -MD $(MAKEDEPPROG) | ||
15 | MAKEFILE= Makefile | ||
16 | AR= ar r | ||
17 | |||
18 | CFLAGS= $(INCLUDES) $(CFLAG) | ||
19 | |||
20 | GENERAL=Makefile | ||
21 | TEST=ideatest.c | ||
22 | APPS= | ||
23 | |||
24 | LIB=$(TOP)/libcrypto.a | ||
25 | LIBSRC=i_cbc.c i_cfb64.c i_ofb64.c i_ecb.c i_skey.c | ||
26 | LIBOBJ=i_cbc.o i_cfb64.o i_ofb64.o i_ecb.o i_skey.o | ||
27 | |||
28 | SRC= $(LIBSRC) | ||
29 | |||
30 | EXHEADER= idea.h | ||
31 | HEADER= idea_lcl.h $(EXHEADER) | ||
32 | |||
33 | ALL= $(GENERAL) $(SRC) $(HEADER) | ||
34 | |||
35 | top: | ||
36 | (cd ../..; $(MAKE) DIRS=crypto SDIRS=$(DIR) sub_all) | ||
37 | |||
38 | all: lib | ||
39 | |||
40 | lib: $(LIBOBJ) | ||
41 | $(AR) $(LIB) $(LIBOBJ) | ||
42 | $(RANLIB) $(LIB) || echo Never mind. | ||
43 | @touch lib | ||
44 | |||
45 | files: | ||
46 | $(PERL) $(TOP)/util/files.pl Makefile >> $(TOP)/MINFO | ||
47 | |||
48 | links: | ||
49 | @$(PERL) $(TOP)/util/mklink.pl ../../include/openssl $(EXHEADER) | ||
50 | @$(PERL) $(TOP)/util/mklink.pl ../../test $(TEST) | ||
51 | @$(PERL) $(TOP)/util/mklink.pl ../../apps $(APPS) | ||
52 | |||
53 | install: | ||
54 | @headerlist="$(EXHEADER)"; for i in $$headerlist ; \ | ||
55 | do \ | ||
56 | (cp $$i $(INSTALL_PREFIX)$(INSTALLTOP)/include/openssl/$$i; \ | ||
57 | chmod 644 $(INSTALL_PREFIX)$(INSTALLTOP)/include/openssl/$$i ); \ | ||
58 | done; | ||
59 | |||
60 | tags: | ||
61 | ctags $(SRC) | ||
62 | |||
63 | tests: | ||
64 | |||
65 | lint: | ||
66 | lint -DLINT $(INCLUDES) $(SRC)>fluff | ||
67 | |||
68 | depend: | ||
69 | $(MAKEDEPEND) -- $(CFLAG) $(INCLUDES) $(DEPFLAG) -- $(PROGS) $(LIBSRC) | ||
70 | |||
71 | dclean: | ||
72 | $(PERL) -pe 'if (/^# DO NOT DELETE THIS LINE/) {print; exit(0);}' $(MAKEFILE) >Makefile.new | ||
73 | mv -f Makefile.new $(MAKEFILE) | ||
74 | |||
75 | clean: | ||
76 | rm -f *.o *.obj lib tags core .pure .nfs* *.old *.bak fluff | ||
77 | |||
78 | # DO NOT DELETE THIS LINE -- make depend depends on it. | ||
79 | |||
80 | i_cbc.o: ../../include/openssl/idea.h ../../include/openssl/opensslconf.h | ||
81 | i_cbc.o: i_cbc.c idea_lcl.h | ||
82 | i_cfb64.o: ../../include/openssl/idea.h ../../include/openssl/opensslconf.h | ||
83 | i_cfb64.o: i_cfb64.c idea_lcl.h | ||
84 | i_ecb.o: ../../include/openssl/idea.h ../../include/openssl/opensslconf.h | ||
85 | i_ecb.o: ../../include/openssl/opensslv.h i_ecb.c idea_lcl.h | ||
86 | i_ofb64.o: ../../include/openssl/idea.h ../../include/openssl/opensslconf.h | ||
87 | i_ofb64.o: i_ofb64.c idea_lcl.h | ||
88 | i_skey.o: ../../include/openssl/crypto.h ../../include/openssl/e_os2.h | ||
89 | i_skey.o: ../../include/openssl/fips.h ../../include/openssl/idea.h | ||
90 | i_skey.o: ../../include/openssl/opensslconf.h ../../include/openssl/opensslv.h | ||
91 | i_skey.o: ../../include/openssl/safestack.h ../../include/openssl/stack.h | ||
92 | i_skey.o: ../../include/openssl/symhacks.h i_skey.c idea_lcl.h | ||
diff --git a/src/lib/libcrypto/idea/Makefile.ssl b/src/lib/libcrypto/idea/Makefile.ssl new file mode 100644 index 0000000000..fa016ea399 --- /dev/null +++ b/src/lib/libcrypto/idea/Makefile.ssl | |||
@@ -0,0 +1,91 @@ | |||
1 | # | ||
2 | # SSLeay/crypto/idea/Makefile | ||
3 | # | ||
4 | |||
5 | DIR= idea | ||
6 | TOP= ../.. | ||
7 | CC= cc | ||
8 | INCLUDES= | ||
9 | CFLAG=-g | ||
10 | INSTALL_PREFIX= | ||
11 | OPENSSLDIR= /usr/local/ssl | ||
12 | INSTALLTOP=/usr/local/ssl | ||
13 | MAKE= make -f Makefile.ssl | ||
14 | MAKEDEPPROG= makedepend | ||
15 | MAKEDEPEND= $(TOP)/util/domd $(TOP) -MD $(MAKEDEPPROG) | ||
16 | MAKEFILE= Makefile.ssl | ||
17 | AR= ar r | ||
18 | |||
19 | CFLAGS= $(INCLUDES) $(CFLAG) | ||
20 | |||
21 | GENERAL=Makefile | ||
22 | TEST=ideatest.c | ||
23 | APPS= | ||
24 | |||
25 | LIB=$(TOP)/libcrypto.a | ||
26 | LIBSRC=i_cbc.c i_cfb64.c i_ofb64.c i_ecb.c i_skey.c | ||
27 | LIBOBJ=i_cbc.o i_cfb64.o i_ofb64.o i_ecb.o i_skey.o | ||
28 | |||
29 | SRC= $(LIBSRC) | ||
30 | |||
31 | EXHEADER= idea.h | ||
32 | HEADER= idea_lcl.h $(EXHEADER) | ||
33 | |||
34 | ALL= $(GENERAL) $(SRC) $(HEADER) | ||
35 | |||
36 | top: | ||
37 | (cd ../..; $(MAKE) DIRS=crypto SDIRS=$(DIR) sub_all) | ||
38 | |||
39 | all: lib | ||
40 | |||
41 | lib: $(LIBOBJ) | ||
42 | $(AR) $(LIB) $(LIBOBJ) | ||
43 | $(RANLIB) $(LIB) || echo Never mind. | ||
44 | @touch lib | ||
45 | |||
46 | files: | ||
47 | $(PERL) $(TOP)/util/files.pl Makefile.ssl >> $(TOP)/MINFO | ||
48 | |||
49 | links: | ||
50 | @sh $(TOP)/util/point.sh Makefile.ssl Makefile | ||
51 | @$(PERL) $(TOP)/util/mklink.pl ../../include/openssl $(EXHEADER) | ||
52 | @$(PERL) $(TOP)/util/mklink.pl ../../test $(TEST) | ||
53 | @$(PERL) $(TOP)/util/mklink.pl ../../apps $(APPS) | ||
54 | |||
55 | install: | ||
56 | @for i in $(EXHEADER) ; \ | ||
57 | do \ | ||
58 | (cp $$i $(INSTALL_PREFIX)$(INSTALLTOP)/include/openssl/$$i; \ | ||
59 | chmod 644 $(INSTALL_PREFIX)$(INSTALLTOP)/include/openssl/$$i ); \ | ||
60 | done; | ||
61 | |||
62 | tags: | ||
63 | ctags $(SRC) | ||
64 | |||
65 | tests: | ||
66 | |||
67 | lint: | ||
68 | lint -DLINT $(INCLUDES) $(SRC)>fluff | ||
69 | |||
70 | depend: | ||
71 | $(MAKEDEPEND) -- $(CFLAG) $(INCLUDES) $(DEPFLAG) -- $(PROGS) $(LIBSRC) | ||
72 | |||
73 | dclean: | ||
74 | $(PERL) -pe 'if (/^# DO NOT DELETE THIS LINE/) {print; exit(0);}' $(MAKEFILE) >Makefile.new | ||
75 | mv -f Makefile.new $(MAKEFILE) | ||
76 | |||
77 | clean: | ||
78 | rm -f *.o *.obj lib tags core .pure .nfs* *.old *.bak fluff | ||
79 | |||
80 | # DO NOT DELETE THIS LINE -- make depend depends on it. | ||
81 | |||
82 | i_cbc.o: ../../include/openssl/idea.h ../../include/openssl/opensslconf.h | ||
83 | i_cbc.o: i_cbc.c idea_lcl.h | ||
84 | i_cfb64.o: ../../include/openssl/idea.h ../../include/openssl/opensslconf.h | ||
85 | i_cfb64.o: i_cfb64.c idea_lcl.h | ||
86 | i_ecb.o: ../../include/openssl/idea.h ../../include/openssl/opensslconf.h | ||
87 | i_ecb.o: ../../include/openssl/opensslv.h i_ecb.c idea_lcl.h | ||
88 | i_ofb64.o: ../../include/openssl/idea.h ../../include/openssl/opensslconf.h | ||
89 | i_ofb64.o: i_ofb64.c idea_lcl.h | ||
90 | i_skey.o: ../../include/openssl/idea.h ../../include/openssl/opensslconf.h | ||
91 | i_skey.o: i_skey.c idea_lcl.h | ||
diff --git a/src/lib/libcrypto/idea/ideatest.c b/src/lib/libcrypto/idea/ideatest.c new file mode 100644 index 0000000000..98f805d72a --- /dev/null +++ b/src/lib/libcrypto/idea/ideatest.c | |||
@@ -0,0 +1,232 @@ | |||
1 | /* crypto/idea/ideatest.c */ | ||
2 | /* Copyright (C) 1995-1998 Eric Young (eay@cryptsoft.com) | ||
3 | * All rights reserved. | ||
4 | * | ||
5 | * This package is an SSL implementation written | ||
6 | * by Eric Young (eay@cryptsoft.com). | ||
7 | * The implementation was written so as to conform with Netscapes SSL. | ||
8 | * | ||
9 | * This library is free for commercial and non-commercial use as long as | ||
10 | * the following conditions are aheared to. The following conditions | ||
11 | * apply to all code found in this distribution, be it the RC4, RSA, | ||
12 | * lhash, DES, etc., code; not just the SSL code. The SSL documentation | ||
13 | * included with this distribution is covered by the same copyright terms | ||
14 | * except that the holder is Tim Hudson (tjh@cryptsoft.com). | ||
15 | * | ||
16 | * Copyright remains Eric Young's, and as such any Copyright notices in | ||
17 | * the code are not to be removed. | ||
18 | * If this package is used in a product, Eric Young should be given attribution | ||
19 | * as the author of the parts of the library used. | ||
20 | * This can be in the form of a textual message at program startup or | ||
21 | * in documentation (online or textual) provided with the package. | ||
22 | * | ||
23 | * Redistribution and use in source and binary forms, with or without | ||
24 | * modification, are permitted provided that the following conditions | ||
25 | * are met: | ||
26 | * 1. Redistributions of source code must retain the copyright | ||
27 | * notice, this list of conditions and the following disclaimer. | ||
28 | * 2. Redistributions in binary form must reproduce the above copyright | ||
29 | * notice, this list of conditions and the following disclaimer in the | ||
30 | * documentation and/or other materials provided with the distribution. | ||
31 | * 3. All advertising materials mentioning features or use of this software | ||
32 | * must display the following acknowledgement: | ||
33 | * "This product includes cryptographic software written by | ||
34 | * Eric Young (eay@cryptsoft.com)" | ||
35 | * The word 'cryptographic' can be left out if the rouines from the library | ||
36 | * being used are not cryptographic related :-). | ||
37 | * 4. If you include any Windows specific code (or a derivative thereof) from | ||
38 | * the apps directory (application code) you must include an acknowledgement: | ||
39 | * "This product includes software written by Tim Hudson (tjh@cryptsoft.com)" | ||
40 | * | ||
41 | * THIS SOFTWARE IS PROVIDED BY ERIC YOUNG ``AS IS'' AND | ||
42 | * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE | ||
43 | * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE | ||
44 | * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE | ||
45 | * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL | ||
46 | * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS | ||
47 | * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) | ||
48 | * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT | ||
49 | * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY | ||
50 | * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF | ||
51 | * SUCH DAMAGE. | ||
52 | * | ||
53 | * The licence and distribution terms for any publically available version or | ||
54 | * derivative of this code cannot be changed. i.e. this code cannot simply be | ||
55 | * copied and put under another distribution licence | ||
56 | * [including the GNU Public Licence.] | ||
57 | */ | ||
58 | |||
59 | #include <stdio.h> | ||
60 | #include <string.h> | ||
61 | #include <stdlib.h> | ||
62 | |||
63 | #include "../e_os.h" | ||
64 | |||
65 | #ifdef OPENSSL_NO_IDEA | ||
66 | int main(int argc, char *argv[]) | ||
67 | { | ||
68 | printf("No IDEA support\n"); | ||
69 | return(0); | ||
70 | } | ||
71 | #else | ||
72 | #include <openssl/idea.h> | ||
73 | |||
74 | unsigned char k[16]={ | ||
75 | 0x00,0x01,0x00,0x02,0x00,0x03,0x00,0x04, | ||
76 | 0x00,0x05,0x00,0x06,0x00,0x07,0x00,0x08}; | ||
77 | |||
78 | unsigned char in[8]={0x00,0x00,0x00,0x01,0x00,0x02,0x00,0x03}; | ||
79 | unsigned char c[8]={0x11,0xFB,0xED,0x2B,0x01,0x98,0x6D,0xE5}; | ||
80 | unsigned char out[80]; | ||
81 | |||
82 | char *text="Hello to all people out there"; | ||
83 | |||
84 | static unsigned char cfb_key[16]={ | ||
85 | 0xe1,0xf0,0xc3,0xd2,0xa5,0xb4,0x87,0x96, | ||
86 | 0x69,0x78,0x4b,0x5a,0x2d,0x3c,0x0f,0x1e, | ||
87 | }; | ||
88 | static unsigned char cfb_iv[80]={0x34,0x12,0x78,0x56,0xab,0x90,0xef,0xcd}; | ||
89 | static unsigned char cfb_buf1[40],cfb_buf2[40],cfb_tmp[8]; | ||
90 | #define CFB_TEST_SIZE 24 | ||
91 | static unsigned char plain[CFB_TEST_SIZE]= | ||
92 | { | ||
93 | 0x4e,0x6f,0x77,0x20,0x69,0x73, | ||
94 | 0x20,0x74,0x68,0x65,0x20,0x74, | ||
95 | 0x69,0x6d,0x65,0x20,0x66,0x6f, | ||
96 | 0x72,0x20,0x61,0x6c,0x6c,0x20 | ||
97 | }; | ||
98 | static unsigned char cfb_cipher64[CFB_TEST_SIZE]={ | ||
99 | 0x59,0xD8,0xE2,0x65,0x00,0x58,0x6C,0x3F, | ||
100 | 0x2C,0x17,0x25,0xD0,0x1A,0x38,0xB7,0x2A, | ||
101 | 0x39,0x61,0x37,0xDC,0x79,0xFB,0x9F,0x45 | ||
102 | |||
103 | /* 0xF9,0x78,0x32,0xB5,0x42,0x1A,0x6B,0x38, | ||
104 | 0x9A,0x44,0xD6,0x04,0x19,0x43,0xC4,0xD9, | ||
105 | 0x3D,0x1E,0xAE,0x47,0xFC,0xCF,0x29,0x0B,*/ | ||
106 | }; | ||
107 | |||
108 | static int cfb64_test(unsigned char *cfb_cipher); | ||
109 | static char *pt(unsigned char *p); | ||
110 | int main(int argc, char *argv[]) | ||
111 | { | ||
112 | int i,err=0; | ||
113 | IDEA_KEY_SCHEDULE key,dkey; | ||
114 | unsigned char iv[8]; | ||
115 | |||
116 | idea_set_encrypt_key(k,&key); | ||
117 | idea_ecb_encrypt(in,out,&key); | ||
118 | if (memcmp(out,c,8) != 0) | ||
119 | { | ||
120 | printf("ecb idea error encrypting\n"); | ||
121 | printf("got :"); | ||
122 | for (i=0; i<8; i++) | ||
123 | printf("%02X ",out[i]); | ||
124 | printf("\n"); | ||
125 | printf("expected:"); | ||
126 | for (i=0; i<8; i++) | ||
127 | printf("%02X ",c[i]); | ||
128 | err=20; | ||
129 | printf("\n"); | ||
130 | } | ||
131 | |||
132 | idea_set_decrypt_key(&key,&dkey); | ||
133 | idea_ecb_encrypt(c,out,&dkey); | ||
134 | if (memcmp(out,in,8) != 0) | ||
135 | { | ||
136 | printf("ecb idea error decrypting\n"); | ||
137 | printf("got :"); | ||
138 | for (i=0; i<8; i++) | ||
139 | printf("%02X ",out[i]); | ||
140 | printf("\n"); | ||
141 | printf("expected:"); | ||
142 | for (i=0; i<8; i++) | ||
143 | printf("%02X ",in[i]); | ||
144 | printf("\n"); | ||
145 | err=3; | ||
146 | } | ||
147 | |||
148 | if (err == 0) printf("ecb idea ok\n"); | ||
149 | |||
150 | memcpy(iv,k,8); | ||
151 | idea_cbc_encrypt((unsigned char *)text,out,strlen(text)+1,&key,iv,1); | ||
152 | memcpy(iv,k,8); | ||
153 | idea_cbc_encrypt(out,out,8,&dkey,iv,0); | ||
154 | idea_cbc_encrypt(&(out[8]),&(out[8]),strlen(text)+1-8,&dkey,iv,0); | ||
155 | if (memcmp(text,out,strlen(text)+1) != 0) | ||
156 | { | ||
157 | printf("cbc idea bad\n"); | ||
158 | err=4; | ||
159 | } | ||
160 | else | ||
161 | printf("cbc idea ok\n"); | ||
162 | |||
163 | printf("cfb64 idea "); | ||
164 | if (cfb64_test(cfb_cipher64)) | ||
165 | { | ||
166 | printf("bad\n"); | ||
167 | err=5; | ||
168 | } | ||
169 | else | ||
170 | printf("ok\n"); | ||
171 | |||
172 | EXIT(err); | ||
173 | return(err); | ||
174 | } | ||
175 | |||
176 | static int cfb64_test(unsigned char *cfb_cipher) | ||
177 | { | ||
178 | IDEA_KEY_SCHEDULE eks,dks; | ||
179 | int err=0,i,n; | ||
180 | |||
181 | idea_set_encrypt_key(cfb_key,&eks); | ||
182 | idea_set_decrypt_key(&eks,&dks); | ||
183 | memcpy(cfb_tmp,cfb_iv,8); | ||
184 | n=0; | ||
185 | idea_cfb64_encrypt(plain,cfb_buf1,(long)12,&eks, | ||
186 | cfb_tmp,&n,IDEA_ENCRYPT); | ||
187 | idea_cfb64_encrypt(&(plain[12]),&(cfb_buf1[12]), | ||
188 | (long)CFB_TEST_SIZE-12,&eks, | ||
189 | cfb_tmp,&n,IDEA_ENCRYPT); | ||
190 | if (memcmp(cfb_cipher,cfb_buf1,CFB_TEST_SIZE) != 0) | ||
191 | { | ||
192 | err=1; | ||
193 | printf("idea_cfb64_encrypt encrypt error\n"); | ||
194 | for (i=0; i<CFB_TEST_SIZE; i+=8) | ||
195 | printf("%s\n",pt(&(cfb_buf1[i]))); | ||
196 | } | ||
197 | memcpy(cfb_tmp,cfb_iv,8); | ||
198 | n=0; | ||
199 | idea_cfb64_encrypt(cfb_buf1,cfb_buf2,(long)17,&eks, | ||
200 | cfb_tmp,&n,IDEA_DECRYPT); | ||
201 | idea_cfb64_encrypt(&(cfb_buf1[17]),&(cfb_buf2[17]), | ||
202 | (long)CFB_TEST_SIZE-17,&dks, | ||
203 | cfb_tmp,&n,IDEA_DECRYPT); | ||
204 | if (memcmp(plain,cfb_buf2,CFB_TEST_SIZE) != 0) | ||
205 | { | ||
206 | err=1; | ||
207 | printf("idea_cfb_encrypt decrypt error\n"); | ||
208 | for (i=0; i<24; i+=8) | ||
209 | printf("%s\n",pt(&(cfb_buf2[i]))); | ||
210 | } | ||
211 | return(err); | ||
212 | } | ||
213 | |||
214 | static char *pt(unsigned char *p) | ||
215 | { | ||
216 | static char bufs[10][20]; | ||
217 | static int bnum=0; | ||
218 | char *ret; | ||
219 | int i; | ||
220 | static char *f="0123456789ABCDEF"; | ||
221 | |||
222 | ret= &(bufs[bnum++][0]); | ||
223 | bnum%=10; | ||
224 | for (i=0; i<8; i++) | ||
225 | { | ||
226 | ret[i*2]=f[(p[i]>>4)&0xf]; | ||
227 | ret[i*2+1]=f[p[i]&0xf]; | ||
228 | } | ||
229 | ret[16]='\0'; | ||
230 | return(ret); | ||
231 | } | ||
232 | #endif | ||
diff --git a/src/lib/libcrypto/idea/version b/src/lib/libcrypto/idea/version new file mode 100644 index 0000000000..3f22293795 --- /dev/null +++ b/src/lib/libcrypto/idea/version | |||
@@ -0,0 +1,12 @@ | |||
1 | 1.1 07/12/95 - eay | ||
2 | Many thanks to Rhys Weatherley <rweather@us.oracle.com> | ||
3 | for pointing out that I was assuming little endian byte | ||
4 | order for all quantities what idea actually used | ||
5 | bigendian. No where in the spec does it mention | ||
6 | this, it is all in terms of 16 bit numbers and even the example | ||
7 | does not use byte streams for the input example :-(. | ||
8 | If you byte swap each pair of input, keys and iv, the functions | ||
9 | would produce the output as the old version :-(. | ||
10 | |||
11 | 1.0 ??/??/95 - eay | ||
12 | First version. | ||