Dialog经典--Slackware软件包管理程序

minus273

pkgtool

1. 
   
2. #!/bin/sh
   
3. #
   
4. # Copyright 1993, 1994, 1995, 1996, 1997,
   
5. #    1998, 1999  Patrick Volkerding,  Moorhead, MN  USA
   
6. # Copyright 2001  Slackware Linux, Inc.,  Concord, CA  USA
   
7. #    All rights reserved.
   
8. #
   
9. # Redistribution and use of this script, with or without modification, is
   
10. # permitted provided that the following conditions are met:
    
11. #
    
12. # 1. Redistributions of this script must retain the above copyright
    
13. #    notice, this list of conditions and the following disclaimer.
    
14. #
    
15. #  THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR IMPLIED
    
16. #  WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
    
17. #  MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.  IN NO
    
18. #  EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
    
19. #  SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
    
20. #  PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS;
    
21. #  OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
    
22. #  WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
    
23. #  OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF
    
24. #  ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
    
25. #
    
26. 
    
27. # Wed, 27 Apr 1994 00:06:50 -0700 (PDT)
    
28. # Optimization by David Hinds.
    
29. 
    
30. SOURCE_DIR=/var/log/mount
    
31. ASK="tagfiles"
    
32. if [ -L /bin/chmod -a -L /bin/chown ]; then # probably on the bootdisk using busybox
    
33. TARGET_DIR=/mnt
    
34. TMP=/mnt/var/log/setup/tmp
    
35. if mount | grep "on /mnt" 1> /dev/null 2>&1 ; then # good
    
36.   true
    
37. else # bad
    
38.   echo
    
39.   echo
    
40.   echo "You can't run pkgtool from the rootdisk until you've mounted your Linux"
    
41.   echo "partitions beneath /mnt. Here are some examples of this:"
    
42.   echo
    
43.   echo "If your root partition is /dev/hda1, and is using ext2fs, you would type:"
    
44.   echo "mount /dev/hda1 /mnt -t ext2"
    
45.   echo
    
46.   echo "Then, supposing your /usr partition is /dev/hda2, you must do this:"
    
47.   echo "mount /dev/hda2 /mnt/usr -t ext2"
    
48.   echo
    
49.   echo "Please mount your Linux partitions and then run pkgtool again."
    
50.   echo
    
51.   exit
    
52. fi
    
53. else
    
54. TARGET_DIR=/
    
55. TMP=/var/log/setup/tmp
    
56. fi
    
57. if [ ! -d $TMP ]; then
    
58. mkdir -p $TMP
    
59. chmod 700 $TMP
    
60. fi
    
61. ADM_DIR=$TARGET_DIR/var/log
    
62. LOG=$TMP/PKGTOOL.REMOVED
    
63. 
    
64. # remove whitespace
    
65. crunch() {
    
66.   while read FOO ; do
    
67.     echo $FOO
    
68.   done
    
69. }
    
70. 
    
71. package_name() {
    
72.   STRING=`basename $1 .tgz`
    
73.   # Check for old style package name with one segment:
    
74.   if [ "`echo $STRING | cut -f 1 -d -`" = "`echo $STRING | cut -f 2 -d -`" ]; then
    
75.     echo $STRING
    
76.   else # has more than one dash delimited segment
    
77.     # Count number of segments:
    
78.     INDEX=1
    
79.     while [ ! "`echo $STRING | cut -f $INDEX -d -`" = "" ]; do
    
80.       INDEX=`expr $INDEX + 1`
    
81.     done
    
82.     INDEX=`expr $INDEX - 1` # don't include the null value
    
83.     # If we don't have four segments, return the old-style (or out of spec) package name:
    
84.     if [ "$INDEX" = "2" -o "$INDEX" = "3" ]; then
    
85.       echo $STRING
    
86.     else # we have four or more segments, so we'll consider this a new-style name:
    
87.       NAME=`expr $INDEX - 3`
    
88.       NAME="`echo $STRING | cut -f 1-$NAME -d -`"
    
89.       echo $NAME
    
90.       # cruft for later ;)
    
91.       #VER=`expr $INDEX - 2`
    
92.       #VER="`echo $STRING | cut -f $VER -d -`"
    
93.       #ARCH=`expr $INDEX - 1`
    
94.       #ARCH="`echo $STRING | cut -f $ARCH -d -`"
    
95.       #BUILD="`echo $STRING | cut -f $INDEX -d -`"
    
96.     fi
    
97.   fi
    
98. }
    
99. 
    
100. remove_packages() {
     
101. for pkg_name in $*
     
102. do
     
103.   if [ -r $ADM_DIR/packages/$pkg_name ]; then
     
104.    dialog --title "PACKAGE REMOVAL IN PROGRESS" --cr-wrap --infobox \
     
105. "\nRemoving package $pkg_name.\n\
     
106. \n\
     
107. Since each file must be checked \
     
108. against the contents of every other installed package to avoid wiping out \
     
109. areas of overlap, this process can take quite some time. If you'd like to \
     
110. watch the progress, flip over to another virtual console and type:\n\
     
111. \n\
     
112. tail -f $TMP/PKGTOOL.REMOVED\n" 13 60
     
113.    export ROOT=$TARGET_DIR
     
114.    removepkg $pkg_name >> $LOG 2> /dev/null
     
115.   else
     
116.    echo "No such package: $pkg_name. Can't remove." >> $LOG
     
117.   fi
     
118. done
     
119. }
     
120. 
     
121. # Here, we read the list of arguments passed to the pkgtool script.
     
122. if [ $# -gt 0 ]; then # there are arguments to the command
     
123. while [ $# -gt 0 ]; do
     
124.   case "$1" in
     
125.   "-sets")
     
126.    DISK_SETS=`echo $2 | tr "[A-Z]" "[a-z]"` ; shift 2 ;;
     
127.   "-source_mounted")
     
128.    SOURCE_MOUNTED="always" ; shift 1 ;;
     
129.   "-ignore_tagfiles")
     
130.    ASK="never" ; shift 1 ;;
     
131.   "-tagfile")
     
132.    USETAG=$2 ; shift 2 ;;
     
133.   "-source_dir")
     
134.    SOURCE_DIR=$2 ; shift 2 ;;
     
135.   "-target_dir")
     
136.    TARGET_DIR=$2
     
137.    ADM_DIR=$TARGET_DIR/var/log
     
138.    shift 2 ;;
     
139.   "-source_device")
     
140.    SOURCE_DEVICE=$2 ; shift 2 ;;
     
141.   esac
     
142. done
     
143. else  # there were no arguments, so we'll get the needed information from the
     
144.       # user and then go on.
     
145. CMD_START="true"
     
146. rm -f $TMP/SeT*
     
147. while [ 0 ]; do
     
148.   dialog --title "Slackware Package Tool (pkgtool version 9.0.0)" \
     
149. --menu "\nWelcome to the Slackware package tool.\n\
     
150. \nWhich option would you like?\n" 17 75 7 \
     
151. "Current" "Install packages from the current directory" \
     
152. "Other" "Install packages from some other directory" \
     
153. "Floppy" "Install packages from floppy disks" \
     
154. "Remove" "Remove packages that are currently installed" \
     
155. "View" "View the list of files contained in a package" \
     
156. "Setup" "Choose Slackware installation scripts to run again" \
     
157. "Exit" "Exit Pkgtool" 2> $TMP/reply
     
