|
版权声明： 本文由lyris完成，首发于csdn，作者保留中文版权。 |
unit netmonconsts;
interface
uses windows;
type
tshareinfo2 = packed record
shi2_netname: pwchar;
shi2_type: dword;
shi2_remark: pwchar;
shi2_permissions: dword;
shi2_max_uses: dword;
shi2_current_uses: dword;
shi2_path: pwchar;
shi2_passwd: pwchar;
end;
pshareinfo2 = ^tshareinfo2;
tshareinfo2array = array[0..512] of tshareinfo2;
pshareinfo2array = ^tshareinfo2array;
type
tshareinfo50 = packed record
shi50_netname: array[0..12] of char;
shi50_type: byte;
shi50_flags: word;
shi50_remark: pchar;
shi50_path: pchar;
shi50_rw_password: array[0..8] of char;
shi50_ro_password: array[0..8] of char;
end;
type
tsessioninfo502 = packed record
sesi502_cname: pwidechar;
sesi502_username: pwidechar;
sesi502_num_opens: dword;
sesi502_time: dword;
sesi502_idle_time: dword;
sesi502_user_flags: dword;
sesi502_cltype_name: pwidechar;
sesi502_transport: pwidechar;
end;
psessioninfo502 = ^tsessioninfo502;
tsessioninfo502array = array[0..512] of tsessioninfo502;
psessioninfo502array = ^tsessioninfo502array;
type
tsessioninfo50 = packed record
sesi50_cname: pchar;
sesi50_username: pchar;
sesi50_key: cardinal;
sesi50_num_conns: word;
sesi50_num_opens: word;
sesi50_time: cardinal;
sesi50_idle_time: cardinal;
sesi50_protocol: byte;
pad1: byte;
end;
type
tfileinfo3 = packed record
fi3_id: dword;
fi3_permissions: dword;
fi3_num_locks: dword;
fi3_pathname: pwchar;
fi3_username: pwchar;
end;
pfileinfo3 = ^tfileinfo3;
tfileinfo3array = array[0..512] of tfileinfo3;
pfileinfo3array = ^tfileinfo3array;
type
tfileinfo50 = packed record
fi50_id: cardinal;
fi50_permissions: word;
fi50_num_locks: word;
fi50_pathname: pchar;
fi50_username: pchar;
fi50_sharename: pchar;
end;
type
tmibifrow = packed record
wszname: array[0..255] of widechar;
dwindex: dword;
dwtype: dword;
dwmtu: dword;
dwspeed: dword;
dwphysaddrlen: dword;
bphysaddr: array[0..7] of byte;
dwadminstatus: dword;
dwoperstatus: dword;
dwlastchange: dword;
dwinoctets: dword;
dwinucastpkts: dword;
dwinnucastpkts: dword;
dwindiscards: dword;
dwinerrors: dword;
dwinunknownprotos: dword;
dwoutoctets: dword;
dwoutucastpkts: dword;
dwoutnucastpkts: dword;
dwoutdiscards: dword;
dwouterrors: dword;
dwoutqlen: dword;
dwdescrlen: dword;
bdescr: array[0..255] of char;
end;
tmibifarray = array[0..512] of tmibifrow;
pmibifrow = ^tmibifrow;
pmibifarray = ^tmibifarray;
type
tmibiftable = packed record
dwnumentries: dword;
table: tmibifarray;
end;
pmibiftable = ^tmibiftable;
var
netshareenumnt: function(servername: pwchar;
level: dword;
bufptr: pointer;
