/[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 10 by dpavlin, Sun Jan 7 23:25:19 2007 UTC revision 11 by dpavlin, Sun Jan 7 23:53:16 2007 UTC
# Line 12  my $dist = 'etch'; Line 12  my $dist = 'etch';
12  # debian mirror to use  # debian mirror to use
13  my $debian_mirror_uri = 'http://debian.carnet.hr/debian';  my $debian_mirror_uri = 'http://debian.carnet.hr/debian';
14  # split physicial machine in how meny virtual ones?  # split physicial machine in how meny virtual ones?
15  my $ve_total = 2;  my $ve_total = 4;
16  # swap size (Mb)  # swap size (Mb)
17  my $swap_size = 512;  my $swap_size = 512;
18  # diskspace  # diskspace
# Line 86  if (-e $conf_path) { Line 86  if (-e $conf_path) {
86          print $tmp "OSTEMPLATE=debian-3.1\n";          print $tmp "OSTEMPLATE=debian-3.1\n";
87          close($tmp);          close($tmp);
88    
89          vzctl('set', $ve_id, '--applyconfig', 'vps.basic', '--save');  #       vzctl('set', $ve_id, '--applyconfig', 'vps.basic', '--save');
90          vzctl('set', $ve_id, '--ipadd', $ip, '--save');          vzctl('set', $ve_id, '--ipadd', $ip, '--save');
91          vzctl('set', $ve_id, '--hostname', $hostname, '--save');          vzctl('set', $ve_id, '--hostname', $hostname, '--save');
92          vzctl('set', $ve_id, '--diskspace', $diskspace, '--save');          vzctl('set', $ve_id, '--diskspace', $diskspace, '--save');
# Line 107  create_file( Line 107  create_file(
107          "deb $debian_mirror_uri $dist main contrib non-free\n"          "deb $debian_mirror_uri $dist main contrib non-free\n"
108  );  );
109    
110  vzctl('start', $ve_id, '--wait');  vzctl('start', $ve_id);
111    
112  my $customize_sh = <<'__END_OF_SH__';  my $customize_sh = <<'__END_OF_SH__';
113    
# Line 115  my $customize_sh = <<'__END_OF_SH__'; Line 115  my $customize_sh = <<'__END_OF_SH__';
115  pwconv  pwconv
116    
117  # upgrade to lastest version  # upgrade to lastest version
118  apt-get update  apt-get -y update
119  apt-get upgrade  apt-get -y upgrade
120    
121  # install additional packages  # install additional packages
122  apt-get -y install vim less ssh sudo screen telnet finger  apt-get -y install vim less ssh sudo screen telnet finger
# Line 125  apt-get -y install vim less ssh sudo scr Line 125  apt-get -y install vim less ssh sudo scr
125  apt-get -y remove nano  apt-get -y remove nano
126    
127  # apt-iselect helper  # apt-iselect helper
128  wget -O /usr/local/bin/apt-iselect http://www.rot13.org/~dpavlin/projects/scripts/apt-iselect && chmod 755 /usr/local/bin/apt-iselect  wget -O /usr/local/bin/apt-iselect http://www.rot13.org/~dpavlin/projects/scripts/apt-iselect
129    chmod 755 /usr/local/bin/apt-iselect
130    
131  # lock root user  # lock root user
132  usermod -L root  usermod -L root
# Line 169  foreach my $l (split(/\n/, $customize_sh Line 170  foreach my $l (split(/\n/, $customize_sh
170    
171  #vzctl('stop', $ve_id);  #vzctl('stop', $ve_id);
172    
173    my $passwd = prompt('root passwd: ', -echo=>'*');
174    vzctl('set', $ve_id, '--userpasswd', 'root:' . $passwd ) if ($passwd);
175    
176    my $login = prompt('create login: ');
177    if ($login) {
178            $passwd = prompt("$login passwd: ", -echo=>'*');
179            vzctl('exec', $ve_id, "useradd --create-home $login");
180            vzctl('set', $ve_id, '--userpasswd', "$login:$passwd" );
181    }
Legend:
Removed from v.10  
changed lines
  Added in v.11
  ViewVC Help
Powered by ViewVC 1.1.26