Home My Page Projects Code Snippets Project Openings SML/NJ
Summary Activity Forums Tracker Lists Tasks Docs Surveys News SCM Files

SCM Repository

[smlnj] Diff of /config/trunk/install.sh
ViewVC logotype

Diff of /config/trunk/install.sh

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 631, Fri Apr 28 08:30:52 2000 UTC revision 1391, Wed Sep 24 21:31:51 2003 UTC
# Line 1  Line 1 
1  #!/bin/sh  #!/bin/sh
2  #  #
3  # Copyright (c) 1994 AT&T Bell Laboratories.  # Copyright (c) 1994 AT&T Bell Laboratories.
4    # Copyright (c) 2003 The Fellowship of SML/NJ
5  #  #
6  # Installation script for SML/NJ and related tools; this is a temporary  # Installation script for SML/NJ and related tools; this is a temporary
7  # placeholder until the configuration tool is finished.  # placeholder until the configuration tool is finished.
8  #  #
9  # Significant changes to accommodate (and take advantage of) the new CM  # Significant changes to take advantage of a new portable installer
10  # by M.Blume (2/2000).  # script for everything after booting the interactive system.
11    #
12    # Author: Matthias Blume (blume@tti-c.org)
13  #  #
14    
15  this=$0  if [ x${INSTALL_QUIETLY} = xtrue ] ; then
16        export CM_VERBOSE=false
17    fi
18    
19  #  vsay() {
20  # get the target list      if [ x${INSTALL_DEBUG} = xtrue ] ; then
21  #          echo "$@"
22  if [ ! -r config/targets ]; then      elif [ x${INSTALL_QUIETLY} = xtrue ] ; then
23      echo "$this: !!! File config/targets is missing."          :
24      exit 1      else
25            echo "$@"
26  fi  fi
27  . config/targets  }
28    
29    complain() {
30        echo "$@"
31        exit 1
32    }
33    
34    this=$0
35    
36    
37  #  #
38  # create the preloads.standard file  # create the preloads.standard file
39  #  #
40  if [ ! -r config/preloads ]; then  if [ ! -r config/preloads ]; then
41      echo "$this: !!! File config/preloads is missing."      complain "$this: !!! File config/preloads is missing."
     exit 1  
42  fi  fi
43  cp config/preloads preloads.standard  cp config/preloads preloads.standard
44    
# Line 36  Line 49 
49  MAKE=make  MAKE=make
50    
51  SHELL=/bin/sh  SHELL=/bin/sh
52  echo $this: Using shell $SHELL.  vsay $this: Using shell $SHELL.
53    
54  #  #
55  # set the SML root directory  # set the SML root directory
56  #  #
57  REAL_PWD=`pwd`  REAL_PWD=`pwd`
58  ROOT=${PWD:-$REAL_PWD}  ROOT=${PWD:-$REAL_PWD}
59  echo $this: SML root is $ROOT.  vsay $this: SML root is $ROOT.
60  echo $this: Installation directory is ${INSTALLDIR:=$ROOT}.  vsay $this: Installation directory is ${INSTALLDIR:=$ROOT}.
61    
62  #  #
63  # set the various directory and file pathname variables  # set the various directory and file pathname variables
# Line 55  Line 68 
68  RUNDIR=$BINDIR/.run             # where executables (i.e., the RTS) live  RUNDIR=$BINDIR/.run             # where executables (i.e., the RTS) live
69  SRCDIR=$ROOT/src                # where the source tree is rooted  SRCDIR=$ROOT/src                # where the source tree is rooted
70  LIBDIR=$INSTALLDIR/lib          # where libraries live  LIBDIR=$INSTALLDIR/lib          # where libraries live
 LIBLIST=$ROOT/liblist           # list of commands to stabilize libraries  
 LIBMOVESCRIPT=$ROOT/libmove     # a temporary script  
 LOCALPATHCONFIG=$INSTALLDIR/pathconfig # a temporary pathconfig file  
   
 URLGETTER=unknown  
   
 #  
 # the path to the dir where ml-yacc, ml-burg, ml-lex, and ml-build live  
 #  
 TOOLDIR=$BINDIR  
   
 #  
 # A temporary file for post-editing the pathconfig file...  
 #  
 PCEDITTMP=/usr/tmp/pcedittmp.$$  
