Initial revision0_9_1

1 files changed, 85 insertions, 0 deletions

diff --git a/libc/inet/addr.c b/libc/inet/addr.c
new file mode 100644
index 000000000..bb27753bf
--- /dev/null
+++ b/libc/inet/addr.c
@@ -0,0 +1,85 @@
+/* Copyright (C) 1995,1996 Robert de Bath <rdebath@cix.compulink.co.uk>
+ * This file is part of the Linux-8086 C library and is distributed
+ * under the GNU Library General Public License.
+ */
+
+#include <string.h>
+#include <ctype.h>
+#include <netinet/in.h>
+
+
+#ifdef L_inet_aton
+int
+inet_aton(cp, inp)
+const char *cp;
+struct in_addr *inp;
+{
+  unsigned long addr;
+  int value;
+  int part;
+
+  if (!inp)
+    return 0;
+  
+  addr = 0;
+  for (part=1;part<=4;part++) {
+
+    if (!isdigit(*cp))
+      return 0;
+        
+    value = 0;
+    while (isdigit(*cp)) {
+      value *= 10;
+      value += *cp++ - '0';
+      if (value > 255)
+        return 0;
+    }
+    
+    if (*cp++ != ((part == 4) ? '\0' : '.'))
+      return 0;
+    
+    addr <<= 8;
+    addr |= value;
+  }
+  
+  inp->s_addr = htonl(addr);
+
+  return 1;
+}
+#endif
+
+#ifdef L_inet_addr
+unsigned long
+inet_addr(cp)
+const char *cp;
+{
+  struct in_addr a;
+  if (!inet_aton(cp, &a))
+    return -1;
+  else
+    return a.s_addr;
+}
+#endif
+
+#ifdef L_inet_ntoa
+
+extern char * itoa(int);  
+
+char *
+inet_ntoa(in)
+struct in_addr in;
+{
+  static char buf[18];
+  unsigned long addr = ntohl(in.s_addr);
+  
+  strcpy(buf, itoa((addr >> 24) & 0xff));
+  strcat(buf, ".");
+  strcat(buf, itoa((addr >> 16) & 0xff));
+  strcat(buf, ".");
+  strcat(buf, itoa((addr >> 8) & 0xff));
+  strcat(buf, ".");
+  strcat(buf, itoa(addr & 0xff));
+  
+  return buf;
+}
+#endif