/[vz-tools]/trunk/vz-create.pl
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /trunk/vz-create.pl

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 45 by dpavlin, Wed Mar 12 00:43:49 2008 UTC revision 58 by dpavlin, Mon Feb 2 12:35:22 2009 UTC
# Line 22  my $swap_size = 512; Line 22  my $swap_size = 512;
22  # diskspace  # diskspace
23  my $diskspace = '2G:4G';  my $diskspace = '2G:4G';
24    
 $dist = 'lenny';  
 $arh = 'amd64';  
   
25  GetOptions(  GetOptions(
26          'dist=s'        => \$dist,          'dist=s'        => \$dist,
27          'arh=s'         => \$arh,          'arh=s'         => \$arh,
# Line 78  my @ip_split = split(/\./,$ip); Line 75  my @ip_split = split(/\./,$ip);
75    
76  my $ve_id = sprintf('%d%03d', $ip_split[2], $ip_split[3]);  my $ve_id = sprintf('%d%03d', $ip_split[2], $ip_split[3]);
77    
78    if ( $ve_id < 101 ) {
79            $ve_id += 100;
80            warn "# VEID moved to $ve_id because 0 .. 100 are reserved\n";
81    }
82    
83  print "VEID: $ve_id hostname: $hostname ip: $ip\n";  print "VEID: $ve_id hostname: $hostname ip: $ip\n";
84    
85  warn ">> creating directories\n";  warn ">> creating directories\n";
Legend:
Removed from v.45  
changed lines
  Added in v.58
  ViewVC Help
Powered by ViewVC 1.1.26