71    
72  #  #
73  # files to be deleted after we are done...  # files to be deleted after we are done...
74  #  #
75  tmpfiles=""  tmpfiles=""
76  tmpfiles="$tmpfiles $ROOT/preloads.standard"  tmpfiles="$tmpfiles $ROOT/preloads.standard"
 tmpfiles="$tmpfiles $LIBLIST"  
 tmpfiles="$tmpfiles $LOCALPATHCONFIG"  
 tmpfiles="$tmpfiles $LIBMOVESCRIPT"  
 tmpfiles="$tmpfiles $PCEDITTMP"  
77  #  #
78  # make sure we always clean up after ourselves...  # make sure we always clean up after ourselves...
79  #  #
# Line 89  Line 83 
83  #  #
84  # set the CM configuration variables (these are environment variables  # set the CM configuration variables (these are environment variables
85  # that will be queried by the bootstrap code)  # that will be queried by the bootstrap code)
86  # Especially important is CM_PATHCONFIG_DEFAULT.  # Especially important is CM_PATHCONFIG.
87  #  #
88  CM_PATHCONFIG_DEFAULT=$LIBDIR/pathconfig  CM_PATHCONFIG=$LIBDIR/pathconfig
89  export CM_PATHCONFIG_DEFAULT  export CM_PATHCONFIG
90    
91  #  #
92  # the release version that we are installing  # the release version that we are installing
93  #  #
94  VERSION=`cat $CONFIGDIR/version`  VERSION=`cat $CONFIGDIR/version`
95  echo $this: Installing version $VERSION.  vsay $this: Installing version $VERSION.
96    
97  #  #
98  # the URL for the (usually remote) source archive  # the URL for the (usually remote) source archive
99  #  #
100  SRCARCHIVEURL=`cat $CONFIGDIR/srcarchiveurl`  SRCARCHIVEURL=`cat $CONFIGDIR/srcarchiveurl`
101  echo $this: URL of source archive is $SRCARCHIVEURL.  vsay $this: URL of source archive is $SRCARCHIVEURL.
102    
103  #  #
104  # Function to make a directory (and advertise such action).  # Function to make a directory including its ancestors.
105  #  #
106  makedir() {  makedir() {
107      if [ ! -d $1 ] ; then      if [ x$1 = x ] ; then
108          echo $this: Making directory $1          :
109        elif [ -d $1 ] ; then
110            :
111        else
112            makedir `dirname $1`
113            if [ x${INSTALL_VERBOSE} = xtrue ] ; then
114                vsay "$this: Making directory $1"
115            fi
116          if mkdir $1 ; then          if mkdir $1 ; then
117              : everything is fine              :
118          else          else
119              echo "$this: !!! Unable to make directory $1!"              complain "$this: !!! Unable to make directory $1!"
             exit 1  
120          fi          fi
121      fi      fi
122  }  }
123    
124  #  #
125  # Function for asking user to fetch source archive.  # Fish out the CM metadata directory name from library files
126  #   $1 - descriptive name  # and store it in ORIG_CM_DIR_ARC.
127  #   $2 - base name without extension, without version, and without dir  # The single argument is the name of the directory containing
128  #   $3 - remote directory  # a single subdirectory which is a CM metadata directory:
 #  
 askurl() {  
     echo "$this: Please, fetch $1 archive"  
     echo ' ('$2.'*' or $VERSION-$2.'*)'  
     echo " from $3"  
     echo " and then re-run this script!"  
     exit 1  
 }  
   
