← Back to branch summary

~ubuntu-branches/ubuntu/karmic/grace/karmic

« back to all changes in this revision

Viewing changes to ac-tools/shtool

  • Committer: Bazaar Package Importer
  • Author(s): Torsten Werner
  • Date: 2002-03-19 14:19:58 UTC
  • Revision ID: james.westby@ubuntu.com-20020319141958-5gxna6vo1ek3zjml
Tags: upstream-5.1.7
Import upstream version 5.1.7

Show diffs side-by-side

added added

removed removed

Lines of Context:
ac-tools/shtool
 
1
#!/bin/sh
 
2
##
 
3
##  GNU shtool -- The GNU Portable Shell Tool
 
4
##  Copyright (c) 1994-2001 Ralf S. Engelschall <rse@engelschall.com>
 
5
##
 
6
##  See http://www.gnu.org/software/shtool/ for more information.
 
7
##  See ftp://ftp.gnu.org/gnu/shtool/ for latest version.
 
8
##
 
9
##  Version:  1.5.2 (27-Feb-2001)
 
10
##  Contents: 3/17 available modules
 
11
##
 
12
 
 
13
##
 
14
##  This program is free software; you can redistribute it and/or modify
 
15
##  it under the terms of the GNU General Public License as published by
 
16
##  the Free Software Foundation; either version 2 of the License, or
 
17
##  (at your option) any later version.
 
18
##
 
19
##  This program is distributed in the hope that it will be useful,
 
20
##  but WITHOUT ANY WARRANTY; without even the implied warranty of
 
21
##  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
 
22
##  General Public License for more details.
 
23
##
 
24
##  You should have received a copy of the GNU General Public License
 
25
##  along with this program; if not, write to the Free Software
 
26
##  Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307,
 
27
##  USA, or contact Ralf S. Engelschall <rse@engelschall.com>.
 
28
##
 
29
##  Notice: Given that you include this file verbatim into your own
 
30
##  source tree, you are justified in saying that it remains separate
 
31
##  from your package, and that this way you are simply just using GNU
 
32
##  shtool. So, in this situation, there is no requirement that your
 
33
##  package itself is licensed under the GNU General Public License in
 
34
##  order to take advantage of GNU shtool.
 
35
##
 
36
 
 
37
##
 
38
##  Usage: shtool [<options>] [<cmd-name> [<cmd-options>] [<cmd-args>]]
 
39
##
 
40
##  Available commands:
 
41
##    install    Install a program, script or datafile
 
42
##    mkdir      Make one or more directories
 
43
##    mkshadow   Make a shadow tree through symbolic links
 
44
##
 
45
##  Not available commands (because module was not built-in):
 
46
##    echo       Print string with optional construct expansion
 
47
##    mdate      Pretty-print modification time of a file or dir
 
48
##    table      Pretty-print a field-separated list as a table
 
49
##    prop       Display progress with a running propeller
 
50
##    move       Move files with simultaneous substitution
 
51
##    mkln       Make link with calculation of relative paths
 
52
##    fixperm    Fix file permissions inside a source tree
 
53
##    tarball    Roll distribution tarballs
 
54
##    guessos    Simple operating system guesser
 
55
##    arx        Extended archive command
 
56
##    slo        Separate linker options by library class
 
57
##    scpp       Sharing C Pre-Processor
 
58
##    version    Maintain a version information file
 
59
##    path       Deal with program paths
 
60
##
 
