BOOL
LogonUserA
(
LPCSTR  lpszUsername
,
;
// имя юзера = произвольное
LPCSTR  lpszDomain
,
;
// имя домена/сервера = GetComputerName()
LPCSTR  lpszPassword
,
;
// пароль юзера = 0
DWORD   dwLogonType
,
;
// тип входа в систему = LOGON32_LOGON_NEW_CREDENTIALS
DWORD   dwLogonProvider
,
;
// провайдер обеспечения входа = LOGON32_PROVIDER_DEFAULT (Authui.dll)
PHANDLE phToken
)
;
// сюда вернётся дескриптор токена нового пользователя!

!process 0 0

0x8a058d20

0xa5e41030

dt _token a5e41030 TokenSource.SourceIdentifier.

lkd
>
dt _token a5e41030 TokenSource
.
nt
!
_TOKEN
+
0x000
TokenSource
:
+
0x000
SourceName
:
[
8
]
"User32 "
+
0x008
SourceIdentifier
:
_LUID

SE_RESTORE

SE_BACKUP

BOOL GetTokenInformation
  TokenHandle             dd
0
;
// дескриптор токена
TokenInformationClass   dd
0
;
// класс запрашиваемой информации
TokenInformation        dd
0
;
// линк на буфер под инфу
TokenInformationLength  dd
0
;
// размер буфера
ReturnLength            dd
0
;
// переменная, куда вернётся кол-во байт

struct TOKEN_PRIVILEGES
  PrivilegeCount   dd
0
Privileges       LUID_AND_ATTRIBUTES
ends
;
//--------------------
struct LUID_AND_ATTRIBUTES
  Luid             dq
0
;
// ID привилегии (8-байт)
Attributes       dd
0
;
// откл(0), вкл.в дефолте(1), вкл.программно(2)
ends

format pe console
entry  start
;
//------------
section
'.inc'
data readable
include
'win32ax.inc'
include
'equates\advapi32.inc'
;
//------------
.
data
szEnabled    db
'      
;
//----- Открываем первичный токен своего процесса
invoke  GetCurrentProcess
         invoke  OpenProcessToken
,
eax
,
TOKEN_QUERY
,
hToken
;
//----- Запрос списка привелегий в токене
;
//----- (первый вызов возвращает требуемый размер буфера)
invoke  GetTokenInformation
,
[
hToken
]
,
TokenPrivileges
,
buff
,
0
,
pReturn
         invoke  GetTokenInformation
,
[
hToken
]
,
TokenPrivileges
,
buff
,
[
pReturn
]
,
pReturn

        cinvoke  printf
,

,
dword
[
buff
]
;
//----- В буфере лежат все привилегии - перебираем их..
align
16
mov     ecx
,
dword
[
buff
]
;
// PrivilegeCount
mov     esi
,
buff
+
4
;
// начало массива "LUID_AND_ATTRIBUTES"
@@
:
push    esi ecx esi
         mov
[
strSize
]
,
128
;
// обновить длину строки
mov     eax
,
[
esi
]
;
// LUID очередной привилегии
push    eax
         invoke  LookupPrivilegeName
,
0
,
esi
,
privStr
,
strSize
;
// в строку его,
pop     eax
        cinvoke  printf
,

,
eax
,
privStr
;
// ..и на консоль
pop     eax
         mov     eax
,
[
eax
+
8
]
;
// взять атрибут
or      eax
,
eax
;
// если нуль (отключена),
je      @next
;
//  ..пропустить.
mov     esi
,
szEnabled
;
// иначе: попалась активная привилегия!
cmp     eax
,
SE_PRIVILEGE_ENABLED
;
// программно включена?
je      @prn
         mov     esi
,
szDefault
;
// значит идёт в дефолте.
@prn
:
cinvoke  printf
,

,
esi

@next
:
pop     ecx esi
         add     esi
,
sizeof
.
LUID_AND_ATTRIBUTES
;
// перейти в массиве на сл.привилегию
dec     ecx
;
// счётчик -1
jnz     @b
;
// повторить, если не нуль..
@exit
:
cinvoke  _getch
        cinvoke  exit
,
0
;
//------------
section
'.idata'
import data readable
library  kernel32
,
'kernel32.dll'
,
msvcrt
,
'msvcrt.dll'
,
advapi32
,
'advapi32.dll'
include
'api\kernel32.inc'
include
'api\msvcrt.inc'
include
'api\advapi32.inc'