129  #  #
130  # Function for fetching source archives automatically using wget or lynx.  fish() {
131  #   $1 - command to actually get the stuff      cd $1
132  #   $2 - descriptive name      ORIG_CM_DIR_ARC=unknown
133  #   $3 - base name without extension and without dir      for i in * .[a-zA-Z0-9]* ; do
134  #   $4 - remote directory          if [ -d $i ] ; then
135  #              ORIG_CM_DIR_ARC=$i
136  fetchurl() {              break
     getter=$1 ; shift  
     echo $this: Fetching $1 from $3. Please stand by...  
     fetched=no  
     for base in $2 $VERSION-$2 ; do  
         for ext in tar.gz tgz tar.Z tz tar tar.bz2 ; do  
             try=$base.$ext  
             echo $this: Trying $try ...  
             if $getter $3 $try $ROOT/$try ; then  
                 fetched=yes  
                 echo $this: Fetching $try was a success.  
                 break 2         # get out of both for-loops  
             else  
                 rm -f $ROOT/$try  
137              fi              fi
138          done          done
139      done      if [ $ORIG_CM_DIR_ARC = unknown ] ; then
140      if [ $fetched = no ] ; then          complain "$this: could not determine CM metadata directory name"
         echo $this: Fetching $try was no success.  
         echo '  ' You should try to do it manually now.  
         askurl "$1" "$2" "$3"  
     fi  
 }  
   
 usewget() {  
     wget -nv -O $3 $1/$2  
 }  
   
 uselynx() {  
     lynx -source $1/$2 >$3  
 }  
   
 testurlgetter() {  
     (exec >/dev/null 2>&1 ; exec $*)  
 }  
   
 #  
 # Function to check whether wget or lynx is available.  
 # Set URLGETTER accordingly.  
 #  
 urlgetter() {  
     if [ "$URLGETTER" = unknown ] ; then  
         if testurlgetter wget --help ; then  
             URLGETTER="fetchurl usewget"  
         elif testurlgetter lynx -help ; then  
             URLGETTER="fetchurl uselynx"  
141          else          else
142              URLGETTER="askurl"          echo "$this: CM metadata directory name is \"${ORIG_CM_DIR_ARC}\""
143          fi          fi
     fi  
 }  
   
 un_tar() {  
     echo "$this: Un-TAR-ing $1 archive."  
     tar -xf $2  
144  }  }
145    
 un_tar_Z() {  
     echo "$this: Un-COMPRESS-ing and un-TAR-ing $1 archive."  
     zcat $2 | tar -xf -  
 }  
   
 un_tar_gz() {  
     echo "$this: Un-GZIP-ing and un-TAR-ing $1 archive."  
     gunzip -c $2 | tar -xf -  
 }  
   
 un_tar_bz2() {  
     echo "$this: Un-BZIP2-ing and un-TAR-ing $1 archive."  
     bunzip2 -c $2 | tar -xf -  
 }  
   
 unarchive() {  
     # $1: descriptive string, $2: archive, $3: unpacker  
     if [ -r $ROOT/$2 ] ; then  
         $3 "$1" $ROOT/$2  
     elif [ -r $ROOT/$VERSION-$2 ]; then  
         $3 "$1" $ROOT/$VERSION-$2  
     else  
         return 1  
     fi  
 }  
   
 #  
 # Function to unpack a source archive.  
 #  
 # $1: descriptive name of the sources to be unpacked  
 # $2: the directory into which to unpack the sources  
 # $3: the sub-directory of $2 that is going to be created by unpacking  
 # $4: the basename of the source archive (the script will check several  
 #     different suffixes to determine what kind of de-compression is to  
 #     be used)  
 #  
 # fetch_n_unpack is the helper function that does the real work.  If  
 # no archive is found locally, it invokes $URLGETTER and tries again.  
 # The variable $tryfetch is used to make sure this happens only once.  
 fetch_n_unpack() {  
     cd $2  
     if unarchive "$1" $4.tar.gz un_tar_gz ||  
        unarchive "$1" $4.tgz un_tar_gz ||  
        unarchive "$1" $4.tar.Z un_tar_Z ||  
        unarchive "$1" $4.tar un_tar ||  
        unarchive "$1" $4.tar.bz1 un_tar_bz2 ||  
        unarchive "$1" $4.tz un_tar_Z  
     then  
         : we are done  
     elif [ $tryfetch = yes ] ; then  
         urlgetter  
         $URLGETTER "$1" $4 $SRCARCHIVEURL  
         tryfetch=no  
         fetch_n_unpack "$1" "$2" "$3" "$4"  
     fi  
 }  
   
 #  
 # The main "unpack" driver function that invokes the above helper.  
 #  
 unpack() {  
     tryfetch=yes  
     if [ -d $2/$3 ]; then  
         echo "$this: The $1 tree already exists."  
     else  
         fetch_n_unpack "$1" "$2" "$3" "$4"  
     fi  
     if [ ! -d $2/$3 ]; then  
         echo "$this: !!! Unable to unpack $1 archive."  
         exit 1  
     fi  
 }  
