45 |
45 |
46 # prueft zonen aus ARGV und loescht das schluesselmaterial |
46 # prueft zonen aus ARGV und loescht das schluesselmaterial |
47 for (@ARGV) { |
47 for (@ARGV) { |
48 chomp( $zone = `idn --quiet $_` ); |
48 chomp( $zone = `idn --quiet $_` ); |
49 my $zdir = "$master_dir/$zone"; |
49 my $zdir = "$master_dir/$zone"; |
|
50 my $ep = 0; |
|
51 |
50 unless ( -e "$master_dir/$zone" ) { |
52 unless ( -e "$master_dir/$zone" ) { |
51 print "$zone ist keine verwaltete zone \n"; |
53 print "$zone ist keine verwaltete zone \n"; |
52 } |
54 } |
53 else { |
55 else { |
54 if ( -e "$zdir/$zone.signed" ) { unlink "$zdir/$zone.signed" } |
56 if ( -e "$zdir/$zone.signed" ) { |
55 if ( -e "$zdir/.keycounter" ) { unlink "$zdir/.keycounter" } |
57 unlink "$zdir/$zone.signed" and $ep = 1 } |
56 if ( -e "$zdir/.index.ksk" ) { unlink "$zdir/.index.ksk" } |
58 if ( -e "$zdir/.keycounter" ) { |
57 if ( -e "$zdir/.index.zsk" ) { unlink "$zdir/.index.zsk" } |
59 unlink "$zdir/.keycounter" and $ep = 1 } |
58 if ( -e "$zdir/dsset-$zone." ) { unlink "$zdir/dsset-$zone." } |
60 if ( -e "$zdir/.index.ksk" ) { |
59 if ( -e "$zdir/keyset-$zone." ) { unlink "$zdir/keyset-$zone." } |
61 unlink "$zdir/.index.ksk" and $ep = 1 } |
60 for (`ls $master_dir/$zone/K*[key,private]`) { unlink $_ } |
62 if ( -e "$zdir/.index.zsk" ) { |
61 |
63 unlink "$zdir/.index.zsk" and $ep = 1 } |
62 print "keys removed \n"; |
64 if ( -e "$zdir/dsset-$zone." ) { |
63 |
65 unlink "$zdir/dsset-$zone." and $ep = 1 } |
|
66 if ( -e "$zdir/keyset-$zone." ) { |
|
67 unlink "$zdir/keyset-$zone." and $ep = 1 } |
|
68 |
|
69 for (`ls $master_dir/$zone/K*[key,private]`) { |
|
70 unlink $_ and $ep = 1 |
|
71 } |
|
72 |
|
73 if ($ep == 1) { |
|
74 print "$zone: keys removed\n"; |
|
75 } |
|
76 |
64 open( ZONE, "$master_dir/$zone/$zone" ) |
77 open( ZONE, "$master_dir/$zone/$zone" ) |
65 or die "$master_dir/$zone/$zone: $!\n"; |
78 or die "$master_dir/$zone/$zone: $!\n"; |
66 @old_zone_content = <ZONE>; |
79 @old_zone_content = <ZONE>; |
67 close(ZONE); |
80 close(ZONE); |
68 |
81 |