compat/inet_pton.c

   1 /*****************************************************************************
   2  * inet_pton.c: POSIX/IETF inet_pton() and inet_ntop() replacements
   3  *****************************************************************************
   4  * Copyright © 2011 Rémi Denis-Courmont
   5  *
   6  * This program is free software; you can redistribute it and/or modify it
   7  * under the terms of the GNU Lesser General Public License as published by
   8  * the Free Software Foundation; either version 2.1 of the License, or
   9  * (at your option) any later version.
  10  *
  11  * This program is distributed in the hope that it will be useful,
  12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
  14  * GNU Lesser General Public License for more details.
  15  *
  16  * You should have received a copy of the GNU Lesser General Public License
  17  * along with this program; if not, write to the Free Software Foundation,
  18  * Inc., 51 Franklin Street, Fifth Floor, Boston MA 02110-1301, USA.
  19  *****************************************************************************/
  20
  21 #ifdef HAVE_CONFIG_H
  22 # include <config.h>
  23 #endif
  24
  25 #include <stdio.h>
  26 #include <errno.h>
  27
  28 #include <sys/types.h>
  29 #ifndef WIN32
  30 # include <sys/socket.h>
  31 #else
  32 # include <winsock2.h>
  33 # define EAFNOSUPPORT WSAEAFNOSUPPORT
  34 #endif
  35
  36 int inet_pton (int af, const char *src, void *dst)
  37 {
  38     unsigned char *b = dst;
  39
  40     switch (af)
  41     {
  42         case AF_INET:
  43             return sscanf (src, "%hhu.%hhu.%hhu.%hhu",
  44                            b + 0, b + 1, b + 2, b + 3) == 4;
  45     }
  46     errno = EAFNOSUPPORT;
  47     return -1;
  48 }
  49
  50 const char *inet_ntop (int af, const void *src, char *dst, int len)
  51 {
  52     const unsigned char *b = src;
  53
  54     switch (af)
  55     {
  56         case AF_INET:
  57             if (snprintf (dst, len, "%hhu.%hhu.%hhu.%hhu",
  58                           b[0], b[1], b[2], b[3]) >= len)
  59             {
  60                 errno = ENOSPC;
  61                 return NULL;
  62             }
  63             return dst;
  64     }
  65     errno = EAFNOSUPPORT;
  66     return NULL;
  67 }