61
 
 
62
if [ $# -eq 0 ]; then
 
63
    echo "$0:Error: invalid command line" 1>&2
 
64
    echo "$0:Hint:  run \`$0 -h' for usage" 1>&2
 
65
    exit 1
 
66
fi
 
67
if [ ".$1" = ".-h" -o ".$1" = ".--help" ]; then
 
68
    echo "This is GNU shtool, version 1.5.2 (27-Feb-2001)"
 
69
    echo "Copyright (c) 1994-2001 Ralf S. Engelschall <rse@engelschall.com>"
 
70
    echo "Report bugs to <bug-shtool@gnu.org>"
 
71
    echo ''
 
72
    echo "Usage: shtool [<options>] [<cmd-name> [<cmd-options>] [<cmd-args>]]" 
 
73
    echo ''
 
74
    echo 'Available global <options>:'
 
75
    echo '  -v, --version   display shtool version information'
 
76
    echo '  -h, --help      display shtool usage help page (this one)'
 
77
    echo '  -d, --debug     display shell trace information'
 
78
    echo '  -r, --recreate  recreate this shtool script via shtoolize'
 
79
    echo ''
 
80
    echo 'Available <cmd-name> [<cmd-options>] [<cmd-args>]:'
 
81
    echo '  install  [-v] [-t] [-c] [-C] [-s] [-m<mode>] [-o<owner>] [-g<group>]'
 
82
    echo '           [-e<sed-cmd>] <file> [<file> ...] <path>'
 
83
    echo '  mkdir    [-t] [-f] [-p] [-m<mode>] <dir> [<dir> ...]'
 
84
    echo '  mkshadow [-v] [-t] [-a] <src-dir> <dst-dir>'
 
85
    echo ''
 
86
    echo 'Not available <cmd-name> (because module was not built-in):'
 
87
    echo '  echo     [-n] [-e] [<str> ...]'
 
88
    echo '  mdate    [-n] [-z] [-s] [-d] [-f<str>] [-o<spec>] <path>'
 
89
    echo '  table    [-F<sep>] [-w<width>] [-c<cols>] [-s<strip>] <str><sep><str>...'
 
90
    echo '  prop     [-p<str>]'
 
91
    echo '  move     [-v] [-t] [-e] [-p] <src-file> <dst-file>'
 
92
    echo '  mkln     [-t] [-f] [-s] <src-path> [<src-path> ...] <dst-path>'
 
93
    echo '  fixperm  [-v] [-t] <path> [<path> ...]'
 
94
    echo '  tarball  [-t] [-v] [-o <tarball>] [-c <prog>] [-d <dir>] [-u'
 
95
    echo '           <user>] [-g <group>] [-e <pattern>] <path> [<path> ...]'
 
96
    echo '  guessos  '
 
97
    echo '  arx      [-t] [-C<cmd>] <op> <archive> [<file> ...]'
 
98
    echo '  slo      [-p<str>] -- -L<dir> -l<lib> [-L<dir> -l<lib> ...]'
 
99
    echo '  scpp     [-v] [-p] [-f<filter>] [-o<ofile>] [-t<tfile>] [-M<mark>]'
 
100
    echo '           [-D<dname>] [-C<cname>] <file> [<file> ...]'
 
101
    echo '  version  [-l<lang>] [-n<name>] [-p<prefix>] [-s<version>] [-e]'
 
102
    echo '           [-i<knob>] [-d<type>] <file>'
 
103
    echo '  path     [-s] [-r] [-d] [-b] [-m] [-p<path>] <str> [<str> ...]'
 
104
    echo ''
 
105
    exit 0
 
106
fi
 
107
if [ ".$1" = ".-v" -o ".$1" = ."--version" ]; then
 
108
    echo "GNU shtool 1.5.2 (27-Feb-2001)"
 
109
    exit 0
 
110
fi
 
111
if [ ".$1" = ".-r" -o ".$1" = ."--recreate" ]; then
 
112
    shtoolize -oshtool install mkdir mkshadow
 
113
    exit 0
 
114
fi
 
115
if [ ".$1" = ".-d" -o ".$1" = ."--debug" ]; then
 
116
    shift
 
117
    set -x
 
118
fi
 
119
name=`echo "$0" | sed -e 's;.*/\([^/]*\)$;\1;' -e 's;-sh$;;' -e 's;\.sh$;;'`
 
120
case "$name" in
 
121
    install|mkdir|mkshadow )
 
122
        #   implicit tool command selection
 
123
        tool="$name"
 
124
        ;;
 
125
    * )
 
126
        #   explicit tool command selection
 
127
        tool="$1"
 
128
        shift
 
129
        ;;
 
130
esac
 
131
arg_spec=""
 
132
opt_spec=""
 
133
gen_tmpfile=no
 
134
 
 
135
##
 
136
##  DISPATCH INTO SCRIPT PROLOG
 
137
##
 
138
 
 
139
case $tool in
 
140
    install )
 
141
        str_tool="install"
 
142
        str_usage="[-v] [-t] [-c] [-C] [-s] [-m<mode>] [-o<owner>] [-g<group>] [-e<sed-cmd>] <file> [<file> ...] <path>"
 
143
        arg_spec="2+"
 
144
        opt_spec="v.t.c.C.s.m:o:g:e+"
 
