1 6feb942a 2005-09-13 devnull #!/usr/local/plan9/bin/rc
6 6feb942a 2005-09-13 devnull fn comma {
7 6feb942a 2005-09-13 devnull if(! ~ $#* 0 1){
8 6feb942a 2005-09-13 devnull echo -n $1
13 6feb942a 2005-09-13 devnull echo -n $sep$i
15 6feb942a 2005-09-13 devnull l=`{echo -n $sep$i|9 wc -c}
16 6feb942a 2005-09-13 devnull len=`{echo $l+$len | hoc}
17 6feb942a 2005-09-13 devnull if(test $len -gt 60){
18 6feb942a 2005-09-13 devnull sep=','^$nl^' '
26 6feb942a 2005-09-13 devnull if(~ $#* 1 && ~ $1 all)
27 6feb942a 2005-09-13 devnull *=`{9 ls -p ../pkg | grep -v CVS}
29 6feb942a 2005-09-13 devnull if(~ $#TREE9 0)
30 6feb942a 2005-09-13 devnull TREE9=$PLAN9
32 6feb942a 2005-09-13 devnull date=`{u date +%Y%m%d}
33 6feb942a 2005-09-13 devnull march=`{uname -m}
35 6feb942a 2005-09-13 devnull switch($march){
36 6feb942a 2005-09-13 devnull case i*86
37 6feb942a 2005-09-13 devnull march=i386
41 6feb942a 2005-09-13 devnull if(! test -f ../pkg/$i){
42 6feb942a 2005-09-13 devnull echo no package ../pkg/$i
45 6feb942a 2005-09-13 devnull package=plan9port-$i
46 6feb942a 2005-09-13 devnull grepfor=$i
47 6feb942a 2005-09-13 devnull . ../pkg/$i
48 6feb942a 2005-09-13 devnull deb=$package^_$date^_$arch.deb
49 6feb942a 2005-09-13 devnull rm -rf $i $deb
50 6feb942a 2005-09-13 devnull mkdir $i $i/DEBIAN
51 7c024ff2 2005-09-13 devnull whatis grepfor
52 7c024ff2 2005-09-13 devnull awk -v'grepfor='$grepfor -v 'pkg='$i -v 'plan9='$TREE9 '
53 7c024ff2 2005-09-13 devnull BEGIN { print "grep for " grepfor >"/dev/stderr" }
54 7c024ff2 2005-09-13 devnull $2==grepfor {
56 6feb942a 2005-09-13 devnull sub("/[^/]+$", "/", dir)
57 6feb942a 2005-09-13 devnull if(dir != lastdir){
58 6feb942a 2005-09-13 devnull printf("mkdir -p ''%s''\n", pkg "/usr/local/plan9/" dir);
59 6feb942a 2005-09-13 devnull lastdir = dir
61 6feb942a 2005-09-13 devnull if($1 !~ /\/$/)
62 6feb942a 2005-09-13 devnull printf("cp ''%s'' ''%s''\n", plan9 "/" $1, pkg "/usr/local/plan9/" $1)
63 7c024ff2 2005-09-13 devnull }' $TREE9/dist/filelist | rc
64 68e139f2 2005-09-13 devnull size=`{du -sk $i | awk '{print $1}'}
66 68e139f2 2005-09-13 devnull echo Package: $package
67 68e139f2 2005-09-13 devnull echo Version: $date
68 68e139f2 2005-09-13 devnull echo Architecture: $arch
69 68e139f2 2005-09-13 devnull comma Depends: $depends
70 68e139f2 2005-09-13 devnull comma Suggests: $suggests
71 68e139f2 2005-09-13 devnull comma Conflicts: $conflicts
72 68e139f2 2005-09-13 devnull echo Source: plan9port-src
73 68e139f2 2005-09-13 devnull echo Installed-Size: $size
74 68e139f2 2005-09-13 devnull echo Maintainer: 'Russ Cox <rsc@swtch.com>'
75 68e139f2 2005-09-13 devnull echo Description: $desc
76 68e139f2 2005-09-13 devnull } >$i/DEBIAN/control
77 6feb942a 2005-09-13 devnull if(test -d $i/usr){
80 6feb942a 2005-09-13 devnull find usr -type f -print0 | xargs -0 -n 100 u md5sum
81 6feb942a 2005-09-13 devnull } >$i/DEBIAN/md5sums
84 6feb942a 2005-09-13 devnull echo '>>>' $package is a virtual package.
85 6feb942a 2005-09-13 devnull dpkg -b $i pool/$deb
86 6feb942a 2005-09-13 devnull rm -rf $i