##
# LOGIN FILE
#
# Wilfredo Sanchez Jr. | tritan@mit.edu
# Dec. 5, 1990
#
# MIT Project Athena
#
# ORIGINAL SOURCES: /usr/athena/lib/login
#		and /usr/prototype_user/.login (ATHENA REL 7.2)
##

# **************** DEVICE SETUP ****************

# IF INTERACTIVE SESSION AND NOT DESKTOP
if (! $?DISPLAY) then
  if (("$term" == switch) || ("$term" == network) || ("$term" == dialup)) then
  # DEFAULT TERMINAL EMULATOR IS VT100
  if (! $?DEF_TERM) setenv DEF_TERM vt100
    set noglob; eval `tset -s -I -Q "?${DEF_TERM}"` || unset noglob
  endif
endif

# LOGIN FROM X DISPLAY, BUT DISPLAY VARIABLE NOT SET (REMOTE X LOGIN)
if (("$term" =~ xterm*) && (! $?DISPLAY)) then
  set def = `who am i | /bin/awk '{print $6}' | /bin/awk -F. '{print $1}' | /bin/awk -F\) '{print $1}' | /bin/awk -F\( '{print $2}'`
  eval `resize`
  echo "Setting DISPLAY to ${def}:0"
  setenv DISPLAY "${def}:0"
endif

##
# Read user's login
##
if (-r ${tcsh_initdir}/login.mine) then
  source ${tcsh_initdir}/login.mine
endif

