ChangeLog:
[libgcrypt.git] / tests / ac-data.c
1 /* ac-data.c - Public key encryption/decryption tests
2  *      Copyright (C) 2005 Free Software Foundation, Inc.
3  *
4  * This file is part of Libgcrypt.
5  *
6  * Libgcrypt is free software; you can redistribute it and/or modify
7  * it under the terms of the GNU Lesser General Public License as
8  * published by the Free Software Foundation; either version 2.1 of
9  * the License, or (at your option) any later version.
10  *
11  * Libgcrypt 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 Lesser General Public License for more details.
15  *
16  * You should have received a copy of the GNU Lesser General Public
17  * License 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 #ifdef HAVE_CONFIG_H
22 #include <config.h>
23 #endif
24 #include <stdlib.h>
25 #include <stdio.h>
26 #include <assert.h>
27
28 #define assert_err(err) \
29   do \
30     if (err) \
31       { \
32         fprintf (stderr, "Error occured at line %i: %s\n", \
33                  __LINE__, gcry_strerror (err)); \
34         exit (1); \
35       } \
36   while (0)
37
38 #include "../src/gcrypt.h"
39
40 static int verbose;
41
42 static void
43 die (const char *format, ...)
44 {
45   va_list arg_ptr ;
46
47   va_start( arg_ptr, format ) ;
48   vfprintf (stderr, format, arg_ptr );
49   va_end(arg_ptr);
50   exit (1);
51 }
52
53 static void
54 check_sexp_conversion (gcry_ac_data_t data)
55 {
56   const char *identifiers[] = { "foo",
57                                 "bar",
58                                 "baz",
59                                 "hello",
60                                 "somemoretexthere",
61                                 "blahblahblah",
62                                 NULL };
63   gcry_ac_data_t data2;
64   gcry_error_t err;
65   gcry_sexp_t sexp;
66   unsigned int i;
67   const char *label1, *label2;
68   gcry_mpi_t mpi1, mpi2;
69   size_t length1, length2;
70
71   err = gcry_ac_data_to_sexp (data, &sexp, identifiers);
72   assert_err (err);
73
74   err = gcry_ac_data_from_sexp (&data2, sexp, identifiers);
75   assert_err (err);
76
77   length1 = gcry_ac_data_length (data);
78   length2 = gcry_ac_data_length (data2);
79   assert (length1 == length2);
80
81   for (i = 0; i < length1; i++)
82     {
83       err = gcry_ac_data_get_index (data, 0, i, &label1, &mpi1);
84       assert_err (err);
85       err = gcry_ac_data_get_index (data2, 0, i, &label2, &mpi2);
86       assert_err (err);
87       assert (! strcmp (label1, label2));
88       assert (! gcry_mpi_cmp (mpi1, mpi2));
89     }
90
91   gcry_ac_data_destroy (data2);
92   gcry_sexp_release (sexp);
93 }
94
95 void
96 check_run (void)
97 {
98   gcry_ac_data_t data;
99   gcry_error_t err;
100   const char *label0;
101   const char *label1;
102   gcry_mpi_t mpi0;
103   gcry_mpi_t mpi1;
104   gcry_mpi_t mpi2;
105
106   label0 = "thisisreallylonglabelbutsincethereisnolimitationonthelengthoflabelsitshouldworkjustfine";
107   mpi0 = gcry_mpi_new (0);
108   assert (mpi0);
109   gcry_mpi_set_ui (mpi0, 123456);
110
111   err = gcry_ac_data_new (&data);
112   assert_err (err);
113
114   err = gcry_ac_data_set (data, 0, label0, mpi0);
115   assert_err (err);
116   err = gcry_ac_data_get_index (data, 0, 0, &label1, &mpi1);
117   assert_err (err);
118   assert (label0 == label1);
119   assert (mpi0 == mpi1);
120   check_sexp_conversion (data);
121   printf ("data-set-test-0 succeeded\n");
122
123   gcry_ac_data_clear (data);
124
125   err = gcry_ac_data_set (data, GCRY_AC_FLAG_COPY, label0, mpi0);
126   assert_err (err);
127   err = gcry_ac_data_set (data, GCRY_AC_FLAG_COPY | GCRY_AC_FLAG_DEALLOC,
128                           "foo", mpi0);
129   assert_err (err);
130   err = gcry_ac_data_set (data, GCRY_AC_FLAG_COPY | GCRY_AC_FLAG_DEALLOC,
131                           "foo", mpi0);
132   assert_err (err);
133   err = gcry_ac_data_set (data, GCRY_AC_FLAG_COPY | GCRY_AC_FLAG_DEALLOC,
134                           "bar", mpi0);
135   assert_err (err);
136   err = gcry_ac_data_set (data, GCRY_AC_FLAG_COPY | GCRY_AC_FLAG_DEALLOC,
137                           "blah1", mpi0);
138   assert_err (err);
139   check_sexp_conversion (data);
140   err = gcry_ac_data_get_name (data, 0, label0, &mpi1);
141   assert_err (err);
142   assert (mpi0 != mpi1);
143   err = gcry_ac_data_get_name (data, GCRY_AC_FLAG_COPY, label0, &mpi2);
144   assert_err (err);
145   assert (mpi0 != mpi1);
146   assert (mpi1 != mpi2);
147   err = gcry_ac_data_get_index (data, 0, 0, &label1, &mpi1);
148   assert_err (err);
149   gcry_free ((void *) label1);  /* FIXME!! */
150   gcry_mpi_release (mpi1);
151     
152   printf ("data-set-test-1 succeeded\n");
153
154   gcry_ac_data_clear (data);
155   assert (! gcry_ac_data_length (data));
156   check_sexp_conversion (data);
157   printf ("data-set-test-2 succeeded\n");
158  
159   gcry_ac_data_destroy (data);
160  
161
162 }
163
164 int
165 main (int argc, char **argv)
166 {
167   int debug = 0;
168   int i = 1;
169
170   if (argc > 1 && !strcmp (argv[1], "--verbose"))
171     verbose = 1;
172   else if (argc > 1 && !strcmp (argv[1], "--debug"))
173     verbose = debug = 1;
174
175   gcry_control (GCRYCTL_DISABLE_SECMEM, 0);
176   if (!gcry_check_version (GCRYPT_VERSION))
177     die ("version mismatch\n");
178   gcry_control (GCRYCTL_INITIALIZATION_FINISHED, 0);
179   if (debug)
180     gcry_control (GCRYCTL_SET_DEBUG_FLAGS, 1u , 0);
181
182   for (; i > 0; i--)
183     check_run ();
184   
185   return 0;
186 }