8000 Load libwin32-0.10 into trunk. · perl-libwin32/win32-netadmin@8acb3ce · GitHub
[go: up one dir, main page]
Skip to content

Commit 8acb3ce

Browse files
janduboisjandubois
committed
Load libwin32-0.10 into trunk.
1 parent 7f4101d commit 8acb3ce

File tree

3 files changed

+302
-41
lines changed

3 files changed

+302
-41
lines changed

‎Changes

Lines changed: 11 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -1,10 +1,18 @@
11
Revision history for Perl extension Win32::NetAdmin.
22

3-
0.01 Sat Apr 5 14:24:05 1997
4-
- original version; created by h2xs 1.18
5-
- imported ActiveWare version
3+
4+
0.03 Fri Feb 6 21:02:31 1998
5+
- fixes and enhancements courtesy Jutta Klebe <jmk@exc.bybyte.de>
6+
* New functions: LoggedOnUsers(), GetTransports()
7+
* GetUsers() and GetServers() now accept hashrefs
8+
- misc. pod fixes
9+
610
0.02 Sat Dec 13 19:11:52 1997
711
- Fixes for enumeration functions from Joe Doss <jdoss@levi.com>
812
- Various tweaks to the fixes
913
- Added changes in ActiveState version
1014

15+
0.01 Sat Apr 5 14:24:05 1997
16+
- original version; created by h2xs 1.18
17+
- imported ActiveWare version
18+

‎NetAdmin.pm

Lines changed: 53 additions & 34 deletions
Original file line numberDiff line numberDiff line change
@@ -5,7 +5,7 @@ package Win32::NetAdmin;
55
#Written by Douglas_Lankshear@ActiveWare.com
66
#
77

8-
$VERSION = '0.02';
8+
$VERSION = '0.03';
99