146    
147  # A function to move all stable library files to a parallel directory  # A function to move all stable library files to a parallel directory
148  # hierarchy.  # hierarchy.
149  # The first argument must be a simple path (no / inside), and  # The first argument must be a simple path (no / inside), and
150  # the second argument must be an absolute path.  # the second argument must be an absolute path.
151  move() {  move() {
152      if [ -d $1 ] ; then      if [ -L $1 ] ; then
153            rm -f $1             # remove symbolic link made by diracs (see below)
154        elif [ -d $1 ] ; then
155          if [ ! -d $2 ] ; then          if [ ! -d $2 ] ; then
156              if [ -f $2 ] ; then              if [ -f $2 ] ; then
157                  echo $this: $2 exists as a non-directory.                  complain $this: $2 exists as a non-directory.
                 exit 1  
158              fi              fi
159              mkdir $2              mkdir $2
160          fi          fi
161          cd $1          cd $1
162          for i in * ; do          for i in * .[a-zA-Z0-9]* ; do
163              move $i $2/$i              move $i $2/$i
164          done          done
165          cd ..          cd ..
# Line 297  Line 170 
170  }  }
171    
172  #  #
173  # Move the stable archive of a library whose description file was $1/$2 to  # Traverse the directory tree rooted at $3 (must be single arc!).
174  # $LIBDIR/$2/CM/$ARCH-unix/$2 so that it appears as if the description file  # Find all directories named $1, rename them into $2 and make
175  # had been at $LIBDIR/$2/$2  # and establish $1 as a symbolic link to $2:
176  #  #
177  # (This script will also move all other libraries that show up in  dirarcs() {
178  #  $1/CM/$ARCH-unix because in the case of the boot directory this indicates      if [ -d $3 ] ; then
179  #  that some library did not have its own path anchor but was specified          if [ $3 = $1 ] ; then
180  #  relative to $1/$2. Still, don't rely on this to be robust -- rather make              mv $1 $2
181  #  separate anchors for every library!)              ln -s $2 $1
182  #          else
183  movelibs() {              cd $3
184      for lib in `/bin/ls $1/CM/$ARCH-unix` ; do              for d in * .[a-zA-Z0-9]* ; do
185          case $lib in                  dirarcs $1 $2 $d
         *.cm | *.cmi)  
             if [ $lib != $2 ] ; then  
                 echo "$this: Warning:" $lib specified relative to $2  
             fi  
             echo $this: Moving library $lib to $LIBDIR  
             makedir $LIBDIR/$2  
             makedir $LIBDIR/$2/CM  
             makedir $LIBDIR/$2/CM/$ARCH-unix  
             mv $1/CM/$ARCH-unix/$lib $LIBDIR/$2/CM/$ARCH-unix/$lib  
             ;;  
         *)  
             ;;  
         esac  
