1 /* Async WINSOCK DNS services
3 * (C) 1993,1994,1996,1997 John Brezak, Erik Bos, Alex Korobka.
4 * (C) 1999 Marcus Meissner
6 * NOTE: If you make any changes to fix a particular app, make sure
7 * they don't break something else like Netscape or telnet and ftp
8 * clients and servers (www.winsite.com got a lot of those).
11 * - Add WSACancel* and correct handle management. (works rather well for
13 * - Verify & Check all calls for correctness
14 * (currently only WSAGetHostByName*, WSAGetServByPort* calls)
15 * - Check error returns.
16 * - mirc/mirc32 Finger @linux.kernel.org sometimes fails in threaded mode.
18 * - This implementation did ignore the "NOTE:" section above (since the
19 * whole stuff did not work anyway to other changes).
25 #include <sys/types.h>
29 #include <sys/ioctl.h>
30 #ifdef HAVE_SYS_FILIO_H
31 # include <sys/filio.h>
34 #include <sys/ioccom.h>
35 #ifdef HAVE_SYS_SOCKIO_H
36 # include <sys/sockio.h>
41 # include <sys/so_ioctl.h>
44 #ifdef HAVE_SYS_PARAM_H
45 # include <sys/param.h>
51 #ifdef HAVE_SYS_WAIT_H
54 #ifdef HAVE_SYS_SOCKET_H
55 #include <sys/socket.h>
57 #ifdef HAVE_NETINET_IN_H
58 # include <netinet/in.h>
60 #ifdef HAVE_ARPA_INET_H
61 # include <arpa/inet.h>
66 #ifdef HAVE_SYS_ERRNO_H
67 #include <sys/errno.h>
72 #ifdef HAVE_ARPA_NAMESER_H
73 # include <arpa/nameser.h>
79 #include "wine/winbase16.h"
88 #include "wine/port.h"
89 #include "debugtools.h"
91 DEFAULT_DEBUG_CHANNEL(winsock)
93 /* protoptypes of some functions in socket.c
95 UINT16 wsaErrno(void);
96 UINT16 wsaHerrno(void);
98 /* ----------------------------------- helper functions - */
100 static int list_size(char** l, int item_size)
105 j += (item_size) ? item_size : strlen(l[i]) + 1;
106 j += (i + 1) * sizeof(char*); }
110 static int list_dup(char** l_src, char* ref, char* base, int item_size)
112 /* base is either either equal to ref or 0 or SEGPTR */
115 char** l_to = (char**)ref;
118 for(j=0;l_src[j];j++) ;
119 p += (j + 1) * sizeof(char*);
121 { l_to[i] = base + (p - ref);
122 k = ( item_size ) ? item_size : strlen(l_src[i]) + 1;
123 memcpy(p, l_src[i], k); p += k; }
130 static int hostent_size(struct hostent* p_he)
134 { size = sizeof(struct hostent);
135 size += strlen(p_he->h_name) + 1;
136 size += list_size(p_he->h_aliases, 0);
137 size += list_size(p_he->h_addr_list, p_he->h_length ); }
141 /* Copy hostent to p_to, fix up inside pointers using p_base (different for
142 * Win16 (linear vs. segmented). Return -neededsize on overrun.
144 static int WS_copy_he(struct ws_hostent *p_to,char *p_base,int t_size,struct hostent* p_he)
146 char* p_name,*p_aliases,*p_addr,*p;
147 int size=hostent_size(p_he)+(sizeof(struct ws_hostent)-sizeof(struct hostent));
152 p += sizeof(struct ws_hostent);
154 strcpy(p, p_he->h_name); p += strlen(p) + 1;
156 p += list_dup(p_he->h_aliases, p, p_base + (p - (char*)p_to), 0);
158 list_dup(p_he->h_addr_list, p, p_base + (p - (char*)p_to), p_he->h_length);
160 p_to->h_addrtype = (INT16)p_he->h_addrtype;
161 p_to->h_length = (INT16)p_he->h_length;
162 p_to->h_name = (SEGPTR)(p_base + (p_name - (char*)p_to));
163 p_to->h_aliases = (SEGPTR)(p_base + (p_aliases - (char*)p_to));
164 p_to->h_addr_list = (SEGPTR)(p_base + (p_addr - (char*)p_to));
171 static int protoent_size(struct protoent* p_pe)
175 { size = sizeof(struct protoent);
176 size += strlen(p_pe->p_name) + 1;
177 size += list_size(p_pe->p_aliases, 0); }
181 /* Copy protoent to p_to, fix up inside pointers using p_base (different for
182 * Win16 (linear vs. segmented). Return -neededsize on overrun.
184 static int WS_copy_pe(struct ws_protoent *p_to,char *p_base,int t_size,struct protoent* p_pe)
186 char* p_name,*p_aliases,*p;
187 int size=protoent_size(p_pe)+(sizeof(struct ws_protoent)-sizeof(struct protoent));
192 p += sizeof(struct ws_protoent);
194 strcpy(p, p_pe->p_name); p += strlen(p) + 1;
196 list_dup(p_pe->p_aliases, p, p_base + (p - (char*)p_to), 0);
198 p_to->p_proto = (INT16)p_pe->p_proto;
199 p_to->p_name = (SEGPTR)(p_base) + (p_name - (char*)p_to);
200 p_to->p_aliases = (SEGPTR)((p_base) + (p_aliases - (char*)p_to));
208 static int servent_size(struct servent* p_se)
212 size += sizeof(struct servent);
213 size += strlen(p_se->s_proto) + strlen(p_se->s_name) + 2;
214 size += list_size(p_se->s_aliases, 0);
219 /* Copy servent to p_to, fix up inside pointers using p_base (different for
220 * Win16 (linear vs. segmented). Return -neededsize on overrun.
222 static int WS_copy_se(struct ws_servent *p_to,char *p_base,int t_size,struct servent* p_se)
224 char* p_name,*p_aliases,*p_proto,*p;
225 int size = servent_size(p_se)+(sizeof(struct ws_servent)-sizeof(struct servent));
230 p += sizeof(struct ws_servent);
232 strcpy(p, p_se->s_name); p += strlen(p) + 1;
234 strcpy(p, p_se->s_proto); p += strlen(p) + 1;
236 list_dup(p_se->s_aliases, p, p_base + (p - (char*)p_to), 0);
238 p_to->s_port = (INT16)p_se->s_port;
239 p_to->s_name = (SEGPTR)(p_base + (p_name - (char*)p_to));
240 p_to->s_proto = (SEGPTR)(p_base + (p_proto - (char*)p_to));
241 p_to->s_aliases = (SEGPTR)(p_base + (p_aliases - (char*)p_to));
246 static HANDLE __ws_async_handle = 0xdead;
248 /* Generic async query struct. we use symbolic names for the different queries
251 typedef struct _async_query {
255 #define host_name ptr1
256 #define host_addr ptr1
257 #define serv_name ptr1
258 #define proto_name ptr1
260 #define serv_proto ptr2
262 #define host_len int1
263 #define proto_number int1
264 #define serv_port int1
266 #define host_type int2
270 HANDLE16 async_handle;
274 #define HB_WIN32(hb) (hb->flags & AQ_WIN32)
279 #define AQ_GETPROTO 1
285 /****************************************************************************
286 * The async query function.
288 * It is either called as a thread startup routine or directly. It has
289 * to free the passed arg from the process heap and PostMessageA the async
290 * result or the error code.
293 * - errorhandling not verified.
295 static DWORD WINAPI _async_queryfun(LPVOID arg) {
296 async_query *aq = (async_query*)arg;
299 char *targetptr = (HB_WIN32(aq)?(char*)aq->sbuf:(char*)PTR_SEG_TO_LIN(aq->sbuf));
301 switch (aq->flags & AQ_GETMASK) {
304 struct ws_hostent *wshe = (struct ws_hostent*)targetptr;
306 he = (aq->flags & AQ_NAME) ?
307 gethostbyname(aq->host_name):
308 gethostbyaddr(aq->host_addr,aq->host_len,aq->host_type);
310 size = WS_copy_he(wshe,(char*)aq->sbuf,aq->sbuflen,he);
316 fail = ((h_errno < 0) ? wsaErrno() : wsaHerrno());
322 struct ws_protoent *wspe = (struct ws_protoent*)targetptr;
323 pe = (aq->flags & AQ_NAME)?
324 getprotobyname(aq->proto_name) :
325 getprotobynumber(aq->proto_number);
327 size = WS_copy_pe(wspe,(char*)aq->sbuf,aq->sbuflen,pe);
333 if (aq->flags & AQ_NAME)
334 MESSAGE("protocol %s not found; You might want to add "
335 "this to /etc/protocols\n", debugstr_a(aq->proto_name) );
337 MESSAGE("protocol number %d not found; You might want to add "
338 "this to /etc/protocols\n", aq->proto_number );
345 struct ws_servent *wsse = (struct ws_servent*)targetptr;
346 se = (aq->flags & AQ_NAME)?
347 getservbyname(aq->serv_name,aq->serv_proto) :
348 getservbyport(aq->serv_port,aq->serv_proto);
350 size = WS_copy_se(wsse,(char*)aq->sbuf,aq->sbuflen,se);
356 if (aq->flags & AQ_NAME)
357 MESSAGE("service %s protocol %s not found; You might want to add "
358 "this to /etc/services\n", debugstr_a(aq->serv_name) ,
359 aq->serv_proto ? debugstr_a(aq->serv_proto ):"*");
361 MESSAGE("service on port %d protocol %s not found; You might want to add "
362 "this to /etc/services\n", aq->serv_port,
363 aq->serv_proto ? debugstr_a(aq->serv_proto ):"*");
369 PostMessageA(aq->hWnd,aq->uMsg,aq->async_handle,size|(fail<<16));
370 HeapFree(GetProcessHeap(),0,arg);
374 /****************************************************************************
375 * The main async help function.
377 * It either starts a thread or just calls the function directly for platforms
378 * with no thread support. This relies on the fact that PostMessage() does
379 * not actually call the windowproc before the function returns.
381 static HANDLE16 __WSAsyncDBQuery(
382 HWND hWnd, UINT uMsg,INT int1,LPCSTR ptr1, INT int2, LPCSTR ptr2,
383 void *sbuf, INT sbuflen, UINT flags
385 async_query *aq = HeapAlloc(GetProcessHeap(),0,sizeof(async_query));
394 aq->async_handle = ++__ws_async_handle;
396 aq->sbuf = (SEGPTR)sbuf;
397 aq->sbuflen = sbuflen;
399 hthread = CreateThread(NULL,0,_async_queryfun,aq,0,NULL);
400 if (hthread==INVALID_HANDLE_VALUE)
403 return __ws_async_handle;
407 /***********************************************************************
408 * WSAAsyncGetHostByAddr() (WINSOCK.102)
410 HANDLE16 WINAPI WSAAsyncGetHostByAddr16(HWND16 hWnd, UINT16 uMsg, LPCSTR addr,
411 INT16 len, INT16 type, SEGPTR sbuf, INT16 buflen)
413 TRACE("hwnd %04x, msg %04x, addr %08x[%i]\n",
414 hWnd, uMsg, (unsigned)addr , len );
415 return __WSAsyncDBQuery(hWnd,uMsg,len,addr,type,NULL,(void*)sbuf,buflen,AQ_NUMBER|AQ_WIN16|AQ_GETHOST);
418 /***********************************************************************
419 * WSAAsyncGetHostByAddr() (WSOCK32.102)
421 HANDLE WINAPI WSAAsyncGetHostByAddr(HWND hWnd, UINT uMsg, LPCSTR addr,
422 INT len, INT type, LPSTR sbuf, INT buflen)
424 TRACE("hwnd %04x, msg %04x, addr %08x[%i]\n",
425 hWnd, uMsg, (unsigned)addr , len );
426 return __WSAsyncDBQuery(hWnd,uMsg,len,addr,type,NULL,sbuf,buflen,AQ_NUMBER|AQ_WIN32|AQ_GETHOST);
429 /***********************************************************************
430 * WSAAsyncGetHostByName() (WINSOCK.103)
432 HANDLE16 WINAPI WSAAsyncGetHostByName16(HWND16 hWnd, UINT16 uMsg, LPCSTR name,
433 SEGPTR sbuf, INT16 buflen)
435 TRACE("hwnd %04x, msg %04x, host %s, buffer %i\n", hWnd, uMsg, (name)?name:"<null>", (int)buflen );
437 return __WSAsyncDBQuery(hWnd,uMsg,0,name,0,NULL,(void*)sbuf,buflen,AQ_NAME|AQ_WIN16|AQ_GETHOST);
440 /***********************************************************************
441 * WSAAsyncGetHostByName() (WSOCK32.103)
443 HANDLE WINAPI WSAAsyncGetHostByName(HWND hWnd, UINT uMsg, LPCSTR name,
444 LPSTR sbuf, INT buflen)
446 TRACE("hwnd %04x, msg %08x, host %s, buffer %i\n",
447 (HWND16)hWnd, uMsg, (name)?name:"<null>", (int)buflen );
448 return __WSAsyncDBQuery(hWnd,uMsg,0,name,0,NULL,sbuf,buflen,AQ_NAME|AQ_WIN32|AQ_GETHOST);
451 /***********************************************************************
452 * WSAAsyncGetProtoByName() (WINSOCK.105)
454 HANDLE16 WINAPI WSAAsyncGetProtoByName16(HWND16 hWnd, UINT16 uMsg, LPCSTR name,
455 SEGPTR sbuf, INT16 buflen)
457 TRACE("hwnd %04x, msg %08x, protocol %s\n",
458 (HWND16)hWnd, uMsg, (name)?name:"<null>" );
459 return __WSAsyncDBQuery(hWnd,uMsg,0,name,0,NULL,(void*)sbuf,buflen,AQ_GETPROTO|AQ_NAME|AQ_WIN16);
462 /***********************************************************************
463 * WSAAsyncGetProtoByName() (WSOCK32.105)
465 HANDLE WINAPI WSAAsyncGetProtoByName(HWND hWnd, UINT uMsg, LPCSTR name,
466 LPSTR sbuf, INT buflen)
468 TRACE("hwnd %04x, msg %08x, protocol %s\n",
469 (HWND16)hWnd, uMsg, (name)?name:"<null>" );
470 return __WSAsyncDBQuery(hWnd,uMsg,0,name,0,NULL,sbuf,buflen,AQ_GETPROTO|AQ_NAME|AQ_WIN32);
474 /***********************************************************************
475 * WSAAsyncGetProtoByNumber() (WINSOCK.104)
477 HANDLE16 WINAPI WSAAsyncGetProtoByNumber16(HWND16 hWnd,UINT16 uMsg,INT16 number,
478 SEGPTR sbuf, INT16 buflen)
480 TRACE("hwnd %04x, msg %04x, num %i\n", hWnd, uMsg, number );
481 return __WSAsyncDBQuery(hWnd,uMsg,number,NULL,0,NULL,(void*)sbuf,buflen,AQ_GETPROTO|AQ_NUMBER|AQ_WIN16);
484 /***********************************************************************
485 * WSAAsyncGetProtoByNumber() (WSOCK32.104)
487 HANDLE WINAPI WSAAsyncGetProtoByNumber(HWND hWnd, UINT uMsg, INT number,
488 LPSTR sbuf, INT buflen)
490 TRACE("hwnd %04x, msg %04x, num %i\n", hWnd, uMsg, number );
492 return __WSAsyncDBQuery(hWnd,uMsg,number,NULL,0,NULL,sbuf,buflen,AQ_GETPROTO|AQ_NUMBER|AQ_WIN32);
495 /***********************************************************************
496 * WSAAsyncGetServByName() (WINSOCK.107)
498 HANDLE16 WINAPI WSAAsyncGetServByName16(HWND16 hWnd, UINT16 uMsg, LPCSTR name,
499 LPCSTR proto, SEGPTR sbuf, INT16 buflen)
501 TRACE("hwnd %04x, msg %04x, name %s, proto %s\n",
502 hWnd, uMsg, (name)?name:"<null>", (proto)?proto:"<null>" );
504 return __WSAsyncDBQuery(hWnd,uMsg,0,name,0,proto,(void*)sbuf,buflen,AQ_GETSERV|AQ_NAME|AQ_WIN16);
507 /***********************************************************************
508 * WSAAsyncGetServByName() (WSOCK32.107)
510 HANDLE WINAPI WSAAsyncGetServByName(HWND hWnd, UINT uMsg, LPCSTR name,
511 LPCSTR proto, LPSTR sbuf, INT buflen)
513 TRACE("hwnd %04x, msg %04x, name %s, proto %s\n",
514 hWnd, uMsg, (name)?name:"<null>", (proto)?proto:"<null>" );
515 return __WSAsyncDBQuery(hWnd,uMsg,0,name,0,proto,sbuf,buflen,AQ_GETSERV|AQ_NAME|AQ_WIN32);
518 /***********************************************************************
519 * WSAAsyncGetServByPort() (WINSOCK.106)
521 HANDLE16 WINAPI WSAAsyncGetServByPort16(HWND16 hWnd, UINT16 uMsg, INT16 port,
522 LPCSTR proto, SEGPTR sbuf, INT16 buflen)
524 TRACE("hwnd %04x, msg %04x, port %i, proto %s\n",
525 hWnd, uMsg, port, (proto)?proto:"<null>" );
526 return __WSAsyncDBQuery(hWnd,uMsg,port,NULL,0,proto,(void*)sbuf,buflen,AQ_GETSERV|AQ_NUMBER|AQ_WIN16);
529 /***********************************************************************
530 * WSAAsyncGetServByPort() (WSOCK32.106)
532 HANDLE WINAPI WSAAsyncGetServByPort(HWND hWnd, UINT uMsg, INT port,
533 LPCSTR proto, LPSTR sbuf, INT buflen)
535 TRACE("hwnd %04x, msg %04x, port %i, proto %s\n",
536 hWnd, uMsg, port, (proto)?proto:"<null>" );
537 return __WSAsyncDBQuery(hWnd,uMsg,port,NULL,0,proto,sbuf,buflen,AQ_GETSERV|AQ_NUMBER|AQ_WIN32);
540 /***********************************************************************
541 * WSACancelAsyncRequest() (WINSOCK.108)(WSOCK32.109)
543 INT WINAPI WSACancelAsyncRequest(HANDLE hAsyncTaskHandle)
545 FIXME("(%08x),stub\n", hAsyncTaskHandle);
549 INT16 WINAPI WSACancelAsyncRequest16(HANDLE16 hAsyncTaskHandle)
551 return (HANDLE16)WSACancelAsyncRequest((HANDLE)hAsyncTaskHandle);