BOOL AdjustTokenPrivileges
  TokenHandle             dd
0
;
// хендл токена безопасности
DisableAllPrivileges    dd
0
;
// 1 = отмена всех привилегий, 0 = добавить в токен
NewState                dd
0
;
// нужные привилегии в виде структуры TOKEN_PRIVILEGES
BufferLength            dd
0
;
// размер буфера (опционально)
PreviousState           dd
0
;
// лист предыдущих (опционально)
ReturnLength            dd
0
;
// размер PreviousState (опционально)

align
16
newState
:
;
//
cinvoke  printf
,

;
//----- Открываем первичный токен своего процесса
invoke  GetCurrentProcess
         invoke  OpenProcessToken
,
eax
,
\
                                  TOKEN_QUERY
+
TOKEN_ADJUST_PRIVILEGES
,
\
                                  hToken
         or      eax
,
eax
         jnz     @f
        cinvoke  printf
,

jmp     @exit
;
//----- Получаем LUID'ы привилегий по их именам
@@
:
invoke  LookupPrivilegeValue
,
0
,

,
Luid1
         invoke  LookupPrivilegeValue
,
0
,

,
Luid2
         invoke  LookupPrivilegeValue
,
0
,

,
Luid3
         invoke  LookupPrivilegeValue
,
0
,

,
Luid4
;
//----- Выставляем привилегии в токене!
invoke  AdjustTokenPrivileges
,
[
hToken
]
,
0
,
newState
,
0
,
0
,
0
or      eax
,
eax
         jnz     @f
        cinvoke  printf
,

jmp     @exit
;
//----- Запрос списка привелегий
;
//----- (первый вызов возвращает требуемый размер буфера)
@@
:
invoke  GetTokenInformation
,
[
hToken
]
,
TokenPrivileges
,
buff
,
0
,
pReturn
         invoke  GetTokenInformation
,
[
hToken
]
,
TokenPrivileges
,
buff
,
[
pReturn
]
,
pReturn

        cinvoke  printf
,

,
dword
[
buff
]
;
//..............
;
//
invoke  OpenProcessToken
,
-
1
,
TOKEN_QUERY
,
hToken
;
//----- SID юзера в системе ----------
invoke  GetTokenInformation
,
[
hToken
]
,
TokenUser
,
buff
,
0
,
pReturn
         invoke  GetTokenInformation
,
[
hToken
]
,
TokenUser
,
buff
,
[
pReturn
]
,
pReturn
         mov     eax
,
dword
[
buff
]
invoke  ConvertSidToStringSid
,
eax
,
buff
         mov     eax
,
dword
[
buff
]
cinvoke  printf
,

,
eax
;
//----- Получим SID из токена ----------
invoke  GetTokenInformation
,
[
hToken
]
,
TokenGroups
,
buff
,
0
,
pReturn
         invoke  GetTokenInformation
,
[
hToken
]
,
TokenGroups
,
buff
,
[
pReturn
]
,
pReturn

         mov     ecx
,
dword
[
buff
]
mov     esi
,
buff
+
4
@@
:
mov     eax
,
[
esi
+
SID_AND_ATTRIBUTES
.
Attributes
]
and     eax
,
SE_GROUP_LOGON_ID
         cmp     eax
,
SE_GROUP_LOGON_ID
         je      @found
         add     esi
,
sizeof
.
SID_AND_ATTRIBUTES
         dec     ecx
         jnz     @b
        cinvoke  printf
,

jmp     @exit

@found
:
mov     eax
,
dword
[
esi
]
invoke  ConvertSidToStringSid
,
eax
,
buff
         mov     eax
,
dword
[
buff
]
cinvoke  printf
,

,
eax
;
//----- Перечислим привелегии в токене ----------
invoke  GetTokenInformation
,
[
hToken
]
,
TokenPrivileges
,
buff
,
0
,
pReturn
         invoke  GetTokenInformation
,
[
hToken
]
,
TokenPrivileges
,
buff
,
[
pReturn
]
,
pReturn

        cinvoke  printf
,

,
dword
[
buff
]
mov     ecx
,
dword
[
buff
]
mov     esi
,
buff
+
4
@@
:
cmp
[
esi
+
LUID_AND_ATTRIBUTES
.
Attributes
]
,
0
jz      @fuck
         push    esi ecx
         mov