186       done       done
187  }              cd ..
   
 # A shell function that registers a library for being built.  
 # This function takes two arguments: 1. a name under which the library  
 # is to be known later (something.cm) and 2. the path relative to $SRCDIR  
 # that leads to the library's .cm file.  The library's .cm file must be the  
 # same as $1.  
 #  
 # This works by adding ML code to file $LIBLIST.  The code in this file  
 # will be executed near the end of this script.  If $MOVE_LIBRARIES is  
 # set to true, then reglib will also register a "movelibs" to be executed at  
 # the end by putting a "movelibs" line into $LIBMOVESCRIPT.  
   
 reglib() {  
     if [ x$MOVE_LIBRARIES = xtrue ] ; then  
         FINALLOCATION=$LIBDIR/$1  
         FINALCONFIGPATH=$1  
     else  
         FINALLOCATION=$SRCDIR/$2  
         FINALCONFIGPATH=$FINALLOCATION  
     fi  
     if [ -d $FINALLOCATION/CM/$ARCH-unix ] ; then  
         echo "$this: Library $1 already exists in $FINALLOCATION."  
     else  
         echo "$this: Scheduling library $1 to be built in $FINALLOCATION."  
         echo "  andalso CM.stabilize false \"$1\"" >>$LIBLIST  
         echo $1 $SRCDIR/$2 >>$LOCALPATHCONFIG  
         if [ x$MOVE_LIBRARIES = xtrue ] ; then  
             echo movelibs $SRCDIR/$2 $1 >>$LIBMOVESCRIPT  
188          fi          fi
189      fi      fi
     echo $1 $FINALCONFIGPATH >>$CM_PATHCONFIG_DEFAULT  
190  }  }
191    
192  #  
193  # Function to build a standalone program such as ml-yacc.  The function takes  ######################################################################
 # 2 or 3 arguments.  First the name of the program which at the same time  
 # is the directory name under $SRCDIR where the sources reside.  The second  
 # argument is a descriptive name for the program (passed on to "unpack").  
 # The optional third argument specifies the path relative to $SRCDIR/$1  
 # of the directory where the program's heap image is to be found.  
 #  
   
 standalone() {  
     TARGET=$1.$HEAP_SUFFIX  
     if [ $# = 3 ] ; then  
         TARGETLOC=$3/$TARGET  
     else  
         TARGETLOC=$TARGET  
     fi  
     if [ -r $HEAPDIR/$TARGET ] ; then  
         echo $this: Target $TARGET already exists.  
     else  
         echo $this: Building $TARGET.  
         unpack $2 $SRCDIR $1 $1  
         cd $SRCDIR/$1  
         ./build  
         if [ -r $TARGETLOC ] ; then  
             mv $TARGETLOC $HEAPDIR/$TARGET  
             if [ ! -f $BINDIR/$1 ] ; then  
                 cd $BINDIR  
                 ln -s .run-sml $1  
             fi  
         else  
             echo "$this: !!! Build of $TARGET failed."  
         fi  
     fi  
 }  
194    
195  #  #
196  # create the various sub directories  # create the various sub directories
# Line 401  Line 200 
200  done  done
201    
202  #  #
 # install the script that tests the architecture, and make sure that it works  
 #  
 if [ -x $BINDIR/.arch-n-opsys ]; then  
     echo $this: Script $BINDIR/.arch-n-opsys already exists.  
 else  
     cat $CONFIGDIR/_arch-n-opsys \  
     | sed -e "s,@SHELL@,$SHELL,g" > $BINDIR/.arch-n-opsys  
     chmod 555 $BINDIR/.arch-n-opsys  
     if [ ! -x $BINDIR/.arch-n-opsys ]; then  
         echo "$this: !!! Installation of $BINDIR/.arch-n-opsys failed."  
         exit 1  
     fi  
 fi  
   
 ARCH_N_OPSYS=`$BINDIR/.arch-n-opsys`  
 if [ "$?" != "0" ]; then  
     echo "$this: !!! Script $BINDIR/.arch-n-opsys fails on this machine."  
     echo "$this: !!! You must patch this by hand and repeat the installation."  
     exit 2  
 else  
     echo $this: Script $BINDIR/.arch-n-opsys reports $ARCH_N_OPSYS.  
 fi  
 eval $ARCH_N_OPSYS  
   
 #  
203  # Function to install a "driver" script...  # Function to install a "driver" script...
204  #   This takes care of patching the source of the script with the SHELL,  #   This takes care of patching the source of the script with the SHELL,
205  #   BINDIR, and VERSION variables to use.  #   BINDIR, and VERSION variables to use.
# Line 447  Line 221 
221              > $BINDIR/$ddst              > $BINDIR/$ddst
222          chmod 555 $BINDIR/$ddst          chmod 555 $BINDIR/$ddst
223          if [ ! -x $BINDIR/$ddst ]; then          if [ ! -x $BINDIR/$ddst ]; then
224              echo "$this: !!! Installation of $BINDIR/${ddst} failed."              complain "$this: !!! Installation of $BINDIR/${ddst} failed."
             exit 1  
225          fi          fi
226  #   fi  #   fi
227  }  }
228    
229    #
230    # install the script that tests architecture and os...
231    #
232    installdriver _arch-n-opsys .arch-n-opsys
233    
234    #
235    # run it to figure out what architecture and os we are using, define
236    # corresponding variables...
237    #
238    ARCH_N_OPSYS=`$BINDIR/.arch-n-opsys`
239    if [ "$?" != "0" ]; then
240        echo "$this: !!! Script $BINDIR/.arch-n-opsys fails on this machine."
241        echo "$this: !!! You must patch this by hand and repeat the installation."
242        exit 2
243    else
244        vsay $this: Script $BINDIR/.arch-n-opsys reports $ARCH_N_OPSYS.
245    fi
246    eval $ARCH_N_OPSYS
247    
248    #
249    # now install all the other driver scripts...
250    #
251  installdriver _run-sml .run-sml  installdriver _run-sml .run-sml
252  installdriver _link-sml .link-sml  installdriver _link-sml .link-sml
253  installdriver _ml-build ml-build  installdriver _ml-build ml-build
254    installdriver _ml-makedepend ml-makedepend
255    
256  #  #
257  # set some architecture dependent run-time system flags  # set some architecture dependent run-time system flags
# Line 487  Line 283 
283      linux)      linux)
284          EXTRA_DEFS=`$CONFIGDIR/chk-global-names.sh`          EXTRA_DEFS=`$CONFIGDIR/chk-global-names.sh`
285          if [ "$?" != "0" ]; then          if [ "$?" != "0" ]; then
286              echo "$this: !!! Problems checking for underscores in asm names."              complain "$this: !!! Problems checking for underscores in asm names."
             exit 1  
