S390: Regenerate ULPs.
[glibc.git] / inet / ether_aton_r.c
blobfb533c98e76eceaf4faf09fba4ed353e3a9e5bd4
1 /* Copyright (C) 1996-2019 Free Software Foundation, Inc.
2 This file is part of the GNU C Library.
3 Contributed by Ulrich Drepper <drepper@cygnus.com>, 1996.
5 The GNU C Library is free software; you can redistribute it and/or
6 modify it under the terms of the GNU Lesser General Public
7 License as published by the Free Software Foundation; either
8 version 2.1 of the License, or (at your option) any later version.
10 The GNU C Library is distributed in the hope that it will be useful,
11 but WITHOUT ANY WARRANTY; without even the implied warranty of
12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
13 Lesser General Public License for more details.
15 You should have received a copy of the GNU Lesser General Public
16 License along with the GNU C Library; if not, see
17 <http://www.gnu.org/licenses/>. */
19 #include <ctype.h>
20 #include <stdlib.h>
21 #include <netinet/ether.h>
22 #include <netinet/if_ether.h>
25 struct ether_addr *
26 ether_aton_r (const char *asc, struct ether_addr *addr)
28 size_t cnt;
30 for (cnt = 0; cnt < 6; ++cnt)
32 unsigned int number;
33 char ch;
35 ch = _tolower (*asc++);
36 if ((ch < '0' || ch > '9') && (ch < 'a' || ch > 'f'))
37 return NULL;
38 number = isdigit (ch) ? (ch - '0') : (ch - 'a' + 10);
40 ch = _tolower (*asc);
41 if ((cnt < 5 && ch != ':') || (cnt == 5 && ch != '\0' && !isspace (ch)))
43 ++asc;
44 if ((ch < '0' || ch > '9') && (ch < 'a' || ch > 'f'))
45 return NULL;
46 number <<= 4;
47 number += isdigit (ch) ? (ch - '0') : (ch - 'a' + 10);
49 ch = *asc;
50 if (cnt < 5 && ch != ':')
51 return NULL;
54 /* Store result. */
55 addr->ether_addr_octet[cnt] = (unsigned char) number;
57 /* Skip ':'. */
58 ++asc;
61 return addr;
63 libc_hidden_def (ether_aton_r)