[
strSize
]
,
128
invoke  LookupPrivilegeName
,
0
,
esi
,
privStr
,
strSize
        cinvoke  printf
,

,
privStr
         pop     ecx esi
@fuck
:
add     esi
,
sizeof
.
LUID_AND_ATTRIBUTES
         dec     ecx
         jnz     @b
;
//----- Общая статистика токена ----------
;
invoke  GetTokenInformation
,
[
hToken
]
,
TokenStatistics
,
buff
,
0
,
pReturn
;
invoke  GetTokenInformation
,
[
hToken
]
,
TokenStatistics
,
buff
,
[
pReturn
]
,
pReturn
;
cinvoke  printf
,

,
eax
;
//**************************************************************
cinvoke  printf
,

;
//----- Owner (владелец).
;
//----- SID, который будет записан как владелец любых объектов,
;
//----- созданных процессом с этим токеном доступа.
invoke  GetTokenInformation
,
[
hToken
]
,
TokenOwner
,
buff
,
0
,
pReturn
         invoke  GetTokenInformation
,
[
hToken
]
,
TokenOwner
,
buff
,
[
pReturn
]
,
pReturn
         mov     eax
,
dword
[
buff
]
invoke  ConvertSidToStringSid
,
eax
,
buff
         mov     eax
,
dword
[
buff
]
cinvoke  printf
,

,
eax
;
//----- PrimaryGroup.
;
//----- SID, который будет записан как основная группа любых объектов,
;
//----- созданных процессом с этим токеном доступа.
invoke  GetTokenInformation
,
[
hToken
]
,
TokenPrimaryGroup
,
buff
,
0
,
pReturn
         invoke  GetTokenInformation
,
[
hToken
]
,
TokenPrimaryGroup
,
buff
,
[
pReturn
]
,
pReturn
         mov     eax
,
dword
[
buff
]
invoke  ConvertSidToStringSid
,
eax
,
buff
         mov     eax
,
dword
[
buff
]
cinvoke  printf
,

,
eax
;
//----- DefaultDacl.
;
//----- DACL, который будет назначен любым объектам,
;
//----- созданным процессом c этим токеном, если не указан явный ACL.
invoke  GetTokenInformation
,
[
hToken
]
,
TokenDefaultDacl
,
buff
,
0
,
pReturn
         invoke  GetTokenInformation
,
[
hToken
]
,
TokenDefaultDacl
,
buff
,
[
pReturn
]
,
pReturn

         mov     esi
,
dword
[
buff
]
push    esi
         movzx   eax
,
[
esi
+
DACL_HEADER
.
AclRevision
]
movzx   ebx
,
[
esi
+
DACL_HEADER
.
AclSize
]
movzx   ecx
,
[
esi
+
DACL_HEADER
.
AceCount
]
mov
[
counter
]
,
ecx
        cinvoke  printf
,

,
eax
,
ebx
,
ecx

         pop     esi
         add     esi
,
sizeof
.
DACL_HEADER
         mov     ecx
,
[
counter
]
@@
:
push    esi ecx
         movzx   eax
,
[
esi
+
ACCESS_ALLOWED_ACE
.
AceFlags
]
movzx   ebx
,
[
esi
+
ACCESS_ALLOWED_ACE
.
AceSize
]
mov     ecx
,
[
esi
+
ACCESS_ALLOWED_ACE
.
Mask
]
mov
[
offset
]
,
ebx
         push    esi
        cinvoke  printf
,

,
[
number
]
,
ebx
,
\
[
number
]
,
eax
,
\
[
number
]
,
ecx
         pop     esi
         add     esi
,
ACCESS_ALLOWED_ACE
.
SidStart
         invoke  ConvertSidToStringSid
,
esi
,
sidBuff
         mov     eax
,
dword
[
sidBuff
]
cinvoke  printf
,

,
[
number
]
,
eax

         pop     ecx esi
         inc
[
number
]
add     esi
,
[
offset
]
dec     ecx
         jnz     @b

@exit
:
cinvoke  _getch
        cinvoke  exit
,
0
;
//------------
;
//------------
section
'.idata'
import data readable
library  kernel32
,
'kernel32.dll'
,
msvcrt
,
'msvcrt.dll'
,
advapi32
,
'advapi32.dll'
include
'api\kernel32.inc'
include
'api\msvcrt.inc'
include
'api\advapi32.inc'