287          fi          fi
288          EXTRA_DEFS="XDEFS=$EXTRA_DEFS"          EXTRA_DEFS="XDEFS=$EXTRA_DEFS"
289          ;;          ;;
# Line 503  Line 298 
298  #  #
299  # build the run-time system  # build the run-time system
300  #  #
 unpack "run-time" $SRCDIR runtime runtime  
301  if [ -x $RUNDIR/run.$ARCH-$OPSYS ]; then  if [ -x $RUNDIR/run.$ARCH-$OPSYS ]; then
302      echo $this: Run-time system already exists.      vsay $this: Run-time system already exists.
303  else  else
304        $CONFIGDIR/unpack $ROOT runtime
305      cd $SRCDIR/runtime/objs      cd $SRCDIR/runtime/objs
306      echo $this: Compiling the run-time system.      echo $this: Compiling the run-time system.
307      $MAKE -f mk.$ARCH-$OPSYS $EXTRA_DEFS      $MAKE -f mk.$ARCH-$OPSYS $EXTRA_DEFS
308      if [ -x run.$ARCH-$OPSYS ]; then      if [ -x run.$ARCH-$OPSYS ]; then
309          mv run.$ARCH-$OPSYS $RUNDIR          mv run.$ARCH-$OPSYS $RUNDIR
310          # $MAKE MAKE=$MAKE clean          $MAKE MAKE=$MAKE clean
311      else      else
312          echo "$this: !!! Run-time system build failed for some reason."          complain "$this: !!! Run-time system build failed for some reason."
         exit 1  
