Skip to content
GitLab
Menu
Projects
Groups
Snippets
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Menu
Open sidebar
emulab
emulab-stable
Commits
aa54baf1
Commit
aa54baf1
authored
Nov 21, 2000
by
Kristin Wright
Browse files
changed linux group to derive from project, not eid
parent
b46a0641
Changes
2
Hide whitespace changes
Inline
Side-by-side
tbsetup/mkacct
View file @
aa54baf1
#!/usr/local/bin/perl -wT
###
### $Id: mkacct,v 1.2
1
2000-11-21 10:
37:53
kwright Exp $
### $Id: mkacct,v 1.2
2
2000-11-21 10:
49:47
kwright Exp $
###
### Address 'lkw' comments:
### Break up into subroutines, possibly libraries. We'll
...
...
@@ -249,7 +249,7 @@ foreach $IP (@nodes) {
## will report it and move on.
print
"
Creating group
$unix_gid
on
$IP
.
\n
";
open
(
GROUPADD
,
"
/usr/local/bin/sshtb
$IP
/usr/sbin/groupadd -g
$unix_gid
$
eid
2>&1 |
");
open
(
GROUPADD
,
"
/usr/local/bin/sshtb
$IP
/usr/sbin/groupadd -g
$unix_gid
$
group
2>&1 |
");
while
(
<
GROUPADD
>
)
{
print
"
$_
";
}
close
(
GROUPADD
);
my
$i
=
1
;
...
...
tbsetup/rmacct
View file @
aa54baf1
#!/usr/local/bin/perl -wT
###
### $Id: rmacct,v 1.
3
2000-11-21 10:
38:16
kwright Exp $
### $Id: rmacct,v 1.
4
2000-11-21 10:
49:47
kwright Exp $
###
### rmacct - Removes accounts for all users in given experiment.
###
...
...
@@ -214,7 +214,7 @@ foreach $IP (@nodes) {
}
print
"
Removing group
$eid
on
$IP
.
\n
";
open
(
GROUPDEL
,
"
/usr/local/bin/sshtb
$IP
/usr/sbin/groupdel
$
eid
2>&1 |
");
open
(
GROUPDEL
,
"
/usr/local/bin/sshtb
$IP
/usr/sbin/groupdel
$
group
2>&1 |
");
while
(
<
GROUPDEL
>
)
{
print
"
$_
";
}
close
(
GROUPDEL
);
...
...
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment