home *** CD-ROM | disk | FTP | other *** search
/ Skunkware 5 / Skunkware 5.iso / src / X11 / Fresco / build / Unix / config / util / ldso < prev    next >
Encoding:
Text File  |  1995-07-12  |  1.5 KB  |  67 lines
  1. #!/bin/sh
  2. #
  3. # ldso 
  4. # build a .so for C++ modules 
  5. # these may contain *__link structs which contain
  6. # constructors and destructors, these are packaged 
  7. # in an added module, under a routine called _init()
  8. # then this module is compiled and included in the ".so" 
  9. # rtld() will, at runtime load the ".so" and call any _init() 
  10. # routines in the .so, so we will get our constructors called.
  11. #
  12. # hess@sco.com 4/20/95
  13. # 
  14. args=$*
  15. prog=$0
  16. fail=1
  17. CC=cc
  18. CFLAGS=-belf
  19. INITFILE=_soinit.c
  20. INITOBJ=_soinit.o
  21. init=""
  22. needs_init=0
  23. LD=ld
  24.  
  25. Bail() { 
  26.     echo "error: $prog: $1"
  27.     exit $fail
  28. } 
  29. has__link() { 
  30.     [ -f $1 ] || Bail "Can't open $1"
  31.     nm -p $1 |grep  __link >/dev/null
  32.     return $?
  33. } 
  34.  
  35. # loop thru the objects to see if we need to build an  
  36. # init module 
  37. for i in $args;  do     case $i in 
  38.     *.o)    if has__link $i 
  39.         then     needs_init=1; break; fi
  40.     ;;
  41. esac; done
  42.  
  43. [ $needs_init -eq 1 ] && { 
  44.     # _init module is needed, set the var "init" to the object name
  45.     echo "struct __linkl { struct __linkl * next;" > $INITFILE
  46.     echo "void (*ctor)(); void (*dtor)(); };" >> $INITFILE
  47.     echo "void _init() {  "                 >> $INITFILE
  48.     for i in $args; do case $i in
  49.         *.o)  
  50.             echo    // links from $i
  51.             nm -p $i |grep __link |\
  52.              awk '{
  53.             printf("{ extern struct __linkl %s;\n (*(%s.ctor))(); }\n",$3,$3); 
  54.              }'
  55.         ;;
  56.     esac; done >> $INITFILE
  57.     echo "}  "                 >> $INITFILE
  58.     ## compile the init file
  59.     $ECHO $CC $CFLAGS -c $INITFILE
  60.     init=$INITOBJ
  61.     [ -f $init ] || Bail "can't build $init"
  62. } 
  63.  
  64. # do the link
  65. $ECHO $LD $init $args 
  66. exit $?
  67.