#! /usr/bin/csh 

# This shell script can be used to fix/create the afs links
# RTG - created May 19, 1993

if (-e etc/fixLinks) then
  echo "Fixing links"
  if (-e /usr/misc/bin/fs) then
    /usr/misc/bin/fs listquota >/dev/null
    set afs = $status
  else
    set afs = 1
  endif
  if ( $afs == 0 ) then
    rm -i -r bin
    rm -i -r lib
    rm -i -r src/bin
    rm -i -r src/lib
    rm -i -r src/obj
    rm -i -r src/lispObj
    rm -i -r src/sharedObj
# pmax_mach
    mkdir .bin.pmax_mach
    mkdir .lib.pmax_mach
    mkdir src/.bin.pmax_mach
    mkdir src/.lib.pmax_mach
    mkdir src/.obj.pmax_mach
    mkdir src/.lispObj.pmax_mach
# i386_mach
    mkdir .bin.i386_mach
    mkdir .lib.i386_mach
    mkdir src/.bin.i386_mach
    mkdir src/.lib.i386_mach
    mkdir src/.obj.i386_mach
    mkdir src/.lispObj.i386_mach
# sun4c_411
    mkdir .bin.sun4c_411
    mkdir .lib.sun4c_411
    mkdir src/.bin.sun4c_411
    mkdir src/.lib.sun4c_411
    mkdir src/.obj.sun4c_411
    mkdir src/.lispObj.sun4c_411
    mkdir src/sharedObj
# sun4_mach
    mkdir .bin.sun4_mach
    mkdir .lib.sun4_mach
    mkdir src/.bin.sun4_mach
    mkdir src/.lib.sun4_mach
    mkdir src/.obj.sun4_mach
    mkdir src/.lispObj.sun4_mach
# alpha_osf1
    mkdir .bin.alpha_osf1
    mkdir .lib.alpha_osf1
    mkdir src/.bin.alpha_osf1
    mkdir src/.lib.alpha_osf1
    mkdir src/.obj.alpha_osf1
    mkdir src/.lispObj.alpha_osf1
# next_mach30
    mkdir .bin.next_mach30
    mkdir .lib.next_mach30
    mkdir src/.bin.next_mach30
    mkdir src/.lib.next_mach30
    mkdir src/.obj.next_mach30
    mkdir src/.lispObj.next_mach30
# links
    ln -s ".bin.@sys" bin
    ln -s ".lib.@sys" lib
    ln -s "src/.bin.@sys" src/bin
    ln -s "src/.lib.@sys" src/lib
    ln -s "src/.obj.@sys" src/obj
    ln -s "src/.lispObj.@sys" src/lispObj
# sun4m_412
    ln -s ".bin.sun4c_411" .bin.sun4m_412
    ln -s ".lib.sun4c_411" .lib.sun4m_412
    ln -s "src/.bin.sun4c_411" src/.bin.sun4m_412
    ln -s "src/.lib.sun4c_411" src/.lib.sun4m_412
    ln -s "src/.obj.sun4c_411" src/.obj.sun4m_412
    ln -s "src/.lispObj.sun4c_411" src/.lispObj.sun4m_412
  else
    mkdir bin
    mkdir lib
    mkdir src/bin
    mkdir src/lib
    mkdir src/obj
    mkdir src/lispObj
    mkdir src/sharedObj
  endif
else
  echo "Must be run from the tca directory."
endif