145
        opt_v=no
 
146
        opt_t=no
 
147
        opt_c=no
 
148
        opt_C=no
 
149
        opt_s=no
 
150
        opt_m="0755"
 
151
        opt_o=""
 
152
        opt_g=""
 
153
        opt_e=""
 
154
        ;;
 
155
    mkdir )
 
156
        str_tool="mkdir"
 
157
        str_usage="[-t] [-f] [-p] [-m<mode>] <dir> [<dir> ...]"
 
158
        arg_spec="1+"
 
159
        opt_spec="t.f.p.m:"
 
160
        opt_t=no
 
161
        opt_f=no
 
162
        opt_p=no
 
163
        opt_m=""
 
164
        ;;
 
165
    mkshadow )
 
166
        str_tool="mkshadow"
 
167
        str_usage="[-v] [-t] [-a] <src-dir> <dst-dir>"
 
168
        arg_spec="2="
 
169
        opt_spec="v.t.a."
 
170
        opt_v=no
 
171
        opt_t=no
 
172
        opt_a=no
 
173
        ;;
 
174
    -* )
 
175
        echo "$0:Error: unknown option \`$tool'" 2>&1
 
176
        echo "$0:Hint:  run \`$0 -h' for usage" 2>&1
 
177
        exit 1
 
178
        ;;
 
179
    * )
 
180
        echo "$0:Error: unknown command \`$tool'" 2>&1
 
181
        echo "$0:Hint:  run \`$0 -h' for usage" 2>&1
 
182
        exit 1
 
183
        ;;
 
184
esac
 
185
 
 
186
##
 
187
##  COMMON UTILITY CODE
 
188
##
 
189
 
 
190
#   determine name of tool
 
191
if [ ".$tool" != . ]; then
 
192
    #   used inside shtool script
 
193
    toolcmd="$0 $tool"
 
194
    toolcmdhelp="shtool $tool"
 
195
    msgprefix="shtool:$tool"
 
196
else
 
197
    #   used as standalone script
 
198
    toolcmd="$0"
 
199
    toolcmdhelp="sh $0"
 
200
    msgprefix="$str_tool"
 
201
fi
 
202
 
 
203
#   parse argument specification string
 
204
eval `echo $arg_spec |\
 
205
      sed -e 's/^\([0-9]*\)\([+=]\)/arg_NUMS=\1; arg_MODE=\2/'`
 
206
 
 
207
#   parse option specification string
 
208
eval `echo h.$opt_spec |\
 
209
      sed -e 's/\([a-zA-Z0-9]\)\([.:+]\)/opt_MODE_\1=\2;/g'`
 
210
 
 
211
#   interate over argument line
 
212
opt_PREV=''
 
213
while [ $# -gt 0 ]; do
 
214
    #   special option stops processing
 
215
    if [ ".$1" = ".--" ]; then
 
216
        shift
 
217
        break
 
218
    fi
 
219
 
 
220
    #   determine option and argument
 
221
    opt_ARG_OK=no
 
222
    if [ ".$opt_PREV" != . ]; then
 
223
        #   merge previous seen option with argument
 
224
        opt_OPT="$opt_PREV"
 
225
        opt_ARG="$1"
 
226
        opt_ARG_OK=yes
 
227
        opt_PREV=''
 
228
    else
 
229
        #   split argument into option and argument
 
230
        case "$1" in
 
231
            -[a-zA-Z0-9]*)
 
232
                eval `echo "x$1" |\
 
233
                      sed -e 's/^x-\([a-zA-Z0-9]\)/opt_OPT="\1";/' \
 
234
                          -e 's/";\(.*\)$/"; opt_ARG="\1"/'`
 
235
                ;;
 
236
            -[a-zA-Z0-9])
 
237
                opt_OPT=`echo "x$1" | cut -c3-`
 
238
                opt_ARG=''
 
239
                ;;
 
240
            *)
 
241
                break
 
242
                ;;
 
243
        esac
 
244
    fi
 
245
 
 
246
    #   eat up option
 
247
    shift
 
248
 
 
249
    #   determine whether option needs an argument
 
250
    eval "opt_MODE=\$opt_MODE_${opt_OPT}"
 
251
    if [ ".$opt_ARG" = . -a ".$opt_ARG_OK" != .yes ]; then
 
