addr.c 4.4 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210
  1. /* Copyright (C) 1995,1996 Robert de Bath <rdebath@cix.compulink.co.uk>
  2. * Copyright (C) 2000-2006 Erik Andersen <andersen@uclibc.org>
  3. *
  4. * Licensed under the LGPL v2.1, see the file COPYING.LIB in this tarball.
  5. */
  6. /*
  7. * Manuel Novoa III Dec 2000
  8. *
  9. * Converted to use my new (un)signed long (long) to string routines, which
  10. * are smaller than the previous functions and don't require static buffers.
  11. * In the process, removed the reference to strcat and cut object size of
  12. * inet_ntoa in half (from 190 bytes down to 94).
  13. *
  14. * Manuel Novoa III Feb 2002
  15. *
  16. * Changed to use _int10tostr.
  17. */
  18. #define __FORCE_GLIBC
  19. #include <features.h>
  20. #include <stdio.h>
  21. #include <string.h>
  22. #include <ctype.h>
  23. #include <netinet/in.h>
  24. #include <arpa/inet.h>
  25. #include <bits/uClibc_uintmaxtostr.h>
  26. #ifdef L_inet_aton
  27. /*
  28. * More undocumented inet_aton features.
  29. * (read: uclibc doesnt support but glibc does)
  30. * http://www.mkssoftware.com/docs/man3/inet_aton.3.asp
  31. *
  32. * *cp can take the form of:
  33. * a.b.c.d - {a,b,c,d} -> 1 byte
  34. * a.b.c - {a,b} -> 1 byte {c} -> 2 bytes
  35. * a.b - {a} -> 1 byte {b} -> 3 bytes
  36. * a - {a} -> 4 bytes
  37. *
  38. * Each part may be decimal, octal, or hexadecimal as in ISO C.
  39. * 0x or 0X -> hexadecimal
  40. * leading 0 -> octal
  41. * all else -> decimal
  42. */
  43. int inet_aton(const char *cp, struct in_addr *addrptr)
  44. {
  45. in_addr_t addr;
  46. int value;
  47. int part;
  48. if (cp == NULL) {
  49. return 0;
  50. }
  51. addr = 0;
  52. for (part = 1; part <= 4; part++) {
  53. if (!isdigit(*cp))
  54. return 0;
  55. value = 0;
  56. while (isdigit(*cp)) {
  57. value *= 10;
  58. value += *cp++ - '0';
  59. if (value > 255)
  60. return 0;
  61. }
  62. if (part < 4) {
  63. if (*cp++ != '.')
  64. return 0;
  65. } else {
  66. char c = *cp++;
  67. if (c != '\0' && !isspace(c))
  68. return 0;
  69. }
  70. addr <<= 8;
  71. addr |= value;
  72. }
  73. /* W. Richard Stevens in his book UNIX Network Programming,
  74. * Volume 1, second edition, on page 71 says:
  75. *
  76. * An undocumented feature of inet_aton is that if addrptr is
  77. * a null pointer, the function still performs it validation
  78. * of the input string, but does not store the result.
  79. */
  80. if (addrptr) {
  81. addrptr->s_addr = htonl(addr);
  82. }
  83. return 1;
  84. }
  85. libc_hidden_def(inet_aton)
  86. #endif
  87. #ifdef L_inet_addr
  88. in_addr_t inet_addr(const char *cp)
  89. {
  90. struct in_addr a;
  91. if (!inet_aton(cp, &a))
  92. return INADDR_NONE;
  93. else
  94. return a.s_addr;
  95. }
  96. libc_hidden_def(inet_addr)
  97. #endif
  98. #ifdef L_inet_ntoa
  99. #define INET_NTOA_MAX_LEN 16 /* max 12 digits + 3 '.'s + 1 nul */
  100. static char *__inet_ntoa_r(struct in_addr in, char buf[INET_NTOA_MAX_LEN])
  101. {
  102. in_addr_t addr = ntohl(in.s_addr);
  103. int i;
  104. char *p, *q;
  105. q = 0;
  106. p = buf + INET_NTOA_MAX_LEN - 1; /* cannot use sizeof(buf) here */
  107. for (i = 0; i < 4; i++ ) {
  108. p = _int10tostr(p, addr & 0xff) - 1;
  109. addr >>= 8;
  110. if (q) {
  111. *q = '.';
  112. }
  113. q = p;
  114. }
  115. return p+1;
  116. }
  117. strong_alias(__inet_ntoa_r,inet_ntoa_r)
  118. char *inet_ntoa(struct in_addr in)
  119. {
  120. static char buf[INET_NTOA_MAX_LEN];
  121. return __inet_ntoa_r(in, buf);
  122. }
  123. libc_hidden_def(inet_ntoa)
  124. #endif
  125. #ifdef L_inet_makeaddr
  126. /* for some reason it does not remove the jump relocation */
  127. /*
  128. * Formulate an Internet address from network + host. Used in
  129. * building addresses stored in the ifnet structure.
  130. */
  131. struct in_addr inet_makeaddr(in_addr_t net, in_addr_t host)
  132. {
  133. in_addr_t addr;
  134. if (net < 128)
  135. addr = (net << IN_CLASSA_NSHIFT) | (host & IN_CLASSA_HOST);
  136. else if (net < 65536)
  137. addr = (net << IN_CLASSB_NSHIFT) | (host & IN_CLASSB_HOST);
  138. else if (net < 16777216UL)
  139. addr = (net << IN_CLASSC_NSHIFT) | (host & IN_CLASSC_HOST);
  140. else
  141. addr = net | host;
  142. addr = htonl(addr);
  143. return *(struct in_addr *)&addr;
  144. }
  145. libc_hidden_def(inet_makeaddr)
  146. #endif
  147. #ifdef L_inet_lnaof
  148. /*
  149. * Return the local network address portion of an
  150. * internet address; handles class a/b/c network
  151. * number formats.
  152. */
  153. in_addr_t inet_lnaof(struct in_addr in)
  154. {
  155. in_addr_t i = ntohl(in.s_addr);
  156. if (IN_CLASSA(i))
  157. return (i & IN_CLASSA_HOST);
  158. else if (IN_CLASSB(i))
  159. return (i & IN_CLASSB_HOST);
  160. else
  161. return (i & IN_CLASSC_HOST);
  162. }
  163. #endif
  164. #ifdef L_inet_netof
  165. /*
  166. * Return the network number from an internet
  167. * address; handles class a/b/c network #'s.
  168. */
  169. in_addr_t
  170. inet_netof(struct in_addr in)
  171. {
  172. in_addr_t i = ntohl(in.s_addr);
  173. if (IN_CLASSA(i))
  174. return ((i & IN_CLASSA_NET) >> IN_CLASSA_NSHIFT);
  175. else if (IN_CLASSB(i))
  176. return ((i & IN_CLASSB_NET) >> IN_CLASSB_NSHIFT);
  177. else
  178. return ((i & IN_CLASSC_NET) >> IN_CLASSC_NSHIFT);
  179. }
  180. libc_hidden_def(inet_netof)
  181. #endif