Changeset 3245 in /cluster/svnroot


Ignore:
Timestamp:
Jun 21, 2011 8:01:04 PM (9 years ago)
Author:
skylar
Message:

merging in hostname fix (#624)

Location:
bccd-ng/branches/skylar-devel
Files:
6 edited

Legend:

Unmodified
Added
Removed
  • bccd-ng/branches/skylar-devel/packages/etc/init.d/bccd-nics

    r3017 r3245  
    3232### END INIT INFO
    3333
    34 /bin/bccd-nic-probe
    35 /bin/bccd-nic-setup
    36 /bin/bccd-nat
     34if test $(cat /etc/bccd-stage) = "LIVE" ; then
     35        /bin/bccd-nic-probe
     36        /bin/bccd-nic-setup
     37        /bin/bccd-nat
     38fi
    3739
    3840exit $?
  • bccd-ng/branches/skylar-devel/packages/liberate.pl

    r3227 r3245  
    394394    );
    395395
     396
     397$Bccd->run_test(
     398    "unlink",
     399    "0",
     400    "Removed NAT configuration.",
     401    "$LIBDIR/etc/network/if-up.d/nat",
     402    );
     403
    396404$Bccd->run_test(
    397405    "chmod",
     
    565573    "$LIBDIR/$PROJDIR/etc/network/",
    566574    );
    567 
    568 $Bccd->run_test(
    569         "fcopy",
    570         "",
    571         "Copied $LIBDIR/etc/init.d/bccd-nics -> $LIBDIR/$PROJDIR/etc/init.d/bccd-nics.",
    572         "$LIBDIR/etc/init.d/bccd-nics",
    573         "$LIBDIR/$PROJDIR/etc/init.d/bccd-nics",
    574         );
    575 
    576 $Bccd->run_test(
    577         "chmod",
    578         "",
    579         "Set $LIBDIR/$PROJDIR/etc/init.d/bccd-nics to 0755.",
    580         0755,
    581         "$LIBDIR/$PROJDIR/etc/init.d/bccd-nics",
    582 );
    583 
    584 $Bccd->run_test(
    585         "regexsub_file",
    586         "",
    587         "Disabled bccd-nic-probe in diskless nodes.",
    588         "$LIBDIR/$PROJDIR/etc/init.d/bccd-nics",
    589         "/bin/bccd-nic-probe",
    590         "",
    591         );
    592575
    593576$Bccd->run_test(
  • bccd-ng/branches/skylar-devel/trees/bin/bccd-hostname

    r3132 r3245  
    3636
    3737if($Bccd->get_stage() eq 'LIBERATED') {
    38         $hostname = "pxenode000.bccd.net";
     38        $hostname = "node000.bccd.net";
    3939}
    4040else {
  • bccd-ng/branches/skylar-devel/trees/etc/init.d/mpd

    r2751 r3245  
    4949NCPUS=`grep ^processor /proc/cpuinfo | wc -l`
    5050
    51 if [ "`cat /etc/bccd-stage`" == "LIBERATED" ]; then
    52         HEADNODE=pxenode000.bccd.net
    53 else
    54         HEADNODE=node000.bccd.net
    55 fi
     51HEADNODE=node000.bccd.net
    5652
    5753test -x $DAEMON || exit 5
  • bccd-ng/branches/skylar-devel/trees/software/bccd/software/torque-2.5.1/install/pbs_server.conf

    r2586 r3245  
    1616set server acl_host_enable = True
    1717set server acl_hosts = node*.bccd.net
    18 set server acl_hosts += pxenode*.bccd.net
     18set server acl_hosts += node*.bccd.net
    1919set server acl_hosts += localhost
    2020set server managers = root@node000.bccd.net
    21 set server managers += root@pxenode000.bccd.net
    2221set server default_queue = bccd
    2322set server log_events = 511
  • bccd-ng/branches/skylar-devel/trees/usr/local/lib/site_perl/5.10.0/Bccd.pm

    r3241 r3245  
    19861986        $i = 0;
    19871987        while( $pxenetip->addr() ne $pxenet->{'last'} ) {
    1988             print $HOSTS sprintf("%s\tpxenode%.3d.bccd.net pxenode%.3d\t#PXE IP\n", $pxenetip->addr(), $i, $i);
     1988            print $HOSTS sprintf("%s\tnode%.3d.bccd.net node%.3d\t#PXE IP\n", $pxenetip->addr(), $i, $i);
    19891989            $pxenetip++;
    19901990            if($i == 10) {
     
    20042004    open(my $DCONF,'>',$DHCP_CONF) ||
    20052005        $self->log_and_die("ERROR",$sub,"Can't open file $DHCP_CONF: $!");
    2006    
    2007     print $DCONF "allow bootp;\nallow booting;\n\n";
    2008     print $DCONF "subnet $pubnet->{'network'} netmask $pubnet->{'mask'} {\n";
    2009     print $DCONF "\toption subnet-mask $pubnet->{'mask'};\n";
    2010     print $DCONF "\toption broadcast-address $pubnet->{'bcast'};\n";
    2011     print $DCONF "\toption routers $BCCD_NET->{'ipaddr'};\n";
    2012     print $DCONF "\tpool {\n";
    2013     print $DCONF "\t\tallow members of \"bccd-nodes\";\n";
    2014     print $DCONF "\t\trange $pubnet->{'dhcprange'};\n";
    2015     print $DCONF "\t}\n";
    2016     print $DCONF "}\n";
    20172006   
    20182007    if(defined($pxenic)) {
     
    20472036        }
    20482037    }
     2038    else {
     2039        print $DCONF "allow bootp;\nallow booting;\n\n";
     2040        print $DCONF "subnet $pubnet->{'network'} netmask $pubnet->{'mask'} {\n";
     2041        print $DCONF "\toption subnet-mask $pubnet->{'mask'};\n";
     2042        print $DCONF "\toption broadcast-address $pubnet->{'bcast'};\n";
     2043        print $DCONF "\toption routers $BCCD_NET->{'ipaddr'};\n";
     2044        print $DCONF "\tpool {\n";
     2045        print $DCONF "\t\tallow members of \"bccd-nodes\";\n";
     2046        print $DCONF "\t\trange $pubnet->{'dhcprange'};\n";
     2047        print $DCONF "\t}\n";
     2048        print $DCONF "}\n";
     2049        }
    20492050   
    20502051    close($DCONF);
     
    22662267        if($#dhcp_nics == 1) {
    22672268            $bccd_nic = $dhcp_nics[0];
    2268         }
    2269         elsif($#dhcp_nics > 1) {
    2270             $bccd_nic = $d->menu(text=>"Choose NIC to have BCCD network.", list => \@dhcp_nics);
    2271         }
    2272         if(!$self->is_dialog_ok($d)) {
    2273             redo FIND_EXT_NIC;
    2274         }
     2269        }
     2270                elsif($#dhcp_nics > 1 and not -e '/testmode') {
     2271                        $bccd_nic = $d->menu(text=>"Choose NIC to have BCCD network.", list => \@dhcp_nics);
     2272                        if(!$self->is_dialog_ok($d)) {
     2273                                redo FIND_EXT_NIC;
     2274                        }
     2275                }else {
     2276                        open (TEST,'</bccd_boot_flags') or croak "$!";
     2277                my      @command = grep (/BCCD_NIC/, <TEST>);
     2278                        if ($command[0] =~ m/export BCCD_NIC=(.*)$/){
     2279                                $bccd_nic = $1;
     2280                        }
     2281                        print STDERR "$bccd_nic selected for BCCD network\n"
     2282                }
    22752283        # Copy iptables template regardless of NAT Status
    22762284        open(my $IPT, '>', $IPTABLES_UP) or
     
    22862294            print $IPT "$LINE\n";
    22872295        }
     2296                close($IPT);
    22882297        if(defined($bccd_nic) && !$self->check_bccd_net($nic_conf)) {
    22892298            $nic_conf->{"$bccd_nic:1"} = $BCCD_NET;
     
    23442353                    if(!$gotpxe && $self->get_stage() eq 'LIBERATED' && $d->yesno(text=>"Make $nic the PXE-capable NIC?")) {
    23452354                        $gotpxe = 1;
    2346                         $nic_conf->{$nic}->{'pxenic'} = $nic;
     2355                        $nic_conf->{$nic}->{'pxenic'}  = $nic;
     2356                        $nic_conf->{$nic}->{'ipaddr'}  = $BCCD_NET->{'ipaddr'};
     2357                        $nic_conf->{$nic}->{'bcast'}   = $BCCD_NET->{'bcast'};
     2358                        $nic_conf->{$nic}->{'mask'}    = $BCCD_NET->{'mask'};
     2359                        $nic_conf->{$nic}->{'bccdnet'} = $BCCD_NET->{'bccdnet'};
     2360                      DELETE_VIRTUAL_NIC:
     2361                        foreach my $x (keys(%{$nic_conf})) {
     2362                            if(defined($nic_conf->{"$x:1"}->{'ipaddr'}) &&
     2363                               $nic_conf->{"$x:1"}->{'ipaddr'} eq $BCCD_NET->{'ipaddr'}) {
     2364                                delete $nic_conf->{"$x:1"};
     2365                            }
     2366                        }
     2367                    }
     2368                    else {
     2369                        $nic_conf->{$nic}->{'ipaddr'} = ($temp = $d->inputbox(text=>"$nic IP address (mandatory)")) ? $temp : undef;
     2370                        if(defined($nic_conf->{$nic}->{'ipaddr'}) &&
     2371                           $nic_conf->{$nic}->{'ipaddr'} eq $BCCD_NET->{'ipaddr'}) {
     2372                            $d->msgbox(text => "IP address cannot be the BCCD virtual IP ($BCCD_NET->{'ipaddr'}).");
     2373                            goto FIND_CUR_NIC;
     2374                        }
     2375                       
     2376                        $nic_conf->{$nic}->{'mask'} = ($temp = $d->inputbox(text=>"$nic Subnet mask (mandatory)")) ? $temp : undef;
     2377                       
     2378                        if(!$self->is_dialog_ok($d)) {
     2379                            redo FIND_EXT_NIC;
     2380                        }
     2381                       
     2382                        $nic_conf->{$nic}->{'gw'} = ($temp = $d->inputbox(text=>"$nic Gateway (optional)")) ? $temp : undef;
    23472383                    }
    23482384                } while(!defined($nic_conf->{$nic}->{'ipaddr'}) || !defined($nic_conf->{$nic}->{'mask'}));
Note: See TracChangeset for help on using the changeset viewer.