1#ifndef WIN32_LEAN_AND_MEAN
2#define WIN32_LEAN_AND_MEAN
3#endif
4#undef __CRT__NO_INLINE
5#define __CRT__NO_INLINE
6#include <winsock2.h>
7#include <wspiapi.h>
8
9int WINAPI
10WspiapiLegacyGetNameInfo (const struct sockaddr *ptSocketAddress,
11 socklen_t tSocketLength,
12 char *pszNodeName, size_t tNodeLength,
13 char *pszServiceName, size_t tServiceLength,
14 int iFlags)
15{
16 struct servent *svc;
17 WORD port;
18 char str[] = "65535";
19 char *pstr = str;
20 struct hostent *phost;
21 struct in_addr l_inaddr;
22 char *pnode = NULL, *pc = NULL;
23
24 if (!ptSocketAddress || tSocketLength < (int) sizeof (struct sockaddr))
25 return EAI_FAIL;
26 if (ptSocketAddress->sa_family != AF_INET)
27 return EAI_FAMILY;
28 if (tSocketLength < (int) sizeof (struct sockaddr_in))
29 return EAI_FAIL;
30 if (!(pszNodeName && tNodeLength) && !(pszServiceName && tServiceLength))
31 return EAI_NONAME;
32 if ((iFlags & NI_NUMERICHOST) != 0 && (iFlags & NI_NAMEREQD) != 0)
33 return EAI_BADFLAGS;
34 if (pszServiceName && tServiceLength)
35 {
36 port = ((struct sockaddr_in *) ptSocketAddress)->sin_port;
37 if (iFlags & NI_NUMERICSERV)
38 sprintf (str, "%u", ntohs (port));
39 else
40 {
41 svc = getservbyport(port, (iFlags & NI_DGRAM) ? "udp" : NULL);
42 if (svc && svc->s_name)
43 pstr = svc->s_name;
44 else
45 sprintf (str, "%u", ntohs (port));
46 }
47 if (tServiceLength > strlen (pstr))
48 strcpy (pszServiceName, pstr);
49 else
50 return EAI_FAIL;
51 }
52 if (pszNodeName && tNodeLength)
53 {
54 l_inaddr = ((struct sockaddr_in *) ptSocketAddress)->sin_addr;
55 if (iFlags & NI_NUMERICHOST)
56 pnode = inet_ntoa (l_inaddr);
57 else
58 {
59 phost = gethostbyaddr ((char *) &l_inaddr, sizeof (struct in_addr), AF_INET);
60 if (phost && phost->h_name)
61 {
62 pnode = phost->h_name;
63 if ((iFlags & NI_NOFQDN) != 0 && ((pc = strchr (pnode,'.')) != NULL))
64 *pc = 0;
65 }
66 else
67 {
68 if ((iFlags & NI_NAMEREQD) != 0)
69 {
70 switch(WSAGetLastError())
71 {
72 case WSAHOST_NOT_FOUND: return EAI_NONAME;
73 case WSATRY_AGAIN: return EAI_AGAIN;
74 case WSANO_RECOVERY: return EAI_FAIL;
75 default: return EAI_NONAME;
76 }
77 }
78 else
79 pnode = inet_ntoa (l_inaddr);
80 }
81 }
82 if (tNodeLength > strlen (pnode))
83 strcpy (pszNodeName, pnode);
84 else
85 return EAI_FAIL;
86 }
87 return 0;
88}