252
        if [ ".$opt_MODE" = ".:" -o ".$opt_MODE" = ".+" ]; then
 
253
            opt_PREV="$opt_OPT"
 
254
            continue
 
255
        fi
 
256
    fi
 
257
 
 
258
    #   process option
 
259
    case $opt_MODE in
 
260
        '.' )
 
261
            #   boolean option
 
262
            eval "opt_${opt_OPT}=yes"
 
263
            ;;
 
264
        ':' )
 
265
            #   option with argument (multiple occurances override)
 
266
            eval "opt_${opt_OPT}=\"\$opt_ARG\""
 
267
            ;;
 
268
        '+' )
 
269
            #   option with argument (multiple occurances append)
 
270
            eval "opt_${opt_OPT}=\"\$opt_${opt_OPT} \$opt_ARG\""
 
271
            ;;
 
272
        * )
 
273
            echo "$msgprefix:Error: unknown option: \`-$opt_OPT'" 1>&2
 
274
            echo "$msgprefix:Hint:  run \`$toolcmdhelp -h' or \`man shtool' for details" 1>&2
 
275
            exit 1
 
276
            ;;
 
277
    esac
 
278
done
 
279
if [ ".$opt_PREV" != . ]; then
 
280
    echo "$msgprefix:Error: missing argument to option \`-$opt_PREV'" 1>&2
 
281
    echo "$msgprefix:Hint:  run \`$toolcmdhelp -h' or \`man shtool' for details" 1>&2
 
282
    exit 1
 
283
fi
 
284
 
 
285
#   process help option
 
286
if [ ".$opt_h" = .yes ]; then
 
287
    echo "Usage: $toolcmdhelp $str_usage"
 
288
    exit 0
 
289
fi
 
290
 
 
291
#   complain about incorrect number of arguments
 
292
case $arg_MODE in
 
293
    '=' )
 
294
        if [ $# -ne $arg_NUMS ]; then
 
295
            echo "$msgprefix:Error: invalid number of arguments (exactly $arg_NUMS expected)" 1>&2
 
296
            echo "$msgprefix:Hint:  run \`$toolcmd -h' or \`man shtool' for details" 1>&2
 
297
            exit 1
 
298
        fi
 
299
        ;;
 
300
    '+' )
 
301
        if [ $# -lt $arg_NUMS ]; then
 
302
            echo "$msgprefix:Error: invalid number of arguments (at least $arg_NUMS expected)" 1>&2
 
303
            echo "$msgprefix:Hint:  run \`$toolcmd -h' or \`man shtool' for details" 1>&2
 
304
            exit 1
 
305
        fi
 
306
        ;;
 
307
esac
 
308
 
 
309
#   establish a temporary file on request
 
310
if [ ".$gen_tmpfile" = .yes ]; then
 
311
    if [ ".$TMPDIR" != . ]; then
 
312
        tmpdir="$TMPDIR"
 
313
    elif [ ".$TEMPDIR" != . ]; then
 
314
        tmpdir="$TEMPDIR"
 
315
    else
 
316
        tmpdir="/tmp"
 
317
    fi
 
318
    tmpfile="$tmpdir/.shtool.$$"
 
319
    rm -f $tmpfile >/dev/null 2>&1
 
320
    touch $tmpfile
 
321
    chmod 600 $tmpfile
 
322
fi
 
323
 
 
324
##
 
325
##  DISPATCH INTO SCRIPT BODY
 
326
##
 
327
 
 
328
case $tool in
 
329
 
 
330
install )
 
331
    ##
 
332
    ##  install -- Install a program, script or datafile
 
333
    ##  Copyright (c) 1997-2001 Ralf S. Engelschall <rse@engelschall.com>
 
334
    ##  Originally written for shtool
 
335
    ##
 
336
    
 
337
    #   determine source(s) and destination 
 
338
    argc=$#
 
339
    srcs=""
 
