a89dce3aeb13921b6039092412468ff99472d696
[oweals/busybox.git] / networking / udhcp / common.c
1 /* vi: set sw=4 ts=4: */
2 /*
3  * Rewrite by Russ Dill <Russ.Dill@asu.edu> July 2001
4  *
5  * Licensed under GPLv2, see file LICENSE in this source tree.
6  */
7 #include "common.h"
8
9 #if defined CONFIG_UDHCP_DEBUG && CONFIG_UDHCP_DEBUG >= 1
10 unsigned dhcp_verbose;
11 #endif
12
13 const uint8_t MAC_BCAST_ADDR[6] ALIGN2 = {
14         0xff, 0xff, 0xff, 0xff, 0xff, 0xff
15 };
16
17 /* Supported options are easily added here.
18  * See RFC2132 for more options.
19  * OPTION_REQ: these options are requested by udhcpc (unless -o).
20  */
21 const struct dhcp_optflag dhcp_optflags[] = {
22         /* flags                                    code */
23         { OPTION_IP                   | OPTION_REQ, 0x01 }, /* DHCP_SUBNET        */
24         { OPTION_S32                              , 0x02 }, /* DHCP_TIME_OFFSET   */
25         { OPTION_IP | OPTION_LIST     | OPTION_REQ, 0x03 }, /* DHCP_ROUTER        */
26 //      { OPTION_IP | OPTION_LIST                 , 0x04 }, /* DHCP_TIME_SERVER   */
27 //      { OPTION_IP | OPTION_LIST                 , 0x05 }, /* DHCP_NAME_SERVER   */
28         { OPTION_IP | OPTION_LIST     | OPTION_REQ, 0x06 }, /* DHCP_DNS_SERVER    */
29 //      { OPTION_IP | OPTION_LIST                 , 0x07 }, /* DHCP_LOG_SERVER    */
30 //      { OPTION_IP | OPTION_LIST                 , 0x08 }, /* DHCP_COOKIE_SERVER */
31         { OPTION_IP | OPTION_LIST                 , 0x09 }, /* DHCP_LPR_SERVER    */
32         { OPTION_STRING               | OPTION_REQ, 0x0c }, /* DHCP_HOST_NAME     */
33         { OPTION_U16                              , 0x0d }, /* DHCP_BOOT_SIZE     */
34         { OPTION_STRING               | OPTION_REQ, 0x0f }, /* DHCP_DOMAIN_NAME   */
35         { OPTION_IP                               , 0x10 }, /* DHCP_SWAP_SERVER   */
36         { OPTION_STRING                           , 0x11 }, /* DHCP_ROOT_PATH     */
37         { OPTION_U8                               , 0x17 }, /* DHCP_IP_TTL        */
38         { OPTION_U16                              , 0x1a }, /* DHCP_MTU           */
39 //TODO: why do we request DHCP_BROADCAST? Can't we assume that
40 //in the unlikely case it is different from typical N.N.255.255,
41 //server would let us know anyway?
42         { OPTION_IP                   | OPTION_REQ, 0x1c }, /* DHCP_BROADCAST     */
43         { OPTION_IP_PAIR | OPTION_LIST            , 0x21 }, /* DHCP_ROUTES        */
44         { OPTION_STRING                           , 0x28 }, /* DHCP_NIS_DOMAIN    */
45         { OPTION_IP | OPTION_LIST                 , 0x29 }, /* DHCP_NIS_SERVER    */
46         { OPTION_IP | OPTION_LIST     | OPTION_REQ, 0x2a }, /* DHCP_NTP_SERVER    */
47         { OPTION_IP | OPTION_LIST                 , 0x2c }, /* DHCP_WINS_SERVER   */
48         { OPTION_U32                              , 0x33 }, /* DHCP_LEASE_TIME    */
49         { OPTION_IP                               , 0x36 }, /* DHCP_SERVER_ID     */
50         { OPTION_STRING                           , 0x38 }, /* DHCP_ERR_MESSAGE   */
51 //TODO: must be combined with 'sname' and 'file' handling:
52         { OPTION_STRING                           , 0x42 }, /* DHCP_TFTP_SERVER_NAME */
53         { OPTION_STRING                           , 0x43 }, /* DHCP_BOOT_FILE     */
54 //TODO: not a string, but a set of LASCII strings:
55 //      { OPTION_STRING                           , 0x4D }, /* DHCP_USER_CLASS    */
56 #if ENABLE_FEATURE_UDHCP_RFC3397
57         { OPTION_DNS_STRING | OPTION_LIST         , 0x77 }, /* DHCP_DOMAIN_SEARCH */
58         { OPTION_SIP_SERVERS                      , 0x78 }, /* DHCP_SIP_SERVERS   */
59 #endif
60         { OPTION_STATIC_ROUTES                    , 0x79 }, /* DHCP_STATIC_ROUTES */
61 #if ENABLE_FEATURE_UDHCP_8021Q
62         { OPTION_U16                              , 0x84 }, /* DHCP_VLAN_ID       */
63         { OPTION_U8                               , 0x85 }, /* DHCP_VLAN_PRIORITY */
64 #endif
65         { OPTION_6RD                              , 0xd4 }, /* DHCP_6RD           */
66         { OPTION_STATIC_ROUTES                    , 0xf9 }, /* DHCP_MS_STATIC_ROUTES */
67         { OPTION_STRING                           , 0xfc }, /* DHCP_WPAD          */
68
69         /* Options below have no match in dhcp_option_strings[],
70          * are not passed to dhcpc scripts, and cannot be specified
71          * with "option XXX YYY" syntax in dhcpd config file.
72          * These entries are only used internally by udhcp[cd]
73          * to correctly encode options into packets.
74          */
75
76         { OPTION_IP                               , 0x32 }, /* DHCP_REQUESTED_IP  */
77         { OPTION_U8                               , 0x35 }, /* DHCP_MESSAGE_TYPE  */
78         { OPTION_U16                              , 0x39 }, /* DHCP_MAX_SIZE      */
79 //looks like these opts will work just fine even without these defs:
80 //      { OPTION_STRING                           , 0x3c }, /* DHCP_VENDOR        */
81 //      /* not really a string: */
82 //      { OPTION_STRING                           , 0x3d }, /* DHCP_CLIENT_ID     */
83         { 0, 0 } /* zeroed terminating entry */
84 };
85
86 /* Used for converting options from incoming packets to env variables
87  * for udhcpc stript, and for setting options for udhcpd via
88  * "opt OPTION_NAME OPTION_VALUE" directives in udhcpd.conf file.
89  */
90 /* Must match dhcp_optflags[] order */
91 const char dhcp_option_strings[] ALIGN1 =
92         "subnet" "\0"      /* DHCP_SUBNET         */
93         "timezone" "\0"    /* DHCP_TIME_OFFSET    */
94         "router" "\0"      /* DHCP_ROUTER         */
95 //      "timesrv" "\0"     /* DHCP_TIME_SERVER    */
96 //      "namesrv" "\0"     /* DHCP_NAME_SERVER    */
97         "dns" "\0"         /* DHCP_DNS_SERVER     */
98 //      "logsrv" "\0"      /* DHCP_LOG_SERVER     */
99 //      "cookiesrv" "\0"   /* DHCP_COOKIE_SERVER  */
100         "lprsrv" "\0"      /* DHCP_LPR_SERVER     */
101         "hostname" "\0"    /* DHCP_HOST_NAME      */
102         "bootsize" "\0"    /* DHCP_BOOT_SIZE      */
103         "domain" "\0"      /* DHCP_DOMAIN_NAME    */
104         "swapsrv" "\0"     /* DHCP_SWAP_SERVER    */
105         "rootpath" "\0"    /* DHCP_ROOT_PATH      */
106         "ipttl" "\0"       /* DHCP_IP_TTL         */
107         "mtu" "\0"         /* DHCP_MTU            */
108         "broadcast" "\0"   /* DHCP_BROADCAST      */
109         "routes" "\0"      /* DHCP_ROUTES         */
110         "nisdomain" "\0"   /* DHCP_NIS_DOMAIN     */
111         "nissrv" "\0"      /* DHCP_NIS_SERVER     */
112         "ntpsrv" "\0"      /* DHCP_NTP_SERVER     */
113         "wins" "\0"        /* DHCP_WINS_SERVER    */
114         "lease" "\0"       /* DHCP_LEASE_TIME     */
115         "serverid" "\0"    /* DHCP_SERVER_ID      */
116         "message" "\0"     /* DHCP_ERR_MESSAGE    */
117         "tftp" "\0"        /* DHCP_TFTP_SERVER_NAME */
118         "bootfile" "\0"    /* DHCP_BOOT_FILE      */
119 //      "userclass" "\0"   /* DHCP_USER_CLASS     */
120 #if ENABLE_FEATURE_UDHCP_RFC3397
121         "search" "\0"      /* DHCP_DOMAIN_SEARCH  */
122 // doesn't work in udhcpd.conf since OPTION_SIP_SERVERS
123 // is not handled yet by "string->option" conversion code:
124         "sipsrv" "\0"      /* DHCP_SIP_SERVERS    */
125 #endif
126 // doesn't work in udhcpd.conf since OPTION_STATIC_ROUTES
127 // is not handled yet by "string->option" conversion code:
128         "staticroutes" "\0"/* DHCP_STATIC_ROUTES  */
129 #if ENABLE_FEATURE_UDHCP_8021Q
130         "vlanid" "\0"      /* DHCP_VLAN_ID        */
131         "vlanpriority" "\0"/* DHCP_VLAN_PRIORITY  */
132 #endif
133         "ip6rd" "\0"       /* DHCP_6RD            */
134         "msstaticroutes""\0"/* DHCP_MS_STATIC_ROUTES */
135         "wpad" "\0"        /* DHCP_WPAD           */
136         ;
137
138 /* Lengths of the option types in binary form.
139  * Used by:
140  * udhcp_str2optset: to determine how many bytes to allocate.
141  * xmalloc_optname_optval: to estimate string length
142  * from binary option length: (option[LEN] / dhcp_option_lengths[opt_type])
143  * is the number of elements, multiply in by one element's string width
144  * (len_of_option_as_string[opt_type]) and you know how wide string you need.
145  */
146 const uint8_t dhcp_option_lengths[] ALIGN1 = {
147         [OPTION_IP] =      4,
148         [OPTION_IP_PAIR] = 8,
149 //      [OPTION_BOOLEAN] = 1,
150         [OPTION_STRING] =  1,  /* ignored by udhcp_str2optset */
151 #if ENABLE_FEATURE_UDHCP_RFC3397
152         [OPTION_DNS_STRING] = 1,  /* ignored by both udhcp_str2optset and xmalloc_optname_optval */
153         [OPTION_SIP_SERVERS] = 1,
154 #endif
155         [OPTION_U8] =      1,
156         [OPTION_U16] =     2,
157 //      [OPTION_S16] =     2,
158         [OPTION_U32] =     4,
159         [OPTION_S32] =     4,
160         /* Just like OPTION_STRING, we use minimum length here */
161         [OPTION_STATIC_ROUTES] = 5,
162         [OPTION_6RD] =    22,  /* ignored by udhcp_str2optset */
163 };
164
165
166 #if defined CONFIG_UDHCP_DEBUG && CONFIG_UDHCP_DEBUG >= 2
167 static void log_option(const char *pfx, const uint8_t *opt)
168 {
169         if (dhcp_verbose >= 2) {
170                 char buf[256 * 2 + 2];
171                 *bin2hex(buf, (void*) (opt + OPT_DATA), opt[OPT_LEN]) = '\0';
172                 bb_info_msg("%s: 0x%02x %s", pfx, opt[OPT_CODE], buf);
173         }
174 }
175 #else
176 # define log_option(pfx, opt) ((void)0)
177 #endif
178
179 unsigned FAST_FUNC udhcp_option_idx(const char *name)
180 {
181         int n = index_in_strings(dhcp_option_strings, name);
182         if (n >= 0)
183                 return n;
184
185         {
186                 char buf[sizeof(dhcp_option_strings)];
187                 char *d = buf;
188                 const char *s = dhcp_option_strings;
189                 while (s < dhcp_option_strings + sizeof(dhcp_option_strings) - 2) {
190                         *d++ = (*s == '\0' ? ' ' : *s);
191                         s++;
192                 }
193                 *d = '\0';
194                 bb_error_msg_and_die("unknown option '%s', known options: %s", name, buf);
195         }
196 }
197
198 /* Get an option with bounds checking (warning, result is not aligned) */
199 uint8_t* FAST_FUNC udhcp_get_option(struct dhcp_packet *packet, int code)
200 {
201         uint8_t *optionptr;
202         int len;
203         int rem;
204         int overload = 0;
205         enum {
206                 FILE_FIELD101  = FILE_FIELD  * 0x101,
207                 SNAME_FIELD101 = SNAME_FIELD * 0x101,
208         };
209
210         /* option bytes: [code][len][data1][data2]..[dataLEN] */
211         optionptr = packet->options;
212         rem = sizeof(packet->options);
213         while (1) {
214                 if (rem <= 0) {
215                         bb_error_msg("bad packet, malformed option field");
216                         return NULL;
217                 }
218                 if (optionptr[OPT_CODE] == DHCP_PADDING) {
219                         rem--;
220                         optionptr++;
221                         continue;
222                 }
223                 if (optionptr[OPT_CODE] == DHCP_END) {
224                         if ((overload & FILE_FIELD101) == FILE_FIELD) {
225                                 /* can use packet->file, and didn't look at it yet */
226                                 overload |= FILE_FIELD101; /* "we looked at it" */
227                                 optionptr = packet->file;
228                                 rem = sizeof(packet->file);
229                                 continue;
230                         }
231                         if ((overload & SNAME_FIELD101) == SNAME_FIELD) {
232                                 /* can use packet->sname, and didn't look at it yet */
233                                 overload |= SNAME_FIELD101; /* "we looked at it" */
234                                 optionptr = packet->sname;
235                                 rem = sizeof(packet->sname);
236                                 continue;
237                         }
238                         break;
239                 }
240                 len = 2 + optionptr[OPT_LEN];
241                 rem -= len;
242                 if (rem < 0)
243                         continue; /* complain and return NULL */
244
245                 if (optionptr[OPT_CODE] == code) {
246                         log_option("Option found", optionptr);
247                         return optionptr + OPT_DATA;
248                 }
249
250                 if (optionptr[OPT_CODE] == DHCP_OPTION_OVERLOAD) {
251                         overload |= optionptr[OPT_DATA];
252                         /* fall through */
253                 }
254                 optionptr += len;
255         }
256
257         /* log3 because udhcpc uses it a lot - very noisy */
258         log3("Option 0x%02x not found", code);
259         return NULL;
260 }
261
262 /* Return the position of the 'end' option (no bounds checking) */
263 int FAST_FUNC udhcp_end_option(uint8_t *optionptr)
264 {
265         int i = 0;
266
267         while (optionptr[i] != DHCP_END) {
268                 if (optionptr[i] != DHCP_PADDING)
269                         i += optionptr[i + OPT_LEN] + OPT_DATA-1;
270                 i++;
271         }
272         return i;
273 }
274
275 /* Add an option (supplied in binary form) to the options.
276  * Option format: [code][len][data1][data2]..[dataLEN]
277  */
278 void FAST_FUNC udhcp_add_binary_option(struct dhcp_packet *packet, uint8_t *addopt)
279 {
280         unsigned len;
281         uint8_t *optionptr = packet->options;
282         unsigned end = udhcp_end_option(optionptr);
283
284         len = OPT_DATA + addopt[OPT_LEN];
285         /* end position + (option code/length + addopt length) + end option */
286         if (end + len + 1 >= DHCP_OPTIONS_BUFSIZE) {
287 //TODO: learn how to use overflow option if we exhaust packet->options[]
288                 bb_error_msg("option 0x%02x did not fit into the packet",
289                                 addopt[OPT_CODE]);
290                 return;
291         }
292         log_option("Adding option", addopt);
293         memcpy(optionptr + end, addopt, len);
294         optionptr[end + len] = DHCP_END;
295 }
296
297 /* Add an one to four byte option to a packet */
298 void FAST_FUNC udhcp_add_simple_option(struct dhcp_packet *packet, uint8_t code, uint32_t data)
299 {
300         const struct dhcp_optflag *dh;
301
302         for (dh = dhcp_optflags; dh->code; dh++) {
303                 if (dh->code == code) {
304                         uint8_t option[6], len;
305
306                         option[OPT_CODE] = code;
307                         len = dhcp_option_lengths[dh->flags & OPTION_TYPE_MASK];
308                         option[OPT_LEN] = len;
309                         if (BB_BIG_ENDIAN)
310                                 data <<= 8 * (4 - len);
311                         /* Assignment is unaligned! */
312                         move_to_unaligned32(&option[OPT_DATA], data);
313                         udhcp_add_binary_option(packet, option);
314                         return;
315                 }
316         }
317
318         bb_error_msg("can't add option 0x%02x", code);
319 }
320
321 /* Find option 'code' in opt_list */
322 struct option_set* FAST_FUNC udhcp_find_option(struct option_set *opt_list, uint8_t code)
323 {
324         while (opt_list && opt_list->data[OPT_CODE] < code)
325                 opt_list = opt_list->next;
326
327         if (opt_list && opt_list->data[OPT_CODE] == code)
328                 return opt_list;
329         return NULL;
330 }
331
332 /* Parse string to IP in network order */
333 int FAST_FUNC udhcp_str2nip(const char *str, void *arg)
334 {
335         len_and_sockaddr *lsa;
336
337         lsa = host_and_af2sockaddr(str, 0, AF_INET);
338         if (!lsa)
339                 return 0;
340         *(uint32_t*)arg = lsa->u.sin.sin_addr.s_addr;
341         free(lsa);
342         return 1;
343 }
344
345 /* udhcp_str2optset:
346  * Parse string option representation to binary form and add it to opt_list.
347  * Called to parse "udhcpc -x OPTNAME:OPTVAL"
348  * and to parse udhcpd.conf's "opt OPTNAME OPTVAL" directives.
349  */
350 /* helper for the helper */
351 static char *allocate_tempopt_if_needed(
352                 const struct dhcp_optflag *optflag,
353                 char *buffer,
354                 int *length_p)
355 {
356         char *allocated = NULL;
357         if ((optflag->flags & OPTION_TYPE_MASK) == OPTION_BIN) {
358                 const char *end;
359                 allocated = xstrdup(buffer); /* more than enough */
360                 end = hex2bin(allocated, buffer, 255);
361                 if (errno)
362                         bb_error_msg_and_die("malformed hex string '%s'", buffer);
363                 *length_p = end - allocated;
364         }
365         return allocated;
366 }
367 /* helper: add an option to the opt_list */
368 static NOINLINE void attach_option(
369                 struct option_set **opt_list,
370                 const struct dhcp_optflag *optflag,
371                 char *buffer,
372                 int length)
373 {
374         struct option_set *existing, *new, **curr;
375         char *allocated = NULL;
376
377         existing = udhcp_find_option(*opt_list, optflag->code);
378         if (!existing) {
379                 log2("Attaching option %02x to list", optflag->code);
380                 allocated = allocate_tempopt_if_needed(optflag, buffer, &length);
381 #if ENABLE_FEATURE_UDHCP_RFC3397
382                 if ((optflag->flags & OPTION_TYPE_MASK) == OPTION_DNS_STRING) {
383                         /* reuse buffer and length for RFC1035-formatted string */
384                         allocated = buffer = (char *)dname_enc(NULL, 0, buffer, &length);
385                 }
386 #endif
387                 /* make a new option */
388                 new = xmalloc(sizeof(*new));
389                 new->data = xmalloc(length + OPT_DATA);
390                 new->data[OPT_CODE] = optflag->code;
391                 new->data[OPT_LEN] = length;
392                 memcpy(new->data + OPT_DATA, (allocated ? allocated : buffer), length);
393
394                 curr = opt_list;
395                 while (*curr && (*curr)->data[OPT_CODE] < optflag->code)
396                         curr = &(*curr)->next;
397
398                 new->next = *curr;
399                 *curr = new;
400                 goto ret;
401         }
402
403         if (optflag->flags & OPTION_LIST) {
404                 unsigned old_len;
405
406                 /* add it to an existing option */
407                 log2("Attaching option %02x to existing member of list", optflag->code);
408                 allocated = allocate_tempopt_if_needed(optflag, buffer, &length);
409                 old_len = existing->data[OPT_LEN];
410 #if ENABLE_FEATURE_UDHCP_RFC3397
411                 if ((optflag->flags & OPTION_TYPE_MASK) == OPTION_DNS_STRING) {
412                         /* reuse buffer and length for RFC1035-formatted string */
413                         allocated = buffer = (char *)dname_enc(existing->data + OPT_DATA, old_len, buffer, &length);
414                 }
415 #endif
416                 if (old_len + length < 255) {
417                         /* actually 255 is ok too, but adding a space can overlow it */
418
419                         existing->data = xrealloc(existing->data, OPT_DATA + 1 + old_len + length);
420                         if ((optflag->flags & OPTION_TYPE_MASK) == OPTION_STRING) {
421                                 /* add space separator between STRING options in a list */
422                                 existing->data[OPT_DATA + old_len] = ' ';
423                                 old_len++;
424                         }
425                         memcpy(existing->data + OPT_DATA + old_len, buffer, length);
426                         existing->data[OPT_LEN] = old_len + length;
427                 } /* else, ignore the data, we could put this in a second option in the future */
428         } /* else, ignore the new data */
429
430  ret:
431         free(allocated);
432 }
433
434 int FAST_FUNC udhcp_str2optset(const char *const_str, void *arg)
435 {
436         struct option_set **opt_list = arg;
437         char *opt, *val, *endptr;
438         char *str;
439         const struct dhcp_optflag *optflag;
440         struct dhcp_optflag bin_optflag;
441         unsigned optcode;
442         int retval, length;
443         char buffer[8] ALIGNED(4);
444         uint16_t *result_u16 = (uint16_t *) buffer;
445         uint32_t *result_u32 = (uint32_t *) buffer;
446
447         /* Cheat, the only *const* str possible is "" */
448         str = (char *) const_str;
449         opt = strtok(str, " \t=");
450         if (!opt)
451                 return 0;
452
453         optcode = bb_strtou(opt, NULL, 0);
454         if (!errno && optcode < 255) {
455                 /* Raw (numeric) option code */
456                 bin_optflag.flags = OPTION_BIN;
457                 bin_optflag.code = optcode;
458                 optflag = &bin_optflag;
459         } else {
460                 optflag = &dhcp_optflags[udhcp_option_idx(opt)];
461         }
462
463         retval = 0;
464         do {
465                 val = strtok(NULL, ", \t");
466                 if (!val)
467                         break;
468                 length = dhcp_option_lengths[optflag->flags & OPTION_TYPE_MASK];
469                 retval = 0;
470                 opt = buffer; /* new meaning for variable opt */
471                 switch (optflag->flags & OPTION_TYPE_MASK) {
472                 case OPTION_IP:
473                         retval = udhcp_str2nip(val, buffer);
474                         break;
475                 case OPTION_IP_PAIR:
476                         retval = udhcp_str2nip(val, buffer);
477                         val = strtok(NULL, ", \t/-");
478                         if (!val)
479                                 retval = 0;
480                         if (retval)
481                                 retval = udhcp_str2nip(val, buffer + 4);
482                         break;
483                 case OPTION_STRING:
484 #if ENABLE_FEATURE_UDHCP_RFC3397
485                 case OPTION_DNS_STRING:
486 #endif
487                         length = strnlen(val, 254);
488                         if (length > 0) {
489                                 opt = val;
490                                 retval = 1;
491                         }
492                         break;
493 //              case OPTION_BOOLEAN: {
494 //                      static const char no_yes[] ALIGN1 = "no\0yes\0";
495 //                      buffer[0] = retval = index_in_strings(no_yes, val);
496 //                      retval++; /* 0 - bad; 1: "no" 2: "yes" */
497 //                      break;
498 //              }
499                 case OPTION_U8:
500                         buffer[0] = strtoul(val, &endptr, 0);
501                         retval = (endptr[0] == '\0');
502                         break;
503                 /* htonX are macros in older libc's, using temp var
504                  * in code below for safety */
505                 /* TODO: use bb_strtoX? */
506                 case OPTION_U16: {
507                         unsigned long tmp = strtoul(val, &endptr, 0);
508                         *result_u16 = htons(tmp);
509                         retval = (endptr[0] == '\0' /*&& tmp < 0x10000*/);
510                         break;
511                 }
512 //              case OPTION_S16: {
513 //                      long tmp = strtol(val, &endptr, 0);
514 //                      *result_u16 = htons(tmp);
515 //                      retval = (endptr[0] == '\0');
516 //                      break;
517 //              }
518                 case OPTION_U32: {
519                         unsigned long tmp = strtoul(val, &endptr, 0);
520                         *result_u32 = htonl(tmp);
521                         retval = (endptr[0] == '\0');
522                         break;
523                 }
524                 case OPTION_S32: {
525                         long tmp = strtol(val, &endptr, 0);
526                         *result_u32 = htonl(tmp);
527                         retval = (endptr[0] == '\0');
528                         break;
529                 }
530                 case OPTION_BIN: /* handled in attach_option() */
531                         opt = val;
532                         retval = 1;
533                 default:
534                         break;
535                 }
536                 if (retval)
537                         attach_option(opt_list, optflag, opt, length);
538         } while (retval && optflag->flags & OPTION_LIST);
539
540         return retval;
541 }
542
543 /* note: ip is a pointer to an IPv6 in network order, possibly misaliged */
544 int FAST_FUNC sprint_nip6(char *dest, /*const char *pre,*/ const uint8_t *ip)
545 {
546         char hexstrbuf[16 * 2];
547         bin2hex(hexstrbuf, (void*)ip, 16);
548         return sprintf(dest, /* "%s" */
549                 "%.4s:%.4s:%.4s:%.4s:%.4s:%.4s:%.4s:%.4s",
550                 /* pre, */
551                 hexstrbuf + 0 * 4,
552                 hexstrbuf + 1 * 4,
553                 hexstrbuf + 2 * 4,
554                 hexstrbuf + 3 * 4,
555                 hexstrbuf + 4 * 4,
556                 hexstrbuf + 5 * 4,
557                 hexstrbuf + 6 * 4,
558                 hexstrbuf + 7 * 4
559         );
560 }