Changeset 321c0cb
- Timestamp:
- Sep 14, 2007 3:49:19 PM (17 years ago)
- Branches:
- axis_example, compt_changes, info-ops, master, version-1.30, version-2.00, version-3.01, version-3.02
- Children:
- a098fab
- Parents:
- 2ef2c5b
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
fedkit/splitter.pl
r2ef2c5b r321c0cb 266 266 next if /^#/; 267 267 chomp; 268 ($tb, $h, $d, $u, $p, $es, $gs, $mes, $mgs, $t, $i) = split(":", $_); 268 ($tb, $h, $d, $u, $p, $es, $gs, $mes, $mgs, $t, $i, $fs, $boss, $tun) = 269 split(":", $_); 269 270 $host{$tb} = $h; 270 271 $user{$tb} = $u; … … 277 278 $mgwstart{$tb} = $mgs; 278 279 $gwimage{$tb} = $i; 280 $fs{$tb} = $fs; 281 $boss{$tb} = $boss; 282 $tun{$tb} = $tun; 279 283 280 284 # Make sure the domain starts with a period … … 388 392 open(GWCONFIG, ">$tmpdir/$gateways/$myname$sdomain.gw.conf") || 389 393 die "can't open $tmpdir/$gateways/$myname$sdomain.gw.conf: $!\n"; 394 390 395 print GWCONFIG "Active: $active\n"; 396 print GWCONFIG "TunnelCfg: $tun{$gateways}\n"; 397 print GWCONFIG "BossName: $boss{$master}$domain{$master}\n"; 398 print GWCONFIG "FsName: $fs{$master}$domain{$master}\n"; 391 399 print GWCONFIG "Type: $type\n"; 392 400 print GWCONFIG "Peer: $desthost$ddomain\n";
Note: See TracChangeset
for help on using the changeset viewer.