Artifact ca4c8f50da03899cea21110b94054f778106e8e5:
- File
src/win32/dhcpcsdk.d
-
2015-05-05 06:49:05
- part of checkin
[9b639cf2d6]
on branch trunk
- Working version for update to 2.067.
The problem was __gshared. Replacing it with TLS fixed the issue. Remaining problem is that "hack.d"'s CloseHandle hack is not working anymore.
(user: kinaba) [annotate]
-
2015-05-05 06:49:05
- part of checkin
[9b639cf2d6]
on branch trunk
- Working version for update to 2.067.
0000: 2f 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a /*************** 0010: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a **************** 0020: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a **************** 0030: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a **************** 0040: 2a 2a 2a 2a 2a 2a 2a 2a 5c 0d 0a 2a 20 20 20 20 ********\..* 0050: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0060: 20 20 20 20 20 20 20 20 20 20 20 64 68 63 70 63 dhcpc 0070: 73 64 6b 2e 64 20 20 20 20 20 20 20 20 20 20 20 sdk.d 0080: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0090: 20 20 20 2a 0d 0a 2a 20 20 20 20 20 20 20 20 20 *..* 00a0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00b0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00c0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00d0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 0d *. 00e0: 0a 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .* 00f0: 20 20 20 20 20 20 20 20 20 57 69 6e 64 6f 77 73 Windows 0100: 20 41 50 49 20 68 65 61 64 65 72 20 6d 6f 64 75 API header modu 0110: 6c 65 20 20 20 20 20 20 20 20 20 20 20 20 20 20 le 0120: 20 20 20 20 20 20 20 20 20 2a 0d 0a 2a 20 20 20 *..* 0130: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0140: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0150: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0160: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0170: 20 20 20 20 2a 0d 0a 2a 20 20 20 20 20 20 20 20 *..* 0180: 20 20 20 20 20 20 20 20 20 54 72 61 6e 73 6c 61 Transla 0190: 74 65 64 20 66 72 6f 6d 20 4d 69 6e 47 57 20 57 ted from MinGW W 01a0: 69 6e 64 6f 77 73 20 68 65 61 64 65 72 73 20 20 indows headers 01b0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a * 01c0: 0d 0a 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 ..* 01d0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 62 79 by 01e0: 20 53 74 65 77 61 72 74 20 47 6f 72 64 6f 6e 20 Stewart Gordon 01f0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0200: 20 20 20 20 20 20 20 20 20 20 2a 0d 0a 2a 20 20 *..* 0210: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0220: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0230: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0240: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0250: 20 20 20 20 20 2a 0d 0a 2a 20 20 20 20 20 20 20 *..* 0260: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0270: 50 6c 61 63 65 64 20 69 6e 74 6f 20 70 75 62 6c Placed into publ 0280: 69 63 20 64 6f 6d 61 69 6e 20 20 20 20 20 20 20 ic domain 0290: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 02a0: 2a 0d 0a 5c 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a *..\************ 02b0: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a **************** 02c0: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a **************** 02d0: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a **************** 02e0: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2f 0d 0a 6d 6f ***********/..mo 02f0: 64 75 6c 65 20 77 69 6e 33 32 2e 64 68 63 70 63 dule win32.dhcpc 0300: 73 64 6b 3b 0d 0a 0d 0a 70 72 69 76 61 74 65 20 sdk;....private 0310: 69 6d 70 6f 72 74 20 77 69 6e 33 32 2e 77 33 32 import win32.w32 0320: 61 70 69 2c 20 77 69 6e 33 32 2e 77 69 6e 64 65 api, win32.winde 0330: 66 3b 0d 0a 0d 0a 73 74 61 74 69 63 20 61 73 73 f;....static ass 0340: 65 72 74 20 28 5f 57 49 4e 33 32 5f 57 49 4e 4e ert (_WIN32_WINN 0350: 54 20 3e 3d 20 30 78 35 30 30 2c 0d 0a 22 77 69 T >= 0x500,.."wi 0360: 6e 33 32 2e 64 68 63 70 63 73 64 6b 20 69 73 20 n32.dhcpcsdk is 0370: 61 76 61 69 6c 61 62 6c 65 20 6f 6e 6c 79 20 69 available only i 0380: 66 20 76 65 72 73 69 6f 6e 20 57 69 6e 64 6f 77 f version Window 0390: 73 32 30 30 30 2c 20 57 69 6e 64 6f 77 73 58 50 s2000, WindowsXP 03a0: 2c 20 57 69 6e 64 6f 77 73 32 30 30 33 0d 0a 6f , Windows2003..o 03b0: 72 20 57 69 6e 64 6f 77 73 56 69 73 74 61 20 69 r WindowsVista i 03c0: 73 20 73 65 74 22 29 3b 0d 0a 0d 0a 2f 2f 23 69 s set");....//#i 03d0: 66 20 28 5f 57 49 4e 33 32 5f 57 49 4e 4e 54 20 f (_WIN32_WINNT 03e0: 3e 3d 20 30 78 35 30 30 29 0d 0a 0d 0a 2f 2f 20 >= 0x500)....// 03f0: 46 49 58 4d 45 3a 20 63 68 65 63 6b 20 74 79 70 FIXME: check typ 0400: 65 0d 0a 63 6f 6e 73 74 20 44 48 43 50 43 41 50 e..const DHCPCAP 0410: 49 5f 52 45 47 49 53 54 45 52 5f 48 41 4e 44 4c I_REGISTER_HANDL 0420: 45 5f 45 56 45 4e 54 20 3d 20 31 3b 0d 0a 63 6f E_EVENT = 1;..co 0430: 6e 73 74 20 44 48 43 50 43 41 50 49 5f 52 45 51 nst DHCPCAPI_REQ 0440: 55 45 53 54 5f 50 45 52 53 49 53 54 45 4e 54 20 UEST_PERSISTENT 0450: 20 20 20 3d 20 31 3b 0d 0a 63 6f 6e 73 74 20 44 = 1;..const D 0460: 48 43 50 43 41 50 49 5f 52 45 51 55 45 53 54 5f HCPCAPI_REQUEST_ 0470: 53 59 4e 43 48 52 4f 4e 4f 55 53 20 20 20 3d 20 SYNCHRONOUS = 0480: 32 3b 0d 0a 0d 0a 73 74 72 75 63 74 20 44 48 43 2;....struct DHC 0490: 50 43 41 50 49 5f 43 4c 41 53 53 49 44 20 7b 0d PCAPI_CLASSID {. 04a0: 0a 09 55 4c 4f 4e 47 20 20 46 6c 61 67 73 3b 0d ..ULONG Flags;. 04b0: 0a 09 4c 50 42 59 54 45 20 44 61 74 61 3b 0d 0a ..LPBYTE Data;.. 04c0: 09 55 4c 4f 4e 47 20 20 6e 42 79 74 65 73 44 61 .ULONG nBytesDa 04d0: 74 61 3b 0d 0a 7d 0d 0a 61 6c 69 61 73 20 44 48 ta;..}..alias DH 04e0: 43 50 43 41 50 49 5f 43 4c 41 53 53 49 44 2a 20 CPCAPI_CLASSID* 04f0: 50 44 48 43 50 43 41 50 49 5f 43 4c 41 53 53 49 PDHCPCAPI_CLASSI 0500: 44 2c 20 4c 50 44 48 43 50 43 41 50 49 5f 43 4c D, LPDHCPCAPI_CL 0510: 41 53 53 49 44 3b 0d 0a 0d 0a 73 74 72 75 63 74 ASSID;....struct 0520: 20 44 48 43 50 41 50 49 5f 50 41 52 41 4d 53 20 DHCPAPI_PARAMS 0530: 7b 0d 0a 09 55 4c 4f 4e 47 20 20 46 6c 61 67 73 {...ULONG Flags 0540: 3b 0d 0a 09 55 4c 4f 4e 47 20 20 4f 70 74 69 6f ;...ULONG Optio 0550: 6e 49 64 3b 0d 0a 09 42 4f 4f 4c 20 20 20 49 73 nId;...BOOL Is 0560: 56 65 6e 64 6f 72 3b 0d 0a 09 4c 50 42 59 54 45 Vendor;...LPBYTE 0570: 20 44 61 74 61 3b 0d 0a 09 44 57 4f 52 44 20 20 Data;...DWORD 0580: 6e 42 79 74 65 73 44 61 74 61 3b 0d 0a 7d 0d 0a nBytesData;..}.. 0590: 61 6c 69 61 73 20 44 48 43 50 41 50 49 5f 50 41 alias DHCPAPI_PA 05a0: 52 41 4d 53 2a 20 50 44 48 43 50 41 50 49 5f 50 RAMS* PDHCPAPI_P 05b0: 41 52 41 4d 53 2c 20 4c 50 44 48 43 50 41 50 49 ARAMS, LPDHCPAPI 05c0: 5f 50 41 52 41 4d 53 3b 0d 0a 0d 0a 73 74 72 75 _PARAMS;....stru 05d0: 63 74 20 44 48 43 50 43 41 50 49 5f 50 41 52 41 ct DHCPCAPI_PARA 05e0: 4d 53 5f 41 52 52 41 59 20 7b 0d 0a 09 55 4c 4f MS_ARRAY {...ULO 05f0: 4e 47 20 20 20 20 20 20 20 20 20 20 20 20 6e 50 NG nP 0600: 61 72 61 6d 73 3b 0d 0a 09 4c 50 44 48 43 50 41 arams;...LPDHCPA 0610: 50 49 5f 50 41 52 41 4d 53 20 50 61 72 61 6d 73 PI_PARAMS Params 0620: 3b 0d 0a 7d 0d 0a 61 6c 69 61 73 20 44 48 43 50 ;..}..alias DHCP 0630: 43 41 50 49 5f 50 41 52 41 4d 53 5f 41 52 52 41 CAPI_PARAMS_ARRA 0640: 59 2a 20 50 44 48 43 50 43 41 50 49 5f 50 41 52 Y* PDHCPCAPI_PAR 0650: 41 4d 53 5f 41 52 52 41 59 2c 20 4c 50 44 48 43 AMS_ARRAY, LPDHC 0660: 50 43 41 50 49 5f 50 41 52 41 4d 53 5f 41 52 52 PCAPI_PARAMS_ARR 0670: 41 59 3b 0d 0a 0d 0a 65 78 74 65 72 6e 20 28 57 AY;....extern (W 0680: 69 6e 64 6f 77 73 29 20 7b 0d 0a 09 76 6f 69 64 indows) {...void 0690: 20 44 68 63 70 43 41 70 69 43 6c 65 61 6e 75 70 DhcpCApiCleanup 06a0: 28 29 3b 0d 0a 09 44 57 4f 52 44 20 44 68 63 70 ();...DWORD Dhcp 06b0: 43 41 70 69 49 6e 69 74 69 61 6c 69 7a 65 28 4c CApiInitialize(L 06c0: 50 44 57 4f 52 44 29 3b 0d 0a 09 44 57 4f 52 44 PDWORD);...DWORD 06d0: 20 44 68 63 70 44 65 52 65 67 69 73 74 65 72 50 DhcpDeRegisterP 06e0: 61 72 61 6d 43 68 61 6e 67 65 28 44 57 4f 52 44 aramChange(DWORD 06f0: 2c 20 4c 50 56 4f 49 44 2c 20 4c 50 56 4f 49 44 , LPVOID, LPVOID 0700: 29 3b 0d 0a 09 44 57 4f 52 44 20 44 68 63 70 52 );...DWORD DhcpR 0710: 65 67 69 73 74 65 72 50 61 72 61 6d 43 68 61 6e egisterParamChan 0720: 67 65 28 44 57 4f 52 44 2c 20 4c 50 56 4f 49 44 ge(DWORD, LPVOID 0730: 2c 20 50 57 53 54 52 2c 20 4c 50 44 48 43 50 43 , PWSTR, LPDHCPC 0740: 41 50 49 5f 43 4c 41 53 53 49 44 2c 0d 0a 09 20 API_CLASSID,... 0750: 20 44 48 43 50 43 41 50 49 5f 50 41 52 41 4d 53 DHCPCAPI_PARAMS 0760: 5f 41 52 52 41 59 2c 20 4c 50 56 4f 49 44 29 3b _ARRAY, LPVOID); 0770: 0d 0a 09 44 57 4f 52 44 20 44 68 63 70 52 65 6d ...DWORD DhcpRem 0780: 6f 76 65 44 4e 53 52 65 67 69 73 74 72 61 74 69 oveDNSRegistrati 0790: 6f 6e 73 28 29 3b 0d 0a 09 44 57 4f 52 44 20 44 ons();...DWORD D 07a0: 68 63 70 55 6e 64 6f 52 65 71 75 65 73 74 50 61 hcpUndoRequestPa 07b0: 72 61 6d 73 28 44 57 4f 52 44 2c 20 4c 50 56 4f rams(DWORD, LPVO 07c0: 49 44 2c 20 4c 50 57 53 54 52 2c 20 4c 50 57 53 ID, LPWSTR, LPWS 07d0: 54 52 29 3b 0d 0a 7d 0d 0a 0d 0a 2f 2f 23 65 6e TR);..}....//#en 07e0: 64 69 66 20 2f 2f 20 28 5f 57 49 4e 33 32 5f 57 dif // (_WIN32_W 07f0: 49 4e 4e 54 20 3e 3d 20 30 78 35 30 30 29 0d 0a INNT >= 0x500)..