340
    while [ $# -gt 1 ]; do
 
341
        srcs="$srcs $1"
 
342
        shift
 
343
    done
 
344
    dstpath="$1"
 
345
    
 
346
    #   type check for destination
 
347
    dstisdir=0
 
348
    if [ -d $dstpath ]; then
 
349
        dstpath=`echo "$dstpath" | sed -e 's:/$::'`
 
350
        dstisdir=1
 
351
    fi
 
352
    
 
353
    #   consistency check for destination
 
354
    if [ $argc -gt 2 -a $dstisdir = 0 ]; then
 
355
        echo "$msgprefix:Error: multiple sources require destination to be directory" 1>&2
 
356
        exit 1
 
357
    fi
 
358
    
 
359
    #   iterate over all source(s)
 
360
    for src in $srcs; do
 
361
        dst=$dstpath
 
362
    
 
363
        #   if destination is a directory, append the input filename
 
364
        if [ $dstisdir = 1 ]; then
 
365
            dstfile=`echo "$src" | sed -e 's;.*/\([^/]*\)$;\1;'`
 
366
            dst="$dst/$dstfile"
 
367
        fi
 
368
    
 
369
        #   check for correct arguments
 
370
        if [ ".$src" = ".$dst" ]; then
 
371
            echo "$msgprefix:Warning: source and destination are the same - skipped" 1>&2
 
372
            continue
 
373
        fi
 
374
        if [ -d "$src" ]; then
 
375
            echo "$msgprefix:Warning: source \`$src' is a directory - skipped" 1>&2
 
376
            continue
 
377
        fi
 
378
    
 
379
        #   make a temp file name in the destination directory
 
380
        dsttmp=`echo $dst |\
 
381
                sed -e 's;[^/]*$;;' -e 's;\(.\)/$;\1;' -e 's;^$;.;' \
 
382
                    -e "s;\$;/#INST@$$#;"`
 
383
    
 
384
        #   verbosity
 
385
        if [ ".$opt_v" = .yes ]; then
 
386
            echo "$src -> $dst" 1>&2
 
387
        fi
 
388
    
 
389
        #   copy or move the file name to the temp name
 
390
        #   (because we might be not allowed to change the source)
 
391
        if [ ".$opt_C" = .yes ]; then
 
392
            opt_c=yes
 
393
        fi
 
394
        if [ ".$opt_c" = .yes ]; then
 
395
            if [ ".$opt_t" = .yes ]; then
 
396
                echo "cp $src $dsttmp" 1>&2
 
397
            fi
 
398
            cp $src $dsttmp || exit $?
 
399
        else
 
400
            if [ ".$opt_t" = .yes ]; then
 
401
                echo "mv $src $dsttmp" 1>&2
 
402
            fi
 
403
            mv $src $dsttmp || exit $?
 
404
        fi
 
405
    
 
406
        #   adjust the target file
 
407
        if [ ".$opt_e" != . ]; then
 
408
            sed='sed'
 
409
            for e in $opt_e; do
 
410
                sed="$sed -e '$e'"
 
411
            done
 
412
            cp $dsttmp $dsttmp.old
 
413
            eval "$sed <$dsttmp.old >$dsttmp" || exit $?
 
414
            rm -f $dsttmp.old
 
415
        fi
 
416
        if [ ".$opt_s" = .yes ]; then
 
417
            if [ ".$opt_t" = .yes ]; then
 
418
                echo "strip $dsttmp" 1>&2
 
419
            fi
 
420
            strip $dsttmp || exit $?
 
421
        fi
 
422
        if [ ".$opt_o" != . ]; then
 
423
            if [ ".$opt_t" = .yes ]; then
 
424
                echo "chown $opt_o $dsttmp" 1>&2
 
425
            fi
 
426
            chown $opt_o $dsttmp || exit $?
 
427
        fi
 
428
        if [ ".$opt_g" != . ]; then
 
429
            if [ ".$opt_t" = .yes ]; then
 
430
                echo "chgrp $opt_g $dsttmp" 1>&2
 
431
            fi
 
432
            chgrp $opt_g $dsttmp || exit $?
 
433
        fi
 
434
        if [ ".$opt_m" != ".-" ]; then
 
435
            if [ ".$opt_t" = .yes ]; then
 
436
                echo "chmod $opt_m $dsttmp" 1>&2
 
437
            fi
 
438
            chmod $opt_m $dsttmp || exit $?
 
439
        fi
 
440
    
 
441
        #   determine whether to do a quick install
 
442
        #   (has to be done _after_ the strip was already done)
 
443
        quick=no
 
444
        if [ ".$opt_C" = .yes ]; then
 
445
            if [ -r $dst ]; then
 
446
                if cmp -s $src $dst; then
 
447
                    quick=yes
 
448
                fi
 
449
            fi
 
450
        fi
 
451
    
 
452
        #   finally, install the file to the real destination
 
453
        if [ $quick = yes ]; then
 
454
            if [ ".$opt_t" = .yes ]; then
 
455
                echo "rm -f $dsttmp" 1>&2
 
456
            fi
 
457
            rm -f $dsttmp
 
458
        else
 
459
            if [ ".$opt_t" = .yes ]; then
 
460
                echo "rm -f $dst && mv $dsttmp $dst" 1>&2
 
461
            fi
 
462
            rm -f $dst && mv $dsttmp $dst
 
463
        fi
 
464
    done
 
465
    ;;
 
466
 
 
467
mkdir )
 
