1 /* $NetBSD: inet_pton.c,v 1.2 2017/01/28 21:31:50 christos Exp $ */
2
3 /*
4 * Copyright (c) 1999 - 2000 Kungliga Tekniska Högskolan
5 * (Royal Institute of Technology, Stockholm, Sweden).
6 * All rights reserved.
7 *
8 * Redistribution and use in source and binary forms, with or without
9 * modification, are permitted provided that the following conditions
10 * are met:
11 *
12 * 1. Redistributions of source code must retain the above copyright
13 * notice, this list of conditions and the following disclaimer.
14 *
15 * 2. Redistributions in binary form must reproduce the above copyright
16 * notice, this list of conditions and the following disclaimer in the
17 * documentation and/or other materials provided with the distribution.
18 *
19 * 3. Neither the name of the Institute nor the names of its contributors
20 * may be used to endorse or promote products derived from this software
21 * without specific prior written permission.
22 *
23 * THIS SOFTWARE IS PROVIDED BY THE INSTITUTE AND CONTRIBUTORS ``AS IS'' AND
24 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
25 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
26 * ARE DISCLAIMED. IN NO EVENT SHALL THE INSTITUTE OR CONTRIBUTORS BE LIABLE
27 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
28 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
29 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
30 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
31 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
32 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
33 * SUCH DAMAGE.
34 */
35
36 #include <config.h>
37
38 #include <krb5/roken.h>
39
40 #ifdef HAVE_WINSOCK
41
42 ROKEN_LIB_FUNCTION int ROKEN_LIB_CALL
inet_pton(int af,const char * csrc,void * dst)43 inet_pton(int af, const char *csrc, void *dst)
44 {
45 char * src;
46
47 if (csrc == NULL || (src = strdup(csrc)) == NULL) {
48 _set_errno( ENOMEM );
49 return 0;
50 }
51
52 switch (af) {
53 case AF_INET:
54 {
55 struct sockaddr_in si4;
56 INT r;
57 INT s = sizeof(si4);
58
59 si4.sin_family = AF_INET;
60 r = WSAStringToAddress(src, AF_INET, NULL, (LPSOCKADDR) &si4, &s);
61 free(src);
62 src = NULL;
63
64 if (r == 0) {
65 memcpy(dst, &si4.sin_addr, sizeof(si4.sin_addr));
66 return 1;
67 }
68 }
69 break;
70
71 case AF_INET6:
72 {
73 struct sockaddr_in6 si6;
74 INT r;
75 INT s = sizeof(si6);
76
77 si6.sin6_family = AF_INET6;
78 r = WSAStringToAddress(src, AF_INET6, NULL, (LPSOCKADDR) &si6, &s);
79 free(src);
80 src = NULL;
81
82 if (r == 0) {
83 memcpy(dst, &si6.sin6_addr, sizeof(si6.sin6_addr));
84 return 1;
85 }
86 }
87 break;
88
89 default:
90 _set_errno( EAFNOSUPPORT );
91 return -1;
92 }
93
94 /* the call failed */
95 {
96 int le = WSAGetLastError();
97
98 if (le == WSAEINVAL)
99 return 0;
100
101 _set_errno(le);
102 return -1;
103 }
104 }
105
106 #else /* !HAVE_WINSOCK */
107
108 ROKEN_LIB_FUNCTION int ROKEN_LIB_CALL
inet_pton(int af,const char * src,void * dst)109 inet_pton(int af, const char *src, void *dst)
110 {
111 if (af != AF_INET) {
112 errno = EAFNOSUPPORT;
113 return -1;
114 }
115 return inet_aton (src, dst);
116 }
117
118 #endif
119