#!/bin/sh
#*****************************************************************************
# E.S.O. - VLT project
#
# "@(#) $Id: xlogin,v 1.152 1998/09/25 15:16:36 vltsccm Exp $" 
#
# xlogin
#
# who        when        what
# ---------  ----------  ----------------------------------------------------
# pforstma   04/11/1994  created (from gchiozzi 18/08/94 ported to HP from IBM)
#
#****************************************************************************
#   NAME
#   xlogin - open a login xterm on a local host
#
#   SYNOPSIS
#   xlogin [display]
#
#   DESCRIPTION
#
#   FILES
#
#   xlogin.prof 	CALLED
#
#   ENVIRONMENT
#
#   RETURN VALUES
#
#   CAUTIONS
#
#   EXAMPLES
#
#   SEE ALSO   
#
#   BUGS     
#
#   Works only on HP-UX because SunOS 'login' command does not take into
#   account additional environment variable parameters.
#------------------------------------------------------------------------------

#------------------------------------------------------------------------------
#                     parameters checking and help
#------------------------------------------------------------------------------

# Tests if DISPLAY has been given as a parameter

 if [ $# -eq 1 ]
 then
     DISPLAY="$1"
     echo 'Opening login xterm on ' $DISPLAY
 fi

# Tests if display has already been defined, if not assumes hostname:0

 if [ -z "$DISPLAY" ]
 then
  TEMP=`hostname`
  DISPLAY="$TEMP:0"
 fi

 
 export DISPLAY;  xterm -ls -title "$HOST" -e xlogin.prof &