1010
require Exporter;
1111
require DynaLoader;
@@ -76,122 +76,141 @@ Win32::NetAdmin - manage network groups and users in perl
7676
7777
=head1 DESCRIPTION
7878
79-
This module offers control over the administration of groups and users over a network.
79+
This module offers control over the administration of groups and users over a
80+
network.
8081
8182
=head1 FUNCTIONS
8283
8384
=head2 NOTE
8485
8586
All of the functions return FALSE (0) if they fail, unless otherwise noted.
86-
server is optional for all the calls below. (if not given the local machine is assumed.)
87+
C<server> is optional for all the calls below. If not given the local machine is
88+
assumed.
8789
8890
=over 10
8991
9092
=item GetDomainController(server, domain, returnedName)
9193
92-
Return the name of the domain controller for server
94+
Returns the name of the domain controller for server.
9395
9496
=item GetAnyDomainController(server, domain, returnedName)
9597
96-
Return the name of any domain controller for a domain that is directly trusted
97-
by the server
98+
Returns the name of any domain controller for a domain that is directly trusted
99+
by the server.
98100
99101
=item UserCreate(server, userName, password, passwordAge, privilege, homeDir, comment, flags, scriptPath)
100102
101-
Creates a user on server with password, passwordAge, privilege, homeDir, comment, flags, and scriptPath
103+
Creates a user on server with password, passwordAge, privilege, homeDir, comment,
104+
flags, and scriptPath.
102105
103106
=item UserDelete(server, user)
104107
105-
Deletes a user from server
108+
Deletes a user from server.
106109
107110
=item UserGetAttributes(server, userName, password, passwordAge, privilege, homeDir, comment, flags, scriptPath)
108111
109-
Gets password, passwordAge, privilege, homeDir, comment, flags, and scriptPath for user
112+
Gets password, passwordAge, privilege, homeDir, comment, flags, and scriptPath
113+
for user.
110114
111115
=item UserSetAttributes(server, userName, password, passwordAge, privilege, homeDir, comment, flags, scriptPath)
112116
113-
Sets password, passwordAge, privilege, homeDir, comment, flags, and scriptPath for user
117+
Sets password, passwordAge, privilege, homeDir, comment, flags, and scriptPath
118+
for user.
114119
115120
=item UserChangePassword(domainname, username, oldpassword, newpassword)
116121
117122
Changes a users password. Can be run under any account.
118123
119124
=item UsersExist(server, userName)
120125
121-
Checks if a User exists
126+
Checks if a user exists.
122127
123-
=item GetUsers(server, filter, \@userArray)
128+
=item GetUsers(server, filter, userRef)
124129
125-
Fills userArray with the all of the User names
130+
Fills userRef with user names if it is an array reference and with the user
131+
names and the full names if it is a hash reference.
126132
127133
=item GroupCreate(server, group, comment)
128134
129-
Creates a group
135+
Creates a group.
130136
131137
=item GroupDelete(server, group)
132138
133-
Deletes a group
139+
Deletes a group.
134140
135141
=item GroupGetAttributes(server, groupName, comment)
136142
137-
Gets the comment
143+
Gets the comment.
138144
139145
=item GroupSetAttributes(server, groupName, comment)
140146
141-
Sets the comment
147+
Sets the comment.
142148
143149
=item GroupAddUsers(server, groupName, users)
144150
145-
Adds a user to a group
151+
Adds a user to a group.
146152
147153
=item GroupDeleteUsers(server, groupName, users)
148154
149-
Deletes a users from a group
155+
Deletes a users from a group.
150156
151157
=item GroupIsMember(server, groupName, user)
152158
153-
Returns TRUE if user is a member of groupName
159+
Returns TRUE if user is a member of groupName.
154160
155-
=item GroupGetMembers(server, groupName, \@userArray)
161+
=item GroupGetMembers(server, groupName, userArrayRef)
156162
157-
Fills userArray with the members of groupName
163+
Fills userArrayRef with the members of groupName.
158164
159165
=item LocalGroupCreate(server, group, comment)
160166
161-
Creates a local group
167+
Creates a local group.
162168
163169
=item LocalGroupDelete(server, group)
164170
165-
Deletes a local group
171+
Deletes a local group.
166172
167173
=item LocalGroupGetAttributes(server, groupName, comment)
168174
169-
Gets the comment
175+
Gets the comment.
170176
171177
=item LocalGroupSetAttributes(server, groupName, comment)
172178
173-
Sets the comment
179+
Sets the comment.
174180
175181
=item LocalGroupIsMember(server, groupName, user)
176182
177-
Returns TRUE if user is a member of groupName
183+
Returns TRUE if user is a member of groupName.
178184
179-
=item LocalGroupGetMembers(server, groupName, \@userArray)
185+
=item LocalGroupGetMembers(server, groupName, userArrayRef)
180186
181-
Fills userArray with the members of groupName
187+
Fills userArrayRef with the members of groupName.
182188
183189
=item LocalGroupAddUsers(server, groupName, users)
184190
185-
Adds a user to a group
191+
Adds a user to a group.
186192
187193
=item LocalGroupDeleteUsers(server, groupName, users)
188194
189-
Deletes a users from a group
195+
Deletes a users from a group.
190196
191-
=item GetServers(server, domain, flags, \@serverArray)
197+
=item GetServers(server, domain, flags, serverRef)
192198
193-
Gets an array of server names
194-
flags - see SV_TYPE_... in constants
199+
Gets an array of server names or an hash with the server names and the
200+
comments as seen in the Network Neighborhood or the server manager.
201+
For flags, see SV_TYPE_* constants.
202+
203+
=item GetTransports(server, transportRef)
204+
205+
Enumerates the network transports of a computer. If transportRef is an array
206+
reference, it is filled with the transport names. If transportRef is a hash
207+
reference then a hash of hashes is filled with the data for the transports.
208+
209+
=item LoggedOnUsers(server, userRef)
210+
211+
Gets an array or hash with the users logged on at the specified computer. If
212+
userRef is a hash reference, the value is a semikolon separated string of
213+
username, logon domain and logon server.
195214
196215
=back
197216

0 commit comments

Comments
 (0)
0