Changeset 64e774d for fedkit/active_config.pl
- Timestamp:
- Aug 26, 2010 9:28:12 AM (14 years ago)
- Branches:
- axis_example, compt_changes, info-ops, master, version-3.01, version-3.02
- Children:
- 6f02be5
- Parents:
- 208797c
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
fedkit/active_config.pl
r208797c r64e774d 17 17 my $iface_file = "/var/emulab/boot/ifmap"; 18 18 my $ssh = "/usr/bin/ssh"; 19 my $scp = "/usr/bin/scp"; 19 20 my $ssh_port = 22; 20 21 my $use_file; … … 29 30 'interfaces=s' => \$iface_file, 30 31 'ssh=s' => \$ssh, 32 'scp=s' => \$scp, 31 33 'ssh_port=s' => \$ssh_port, 32 34 'use_file' => \$use_file, … … 48 50 gateway_lib::wait_for_port($peer, 22, 60*60) || 49 51 die "ssh never came up on $peer\n"; 50 print "Making sure ssh permissions are reset\n"; 51 gateway_lib::testcmd_repeat("$ssh -o \"StrictHostKeyChecking no\" " . 52 "-i $ssh_privkey $peer ls", 5*60); 52 my $coord_fn = "$fedkit_dir/etc/prep_done"; 53 print "Making sure ssh permissions are reset (fetching $coord_fn)\n"; 54 gateway_lib::testcmd_repeat("$scp -o \"StrictHostKeyChecking no\" " . 55 "-i $ssh_privkey $peer:$coord_fn /tmp", 5*60); 53 56 54 57 if (my $f = new IO::File($iface_file)) {
Note: See TracChangeset
for help on using the changeset viewer.