313      fi      fi
314  fi  fi
315  cd $SRCDIR  cd $SRCDIR
# Line 524  Line 318 
318  # boot the base SML system  # boot the base SML system
319  #  #
320  if [ -r $HEAPDIR/sml.$HEAP_SUFFIX ]; then  if [ -r $HEAPDIR/sml.$HEAP_SUFFIX ]; then
321      echo $this: Heap image $HEAPDIR/sml.$HEAP_SUFFIX already exists.      vsay $this: Heap image $HEAPDIR/sml.$HEAP_SUFFIX already exists.
322        fish $LIBDIR/basis.cm
323        # ignore requested arc name since we have to live with what is there:
324        export CM_DIR_ARC=$ORIG_CM_DIR_ARC
325    else
326        $CONFIGDIR/unpack $ROOT $BOOT_ARCHIVE
327    
328        fish $ROOT/$BOOT_FILES/basis.cm
329    
330        cd $ROOT
331    
332        # Target arc:
333        export CM_DIR_ARC=${CM_DIR_ARC:-".cm"}
334    
335        if [ $CM_DIR_ARC = $ORIG_CM_DIR_ARC ] ; then
336            : we are happy
337  else  else
338      unpack bin $ROOT $BOOT_FILES $BOOT_ARCHIVE          # now we have to make a symbolic link for each occurrence of
339            # $ORIG_CM_DIR_ARC to $CM_DIR_ARC
340            dirarcs ${ORIG_CM_DIR_ARC} ${CM_DIR_ARC} $BOOT_FILES
341        fi
342    
343      cd $ROOT/$BOOT_FILES      cd $ROOT/$BOOT_FILES
344    
345        # now link (boot) the system and let it initialize itself...
346      if $BINDIR/.link-sml @SMLheap=$ROOT/sml @SMLboot=BOOTLIST @SMLalloc=$ALLOC      if $BINDIR/.link-sml @SMLheap=$ROOT/sml @SMLboot=BOOTLIST @SMLalloc=$ALLOC
347      then      then
348          cd $ROOT          cd $ROOT
# Line 542  Line 357 
357              cd $ROOT/$BOOT_FILES              cd $ROOT/$BOOT_FILES
358              for anchor in * ; do              for anchor in * ; do
359                  if [ -d $anchor ] ; then                  if [ -d $anchor ] ; then
360                      echo $anchor $anchor >>$CM_PATHCONFIG_DEFAULT                      echo $anchor $anchor >>$CM_PATHCONFIG
361                      move $anchor $LIBDIR/$anchor                      move $anchor $LIBDIR/$anchor
362                  fi                  fi
363              done              done
# Line 551  Line 366 
366              rm -rf $BOOT_FILES              rm -rf $BOOT_FILES
367    
368          else          else
369              echo "$this !!! No heap image generated (sml.$HEAP_SUFFIX)."              complain "$this !!! No heap image generated (sml.$HEAP_SUFFIX)."
             exit 1  
370          fi          fi
371      else      else
372          echo "$this !!! Boot code failed, no heap image (sml.$HEAP_SUFFIX)."          complain "$this !!! Boot code failed, no heap image (sml.$HEAP_SUFFIX)."
         exit 1  
373      fi      fi
374  fi  fi
375    
 #  
 # Initialize $LIBLIST  
 #  
376  cd $ROOT  cd $ROOT
 rm -f $LOCALPATHCONFIG $LIBLIST  
 echo 'ignore (OS.Process.exit (if true' >$LIBLIST  
