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"
86 #include "wine/port.h"
87 #include "debugtools.h"
89 DEFAULT_DEBUG_CHANNEL(winsock
)
91 /* ----------------------------------- helper functions - */
93 static int list_size(char** l
, int item_size
)
98 j
+= (item_size
) ? item_size
: strlen(l
[i
]) + 1;
99 j
+= (i
+ 1) * sizeof(char*); }
103 static int list_dup(char** l_src
, char* ref
, char* base
, int item_size
)
105 /* base is either either equal to ref or 0 or SEGPTR */
108 char** l_to
= (char**)ref
;
111 for(j
=0;l_src
[j
];j
++) ;
112 p
+= (j
+ 1) * sizeof(char*);
114 { l_to
[i
] = base
+ (p
- ref
);
115 k
= ( item_size
) ? item_size
: strlen(l_src
[i
]) + 1;
116 memcpy(p
, l_src
[i
], k
); p
+= k
; }
123 static int hostent_size(struct hostent
* p_he
)
127 { size
= sizeof(struct hostent
);
128 size
+= strlen(p_he
->h_name
) + 1;
129 size
+= list_size(p_he
->h_aliases
, 0);
130 size
+= list_size(p_he
->h_addr_list
, p_he
->h_length
); }
134 /* Copy hostent to p_to, fix up inside pointers using p_base (different for
135 * Win16 (linear vs. segmented). Return -neededsize on overrun.
137 static int WS_copy_he(struct ws_hostent
*p_to
,char *p_base
,int t_size
,struct hostent
* p_he
)
139 char* p_name
,*p_aliases
,*p_addr
,*p
;
140 int size
=hostent_size(p_he
)+(sizeof(struct ws_hostent
)-sizeof(struct hostent
));
145 p
+= sizeof(struct ws_hostent
);
147 strcpy(p
, p_he
->h_name
); p
+= strlen(p
) + 1;
149 p
+= list_dup(p_he
->h_aliases
, p
, p_base
+ (p
- (char*)p_to
), 0);
151 list_dup(p_he
->h_addr_list
, p
, p_base
+ (p
- (char*)p_to
), p_he
->h_length
);
153 p_to
->h_addrtype
= (INT16
)p_he
->h_addrtype
;
154 p_to
->h_length
= (INT16
)p_he
->h_length
;
155 p_to
->h_name
= (SEGPTR
)(p_base
+ (p_name
- (char*)p_to
));
156 p_to
->h_aliases
= (SEGPTR
)(p_base
+ (p_aliases
- (char*)p_to
));
157 p_to
->h_addr_list
= (SEGPTR
)(p_base
+ (p_addr
- (char*)p_to
));
164 static int protoent_size(struct protoent
* p_pe
)
168 { size
= sizeof(struct protoent
);
169 size
+= strlen(p_pe
->p_name
) + 1;
170 size
+= list_size(p_pe
->p_aliases
, 0); }
174 /* Copy protoent to p_to, fix up inside pointers using p_base (different for
175 * Win16 (linear vs. segmented). Return -neededsize on overrun.
177 static int WS_copy_pe(struct ws_protoent
*p_to
,char *p_base
,int t_size
,struct protoent
* p_pe
)
179 char* p_name
,*p_aliases
,*p
;
180 int size
=protoent_size(p_pe
)+(sizeof(struct ws_protoent
)-sizeof(struct protoent
));
185 p
+= sizeof(struct ws_protoent
);
187 strcpy(p
, p_pe
->p_name
); p
+= strlen(p
) + 1;
189 list_dup(p_pe
->p_aliases
, p
, p_base
+ (p
- (char*)p_to
), 0);
191 p_to
->p_proto
= (INT16
)p_pe
->p_proto
;
192 p_to
->p_name
= (SEGPTR
)(p_base
) + (p_name
- (char*)p_to
);
193 p_to
->p_aliases
= (SEGPTR
)((p_base
) + (p_aliases
- (char*)p_to
));
201 static int servent_size(struct servent
* p_se
)
205 size
+= sizeof(struct servent
);
206 size
+= strlen(p_se
->s_proto
) + strlen(p_se
->s_name
) + 2;
207 size
+= list_size(p_se
->s_aliases
, 0);
212 /* Copy servent to p_to, fix up inside pointers using p_base (different for
213 * Win16 (linear vs. segmented). Return -neededsize on overrun.
215 static int WS_copy_se(struct ws_servent
*p_to
,char *p_base
,int t_size
,struct servent
* p_se
)
217 char* p_name
,*p_aliases
,*p_proto
,*p
;
218 int size
= servent_size(p_se
)+(sizeof(struct ws_servent
)-sizeof(struct servent
));
223 p
+= sizeof(struct ws_servent
);
225 strcpy(p
, p_se
->s_name
); p
+= strlen(p
) + 1;
227 strcpy(p
, p_se
->s_proto
); p
+= strlen(p
) + 1;
229 list_dup(p_se
->s_aliases
, p
, p_base
+ (p
- (char*)p_to
), 0);
231 p_to
->s_port
= (INT16
)p_se
->s_port
;
232 p_to
->s_name
= (SEGPTR
)(p_base
+ (p_name
- (char*)p_to
));
233 p_to
->s_proto
= (SEGPTR
)(p_base
+ (p_proto
- (char*)p_to
));
234 p_to
->s_aliases
= (SEGPTR
)(p_base
+ (p_aliases
- (char*)p_to
));
239 static HANDLE __ws_async_handle
= 0xdead;
241 /* Generic async query struct. we use symbolic names for the different queries
244 typedef struct _async_query
{
248 #define host_name ptr1
249 #define host_addr ptr1
250 #define serv_name ptr1
251 #define proto_name ptr1
253 #define serv_proto ptr2
255 #define host_len int1
256 #define proto_number int1
257 #define serv_port int1
259 #define host_type int2
263 HANDLE16 async_handle
;
267 #define HB_WIN32(hb) (hb->flags & AQ_WIN32)
272 #define AQ_GETPROTO 1
278 /****************************************************************************
279 * The async query function.
281 * It is either called as a thread startup routine or directly. It has
282 * to free the passed arg from the process heap and PostMessageA the async
283 * result or the error code.
286 * - errorhandling not verified.
288 static DWORD WINAPI
_async_queryfun(LPVOID arg
) {
289 async_query
*aq
= (async_query
*)arg
;
292 char *targetptr
= (HB_WIN32(aq
)?(char*)aq
->sbuf
:(char*)PTR_SEG_TO_LIN(aq
->sbuf
));
294 switch (aq
->flags
& AQ_GETMASK
) {
297 struct ws_hostent
*wshe
= (struct ws_hostent
*)targetptr
;
299 he
= (aq
->flags
& AQ_NAME
) ?
300 gethostbyname(aq
->host_name
):
301 gethostbyaddr(aq
->host_addr
,aq
->host_len
,aq
->host_type
);
303 size
= WS_copy_he(wshe
,(char*)aq
->sbuf
,aq
->sbuflen
,he
);
315 struct ws_protoent
*wspe
= (struct ws_protoent
*)targetptr
;
316 pe
= (aq
->flags
& AQ_NAME
)?
317 getprotobyname(aq
->proto_name
) :
318 getprotobynumber(aq
->proto_number
);
320 size
= WS_copy_pe(wspe
,(char*)aq
->sbuf
,aq
->sbuflen
,pe
);
332 struct ws_servent
*wsse
= (struct ws_servent
*)targetptr
;
333 se
= (aq
->flags
& AQ_NAME
)?
334 getservbyname(aq
->serv_name
,aq
->serv_proto
) :
335 getservbyport(aq
->serv_port
,aq
->serv_proto
);
337 size
= WS_copy_se(wsse
,(char*)aq
->sbuf
,aq
->sbuflen
,se
);
348 PostMessageA(aq
->hWnd
,aq
->uMsg
,aq
->async_handle
,size
|(fail
<<16));
349 HeapFree(GetProcessHeap(),0,arg
);
353 /****************************************************************************
354 * The main async help function.
356 * It either starts a thread or just calls the function directly for platforms
357 * with no thread support. This relies on the fact that PostMessage() does
358 * not actually call the windowproc before the function returns.
360 static HANDLE16
__WSAsyncDBQuery(
361 HWND hWnd
, UINT uMsg
,INT int1
,LPCSTR ptr1
, INT int2
, LPCSTR ptr2
,
362 void *sbuf
, INT sbuflen
, UINT flags
364 async_query
*aq
= HeapAlloc(GetProcessHeap(),0,sizeof(async_query
));
373 aq
->async_handle
= ++__ws_async_handle
;
375 aq
->sbuf
= (SEGPTR
)sbuf
;
376 aq
->sbuflen
= sbuflen
;
378 hthread
= CreateThread(NULL
,0,_async_queryfun
,aq
,0,NULL
);
379 if (hthread
==INVALID_HANDLE_VALUE
)
382 return __ws_async_handle
;
386 /***********************************************************************
387 * WSAAsyncGetHostByAddr() (WINSOCK.102)
389 HANDLE16 WINAPI
WSAAsyncGetHostByAddr16(HWND16 hWnd
, UINT16 uMsg
, LPCSTR addr
,
390 INT16 len
, INT16 type
, SEGPTR sbuf
, INT16 buflen
)
392 TRACE("hwnd %04x, msg %04x, addr %08x[%i]\n",
393 hWnd
, uMsg
, (unsigned)addr
, len
);
394 return __WSAsyncDBQuery(hWnd
,uMsg
,len
,addr
,type
,NULL
,(void*)sbuf
,buflen
,AQ_NUMBER
|AQ_WIN16
|AQ_GETHOST
);
397 /***********************************************************************
398 * WSAAsyncGetHostByAddr() (WSOCK32.102)
400 HANDLE WINAPI
WSAAsyncGetHostByAddr(HWND hWnd
, UINT uMsg
, LPCSTR addr
,
401 INT len
, INT type
, LPSTR sbuf
, INT buflen
)
403 TRACE("hwnd %04x, msg %04x, addr %08x[%i]\n",
404 hWnd
, uMsg
, (unsigned)addr
, len
);
405 return __WSAsyncDBQuery(hWnd
,uMsg
,len
,addr
,type
,NULL
,sbuf
,buflen
,AQ_NUMBER
|AQ_WIN32
|AQ_GETHOST
);
408 /***********************************************************************
409 * WSAAsyncGetHostByName() (WINSOCK.103)
411 HANDLE16 WINAPI
WSAAsyncGetHostByName16(HWND16 hWnd
, UINT16 uMsg
, LPCSTR name
,
412 SEGPTR sbuf
, INT16 buflen
)
414 TRACE("hwnd %04x, msg %04x, host %s, buffer %i\n", hWnd
, uMsg
, (name
)?name
:"<null>", (int)buflen
);
416 return __WSAsyncDBQuery(hWnd
,uMsg
,0,name
,0,NULL
,(void*)sbuf
,buflen
,AQ_NAME
|AQ_WIN16
|AQ_GETHOST
);
419 /***********************************************************************
420 * WSAAsyncGetHostByName32() (WSOCK32.103)
422 HANDLE WINAPI
WSAAsyncGetHostByName(HWND hWnd
, UINT uMsg
, LPCSTR name
,
423 LPSTR sbuf
, INT buflen
)
425 TRACE("hwnd %04x, msg %08x, host %s, buffer %i\n",
426 (HWND16
)hWnd
, uMsg
, (name
)?name
:"<null>", (int)buflen
);
427 return __WSAsyncDBQuery(hWnd
,uMsg
,0,name
,0,NULL
,sbuf
,buflen
,AQ_NAME
|AQ_WIN32
|AQ_GETHOST
);
430 /***********************************************************************
431 * WSAAsyncGetProtoByName() (WINSOCK.105)
433 HANDLE16 WINAPI
WSAAsyncGetProtoByName16(HWND16 hWnd
, UINT16 uMsg
, LPCSTR name
,
434 SEGPTR sbuf
, INT16 buflen
)
436 TRACE("hwnd %04x, msg %08x, protocol %s\n",
437 (HWND16
)hWnd
, uMsg
, (name
)?name
:"<null>" );
438 return __WSAsyncDBQuery(hWnd
,uMsg
,0,name
,0,NULL
,(void*)sbuf
,buflen
,AQ_GETPROTO
|AQ_NAME
|AQ_WIN16
);
441 /***********************************************************************
442 * WSAAsyncGetProtoByName() (WSOCK32.105)
444 HANDLE WINAPI
WSAAsyncGetProtoByName(HWND hWnd
, UINT uMsg
, LPCSTR name
,
445 LPSTR sbuf
, INT buflen
)
447 TRACE("hwnd %04x, msg %08x, protocol %s\n",
448 (HWND16
)hWnd
, uMsg
, (name
)?name
:"<null>" );
449 return __WSAsyncDBQuery(hWnd
,uMsg
,0,name
,0,NULL
,sbuf
,buflen
,AQ_GETPROTO
|AQ_NAME
|AQ_WIN32
);
453 /***********************************************************************
454 * WSAAsyncGetProtoByNumber() (WINSOCK.104)
456 HANDLE16 WINAPI
WSAAsyncGetProtoByNumber16(HWND16 hWnd
,UINT16 uMsg
,INT16 number
,
457 SEGPTR sbuf
, INT16 buflen
)
459 TRACE("hwnd %04x, msg %04x, num %i\n", hWnd
, uMsg
, number
);
460 return __WSAsyncDBQuery(hWnd
,uMsg
,number
,NULL
,0,NULL
,(void*)sbuf
,buflen
,AQ_GETPROTO
|AQ_NUMBER
|AQ_WIN16
);
463 /***********************************************************************
464 * WSAAsyncGetProtoByNumber() (WSOCK32.104)
466 HANDLE WINAPI
WSAAsyncGetProtoByNumber(HWND hWnd
, UINT uMsg
, INT number
,
467 LPSTR sbuf
, INT buflen
)
469 TRACE("hwnd %04x, msg %04x, num %i\n", hWnd
, uMsg
, number
);
471 return __WSAsyncDBQuery(hWnd
,uMsg
,number
,NULL
,0,NULL
,sbuf
,buflen
,AQ_GETPROTO
|AQ_NUMBER
|AQ_WIN32
);
474 /***********************************************************************
475 * WSAAsyncGetServByName() (WINSOCK.107)
477 HANDLE16 WINAPI
WSAAsyncGetServByName16(HWND16 hWnd
, UINT16 uMsg
, LPCSTR name
,
478 LPCSTR proto
, SEGPTR sbuf
, INT16 buflen
)
480 TRACE("hwnd %04x, msg %04x, name %s, proto %s\n",
481 hWnd
, uMsg
, (name
)?name
:"<null>", (proto
)?proto
:"<null>" );
483 return __WSAsyncDBQuery(hWnd
,uMsg
,0,name
,0,proto
,(void*)sbuf
,buflen
,AQ_GETSERV
|AQ_NAME
|AQ_WIN16
);
486 /***********************************************************************
487 * WSAAsyncGetServByName() (WSOCK32.107)
489 HANDLE WINAPI
WSAAsyncGetServByName(HWND hWnd
, UINT uMsg
, LPCSTR name
,
490 LPCSTR proto
, LPSTR sbuf
, INT buflen
)
492 TRACE("hwnd %04x, msg %04x, name %s, proto %s\n",
493 hWnd
, uMsg
, (name
)?name
:"<null>", (proto
)?proto
:"<null>" );
494 return __WSAsyncDBQuery(hWnd
,uMsg
,0,name
,0,proto
,sbuf
,buflen
,AQ_GETSERV
|AQ_NAME
|AQ_WIN32
);
497 /***********************************************************************
498 * WSAAsyncGetServByPort() (WINSOCK.106)
500 HANDLE16 WINAPI
WSAAsyncGetServByPort16(HWND16 hWnd
, UINT16 uMsg
, INT16 port
,
501 LPCSTR proto
, SEGPTR sbuf
, INT16 buflen
)
503 TRACE("hwnd %04x, msg %04x, port %i, proto %s\n",
504 hWnd
, uMsg
, port
, (proto
)?proto
:"<null>" );
505 return __WSAsyncDBQuery(hWnd
,uMsg
,port
,NULL
,0,proto
,(void*)sbuf
,buflen
,AQ_GETSERV
|AQ_NUMBER
|AQ_WIN16
);
508 /***********************************************************************
509 * WSAAsyncGetServByPort() (WSOCK32.106)
511 HANDLE WINAPI
WSAAsyncGetServByPort(HWND hWnd
, UINT uMsg
, INT port
,
512 LPCSTR proto
, LPSTR sbuf
, INT buflen
)
514 TRACE("hwnd %04x, msg %04x, port %i, proto %s\n",
515 hWnd
, uMsg
, port
, (proto
)?proto
:"<null>" );
516 return __WSAsyncDBQuery(hWnd
,uMsg
,port
,NULL
,0,proto
,sbuf
,buflen
,AQ_GETSERV
|AQ_NUMBER
|AQ_WIN32
);
519 /***********************************************************************
520 * WSACancelAsyncRequest() (WINSOCK.108)(WSOCK32.109)
522 INT WINAPI
WSACancelAsyncRequest(HANDLE hAsyncTaskHandle
)
524 FIXME("(%08x),stub\n", hAsyncTaskHandle
);
528 INT16 WINAPI
WSACancelAsyncRequest16(HANDLE16 hAsyncTaskHandle
)
530 return (HANDLE16
)WSACancelAsyncRequest((HANDLE
)hAsyncTaskHandle
);