#!/bin/csh -f
# Script to convert normal object files into a dynamically loadable module.

if (! $?ANDREWDIR) setenv ANDREWDIR /usr/andrew
if ($#argv == 0) then
    echo "usage: makedo [-o outfile] [-b bindir] [-d libdir] [-g] [-s] files..."
    echo "  -b overrides /usr/andrew/bin for finding dofix, doindex"
    echo "  -d overrides ${ANDREWDIR}/lib for finding libcx.a"
    echo "  -g causes .dog file to be generated for debugger use"
    echo "  -s causes files to be picked up from 'shared' subdirectory"
    exit 1
endif
set filelist
set bindir="${ANDREWDIR}/bin"
set libdir="${ANDREWDIR}/lib"
foreach file ($*)
    if ($?outcoming) then
        set outfile=$file
	unset outcoming
	continue
    endif
    if ($?bincoming) then
        set bindir=$file
	unset bincoming
	continue
    endif
    if ($?libcoming) then
	set libdir=$file
	unset libcoming
	continue
    endif
    switch ($file)
    case -o:
	set outcoming
	breaksw
    case -b:
	set bincoming
	breaksw
    case -d:
	set libcoming
	breaksw
    case -g:
	set gflag
	breaksw
    case -s:
        set sflag
        breaksw
    default:
	if (! $?outfile) set outfile=$file
	if ($?sflag) then
	    if ($file:e == o) then
		set tail = $file:t
		if ($tail == $file) then
		    #
		    # The tail of a one-component file name is the file
		    # name.  Prepend "shared/" to it.
		    #
		    set file = $tail
		else
		    #
		    # Multi-component file name.  Insert "shared/"
		    # before the last component.
		    #
		    set head = $file:h
		    set file = $head/$tail
		endif
	    endif
	endif
        set filelist=($filelist $file)
    endsw
end
if ($?outcoming) then
    echo "makedo: missing argument to -o switch."
    exit 1
endif
if ($?bincoming) then
    echo "makedo: missing argument to -b switch."
    exit 1
endif
if ($?libcoming) then
    echo "makedo: missing argument to -d switch."
    exit 1
endif
if (! $?filelist) then
    echo "makedo: No object modules given."
    exit 1
endif
ld -G -o ${outfile:r}.do -h `pwd`\${outfile:r}.do $filelist /usr/local/lib/gcc-lib/m88k-att-sysv4/2.3.3/libgcc.a
exit($status)