#!/usr/bin/perl
#
#	Make modifications so that /etc/eqnx/rc.eqnx is invoked at
#	boot time.  Note the different versions based on system type.
#
#	Copyright (C) 1999-2000 Equinox Systems Inc. 
#	

# case1: serial ports invoked in /etc/rc.d/rc.local

if (-d "/etc/rc.d" && -e "/etc/rc.d/rc.local") {
	open(OUT, ">>/etc/rc.d/rc.local");
	print OUT "if [ -e /etc/eqnx/rc.eqnx ] ; then   #Equinox SST\n";
	print OUT "	/etc/eqnx/rc.eqnx		#Equinox SST\n";
	print OUT "fi					#Equinox SST\n";
	close (OUT);
}

# case2: serial ports invoked in /etc/rc.d/boot.local

if (-d "/etc/rc.d" && -e "/etc/rc.d/boot.local") {
	open(OUT, ">>/etc/rc.d/boot.local");
	print OUT "if [ -e /etc/eqnx/rc.eqnx ] ; then   #Equinox SST\n";
	print OUT "	/etc/eqnx/rc.eqnx		#Equinox SST\n";
	print OUT "fi					#Equinox SST\n";
	close (OUT);
}

# case3: serial ports invoked in/etc/init.d/bootmisc.sh 

if (-d "/etc/init.d" && -e "/etc/init.d/bootmisc.sh") {
	open(IN, "/etc/init.d/bootmisc.sh"); 
	print OUT "if [ -e /etc/eqnx/rc.eqnx ] ; then   #Equinox SST\n";
	print OUT "	/etc/eqnx/rc.eqnx		#Equinox SST\n";
	print OUT "fi					#Equinox SST\n";
	close (OUT);
}