#!/bin/sh

# $Xorg: startx.cpp,v 1.3 2000/08/17 19:54:29 cpqbld Exp $
#
# This is just a sample implementation of a slightly less primitive
# interface than xinit.  It looks for user .xinitrc and .xserverrc
# files, then system xinitrc and xserverrc files, else lets xinit choose
# its default.  The system xinitrc should probably do things like check
# for .Xresources files and merge them in, startup up a window manager,
# and pop a clock and serveral xterms.
#
# Site administrators are STRONGLY urged to write nicer versions.
#
# $XFree86: xc/programs/xinit/startx.cpp,v 3.16tsi Exp $

#
# check for installed servers
#



INSTALLED_SERVERS=`ls -1 /usr/X11R6/bin/XFree86  /usr/X11R6/bin/Xorg* 2>/dev/null`


if [ -z "$INSTALLED_SERVERS" ]; then

	echo ""
	echo "You did not install any X-Server \(e.g. Xorg\)!"
	echo "Please install at least one server to start X."
	echo "I'm aborting now."
	exit 1
fi


#
# perhaps a windowmanager is specified?
#
#
# find wmlist utility, else take twm as default (always there :-))
#
type -p wmlist &> /dev/null && WMLIST="`for i in $(wmlist); do echo $i; done | sort`"
test -z "$WMLIST" && WMLIST="twm"

test "$1" = "--" || { test -n "$1" && WANTEDWM=`basename "$1"` ; }

#
# User could have set a list of window manager in WINDOWMANAGERLIST.
# go throu wms and check if user specified a reachable one.
#

for WM in $WMLIST $WINDOWMANAGERLIST
do 
    test "$WM" = "$WANTEDWM" && {
#
#       is it reachable via $PATH?
#
	type -p $WM &> /dev/null || {

	    echo "`basename $0`: error: the requested window manager '$1' could not be found!"
	    echo "Window manager must be one of (currently installed window managers):"
	    for i in $WMLIST; do echo $i; done
	    exit 1
	}
#
#    OK, we got it, this will be the override for WINDOWMANAGER
#
	export WINDOWMANAGER=$WM
	shift 1
	break
    }
done

unset WINDOWMANAGERLIST WMLIST WANTEDWM WM

#
# check for the first link
#

if [ ! -L /usr/X11R6/bin/X ]; then

	echo ""
	echo "There is no link /usr/X11R6/bin/X to /var/X11R6/bin/X!"
	echo "Please link the files as mentioned above or install the X-Server again."
	echo "I'm aborting now."
	exit 1
fi

#
# check for the second link
#	

if [ ! -L /var/X11R6/bin/X ]; then

	echo ""
	echo "There is no link /var/X11R6/bin/X to the correct X Server binary."
	echo "Please configure the correct X Server with SaX/SaX2, which will create"
	echo "the missing link. I'm aborting now."
	exit 1
fi

#
# check if the Xorg file is an executable or an accidentially copied script or similar things
#

if [ ! -x /var/X11R6/bin/X ]; then

	echo ""
	echo "The file Xorg (binary of X-Server) doesn't seem to be a binary file."
	echo "Please check it or / and install a new X-Server-binary."
	echo "I'm aborting now."
	exit 1
fi




userclientrc=$HOME/.xinitrc
userserverrc=$HOME/.xserverrc
sysclientrc=/usr/X11R6/lib/X11/xinit/xinitrc
sysserverrc=/usr/X11R6/lib/X11/xinit/xserverrc
defaultclient=/usr/X11R6/bin/xterm
defaultserver=/usr/X11R6/bin/X
defaultclientargs=""
defaultserverargs=""
clientargs=""
serverargs=""






if [ -f $userclientrc ]; then
    defaultclientargs=$userclientrc
elif [ -f $sysclientrc ]; then
    defaultclientargs=$sysclientrc
fi




if [ -f $userserverrc ]; then
    defaultserverargs=$userserverrc
elif [ -f $sysserverrc ]; then
    defaultserverargs=$sysserverrc
fi

whoseargs="client"
while [ x"$1" != x ]; do
    case "$1" in
    # '' required to prevent cpp from treating "/*" as a C comment.
    /''*|\./''*)
	if [ "$whoseargs" = "client" ]; then
	    if [ x"$clientargs" = x ]; then
		client="$1"
	    else
		clientargs="$clientargs $1"
	    fi
	else
	    if [ x"$serverargs" = x ]; then
		server="$1"
	    else
		serverargs="$serverargs $1"
	    fi
	fi
	;;
    --)
	whoseargs="server"
	;;
    *)
	if [ "$whoseargs" = "client" ]; then
	    clientargs="$clientargs $1"
	else
	    # display must be the FIRST server argument
	    if [ x"$serverargs" = x ] && \
		 expr "$1" : ':[0-9][0-9]*$' > /dev/null 2>&1; then
		display="$1"
	    else
		serverargs="$serverargs $1"
	    fi
	fi
	;;
    esac
    shift
done

# process client arguments
if [ x"$client" = x ]; then
    # if no client arguments either, use rc file instead
    if [ x"$clientargs" = x ]; then
	client="$defaultclientargs"
    else
	client=$defaultclient
    fi
fi

# process server arguments
if [ x"$server" = x ]; then
    # if no server arguments or display either, use rc file instead
    if [ x"$serverargs" = x -a x"$display" = x ]; then
	server="$defaultserverargs"
    else
	server=$defaultserver
    fi
fi

if [ x"$XAUTHORITY" = x ]; then
    XAUTHORITY=$HOME/.Xauthority
    export XAUTHORITY
fi

removelist=


# set up default Xauth info for this machine
case `uname` in
Linux*)
	if [ -z "`hostname --version 2>&1 | grep GNU`" ]; then
		hostname=`hostname -f`
	else
		hostname=`hostname`
	fi
	;;
*)
	hostname=`hostname`
	;;
esac

authdisplay=${display:-:0}
mcookie=`mcookie`
dummy=0

# create a file with auth information for the server. ':0' is a dummy.
xserverauthfile=$HOME/.serverauth.$$
xauth -q -f $xserverauthfile << EOF
add :$dummy . $mcookie
EOF
serverargs=${serverargs}" -auth "${xserverauthfile}

# now add the same credentials to the client authority file
# if '$displayname' already exists don't overwrite it as another
# server man need it. Add them to the '$xserverauthfile' instead.
for displayname in $authdisplay $hostname$authdisplay; do
     authcookie=`xauth list "$displayname" \
       | sed -n "s/.*$displayname[[:space:]*].*[[:space:]*]//p"` 2>/dev/null;
    if [ "z${authcookie}" == "z" ] ; then
        xauth -q << EOF 
add $displayname . $mcookie
EOF
	removelist="$displayname $removelist"
    else
        dummy=$((dummy+1));
        xauth -q -f $xserverauthfile << EOF
add :$dummy . $authcookie
EOF
    fi
done



# handle TCP port 6000
. /etc/sysconfig/displaymanager
test "$DISPLAYMANAGER_XSERVER_TCP_PORT_6000_OPEN" != "yes" &&   serverargs="$serverargs -nolisten tcp"


export XAUTHLOCALHOSTNAME=`hostname`

xinit $client $clientargs -- $server $display $serverargs

if [ x"$removelist" != x ]; then
    xauth remove $removelist
fi
if [ x"$xserverauthfile" != x ]; then
    rm -f $xserverauthfile
fi
    




if command -v deallocvt > /dev/null 2>&1; then
    deallocvt
fi