158.   if [ ! $? = 0 ]; then
     
159.    rm -f $TMP/reply
     
160.    dialog --clear
     
161.    exit
     
162.   fi
     
163.   REPLY="`cat $TMP/reply`"
     
164.   rm -f $TMP/reply
     
165.   if [ "$REPLY" = "Exit" ]; then
     
166.    dialog --clear
     
167.    exit
     
168.   fi
     
169.   if [ "$REPLY" = "Setup" ]; then
     
170.     echo 'dialog --title "SELECT SYSTEM SETUP SCRIPTS" --item-help --checklist \
     
171.     "Please use the spacebar to select the setup scripts to run.  Hit enter when you \
     
172. are done selecting to run the scripts." 17 70 9 \' > $TMP/setupscr
     
173.     for script in $ADM_DIR/setup/setup.* ; do
     
174.       BLURB=`grep '#BLURB' $script | cut -b8-`
     
175.       if [ "$BLURB" = "" ]; then
     
176.         BLURB=""""
     
177.       fi
     
178.       echo " "`basename $script | cut -f2- -d .`" $BLURB "no" $BLURB \" >> $TMP/setupscr
     
179.     done
     
180.     echo "2> $TMP/return" >> $TMP/setupscr
     
181.     . $TMP/setupscr
     
182.     if [ ! "`cat $TMP/return`" = "" ]; then
     
183.       # Run each script:
     
184.       for script in `cat $TMP/return` ; do
     
185.         scrpath=$ADM_DIR/setup/setup.`echo $script | tr -d "`
     
186.         rootdevice="`mount | head -1 | cut -f 1 -d ' '`"
     
187.         ( color=on ; cd $TARGET_DIR ; . $scrpath / $rootdevice )
     
188.       done
     
189.     fi
     
190.     rm -f $TMP/return $TMP/setupscr
     
191.     continue
     
192.   fi # end Setup
     
193.   if [ "$REPLY" = "View" ]; then
     
194.    DEFITEM=""
     
195.    export DEFITEM
     
196.    dialog --title "SCANNING" --infobox "Please wait while \
     
197. Pkgtool scans your system to determine which packages you have \
     
198. installed and prepares a list for you." 0 0
     
199.    echo 'dialog $DEFITEM --item-help --menu "Please select the package you wish to view." 17 68 10 \' > $TMP/viewscr
     
200.    for name in `ls $ADM_DIR/packages` ; do
     
201.     pkg_name=`package_name $name`
     
202.     BLURB="`sed -n "/$pkg_name:/{s/\"//g;p;q;}" $ADM_DIR/packages/$name | cut -f 2- -d : | crunch`"
     
203.     # Let's have some backward compatibility with the interim beta (for now):
     
204.     if [ "$BLURB" = "" ]; then
     
205.      BLURB="`sed -n "/$name:/{s/\"//g;p;q;}" $ADM_DIR/packages/$name | cut -f 2- -d : | crunch`"
     
206.     fi
     
207.     echo " "$name" "$BLURB" "View information about package $name" \" >> $TMP/viewscr
     
208.    done
     
209.    echo "2> $TMP/return" >> $TMP/viewscr
     
210.    while [ 0 ]; do
     
211.     . $TMP/viewscr
     
212.     if [ ! "`cat $TMP/return`" = "" ]; then
     
213.      DEFITEM="--default-item `cat $TMP/return`"
     
214.      dialog --title "CONTENTS OF PACKAGE: `cat $TMP/return`" --no-shadow --textbox "$ADM_DIR/packages/`cat $TMP/return`" \
     
215.      0 0 2> /dev/null
     
216.     else
     
217.      break
     
218.     fi
     
219.    done
     
220.    rm -f $TMP/return $TMP/viewscr $TMP/tmpmsg
     
221.    # This will clean up after most defective packages:
     
222.    chmod 755 /
     
223.    chmod 1777 /tmp
     
224.    continue
     
225.   fi  
     
226.   if [ "$REPLY" = "Remove" ]; then
     
227.    dialog --title "SCANNING" --infobox "Please wait while Pkgtool scans \
     
228. your system to determine which packages you have installed and prepares \
     
229. a list for you." 0 0
     
230.    # end section
     
231.    cat << EOF > $TMP/rmscript
     
232. dialog --title "SELECT PACKAGES TO REMOVE" --item-help --checklist \
     
233. "Please select the \
     
234. packages you wish to Remove. Use the \
     
235. spacebar to select packages to delete, and the UP/DOWN arrow keys to \
     
236. scroll up and down through the entire list." 20 75 11 \\
     
237. EOF
     
238.    for name in `ls $ADM_DIR/packages` ; do
     
239.     pkg_name=`package_name $name`
     
240.     BLURB="`sed -n "/$pkg_name:/{s/\"//g;p;q;}" $ADM_DIR/packages/$name | cut -f 2- -d : | crunch`"
     
241.     # Let's have some backward compatibility with the interim beta (for now):
     
242.     if [ "$BLURB" = "" ]; then
     
243.      BLURB="`sed -n "/$name:/{s/\"//g;p;q;}" $ADM_DIR/packages/$name | cut -f 2- -d : | crunch`"
     
244.     fi
     
245.     echo " "$name" "$BLURB" off "Select/Unselect removing package $name" \" >> $TMP/rmscript
     
246.    done
     
247.    echo "2> $TMP/return" >> $TMP/rmscript
     
248.    if [ -L $LOG -o -r $LOG ]; then
     
249.      rm -f $LOG
     
250.    fi
     
251.    cat /dev/null > $LOG
     
252.    chmod 600 $LOG
     
253.    chmod 700 $TMP/rmscript
     
254.    export ADM_DIR;
     
255.    $TMP/rmscript
     
256.    remove_packages `cat $TMP/return | tr -d "\042"`
     
257.    if [ "`cat $TMP/PKGTOOL.REMOVED`" = "" ]; then
     
258.     rm -f $TMP/PKGTOOL.REMOVED
     
259.     dialog --title "NO PACKAGES REMOVED" --msgbox "Hit OK to return \
     
260. to the main menu." 5 40
     
261.    else
     
262.     dialog --title "PACKAGE REMOVAL COMPLETE" --msgbox "The packages have \
     
263. been removed. A complete log of the files that were removed has been created \
     
264. in $TMP: PKGTOOL.REMOVED." 0 0
     
265.    fi
     
266.    rm -f $TMP/rmscript $TMP/return $TMP/tmpmsg $TMP/SeT*
     
267.    chmod 755 /
     
268.    chmod 1777 /tmp
     
269. # No, return to the main menu:
     
270. #   exit
     
271.   elif [ "$REPLY" = "Floppy" ]; then
     
272.    dialog --title "SELECT FLOPPY DRIVE" --menu "Which floppy drive would \
     
273. you like to install from?" \
     
274. 11 70 4 \
     
275. "/dev/fd0u1440" "1.44 MB first floppy drive" \
     
276. "/dev/fd1u1440" "1.44 MB second floppy drive" \
     
277. "/dev/fd0h1200" "1.2 MB first floppy drive" \
     
278. "/dev/fd1h1200" "1.2 MB second floppy drive" 2> $TMP/wdrive
     
279.    if [ $? = 1 ]; then
     
280.     dialog --clear
     
281.     exit
     
282.    fi
     
283.    SOURCE_DEVICE="`cat $TMP/wdrive`"
     
284.    rm -f $TMP/wdrive
     
285.    cat << EOF > $TMP/tmpmsg
     
286. 
     
287. Enter the names of any disk sets you would like to install.
     
288. Separate the sets with a space, like this: a b oi x
     
289. 
     
290. To install packages from one disk, hit [enter] without typing
     
291. anything.
     
292. 
     
293. EOF
     
294.    dialog --title "SOFTWARE SELECTION" --inputbox "`cat $TMP/tmpmsg`" 13 70 2> $TMP/sets
     
295.    DISK_SETS="`cat $TMP/sets`"
     
296.    rm -f $TMP/sets
     
297.    if [ "$DISK_SETS" = "" ]; then
     
298.     DISK_SETS="disk"
     
299.    else
     
300.     DISK_SETS=`echo $DISK_SETS | sed 's/ /#/g'`
     
301.     DISK_SETS="#$DISK_SETS"
     
302.    fi
     
303.    break;
     
304.   elif [ "$REPLY" = "Other" ]; then
     
305.    dialog --title "SELECT SOURCE DIRECTORY" --inputbox "Please enter the name of the directory that you wish to \
     
306. install packages from:" 10 50 2> $TMP/pkgdir
     
307.    if [ $? = 1 ]; then
     
308.     rm -f $TMP/pkgdir $TMP/SeT*
     
309.     dialog --clear
     
310.     exit
     
311.    fi
     
312.    SOURCE_DIR="`cat $TMP/pkgdir`"
     
313.    SOURCE_MOUNTED="always"
     
314.    DISK_SETS="disk"
     
315.    chmod 755 $TARGET_DIR
     
316.    chmod 1777 $TARGET_DIR/tmp
     
317.    rm -f $TMP/pkgdir
     
318.    if [ ! -d $SOURCE_DIR ]; then
     
319.     dialog --title "DIRECTORY NOT FOUND" --msgbox "The directory you want to \
     
320. install from ($SOURCE_DIR) \
     
321. does not seem to exist. Please check the directory and then try again." \
     
322. 10 50
     
323.     dialog --clear
     
324.     exit
     
325.    fi
     
326.    break;
     
327.   else # installing from current directory
     
328.    SOURCE_MOUNTED="always"
     
329.    SOURCE_DIR="$PWD"
     
330.    DISK_SETS="disk"
     
331.    chmod 755 $TARGET_DIR
     
332.    chmod 1777 $TARGET_DIR/tmp
     
333.    break;
     
334.   fi
     
335. done
     
336. fi
     
337. if [ "$DISK_SETS" = "disk" ]; then
     
338. ASK="always"
     
339. fi
     
340. 
     
341. mount_the_source() {
     
342. # is the source supposed to be mounted already?
     
343. if [ "$SOURCE_MOUNTED" = "always" ]; then
     
344.   # The source should already be mounted, so we test it
     
345.   if [ ! -d $SOURCE_DIR ]; then # the directory is missing
     
346.    cat << EOF > $TMP/tmpmsg
     
347. 
     
348. Your source device cannot be accessed properly.
     
349. 
     
350. Please be sure that it is mounted on $SOURCE_DIR,
     
351. and that the Slackware disks are found in subdirectories
     
352. of $SOURCE_DIR like specified.
     
353. 
     
354. EOF
     
355.    dialog --title "MOUNT ERROR" --msgbox "`cat $TMP/tmpmsg`" 11 67
     
356.    rm -f $TMP/tmpmsg
     
357.    exit 1;
     
358.   fi
     
359.   return 0;
     
360. fi
     
361. dialog --title "INSERT DISK" --menu "Please insert disk $1 and \
     
362. press ENTER to continue." \
     
363. 11 50 3 \
     
364. "Continue" "Continue with the installation" \
     
365. "Skip" "Skip the current disk series" \
     
366. "Quit" "Abort the installation process" 2> $TMP/reply
     
367. if [ ! $? = 0 ]; then
     
368.   REPLY="Quit"
     
369. else
     
370.   REPLY="`cat $TMP/reply`"
     
371. fi
     
372. rm -f $TMP/reply
     
373. if [ "$REPLY" = "Skip" ]; then
     
374.   return 1;
     
375. fi
     
376. if [ "$REPLY" = "Quit" ]; then
     
377.    dialog --title "ABORTING" --msgbox "Aborting software installation." 5 50
     
378.    chmod 755 $TARGET_DIR
     
379.    chmod 1777 $TARGET_DIR/tmp
     
380.    exit 1;
     
381. fi;
     
382. # Old line:
     
383. # mount -r -t msdos $SOURCE_DEVICE $SOURCE_DIR
     
384. # New ones: (thanks to Andy Schwierskott!)
     
385. go_on=y
     
386. not_successfull_mounted=1
     
387. while [ "$go_on" = y -a "$not_successfull_mounted" = 1 ]; do
     
388.   mount -r -t msdos $SOURCE_DEVICE $SOURCE_DIR
     
389.   not_successfull_mounted=$?
     
390.   if [ "$not_successfull_mounted" = 1 ]; then
     
391.    mount_answer=x
     
392.    while [ "$mount_answer" != "y" -a "$mount_answer" != "q" ] ; do
     
393.     dialog --title "MOUNT PROBLEM" --menu "Media was not successfully \
     
394. mounted! Do you want to \
     
395. retry, or quit?" 10 60 2 \
     
396. "Yes" "Try to mount the disk again" \
     
397. "No" "No, abort." 2> $TMP/mntans
     
398.     mount_answer="`cat $TMP/mntans`"
     
399.     rm -f $TMP/mntans
     
400.     if [ "$mount_answer" = "Yes" ]; then
     
401.      mount_answer="y"
     
402.     else
     
403.      mount_answer="q"
     
404.     fi
     
405.    done
     
406.    go_on=$mount_answer
     
407.   fi
     
408. done
     
409. test $not_successfull_mounted = 0
     
410. }
     
411. 
     
412. umount_the_source() {
     
413. if [ ! "$SOURCE_MOUNTED" = "always" ]; then
     
414.   umount $SOURCE_DEVICE 1> /dev/null 2>&1
     
415. fi;
     
416. }
     
417. 
     
418. install_disk() {
     
419. mount_the_source $1
     
420. if [ $? = 1 ]; then
     
421.   umount_the_source;
     
422.   return 1;
     
423. fi
     
424. CURRENT_DISK_NAME="$1"
     
425. PACKAGE_DIR=$SOURCE_DIR
     
426. if [ "$SOURCE_MOUNTED" = "always" -a ! "$DISK_SETS" = "disk" ]; then
     
427.    PACKAGE_DIR=$PACKAGE_DIR/$1
     
428. fi
     
429. 
     
430. # If this directory is missing or contains no *.tgz files, bail.
     
431. if [ ! -d $PACKAGE_DIR ]; then
     
432.   return 1
     
433. fi
     
434. if ls $PACKAGE_DIR/*.tgz 1> /dev/null 2> /dev/null ; then
     
435.   true
     
436. else
     
437.   return 1
     
438. fi
     
439. 
     
440. #
     
441. # look for tagfile for this series and copy into $TMP/tagfile
     
442. #
     
443. touch $TMP/tagfile
     
444. if [ ! "$DISK_SETS" = "disk" ]; then
     
445.   if [ -r $TMP/SeTtagext ]; then
     
446.    if [ -r $PACKAGE_DIR/tagfile`cat $TMP/SeTtagext` ]; then
     
447.     cat $PACKAGE_DIR/tagfile`cat $TMP/SeTtagext` >> $TMP/tagfile
     
448.    else
     
449.     if [ -r $PACKAGE_DIR/tagfile ]; then
     
450.      cat $PACKAGE_DIR/tagfile >> $TMP/tagfile
     
451.     fi
     
452.    fi
     
453. 
     
454.   #
     
455.   # Do we need to follow a custom path to the tagfiles?
     
456.   #
     
457.   elif [ -r $TMP/SeTtagpath ]; then
     
458.    custom_path=`cat $TMP/SeTtagpath`
     
459.    short_path=`basename $PACKAGE_DIR`
     
460. 
     
461.    # If tagfile exists at the specified custom path, copy it over.
     
462.    if [ -r $custom_path/$short_path/tagfile ]; then
     
463.     cat $custom_path/$short_path/tagfile >> $TMP/tagfile
     
464. 
     
465.    else # well, I guess we'll use the default one then.
     
466.     if [ -r $PACKAGE_DIR/tagfile ]; then
     
467.      cat $PACKAGE_DIR/tagfile >> $TMP/tagfile
     
468.     fi
     
469.    fi
     
470.   #
     
471.   # We seem to be testing for this too often... maybe this code should
     
472.   # be optimized a little...
     
473.   #
     
474.   elif [ -r $PACKAGE_DIR/tagfile ]; then
     
475.    cat $PACKAGE_DIR/tagfile >> $TMP/tagfile
     
476.   fi
     
477. 
     
478.   #
     
479.   # Execute menus if in QUICK mode:
     
480.   #
     
481.   if [ -r $TMP/SeTQUICK -a -r $PACKAGE_DIR/maketag ]; then
     
482.    if [ ! "$MAKETAG" = "" -a -r $PACKAGE_DIR/$MAKETAG ]; then # use alternate maketag
     
483.     sh $PACKAGE_DIR/$MAKETAG
     
484.    else   
     
485.     sh $PACKAGE_DIR/maketag
     
486.    fi
     
487.    if [ -r $TMP/SeTnewtag ]; then
     
488.     mv $TMP/SeTnewtag $TMP/tagfile
     
489.    fi
     
490.   fi
     
491. 
     
492.   #
     
493.   # Protect tagfile from hacker attack:
     
494.   #
     
495.   if [ -r $TMP/tagfile ]; then
     
496.    chmod 600 $TMP/tagfile
     
497.   fi
     
498. 
     
499. fi #  ! "$DISK_SETS" = "disk"
     
500. 
     
501. # It's possible that the tagfile was specified on the command line.  If that's
     
502. # the case, then we'll just override whatever we figured out up above.
     
503. if [ ! "$USETAG" = "" ]; then
     
504.    cat $USETAG > $TMP/tagfile
     
505. fi
     
506. 
     
507. # If there's a catalog file present, use it to check for missing files.
     
508. # If not, forget about that and install whatever's there.
     
509. if [ "$1" = "single_disk" -o -r $PACKAGE_DIR/disk$1 -o -r $PACKAGE_DIR/package-list.txt ]; then
     
510.   if [ -r $PACKAGE_DIR/package-list.txt ]; then
     
511.    CATALOG_FILE=$PACKAGE_DIR/package-list.txt
     
512.   else
     
513.    CATALOG_FILE=`basename $PACKAGE_DIR/disk*`;
     
514.   fi
     
515.   if [ -r $PACKAGE_DIR/$CATALOG_FILE -a ! -d $PACKAGE_DIR/$CATALOG_FILE ]; then
     
516.    if grep CONTENTS: $PACKAGE_DIR/$CATALOG_FILE 1> /dev/null 2>&1 ; then
     
517.     # First we check for missing packages...
     
518.     for PKGTEST in `grep "^CONTENTS:" $PACKAGE_DIR/$CATALOG_FILE | cut -f2- -d : 2> /dev/null` ; do
     
519.      # This is not a perfect test.  (say emacs is missing but emacs-nox is not)
     
520.      if ls $PACKAGE_DIR/$PKGTEST*.tgz 1> /dev/null 2> /dev/null ; then # found something like it
     
521.       true
     
522.      else
     
523.       cat << EOF > $TMP/tmpmsg
     
524. 
     
525. WARNING!!!
     
526. 
     
527. While looking through your index file ($CATALOG_FILE),
     
528. I noticed that you might be missing a package:
     
529. 
     
530. $PKGTEST-\*-\*-\*.tgz
     
531. 
     
532. that is supposed to be on this disk (disk $1). You may go
     
533. on with the installation if you wish, but if this is a
     
534. crucial file I'm making no promises that your machine will
     
535. boot.
     
536. 
     
537. EOF
     
538.       dialog --title "FILE MISSING FROM YOUR DISK" --msgbox \
     
539. "`cat $TMP/tmpmsg`" 17 67
     
540.      fi
     
541.     done # checking for missing packages
     
542.     # Now we test for extra packages:
     
543.     ALLOWED="`grep CONTENTS: $PACKAGE_DIR/$CATALOG_FILE | cut -b10- 2> /dev/null`"
     
544.     for PACKAGE_FILENAME in $PACKAGE_DIR/*.tgz; do
     
545.      BASE="`basename $PACKAGE_FILENAME .tgz`"
     
546.      BASE="`package_name $BASE`"
     
547.      if echo $ALLOWED | grep $BASE 1> /dev/null 2>&1 ; then
     
548.       true
     
549.      else
     
550.       cat << EOF > $TMP/tmpmsg
     
551. 
     
552. WARNING!!!
     
553. 
     
554. While looking through your index file ($CATALOG_FILE),
     
555. I noticed that you have this extra package:
     
556. 
     
557. ($BASE.tgz)
     
558. 
     
559. that I don't recognize. Please be sure this package is
     
560. really supposed to be here, and is not left over from an
     
561. old version of Slackware. Sometimes this can happen at the
     
562. archive sites.
     
563. 
     
564. EOF
     
565.       dialog --title "EXTRA FILE FOUND ON YOUR DISK" \
     
566. --msgbox "`cat $TMP/tmpmsg`" 17 67
     
567.       rm -f $TMP/tmpmsg
     
568.      fi
     
569.     done
     
570.    fi
     
571.   fi
     
572. fi # check for missing/extra packages
     
573. 
     
574. # Install the packages:
     
575. for PACKAGE_FILENAME in $PACKAGE_DIR/*.tgz; do
     
576.   if [ "$PACKAGE_FILENAME" = "$PACKAGE_DIR/*.tgz" ]; then
     
577.    continue;
     
578.   fi
     
579.   if [ "$ASK" = "never" ]; then # install the package
     
580.    installpkg -root $TARGET_DIR -infobox -tagfile $TMP/tagfile $PACKAGE_FILENAME
     
581.    ERROR=$?
     
582.   elif [ "$ASK" = "tagfiles" ]; then
     
583.    installpkg -root $TARGET_DIR -menu -tagfile $TMP/tagfile $PACKAGE_FILENAME
     
584.    ERROR=$?
     
585.   else # ASK should be = always here, and that's how we'll treat it
     
586.    installpkg -root $TARGET_DIR -menu -ask -tagfile $TMP/tagfile $PACKAGE_FILENAME
     
587.    ERROR=$?
     
588.   fi
     
589.   # Check for abort:
     
590.   if [ "$ERROR" = "99" ]; then
     
591.    umount_the_source;
     
592.    chmod 755 $TARGET_DIR
     
593.    chmod 1777 $TARGET_DIR/tmp
     
594.    exit 1;
     
595.    fi
     
596. done
     
597. OUTTAHERE="false"
     
598. if [ -r $PACKAGE_DIR/install.end ]; then
     
599.   OUTTAHERE="true"
     
600. fi
     
601. umount_the_source;
     
602. if [ "$OUTTAHERE" = "true" ]; then
     
603.   return 1;
     
604. fi
     
605. }
     
606. 
     
607. install_disk_set() { # accepts one argument: the series name in lowercase.
     
608. SERIES_NAME=$1
     
609. CURRENT_DISK_NUMBER="1";
     
610. while [ 0 ]; do
     
611.   # Don't start numbering the directories until 2:
     
612.   if [ $CURRENT_DISK_NUMBER = 1 ]; then
     
613.     DISKTOINSTALL=$SERIES_NAME
     
614.   else
     
615.     DISKTOINSTALL=$SERIES_NAME$CURRENT_DISK_NUMBER
     
616.   fi
     
617.   install_disk $DISKTOINSTALL
     
618.   if [ ! $? = 0 ]; then # install.end was found, or the user chose
     
619.         # to quit installing packages.
     
620.    return 0;
     
621.   fi
     
622.   CURRENT_DISK_NUMBER=`expr $CURRENT_DISK_NUMBER + 1`
     
623. done;
     
624. }
     
625. 
     
626. # /* main() */ ;)
     
627. if [ "$DISK_SETS" = "disk" ]; then
     
628. install_disk single_disk;
     
629. ASK="always"
     
630. else
     
631. touch $TMP/tagfile
     
632. chmod 600 $TMP/tagfile
     
633. if echo $DISK_SETS | grep "#a#" 1> /dev/null 2>&1; then
     
634.   A_IS_NEEDED="true"
     
635. else
     
636.   A_IS_NEEDED="false"
     
637. fi
     
638. while [ 0 ];
     
639. do
     
640.   while [ 0 ]; # strip leading '#'s
     
641.   do
     
642.    if [ "`echo $DISK_SETS | cut -b1`" = "#" ]; then
     
643.     DISK_SETS="`echo $DISK_SETS | cut -b2-`"
     
644.    else
     
645.     break;
     
646.    fi
     
647.   done
     
648.   if [ "$A_IS_NEEDED" = "true" ]; then
     
649.    cat << EOF > $TMP/tmpmsg
     
650. 
     
651. --- Installing package series ==>a<==
     
652. 
     
653. EOF
     
654.    dialog --infobox "`cat $TMP/tmpmsg`" 5 45
     
655.    sleep 1
     
656.    rm -f $TMP/tmpmsg
     
657.    install_disk_set a;
     
658.    A_IS_NEEDED="false"
     
659.   fi
     
660.   count="1"
     
661.   if [ "`echo $DISK_SETS | cut -b$count`" = "" ]; then
     
662.    break; # we be done here :^)
     
663.   else
     
664.    count="2"
     
665.    while [ 0 ]; do
     
666.     if [ "`echo $DISK_SETS | cut -b$count`" = "" -o "`echo $DISK_SETS | cut -b$count`" = "#" ]; then
     
667.      count="`expr $count - 1`"
     
668.      break;
     
669.     else
     
670.      count="`expr $count + 1`"
     
671.     fi
     
672.    done
     
673.   fi
     
674.   diskset="`echo $DISK_SETS | cut -b1-$count`"
     
675.   count="`expr $count + 1`"
     
676.   DISK_SETS="`echo $DISK_SETS | cut -b$count-`"
     
677.   if [ "$diskset" = "a" ]; then
     
678.    continue; # we expect this to be done elsewhere
     
679.   fi
     
680.   cat << EOF > $TMP/tmpmsg
     
681. 
     
682. Installing package series ==>$diskset<==
     
683. 
     
684. EOF
     
685.   dialog --infobox "`cat $TMP/tmpmsg`" 5 45
     
686.   sleep 1
     
687.   rm -f $TMP/tmpmsg
     
688.   install_disk_set $diskset;
     
689. done
     
690. fi
     
691. 
     
692. if [ "$DISK_SETS" = "disk" -o "$CMD_START" = "true" ]; then
     
693. if [ -r $TMP/tagfile ]; then
     
694.   rm $TMP/tagfile
     
695. fi
     
696. dialog --clear
     
697. fi
     
698. chmod 755 $TARGET_DIR $TARGET_DIR/var $TARGET_DIR/usr
     
699. chmod 1777 $TARGET_DIR/tmp
     

复制代码

installpkg

1. 
   
2. #!/bin/sh
   
3. # Copyright 1994, 1998, 2000  Patrick Volkerding, Concord, CA, USA
   
4. # Copyright 2001  Slackware Linux, Inc., Concord, CA, USA
   
5. # All rights reserved.
   
6. #
   
7. # Redistribution and use of this script, with or without modification, is
   
8. # permitted provided that the following conditions are met:
   
9. #
   
10. # 1. Redistributions of this script must retain the above copyright
    
11. #    notice, this list of conditions and the following disclaimer.
    
12. #
    
13. #  THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR IMPLIED
    
14. #  WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
    
15. #  MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.  IN NO
    
16. #  EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
    
17. #  SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
    
18. #  PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS;
    
19. #  OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
    
20. #  WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
    
21. #  OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF
    
22. #  ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
    
23. #
    
24. # Sun Nov 26 12:38:25 CST 1995
    
25. # Added patch from Glenn Moloney <glenn@physics.unimelb.edu.au> to allow
    
26. # packages to be installed to directories other than /.
    
27. #
    
28. # Wed Mar 18 15:15:51 CST 1998
    
29. # Changed $TMP directory to /var/log/setup/tmp, and chmod'ed it 700 to close
    
30. # some security holes.
    
31. 
    
32. # If installpkg encounters a problem, it will return a non-zero error code.
    
33. # If it finds more than one problem (i.e. with a list of packages) you'll only
    
34. # hear about the most recent one. :)
    
35. # 1 = tar returned error code
    
36. # 2 = failed 'gzip -l package'
    
37. # 3 = does not end in .tgz
    
38. # 4 = not a file
    
39. # 99 = user abort from menu mode
    
40. EXITSTATUS=0
    
41. 
    
42. TAR=tar-1.13
    
43. $TAR --help 1> /dev/null 2> /dev/null
    
44. if [ ! $? = 0 ]; then
    
45.   TAR=tar
    
46. fi
    
47. if [ ! "`LC_MESSAGES=C $TAR --version`" = "tar (GNU tar) 1.13
    
48. 
    
49. Copyright (C) 1988, 92,93,94,95,96,97,98, 1999 Free Software Foundation, Inc.
    
50. This is free software; see the source for copying conditions.  There is NO
    
51. warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
    
52. 
    
53. Written by John Gilmore and Jay Fenlason." ]; then
    
54.   echo "WARNING: pkgtools are unstable with tar > 1.13."
    
55.   echo "         You should provide a "tar-1.13" in your \$PATH."
    
56.   sleep 5
    
57. fi
    
58. 
    
59. usage() {
    
60. cat << EOF
    
61. Usage: installpkg [options] package_name
    
62. 
    
63. Installpkg is used to install a .tgz package like this:
    
64.    installpkg xf_bin.tgz
    
65. 
    
66. options:      -warn (warn if files will be overwritten, but do not install)
    
67.               -root /mnt (install someplace else, like /mnt)
    
68.               -infobox (use dialog to draw an info box)
    
69.               -menu (confirm package installation with a menu, unless
    
70.                     the priority is [required] or ADD)
    
71.               -ask (used with menu mode: always ask if a package should be
    
72.                    installed regardless of what the package's priority is)
    
73.               -priority ADD|REC|OPT|SKP  (provide a priority for the entire
    
74.                     package list to use instead of the priority in the
    
75.                     tagfile)
    
76.               -tagfile /somedir/tagfile (specify a different file to use
    
77.                     for package priorities.  The default is "tagfile" in
    
78.                     the package's directory)
    
79. 
    
80. EOF
    
81. }
    
82. 
    
83. # Eliminate whitespace function:
    
84. crunch() {
    
85.   while read FOO ; do
    
86.     echo $FOO
    
87.   done
    
88. }
    
89. 
    
90. package_name() {
    
91.   STRING=`basename $1 .tgz`
    
92.   # Check for old style package name with one segment:
    
93.   if [ "`echo $STRING | cut -f 1 -d -`" = "`echo $STRING | cut -f 2 -d -`" ]; then
    
94.     echo $STRING
    
95.   else # has more than one dash delimited segment
    
96.     # Count number of segments:
    
97.     INDEX=1
    
98.     while [ ! "`echo $STRING | cut -f $INDEX -d -`" = "" ]; do
    
99.       INDEX=`expr $INDEX + 1`
    
100.     done
     
101.     INDEX=`expr $INDEX - 1` # don't include the null value
     
102.     # If we don't have four segments, return the old-style (or out of spec) package name:
     
103.     if [ "$INDEX" = "2" -o "$INDEX" = "3" ]; then
     
104.       echo $STRING
     
105.     else # we have four or more segments, so we'll consider this a new-style name:
     
106.       NAME=`expr $INDEX - 3`
     
107.       NAME="`echo $STRING | cut -f 1-$NAME -d -`"
     
108.       echo $NAME
     
109.       # cruft for later ;)
     
110.       #VER=`expr $INDEX - 2`
     
111.       #VER="`echo $STRING | cut -f $VER -d -`"
     
112.       #ARCH=`expr $INDEX - 1`
     
113.       #ARCH="`echo $STRING | cut -f $ARCH -d -`"
     
114.       #BUILD="`echo $STRING | cut -f $INDEX -d -`"
     
115.     fi
     
116.   fi
     
117. }
     
118. 
     
119. # Parse options:
     
120. MODE=install # standard text-mode
     
121. while [ 0 ]; do
     
122.   if [ "$1" = "-warn" ]; then
     
123.     MODE=warn
     
124.     shift 1
     
125.   elif [ "$1" = "-infobox" ]; then
     
126.     MODE=infobox
     
127.     shift 1
     
128.   elif [ "$1" = "-menu" ]; then
     
129.     MODE=menu
     
130.     shift 1
     
131.   elif [ "$1" = "-ask" ]; then
     
132.     ALWAYSASK="yes"
     
133.     shift 1
     
134.   elif [ "$1" = "-tagfile" ]; then
     
135.     if [ -r "$2" ]; then
     
136.       USERTAGFILE="$2"
     
137.     elif [ -r "`pwd`/$2" ]; then
     
138.       USERTAGFILE="`pwd`/$2"
     
139.     else
     
140.       usage
     
141.       exit
     
142.     fi
     
143.     shift 2
     
144.   elif [ "$1" = "-priority" ]; then
     
145.     if [ "$2" = "" ]; then
     
146.       usage
     
147.       exit
     
148.     fi
     
149.     USERPRIORITY="$2"
     
150.     shift 2
     
151.   elif [ "$1" = "-root" ]; then
     
152.     if [ "$2" = "" ]; then
     
153.       usage
     
154.       exit
     
155.     fi
     
156.     ROOT="$2"
     
157.     shift 2
     
158.   else
     
159.     break
     
160.   fi
     
161. done
     
162. 
     
163. # Set the prefix for the package database directories (packages, scripts).
     
164. ADM_DIR="$ROOT/var/log"
     
165. # If the directories don't exist, "initialize" the package database:
     
166. for PKGDBDIR in packages removed_packages removed_scripts scripts setup ; do
     
167.   if [ ! -d $ADM_DIR/$PKGDBDIR ]; then
     
168.     rm -rf $ADM_DIR/$PKGDBDIR # make sure it's not a symlink or something stupid
     
169.     mkdir -p $ADM_DIR/$PKGDBDIR
     
170.     chmod 755 $ADM_DIR/$PKGDBDIR
     
171.   fi
     
172. done
     
173. 
     
174. # Make sure there's a proper temp directory:
     
175. TMP=$ADM_DIR/setup/tmp
     
176. # If the $TMP directory doesn't exist, create it:
     
177. if [ ! -d $TMP ]; then
     
178.   rm -rf $TMP # make sure it's not a symlink or something stupid
     
179.   mkdir -p $TMP
     
180.   chmod 700 $TMP # no need to leave it open
     
181. fi
     
182. 
     
183. # usage(), exit if called with no arguments:
     
184. if [ $# = 0 ]; then
     
185.   usage;
     
186.   exit
     
187. fi
     
188. 
     
189. # If -warn mode was requested, produce the output and then exit:
     
190. if [ "$MODE" = "warn" ]; then
     
191.   while [ -f "$1" ]; do
     
192.     echo "#### Scanning the contents of $1..."
     
193.     mkdir -p $TMP/scan$$
     
194.     ( cd $TMP/scan$$ ; $TAR xzf - install ) < $1 2> /dev/null
     
195.     if [ -r $TMP/scan$$/install/doinst.sh ]; then
     
196.       if cat $TMP/scan$$/install/doinst.sh | grep ' rm -rf ' 1>/dev/null 2>/dev/null ; then
     
197.         cat $TMP/scan$$/install/doinst.sh | grep ' rm -rf ' > $TMP/scan$$/install/delete
     
198.         echo "The following locations will be completely WIPED OUT to allow symbolic"
     
199.         echo "links to be made. (We're talking 'rm -rf') These locations may be files,"
     
200.         echo "or entire directories.  Be sure you've backed up anything at these"
     
201.         echo "locations that you want to save before you install this package:"
     
202.         cat $TMP/scan$$/install/delete | cut -f 3,7 -d ' ' | tr ' ' '/'
     
203.       fi
     
204.       if [ -d $TMP/scan$$ ]; then
     
205.         ( cd $TMP/scan$$ ; rm -rf install ) 2> /dev/null
     
206.         ( cd $TMP ; rmdir scan$$ ) 2> /dev/null
     
207.       fi
     
208.     fi
     
209.     echo "The following files will be overwritten when installing this package."
     
210.     echo "Be sure they aren't important before you install this package:"
     
211.     ( $TAR tzvvf - ) < $1 | grep -v 'drwx'
     
212.     echo
     
213.     shift 1
     
214.   done
     
215.   exit
     
216. fi
     
217. 
     
218. # Main loop:
     
219. for package in $* ; do
     
220. 
     
221.   # If someone left off the .tgz, try to figure that out:
     
222.   if [ ! -r "$package" -a -r "$package.tgz" ]; then
     
223.     package=$package.tgz
     
224.   fi
     
225. 
     
226.   # "shortname" isn't really THAT short... it's just the full name without ".tgz"
     
227.   shortname="`basename $package .tgz`"
     
228.   packagedir="`dirname $package`"
     
229.   # This is the base package name, used for grepping tagfiles and descriptions:
     
230.   packagebase="`package_name $shortname`"
     
231. 
     
232.   # Reject package if it does not end in '.tgz':
     
233.   if [ ! -r "`dirname $package`/$shortname.tgz" ]; then
     
234.     EXITSTATUS=3
     
235.     if [ "$MODE" = "install" ]; then
     
236.       echo "Cannot install $package: package does not end in .tgz"
     
237.     fi
     
238.     continue;
     
239.   fi
     
240. 
     
241.   # Determine package's priority:
     
242.   unset PRIORITY
     
243.   if [ "$USERPRIORITY" = "" ]; then
     
244.     if [ "$USERTAGFILE" = "" ]; then
     
245.       TAGFILE="`dirname $package`/tagfile"   
     
246.     else
     
247.       TAGFILE="$USERTAGFILE"
     
248.     fi
     
249.     if [ ! -r "$TAGFILE" ]; then
     
250.       TAGFILE=/dev/null
     
251.     fi
     
252.     if grep "^$packagebase:" "$TAGFILE" | grep ADD > /dev/null 2> /dev/null ; then
     
253.       PRIORITY="ADD"
     
254.     elif grep "^$packagebase:" "$TAGFILE" | grep REC > /dev/null 2> /dev/null ; then
     
255.       PRIORITY="REC"
     
256.     elif grep "^$packagebase:" "$TAGFILE" | grep OPT > /dev/null 2> /dev/null ; then
     
257.       PRIORITY="OPT"
     
258.     elif grep "^$packagebase:" "$TAGFILE" | grep SKP > /dev/null 2> /dev/null ; then
     
259.       PRIORITY="SKP"
     
260.     fi
     
261.   else
     
262.     PRIORITY="$USERPRIORITY"
     
263.   fi
     
264.   if [ "$PRIORITY" = "ADD" ]; then
     
265.     #PMSG="Priority: [required]"
     
266.     PMSG="[required]"
     
267.   elif [ "$PRIORITY" = "REC" ]; then
     
268.     #PMSG="Priority: [recommended]"
     
269.     PMSG="[recommended]"
     
270.   elif [ "$PRIORITY" = "OPT" ]; then
     
271.     #PMSG="Priority: [optional]"
     
272.     PMSG="[optional]"
     
273.   elif [ "$PRIORITY" = "SKP" ]; then
     
274.     #PMSG="Priority: [skip]"
     
275.     PMSG="[skip]"
     
276.   else
     
277.     #PMSG="Priority: [unknown]"
     
278.     PMSG=""
     
279.   fi
     
280. 
     
281.   # Locate package description file:
     
282.   DESCRIPTION="/dev/null"
     
283.   # First check the usual locations outside the package, since this is faster:
     
284.   for file in $packagedir/disk* $packagedir/package_descriptions $packagedir/$shortname.txt $packagedir/$packagebase.txt ; do
     
285.     if grep "^$packagebase:" "$file" 1> /dev/null 2> /dev/null ; then
     
286.       DESCRIPTION="$file"
     
287.     elif grep "^$shortname:" "$file" 1> /dev/null 2> /dev/null ; then
     
288.       DESCRIPTION="$file"
     
289.     fi
     
290.   done
     
291.   # If we still don't have anything, look inside the package.  This requires a costly untar.
     
292.   if [ "$DESCRIPTION" = "/dev/null" ]; then
     
293.     mkdir -p $TMP/scan$$
     
294.     ( cd $TMP/scan$$ ; $TAR xzf - install ) < $package 2> /dev/null
     
295.     if grep "^$packagebase:" "$TMP/scan$$/install/slack-desc" 1> /dev/null 2> /dev/null ; then
     
296.       DESCRIPTION="$TMP/scan$$/install/slack-desc"
     
297.     elif grep "^$shortname:" "$TMP/scan$$/install/slack-desc" 1> /dev/null 2> /dev/null ; then
     
298.       DESCRIPTION="$TMP/scan$$/install/slack-desc"
     
299.     fi
     
300.   fi
     
301. 
     
302.   # Simple package integrity check:
     
303.   if [ ! -f $package ]; then
     
304.     EXITSTATUS=4
     
305.     if [ "$MODE" = "install" ]; then
     
306.       echo "Cannot install $package: package is not a regular file"
     
307.     fi
     
308.     continue;
     
309.   fi
     
310.   gzip -l $package 1> /dev/null 2> /dev/null
     
311.   if [ ! "$?" = "0" ]; then
     
312.     EXITSTATUS=2 # failed gzip -l
     
313.     if [ "$MODE" = "install" ]; then
     
314.       echo "Cannot install $package: package is corrupt (failed 'gzip -l $package')"
     
315.     fi
     
316.     continue;
     
317.   fi
     
318. 
     
319.   # Collect the package information into a temp file:
     
320.   COMPRESSED=`gzip -l $package | grep -v uncompressed_name | crunch | cut -f 1 -d ' '`
     
321.   UNCOMPRESSED=`gzip -l $package | grep -v uncompressed_name | crunch | cut -f 2 -d ' '`
     
322.   COMPRESSED="`expr $COMPRESSED / 1024` K"
     
323.   UNCOMPRESSED="`expr $UNCOMPRESSED / 1024` K"
     
324. #  MD5SUM=`md5sum $package | cut -f 1 -d ' '`
     
325.   cat $DESCRIPTION | grep "^$packagebase:" | cut -f 2- -d : | cut -b2- 1> $TMP/tmpmsg$$ 2> /dev/null
     
326.   if [ "$shortname" != "$packagebase" ]; then
     
327.     cat $DESCRIPTION | grep "^$shortname:" | cut -f 2- -d : | cut -b2- 1>> $TMP/tmpmsg$$ 2> /dev/null
     
328.   fi
     
329.   # Adjust the length here.  This allows a slack-desc to be any size up to 13 lines instead of fixed at 11.
     
330.   LENGTH=`cat $TMP/tmpmsg$$ | wc -l`
     
331.   while [ $LENGTH -lt 12 ]; do
     
332.     echo >> $TMP/tmpmsg$$
     
333.     LENGTH=`expr $LENGTH + 1`
     
334.   done
     
335.   echo "Size: Compressed: $COMPRESSED, uncompressed: $UNCOMPRESSED." >> $TMP/tmpmsg$$
     
336.   # For recent versions of dialog it is necessary to add \n to the end of each line
     
337.   # or it will remove repeating spaces and mess up our careful formatting:
     
338.   cat << EOF > $TMP/controlns$$
     
339. \n
     
340. \n
     
341. \n
     
342. \n
     
343. \n
     
344. \n
     
345. \n
     
346. \n
     
347. \n
     
348. \n
     
349. \n
     
350. \n
     
351. \n
     
352. EOF
     
353.   paste -d "" $TMP/tmpmsg$$ $TMP/controlns$$ > $TMP/pasted$$
     
354.   rm -f $TMP/controlns$$
     
355.   mv $TMP/pasted$$ $TMP/tmpmsg$$
     
356.   # Emit information to the console:
     
357.   if [ "$MODE" = "install" ]; then
     
358.     if [ "$PMSG" = "" ]; then
     
359.       echo "Installing package $shortname... "
     
360.     else
     
361.       echo "Installing package $shortname ($PMSG)... "
     
362.     fi
     
363.     echo "PACKAGE DESCRIPTION:"
     
364.     cat $DESCRIPTION | grep "^$packagebase:" | uniq
     
365.     if [ "$shortname" != "$packagebase" ]; then
     
366.       cat $DESCRIPTION | grep "^$shortname:" | uniq
     
367.     fi
     
368.   elif [ "$MODE" = "infobox" -a ! "$PRIORITY" = "SKP" ]; then # install non-SKP infobox package
     
369.     dialog --title "Installing package ==>$shortname<== $PMSG" --infobox "`cat $TMP/tmpmsg$$`" 0 0
     
370.   elif [ "$MODE" = "menu" -a "$PRIORITY" = "ADD" -a ! "$ALWAYSASK" = "yes" ]; then # ADD overrides menu mode unless -ask was used
     
371.     dialog --title "Installing package ==>$shortname<== $PMSG" --infobox "`cat $TMP/tmpmsg$$`" 0 0
     
372.   elif [ "$MODE" = "menu" -a "$PRIORITY" = "SKP" -a ! "$ALWAYSASK" = "yes" ]; then # SKP overrides menu mode unless -ask used
     
373.     rm -f $TMP/tmpmsg$$
     
374.     continue # next package
     
375.   elif [ "$MODE" = "infobox" -a "$PRIORITY" = "SKP" -a ! "$ALWAYSASK" = "yes" ]; then # SKP overrides infobox mode, too
     
376.     rm -f $TMP/tmpmsg$$
     
377.     continue
     
378.   else # we must need a full menu:
     
379.     dialog --title "Package Name: ==>$shortname<== $PMSG" --menu "`cat $TMP/tmpmsg$$`" 0 0 3 \
     
380.     "Yes" "Install package $shortname" \
     
381.     "No" "Do not install package $shortname" \
     
382.     "Quit" "Abort software installation completely" 2> $TMP/reply$$
     
383.     if [ ! $? = 0 ]; then
     
384.       echo "No" > $TMP/reply$$
     
385.     fi
     
386.     REPLY="`cat $TMP/reply$$`"
     
387.     rm -f $TMP/reply$$ $TMP/tmpmsg$$
     
388.     if [ "$REPLY" = "Quit" ]; then
     
389.       exit 99 # EXIT STATUS 99 = ABORT!
     
390.     elif [ "$REPLY" = "No" ]; then
     
391.       continue # skip the package
     
392.     fi
     
393.   fi
     
394. 
     
395.   # Test tarball integrity, and make sure we're not installing files on top of existing symbolic links:
     
396.   $TAR tzf $package 1> $TMP/tmplist$$ 2> /dev/null
     
397.   TARERROR=$?
     
398.   if [ ! "$TARERROR" = "0" ]; then
     
399.     EXITSTATUS=1 # tar file corrupt
     
400.     if [ "$MODE" = "install" ]; then
     
401.       echo "Unable to install $package: tar archive is corrupt (tar returned error code $TARERROR)"
     
402.     fi
     
403.     rm -f $TMP/tmplist$$
     
404.     continue
     
405.   fi
     
406.   cat $TMP/tmplist$$ | grep -v "/$" | while read file ; do
     
407.     if [ -L "$ROOT/$file" ]; then
     
408.       rm -f "$ROOT/$file"
     
409.     fi
     
410.   done
     
411.   rm -f $TMP/tmplist$$
     
412. 
     
413.   # Write the package file database entry and install the package:
     
414.   echo "PACKAGE NAME:     $shortname" > $ADM_DIR/packages/$shortname
     
415.   echo "COMPRESSED PACKAGE SIZE:     $COMPRESSED" >> $ADM_DIR/packages/$shortname
     
416.   echo "UNCOMPRESSED PACKAGE SIZE:     $UNCOMPRESSED" >> $ADM_DIR/packages/$shortname
     
417.   echo "PACKAGE LOCATION: $package" >> $ADM_DIR/packages/$shortname
     
418. #  echo "PACKAGE MD5SUM: $MD5SUM" >> $ADM_DIR/packages/$shortname
     
419.   echo "PACKAGE DESCRIPTION:" >> $ADM_DIR/packages/$shortname
     
420.   cat $DESCRIPTION | grep "^$packagebase:" >> $ADM_DIR/packages/$shortname 2> /dev/null
     
421.   if [ "$shortname" != "$packagebase" ]; then
     
422.     cat $DESCRIPTION | grep "^$shortname:" >> $ADM_DIR/packages/$shortname 2> /dev/null
     
423.   fi
     
424.   echo "FILE LIST:" >> $ADM_DIR/packages/$shortname
     
425.   ( cd $ROOT/ ; $TAR -xzlUpvf - ) < $package >> $TMP/$shortname 2> /dev/null
     
426.   if [ "`cat $TMP/$shortname | grep '^./' | wc -l | tr -d ' '`" = "1" ]; then
     
427.     # Good.  We have a package that meets the Slackware spec.
     
428.     cat $TMP/$shortname >> $ADM_DIR/packages/$shortname
     
429.   else
     
430.     # Some dumb bunny built a package with something other than makepkg.  Bad!
     
431.     # Oh well.  Bound to happen.  Par for the course.  Fix it and move on...
     
432.     echo './' >> $ADM_DIR/packages/$shortname
     
433.     cat $TMP/$shortname | grep -v '^./$' | cut -b3- >> $ADM_DIR/packages/$shortname
     
434.   fi
     
435.   rm -f $TMP/$shortname
     
436. 
     
437.   if [ -x /sbin/ldconfig ]; then
     
438.     /sbin/ldconfig
     
439.   fi
     
440.   if [ -f $ROOT/install/doinst.sh ]; then
     
441.     if [ "$MODE" = "install" ]; then
     
442.       echo "Executing install script for $shortname..."
     
443.     fi
     
444.     ( cd $ROOT/ ; sh install/doinst.sh -install; )
     
445.   fi
     
446.   # Clean up the mess...
     
447.   if [ -d $ROOT/install ]; then
     
448.     if [ -r $ROOT/install/doinst.sh ]; then
     
449.       cp $ROOT/install/doinst.sh $ADM_DIR/scripts/$shortname
     
450.       chmod 755 $ADM_DIR/scripts/$shortname
     
451.     fi
     
452.     # /install/doinst.sh and /install/slack-* are reserved locations for the package system.
     
453.     ( cd $ROOT/install ; rm -f doinst.sh slack-* 1> /dev/null 2>&1 )
     
454.     rmdir $ROOT/install 1> /dev/null 2>&1
     
455.   fi
     
456.   # If we used a scan directory, get rid of it:
     
457.   if [ -d "$TMP/scan$$" ]; then
     
458.     rm -rf "$TMP/scan$$"
     
459.   fi
     
460.   rm -f $TMP/tmpmsg$$ $TMP/reply$$
     
461.   if [ "$MODE" = "install" ]; then
     
462.     echo
     
463.   fi
     
464. done
     
465. 
     
466. exit $EXITSTATUS
     

复制代码

KornLee

确实经典
我已经将您发布的脚本放在了[欣赏区],供兄弟们学习阅读!