468
    ##
 
469
    ##  mkdir -- Make one or more directories
 
470
    ##  Copyright (c) 1996-2001 Ralf S. Engelschall <rse@engelschall.com>
 
471
    ##  Originally written for public domain by Noah Friedman <friedman@prep.ai.mit.edu>
 
472
    ##  Cleaned up and enhanced for shtool
 
473
    ##
 
474
    
 
475
    errstatus=0
 
476
    for p in ${1+"$@"}; do
 
477
        #   if the directory already exists...
 
478
        if [ -d "$p" ]; then
 
479
            if [ ".$opt_f" = .no -a ".$opt_p" = .no ]; then
 
480
                echo "$msgprefix:Error: directory already exists: $p" 1>&2
 
481
                errstatus=1
 
482
                break
 
483
            else
 
484
                continue
 
485
            fi
 
486
        fi
 
487
        #   if the directory has to be created...
 
488
        if [ ".$opt_p" = .no ]; then
 
489
            if [ ".$opt_t" = .yes ]; then
 
490
                echo "mkdir $p" 1>&2
 
491
            fi
 
492
            mkdir $p || errstatus=$?
 
493
        else
 
494
            #   the smart situation
 
495
            set fnord `echo ":$p" |\
 
496
                       sed -e 's/^:\//%/' \
 
497
                           -e 's/^://' \
 
498
                           -e 's/\// /g' \
 
499
                           -e 's/^%/\//'`
 
500
            shift
 
501
            pathcomp=''
 
502
            for d in ${1+"$@"}; do
 
503
                pathcomp="$pathcomp$d"
 
504
                case "$pathcomp" in
 
505
                    -* ) pathcomp="./$pathcomp" ;;
 
506
                esac
 
507
                if [ ! -d "$pathcomp" ]; then
 
508
                    if [ ".$opt_t" = .yes ]; then
 
509
                        echo "mkdir $pathcomp" 1>&2
 
510
                    fi
 
511
                    mkdir $pathcomp || errstatus=$?
 
512
                    if [ ".$opt_m" != . ]; then
 
513
                        if [ ".$opt_t" = .yes ]; then
 
514
                            echo "chmod $opt_m $pathcomp" 1>&2
 
515
                        fi
 
516
                        chmod $opt_m $pathcomp || errstatus=$?
 
517
                    fi
 
518
                fi
 
519
                pathcomp="$pathcomp/"
 
520
            done
 
521
        fi
 
522
    done
 
523
    exit $errstatus
 
524
    ;;
 
525
 
 
526
mkshadow )
 
527
    ##
 
528
    ##  mkshadow -- Make a shadow tree through symbolic links
 
529
    ##  Copyright (c) 1998-2001 Ralf S. Engelschall <rse@engelschall.com>
 
530
    ##  Originally written for Apache
 
531
    ##
 
532
    
 
533
    #   source and destination directory
 
534
    src=`echo "$1" | sed -e 's:/$::' -e 's:^\./\(.\):\1:'`
 
535
    dst=`echo "$2" | sed -e 's:/$::' -e 's:^\./\(.\):\1:'`
 
536
    
 
537
    #   check whether source exists
 
538
    if [ ! -d $src ]; then
 
539
        echo "$msgprefix:Error: source directory not found: \`$src'" 1>&2
 
540
        exit 1
 
541
    fi
 
542
    
 
543
    #   determine if one of the paths is an absolute path,
 
544
    #   because then we have to use an absolute symlink
 
545
    oneisabs=0
 
546
    case $src in
 
