]>
Commit | Line | Data |
---|---|---|
6f7f042a JR |
1 | diff -ruN migrationtools-47.orig/migrate_common.ph migrationtools-47/migrate_common.ph |
2 | --- migrationtools-47.orig/migrate_common.ph 2007-01-10 22:20:42.000000000 +0100 | |
3 | +++ migrationtools-47/migrate_common.ph 2007-01-10 22:35:26.000000000 +0100 | |
4 | @@ -92,6 +92,14 @@ | |
a774229d JR |
5 | # such as person. |
6 | $EXTENDED_SCHEMA = 0; | |
6f7f042a JR |
7 | |
8 | +# Uncomment these to exclude system users and groups | |
9 | +#$IGNORE_UID_BELOW = 1000; | |
10 | +#$IGNORE_GID_BELOW = 1000; | |
11 | + | |
12 | +# And here's the opposite for completeness | |
13 | +#$IGNORE_UID_ABOVE = 65535; | |
14 | +#$IGNORE_GID_ABOVE = 65499; | |
15 | + | |
16 | # | |
17 | # allow environment variables to override predefines | |
18 | # | |
0133ad56 JR |
19 | diff -ur MigrationTools-47/migrate_group.pl MigrationTools-47-minmax-ugid/migrate_group.pl |
20 | --- MigrationTools-47/migrate_group.pl 2007-11-07 17:52:40.000000000 +0100 | |
21 | +++ MigrationTools-47-minmax-ugid/migrate_group.pl 2007-11-07 17:50:15.000000000 +0100 | |
6f7f042a | 22 | @@ -41,6 +41,28 @@ |
0133ad56 JR |
23 | $PROGRAM = "migrate_group.pl"; |
24 | $NAMINGCONTEXT = &getsuffix($PROGRAM); | |
25 | ||
26 | +if ($#ARGV < 0) { | |
27 | + print STDERR "Usage: $PROGRAM [--mingid N] [--maxgid M] infile [outfile]\n"; | |
28 | + exit 1; | |
29 | +} | |
30 | + | |
6f7f042a JR |
31 | +if ( defined($IGNORE_GID_BELOW) ) { |
32 | + $mingid = $IGNORE_GID_BELOW; | |
33 | +} | |
34 | +if ( defined($IGNORE_GID_ABOVE) ) { | |
35 | + $maxgid = $IGNORE_GID_ABOVE; | |
36 | +} | |
0133ad56 JR |
37 | +while ($ARGV[0] =~ /^--.*/) { |
38 | + if ($ARGV[0] eq "--mingid") { | |
39 | + $mingid = $ARGV[1]; | |
40 | + shift ; shift; | |
41 | + } elsif ($ARGV[0] eq "--maxgid") { | |
42 | + $maxgid = $ARGV[1]; | |
43 | + shift ; shift; | |
44 | + } else { | |
45 | + shift; | |
46 | + } | |
47 | +} | |
48 | &parse_args(); | |
49 | &open_files(); | |
50 | ||
51 | @@ -51,6 +67,8 @@ | |
52 | next if /^\+/; | |
53 | ||
54 | local($group, $pwd, $gid, $users) = split(/:/); | |
55 | + next if (defined($mingid) and ($gid < $mingid)); | |
56 | + next if (defined($maxgid) and ($gid > $maxgid)); | |
57 | ||
58 | if ($use_stdout) { | |
59 | &dump_group(STDOUT, $group, $pwd, $gid, $users); | |
60 | diff -ur MigrationTools-47/migrate_passwd.pl MigrationTools-47-minmax-ugid/migrate_passwd.pl | |
61 | --- MigrationTools-47/migrate_passwd.pl 2007-11-07 17:52:40.000000000 +0100 | |
62 | +++ MigrationTools-47-minmax-ugid/migrate_passwd.pl 2007-11-07 17:52:03.000000000 +0100 | |
6f7f042a | 63 | @@ -42,6 +42,41 @@ |
0133ad56 JR |
64 | $PROGRAM = "migrate_passwd.pl"; |
65 | $NAMINGCONTEXT = &getsuffix($PROGRAM); | |
66 | ||
67 | +if ($#ARGV < 0) { | |
6f7f042a | 68 | + print STDERR "Usage: $PROGRAM [--minuid N] [--maxuid M] [--mingid N] [--maxgid M] infile [outfile]\n"; |
0133ad56 JR |
69 | + exit 1; |
70 | +} | |
71 | + | |
6f7f042a JR |
72 | +if ( defined($IGNORE_UID_BELOW) ) { |
73 | + $minuid = $IGNORE_UID_BELOW; | |
74 | +} | |
75 | +if ( defined($IGNORE_UID_ABOVE) ) { | |
76 | + $maxuid = $IGNORE_UID_ABOVE; | |
77 | +} | |
78 | +if ( defined($IGNORE_GID_BELOW) ) { | |
79 | + $mingid = $IGNORE_GID_BELOW; | |
80 | +} | |
81 | +if ( defined($IGNORE_GID_ABOVE) ) { | |
82 | + $maxgid = $IGNORE_GID_ABOVE; | |
83 | +} | |
0133ad56 JR |
84 | +while ($ARGV[0] =~ /^--.*/) { |
85 | + if ($ARGV[0] eq "--minuid") { | |
86 | + $minuid = $ARGV[1]; | |
87 | + shift ; shift; | |
88 | + } elsif ($ARGV[0] eq "--maxuid") { | |
89 | + $maxuid = $ARGV[1]; | |
90 | + shift ; shift; | |
c4799411 | 91 | + } elsif ($ARGV[0] eq "--mingid") { |
6f7f042a JR |
92 | + $mingid = $ARGV[1]; |
93 | + shift ; shift; | |
94 | + } elsif ($ARGV[0] eq "--maxgid") { | |
95 | + $maxgid = $ARGV[1]; | |
96 | + shift ; shift; | |
0133ad56 JR |
97 | + } else { |
98 | + shift; | |
99 | + } | |
100 | +} | |
101 | + | |
102 | &parse_args(); | |
103 | &read_shadow_file(); | |
104 | &open_files(); | |
6f7f042a | 105 | @@ -76,6 +93,10 @@ |
0133ad56 JR |
106 |