Artifact 4ff4b2ce63f9b1ac1fb4203684b334f071ccaa7d:
- File
src/win32/secext.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 0a 2a 20 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 73 65 63 65 78 secex
0070: 74 2e 64 20 20 20 20 20 20 20 20 20 20 20 20 20 t.d
0080: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0090: 20 20 2a 0a 2a 20 20 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 2a 0a 2a 20 *.*
00e0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
00f0: 20 20 20 20 20 20 57 69 6e 64 6f 77 73 20 41 50 Windows AP
0100: 49 20 68 65 61 64 65 72 20 6d 6f 64 75 6c 65 20 I header module
0110: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0120: 20 20 20 20 20 20 2a 0a 2a 20 20 20 20 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: 2a 0a 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 *.*
0180: 20 20 20 20 54 72 61 6e 73 6c 61 74 65 64 20 66 Translated f
0190: 72 6f 6d 20 4d 69 6e 47 57 20 57 69 6e 64 6f 77 rom MinGW Window
01a0: 73 20 68 65 61 64 65 72 73 20 20 20 20 20 20 20 s headers
01b0: 20 20 20 20 20 20 20 20 20 20 2a 0a 2a 20 20 20 *.*
01c0: 20 20 20 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 20 20
01e0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
01f0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0200: 20 20 20 20 2a 0a 2a 20 20 20 20 20 20 20 20 20 *.*
0210: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 6c Pl
0220: 61 63 65 64 20 69 6e 74 6f 20 70 75 62 6c 69 63 aced into public
0230: 20 64 6f 6d 61 69 6e 20 20 20 20 20 20 20 20 20 domain
0240: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 0a *.
0250: 5c 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a \***************
0260: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
0270: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
0280: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
0290: 2a 2a 2a 2a 2a 2a 2a 2a 2f 0a 2f 2f 20 44 6f 6e ********/.// Don
02a0: 27 74 20 69 6e 63 6c 75 64 65 20 74 68 69 73 20 't include this
02b0: 66 69 6c 65 20 64 69 72 65 63 74 6c 79 2c 20 75 file directly, u
02c0: 73 65 20 77 69 6e 33 32 2e 73 65 63 75 72 69 74 se win32.securit
02d0: 79 20 69 6e 73 74 65 61 64 2e 0a 6d 6f 64 75 6c y instead..modul
02e0: 65 20 77 69 6e 33 32 2e 73 65 63 65 78 74 3b 0a e win32.secext;.
02f0: 70 72 61 67 6d 61 28 6c 69 62 2c 20 22 73 65 63 pragma(lib, "sec
0300: 75 72 33 32 22 29 3b 0a 0a 70 72 69 76 61 74 65 ur32");..private
0310: 20 69 6d 70 6f 72 74 20 77 69 6e 33 32 2e 77 33 import win32.w3
0320: 32 61 70 69 2c 20 77 69 6e 33 32 2e 77 69 6e 64 2api, win32.wind
0330: 65 66 3b 0a 0a 73 74 61 74 69 63 20 61 73 73 65 ef;..static asse
0340: 72 74 20 28 5f 57 49 4e 33 32 5f 57 49 4e 4e 54 rt (_WIN32_WINNT
0350: 20 3e 3d 20 30 78 35 30 31 2c 0a 20 20 22 53 65 >= 0x501,. "Se
0360: 63 45 78 74 20 69 73 20 6f 6e 6c 79 20 61 76 61 cExt is only ava
0370: 69 6c 61 62 6c 65 20 6f 6e 20 57 69 6e 64 6f 77 ilable on Window
0380: 73 58 50 20 61 6e 64 20 6c 61 74 65 72 22 29 3b sXP and later");
0390: 0a 0a 65 6e 75 6d 20 45 58 54 45 4e 44 45 44 5f ..enum EXTENDED_
03a0: 4e 41 4d 45 5f 46 4f 52 4d 41 54 20 7b 0a 09 4e NAME_FORMAT {..N
03b0: 61 6d 65 55 6e 6b 6e 6f 77 6e 2c 0a 09 4e 61 6d ameUnknown,..Nam
03c0: 65 46 75 6c 6c 79 51 75 61 6c 69 66 69 65 64 44 eFullyQualifiedD
03d0: 4e 2c 0a 09 4e 61 6d 65 53 61 6d 43 6f 6d 70 61 N,..NameSamCompa
03e0: 74 69 62 6c 65 2c 0a 09 4e 61 6d 65 44 69 73 70 tible,..NameDisp
03f0: 6c 61 79 2c 20 20 20 20 20 20 20 20 20 20 2f 2f lay, //
0400: 20 3d 20 20 33 0a 09 4e 61 6d 65 55 6e 69 71 75 = 3..NameUniqu
0410: 65 49 64 20 20 20 20 20 20 20 20 20 20 20 20 20 eId
0420: 3d 20 20 36 2c 0a 09 4e 61 6d 65 43 61 6e 6f 6e = 6,..NameCanon
0430: 69 63 61 6c 2c 0a 09 4e 61 6d 65 55 73 65 72 50 ical,..NameUserP
0440: 72 69 6e 63 69 70 61 6c 2c 0a 09 4e 61 6d 65 43 rincipal,..NameC
0450: 61 6e 6f 6e 69 63 61 6c 45 78 2c 0a 09 4e 61 6d anonicalEx,..Nam
0460: 65 53 65 72 76 69 63 65 50 72 69 6e 63 69 70 61 eServicePrincipa
0470: 6c 2c 20 2f 2f 20 3d 20 31 30 0a 09 4e 61 6d 65 l, // = 10..Name
0480: 44 6e 73 44 6f 6d 61 69 6e 20 20 20 20 20 20 20 DnsDomain
0490: 20 20 20 20 20 3d 20 31 32 0a 7d 0a 61 6c 69 61 = 12.}.alia
04a0: 73 20 45 58 54 45 4e 44 45 44 5f 4e 41 4d 45 5f s EXTENDED_NAME_
04b0: 46 4f 52 4d 41 54 2a 20 50 45 58 54 45 4e 44 45 FORMAT* PEXTENDE
04c0: 44 5f 4e 41 4d 45 5f 46 4f 52 4d 41 54 3b 0a 0a D_NAME_FORMAT;..
04d0: 65 78 74 65 72 6e 20 28 57 69 6e 64 6f 77 73 29 extern (Windows)
04e0: 20 7b 0a 09 42 4f 4f 4c 45 41 4e 20 47 65 74 43 {..BOOLEAN GetC
04f0: 6f 6d 70 75 74 65 72 4f 62 6a 65 63 74 4e 61 6d omputerObjectNam
0500: 65 41 28 45 58 54 45 4e 44 45 44 5f 4e 41 4d 45 eA(EXTENDED_NAME
0510: 5f 46 4f 52 4d 41 54 2c 20 4c 50 53 54 52 2c 20 _FORMAT, LPSTR,
0520: 50 55 4c 4f 4e 47 29 3b 0a 09 42 4f 4f 4c 45 41 PULONG);..BOOLEA
0530: 4e 20 47 65 74 43 6f 6d 70 75 74 65 72 4f 62 6a N GetComputerObj
0540: 65 63 74 4e 61 6d 65 57 28 45 58 54 45 4e 44 45 ectNameW(EXTENDE
0550: 44 5f 4e 41 4d 45 5f 46 4f 52 4d 41 54 2c 20 4c D_NAME_FORMAT, L
0560: 50 57 53 54 52 2c 20 50 55 4c 4f 4e 47 29 3b 0a PWSTR, PULONG);.
0570: 09 42 4f 4f 4c 45 41 4e 20 47 65 74 55 73 65 72 .BOOLEAN GetUser
0580: 4e 61 6d 65 45 78 41 28 45 58 54 45 4e 44 45 44 NameExA(EXTENDED
0590: 5f 4e 41 4d 45 5f 46 4f 52 4d 41 54 2c 20 4c 50 _NAME_FORMAT, LP
05a0: 53 54 52 2c 20 50 55 4c 4f 4e 47 29 3b 0a 09 42 STR, PULONG);..B
05b0: 4f 4f 4c 45 41 4e 20 47 65 74 55 73 65 72 4e 61 OOLEAN GetUserNa
05c0: 6d 65 45 78 57 28 45 58 54 45 4e 44 45 44 5f 4e meExW(EXTENDED_N
05d0: 41 4d 45 5f 46 4f 52 4d 41 54 2c 20 4c 50 57 53 AME_FORMAT, LPWS
05e0: 54 52 2c 20 50 55 4c 4f 4e 47 29 3b 0a 09 42 4f TR, PULONG);..BO
05f0: 4f 4c 45 41 4e 20 54 72 61 6e 73 6c 61 74 65 4e OLEAN TranslateN
0600: 61 6d 65 41 28 4c 50 43 53 54 52 2c 20 45 58 54 ameA(LPCSTR, EXT
0610: 45 4e 44 45 44 5f 4e 41 4d 45 5f 46 4f 52 4d 41 ENDED_NAME_FORMA
0620: 54 2c 0a 09 20 20 45 58 54 45 4e 44 45 44 5f 4e T,.. EXTENDED_N
0630: 41 4d 45 5f 46 4f 52 4d 41 54 2c 20 4c 50 53 54 AME_FORMAT, LPST
0640: 52 2c 20 50 55 4c 4f 4e 47 29 3b 0a 09 42 4f 4f R, PULONG);..BOO
0650: 4c 45 41 4e 20 54 72 61 6e 73 6c 61 74 65 4e 61 LEAN TranslateNa
0660: 6d 65 57 28 4c 50 43 57 53 54 52 2c 20 45 58 54 meW(LPCWSTR, EXT
0670: 45 4e 44 45 44 5f 4e 41 4d 45 5f 46 4f 52 4d 41 ENDED_NAME_FORMA
0680: 54 2c 0a 09 20 20 45 58 54 45 4e 44 45 44 5f 4e T,.. EXTENDED_N
0690: 41 4d 45 5f 46 4f 52 4d 41 54 2c 20 4c 50 57 53 AME_FORMAT, LPWS
06a0: 54 52 2c 20 50 55 4c 4f 4e 47 29 3b 0a 7d 0a 0a TR, PULONG);.}..
06b0: 76 65 72 73 69 6f 6e 20 28 55 6e 69 63 6f 64 65 version (Unicode
06c0: 29 20 7b 0a 09 61 6c 69 61 73 20 47 65 74 43 6f ) {..alias GetCo
06d0: 6d 70 75 74 65 72 4f 62 6a 65 63 74 4e 61 6d 65 mputerObjectName
06e0: 57 20 47 65 74 43 6f 6d 70 75 74 65 72 4f 62 6a W GetComputerObj
06f0: 65 63 74 4e 61 6d 65 3b 0a 09 61 6c 69 61 73 20 ectName;..alias
0700: 47 65 74 55 73 65 72 4e 61 6d 65 45 78 57 20 47 GetUserNameExW G
0710: 65 74 55 73 65 72 4e 61 6d 65 45 78 3b 0a 09 61 etUserNameEx;..a
0720: 6c 69 61 73 20 54 72 61 6e 73 6c 61 74 65 4e 61 lias TranslateNa
0730: 6d 65 57 20 54 72 61 6e 73 6c 61 74 65 4e 61 6d meW TranslateNam
0740: 65 3b 0a 7d 20 65 6c 73 65 20 7b 0a 09 61 6c 69 e;.} else {..ali
0750: 61 73 20 47 65 74 43 6f 6d 70 75 74 65 72 4f 62 as GetComputerOb
0760: 6a 65 63 74 4e 61 6d 65 41 20 47 65 74 43 6f 6d jectNameA GetCom
0770: 70 75 74 65 72 4f 62 6a 65 63 74 4e 61 6d 65 3b puterObjectName;
0780: 0a 09 61 6c 69 61 73 20 47 65 74 55 73 65 72 4e ..alias GetUserN
0790: 61 6d 65 45 78 41 20 47 65 74 55 73 65 72 4e 61 ameExA GetUserNa
07a0: 6d 65 45 78 3b 0a 09 61 6c 69 61 73 20 54 72 61 meEx;..alias Tra
07b0: 6e 73 6c 61 74 65 4e 61 6d 65 41 20 54 72 61 6e nslateNameA Tran
07c0: 73 6c 61 74 65 4e 61 6d 65 3b 0a 7d 0a slateName;.}.