547
        /* ) oneisabs=1 ;;
 
548
    esac
 
549
    case $dst in
 
550
        /* ) oneisabs=1 ;;
 
551
    esac
 
552
    
 
553
    #   determine reverse directory for destination directory
 
554
    dstrevdir=''
 
555
    if [ $oneisabs = 0 ]; then
 
556
        #   derive reverse path from forward path
 
557
        pwd=`pwd`
 
558
        OIFS="$IFS"; IFS='/'
 
559
        for pe in $dst; do
 
560
            if [ "x$pe" = "x.." ]; then
 
561
                OIFS2="$IFS"; IFS="$DIFS"
 
562
                eval `echo "$pwd" |\
 
563
                      sed -e 's:\([^/]*\)$:; dir="\1":' \
 
564
                          -e 's:^\(.*\)/[^/]*;:pwd="\1";:'\
 
565
                          -e 's:^;:pwd="";:'`
 
566
                dstrevdir="$dir/$dstrevdir"
 
567
                IFS="$OIFS2"
 
568
            else
 
569
                dstrevdir="../$dstrevdir"
 
570
            fi
 
571
        done
 
572
        IFS="$OIFS"
 
573
    else
 
574
        src="`cd $src; pwd`";
 
575
    fi
 
576
    
 
577
    #   create directory tree at destination
 
578
    if [ ! -d $dst ]; then
 
579
        if [ ".$opt_t" = .yes ]; then
 
580
            echo "mkdir $dst" 1>&2
 
581
        fi
 
582
        mkdir $dst
 
583
    fi
 
584
    if [ ".$opt_a" = .yes ]; then
 
585
        DIRS=`cd $src; find . -type d -print |\
 
586
              sed -e '/^\.$/d' -e 's:^\./::'`
 
587
    else
 
588
        DIRS=`cd $src; find . -type d -print |\
 
589
              sed -e '/\/CVS/d' -e '/^\.$/d' -e 's:^\./::'`
 
590
    fi
 
591
    for dir in $DIRS; do
 
592
        if [ ".$opt_t" = .yes ]; then
 
593
            echo "mkdir $dst/$dir" 1>&2
 
594
        fi
 
595
        mkdir $dst/$dir
 
596
    done
 
597
    
 
598
    #   fill directory tree with symlinks to files
 
599
    if [ ".$opt_a" = .yes ]; then
 
600
        FILES="`cd $src; find . -depth -print |\
 
601
                sed -e 's/^\.\///'`"
 
602
    else
 
603
        FILES="`cd $src; find . -depth -print |\
 
604
                sed -e '/\.o$/d' -e '/\.a$/d' -e '/\.so$/d' \
 
605
                    -e '/\.cvsignore$/d' -e '/\/CVS/d' \
 
606
                    -e '/\/\.#/d' -e '/\.orig$/d' \
 
607
                    -e 's/^\.\///'`"
 
608
    fi
 
609
    for file in $FILES; do
 
610
         #  don't use `-type f' above for find because of symlinks
 
611
         if [ -d "$src/$file" ]; then
 
612
             continue
 
613
         fi
 
614
         basename=`echo $file | sed -e 's:^.*/::'`
 
615
         dir=`echo $file | sed -e 's:[^/]*$::' -e 's:/$::' -e 's:$:/:' -e 's:^/$::'`
 
616
         from=`echo "$src/$file" | sed -e 's/^\.\///'`
 
617
         to="$dst/$dir$basename"
 
618
         if [ $oneisabs = 0 ]; then
 
619
             if [ ".$dir" != . ]; then
 
620
                 subdir=`echo $dir | sed -e 's:/$::'`
 
621
                 #   derive reverse path from forward path
 
622
                 revdir=''
 
623
                 OIFS="$IFS"; IFS='/'
 
624
                 for pe in $subdir; do
 
625
                     revdir="../$revdir"
 
626
                 done
 
627
                 IFS="$OIFS"
 
628
                 #   finalize from
 
629
                 from="$revdir$from"
 
630
             fi
 
631
             from="$dstrevdir$from"
 
632
         fi
 
633
         if [ ".$opt_v" = .yes ]; then
 
634
             echo "    $to" 1>&2
 
635
         fi
 
636
         if [ ".$opt_t" = .yes ]; then
 
637
             echo "ln -s $from $to" 1>&2
 
638
         fi
 
639
         ln -s $from $to
 
640
    done
 
641
    ;;
 
642
 
 
643
esac
 
644
 
 
645
exit 0
 
646
 
 
647
##EOF##