377    
378  #  #
379  # now build (or prepare to build) the individual targets  # Now do all the rest using the precompiled installer:
380  #  #
381  cd $SRCDIR  echo $this: Installing other libraries and programs:
382  echo $this: Installing other targets.  export ROOT CONFIGDIR BINDIR
383  for i in $TARGETS ; do  if $BINDIR/sml -m \$smlnj/installer.cm
384      case $i in  then
385        src-smlnj)      vsay $this: Installation complete.
         for src in compiler cm MLRISC smlnj-lib ml-yacc system  
         do  
             unpack $src $ROOT/src $src $src  
         done  
         ;;  
       ml-yacc)  
         standalone ml-yacc ML-Yacc src  
         echo ml-yacc $TOOLDIR >>$CM_PATHCONFIG_DEFAULT  
         ;;  
       ml-lex)  
         standalone ml-lex ML-Lex  
         echo ml-lex $TOOLDIR >>$CM_PATHCONFIG_DEFAULT  
         ;;  
       ml-burg)  
         standalone ml-burg ML-Burg  
         echo ml-burg $TOOLDIR >>$CM_PATHCONFIG_DEFAULT  
         ;;  
       smlnj-lib)  
         unpack "SML/NJ Library" $SRCDIR smlnj-lib smlnj-lib  
   
         # Don't make the Util library -- it came pre-made and has been  
         # installed when making the base system.  In other words, don't do...  
             #reglib smlnj-lib.cm smlnj-lib/Util  
         # ... and don't make the HTML library ...  
             #reglib html-lib.cm smlnj-lib/HTML  
         # ... and don't make the PP library ...  
             #reglib pp-lib.cm smlnj-lib/PP  
         # make the Unix library  
             reglib unix-lib.cm smlnj-lib/Unix  
         # make the INet library  
             reglib inet-lib.cm smlnj-lib/INet  
         # make the RegExp library  
             reglib regexp-lib.cm smlnj-lib/RegExp  
         # make the Reactive library  
             reglib reactive-lib.cm smlnj-lib/Reactive  
         ;;  
       cml)  
         unpack CML $SRCDIR cml cml  
         reglib core-cml.cm cml/src/core-cml  
         reglib cml.cm cml/src  
         reglib cml-basis.cm cml  
         ;;  
       cml-lib)  
         unpack CML $SRCDIR cml cml  
         reglib cml-lib.cm cml/cml-lib  
         ;;  
       eXene)  
         unpack EXene $SRCDIR eXene eXene  
         reglib eXene.cm eXene  
         ;;  
       doc)  
         unpack Doc $ROOT doc doc  
         cd $ROOT/doc  
         build $ROOT  
         ;;  
       *)  
         echo "$this: !!! Unknown target $i."  
         ;;  
     esac  
 done  
   
 #  
 # Now go and stabilize all registered libraries...  
 # This is done with library sources in their original locations inside  
 # $SRCDIR, so we must consult $LOCALPATHCONFIG.  
 #  
   
 echo $this: Compiling library code.  
 echo 'then OS.Process.success else OS.Process.failure));' >>$LIBLIST  
 if CM_LOCAL_PATHCONFIG=$LOCALPATHCONFIG $BINDIR/sml <$LIBLIST ; then  
     echo $this: Libraries compiled successfully.  
386  else  else
387      echo "$this: !!! Something went wrong when compiling the libraries."      complain "$this: !!! Installation of libraries and programs failed."
     exit 1  
 fi  
   
 #  
 # Move the libraries to their final locations...  
 #  
   
 if [ -r $LIBMOVESCRIPT ] ; then  
     echo $this: Moving libraries to $LIBDIR.  
     . $LIBMOVESCRIPT  
 fi  
   
 #  
 # Finally, remove duplicate entries from pathconfig file...  
 #  
 if [ -f $CM_PATHCONFIG_DEFAULT ] ; then  
     cp $CM_PATHCONFIG_DEFAULT $PCEDITTMP  
     rm -f $CM_PATHCONFIG_DEFAULT  
     awk <$PCEDITTMP 'NF == 2 { mapping[$1] = $2 }  
 NF != 2 { print $0 }  
 END { for (i in mapping) print i, mapping[i] }' \  
       | sort >$CM_PATHCONFIG_DEFAULT  
388  fi  fi
389    
390  exit 0  exit 0

Legend:
Removed from v.631  
changed lines
  Added in v.1391

root@smlnj-gforge.cs.uchicago.edu
ViewVC Help
Powered by ViewVC 1.0.0