.
[glibc/history.git] / inet / test-inet6_opt.c
blob4db9b59389821bc0ac8c7b4a63b104403b7d3886
1 #include <netinet/in.h>
2 #include <stdio.h>
3 #include <stdlib.h>
4 #include <string.h>
6 #define OPT_X 42
7 #define OPT_Y 43
8 #define OPT_Z 44
10 static void *
11 encode_inet6_opt (socklen_t *elp)
13 void *eb = NULL;
14 socklen_t el;
15 int cl;
16 void *db;
17 int offset;
18 uint8_t val1;
19 uint16_t val2;
20 uint32_t val4;
21 uint64_t val8;
23 *elp = 0;
24 #define CHECK() \
25 if (cl == -1) \
26 { \
27 printf ("cl == -1 on line %d\n", __LINE__); \
28 free (eb); \
29 return NULL; \
32 /* Estimate the length */
33 cl = inet6_opt_init (NULL, 0);
34 CHECK ();
35 cl = inet6_opt_append (NULL, 0, cl, OPT_X, 12, 8, NULL);
36 CHECK ();
37 cl = inet6_opt_append (NULL, 0, cl, OPT_Y, 7, 4, NULL);
38 CHECK ();
39 cl = inet6_opt_append (NULL, 0, cl, OPT_Z, 7, 1, NULL);
40 CHECK ();
41 cl = inet6_opt_finish (NULL, 0, cl);
42 CHECK ();
43 el = cl;
45 eb = malloc (el + 8);
46 if (eb == NULL)
48 puts ("malloc failed");
49 return NULL;
51 /* Canary. */
52 memcpy (eb + el, "deadbeef", 8);
54 cl = inet6_opt_init (eb, el);
55 CHECK ();
57 cl = inet6_opt_append (eb, el, cl, OPT_X, 12, 8, &db);
58 CHECK ();
59 val4 = 0x12345678;
60 offset = inet6_opt_set_val (db, 0, &val4, sizeof (val4));
61 val8 = 0x0102030405060708LL;
62 inet6_opt_set_val (db, offset, &val8, sizeof (val8));
64 cl = inet6_opt_append (eb, el, cl, OPT_Y, 7, 4, &db);
65 CHECK ();
66 val1 = 0x01;
67 offset = inet6_opt_set_val (db, 0, &val1, sizeof (val1));
68 val2 = 0x1331;
69 offset = inet6_opt_set_val (db, offset, &val2, sizeof (val2));
70 val4 = 0x01020304;
71 inet6_opt_set_val (db, offset, &val4, sizeof (val4));
73 cl = inet6_opt_append (eb, el, cl, OPT_Z, 7, 1, &db);
74 CHECK ();
75 inet6_opt_set_val (db, 0, (void *) "abcdefg", 7);
77 cl = inet6_opt_finish (eb, el, cl);
78 CHECK ();
80 if (memcmp (eb + el, "deadbeef", 8) != 0)
82 puts ("Canary corrupted");
83 free (eb);
84 return NULL;
86 *elp = el;
87 return eb;
90 int
91 decode_inet6_opt (void *eb, socklen_t el)
93 int ret = 0;
94 int seq = 0;
95 int cl = 0;
96 int offset;
97 uint8_t type;
98 socklen_t len;
99 uint8_t val1;
100 uint16_t val2;
101 uint32_t val4;
102 uint64_t val8;
103 void *db;
104 char buf[8];
106 while ((cl = inet6_opt_next (eb, el, cl, &type, &len, &db)) != -1)
107 switch (type)
109 case OPT_X:
110 if (seq++ != 0)
112 puts ("OPT_X is not first");
113 ret = 1;
115 if (len != 12)
117 printf ("OPT_X's length %d != 12\n", len);
118 ret = 1;
120 offset = inet6_opt_get_val (db, 0, &val4, sizeof (val4));
121 if (val4 != 0x12345678)
123 printf ("OPT_X's val4 %x != 0x12345678\n", val4);
124 ret = 1;
126 offset = inet6_opt_get_val (db, offset, &val8, sizeof (val8));
127 if (offset != len || val8 != 0x0102030405060708LL)
129 printf ("OPT_X's val8 %llx != 0x0102030405060708\n",
130 (long long) val8);
131 ret = 1;
133 break;
134 case OPT_Y:
135 if (seq++ != 1)
137 puts ("OPT_Y is not second");
138 ret = 1;
140 if (len != 7)
142 printf ("OPT_Y's length %d != 7\n", len);
143 ret = 1;
145 offset = inet6_opt_get_val (db, 0, &val1, sizeof (val1));
146 if (val1 != 0x01)
148 printf ("OPT_Y's val1 %x != 0x01\n", val1);
149 ret = 1;
151 offset = inet6_opt_get_val (db, offset, &val2, sizeof (val2));
152 if (val2 != 0x1331)
154 printf ("OPT_Y's val2 %x != 0x1331\n", val2);
155 ret = 1;
157 offset = inet6_opt_get_val (db, offset, &val4, sizeof (val4));
158 if (offset != len || val4 != 0x01020304)
160 printf ("OPT_Y's val4 %x != 0x01020304\n", val4);
161 ret = 1;
163 break;
164 case OPT_Z:
165 if (seq++ != 2)
167 puts ("OPT_Z is not third");
168 ret = 1;
170 if (len != 7)
172 printf ("OPT_Z's length %d != 7\n", len);
173 ret = 1;
175 offset = inet6_opt_get_val (db, 0, buf, 7);
176 if (offset != len || memcmp (buf, "abcdefg", 7) != 0)
178 buf[7] = '\0';
179 printf ("OPT_Z's buf \"%s\" != \"abcdefg\"\n", buf);
180 ret = 1;
182 break;
183 default:
184 printf ("Unknown option %d\n", type);
185 ret = 1;
186 break;
188 if (seq != 3)
190 puts ("Didn't see all of OPT_X, OPT_Y and OPT_Z");
191 ret = 1;
193 return ret;
197 main (void)
199 void *eb;
200 socklen_t el;
201 eb = encode_inet6_opt (&el);
202 if (eb == NULL)
203 return 1;
204 if (decode_inet6_opt (eb, el))
205 return 1;
206 return 0;