1#!/bin/csh -f
2
3if ($#argv != 3) then
4  echo "usage:"
5  echo "embossdoc.csh srctop wwwtop booktop"
6endif
7
8set edir = $argv[1]
9set wdir = $argv[2]
10set bdir = $argv[3]
11
12
13\rm -rf x/
14mkdir x
15cd x
16
17echo >! ../efunc.out
18echo >! ../efunc.check
19echo >! ../edata.out
20echo >! ../edata.check
21
22touch $wdir/ajax/dummy.html
23foreach x ($wdir/ajax/*html $wdir/nucleus/*html \
24           $wdir/datadef/*html $wdir/datadef/*empty $wdir/appsource/*html)
25#    echo "'$x:t'"
26    if ($x:t == "index.html") then
27        echo "Preserve index $x"
28    else if ($x:t == "other.html") then
29        echo "Preserve other $x"
30    else
31        \rm $x
32    endif
33end
34
35#echo "Ajax functions"
36# ... skip pcre
37foreach x ($edir/ajax/core/*.c $edir/ajax/graphics/*.c $edir/ajax/ajaxdb/*.c  $edir/ajax/acd/*.c $edir/ajax/ensembl/*.c)
38  embossdoccheck.pl $x >> ../efunc.check
39  embossdoc.pl $x >> ../efunc.out
40end
41cat *.srs >! ../efunc.dat
42\cp *html $wdir/ajax/
43
44foreach x (*.book)
45  if(-s $x) then
46    \cp $x $bdir/ajax/
47  else
48    echo "$x empty"
49    \rm $x
50  endif
51end
52
53\rm *html
54\rm *.srs
55
56#echo "Ajax static datatypes"
57foreach x ($edir/ajax/core/*.c $edir/ajax/graphics/*.c $edir/ajax/ajaxdb/*.c  $edir/ajax/acd/*.c $edir/ajax/ensembl/*.c)
58  embossdatacheck.pl $x >> ../edata.check
59  embossdatadoc.pl $x >> ../edata.out
60end
61cat *.srsdata >! ../edata.dat
62foreach x (*html)
63  if (-e $wdir/datadef/$x) then
64    echo "Warning: Ajax overwriting $wdir/datadef/$x"
65  endif
66  \cp $x $wdir/datadef/
67end
68cp *.empty $wdir/datadef/
69
70\rm *html
71\rm *.srsdata
72\rm *.empty
73
74#echo "Nucleus functions"
75foreach x ($edir/nucleus/*.c)
76  embossdoccheck.pl $x >> ../efunc.check
77  embossdoc.pl $x >> ../efunc.out
78end
79cat *.srs >> ../efunc.dat
80\cp *html $wdir/nucleus/
81
82\rm *html
83\rm *.srs
84
85#echo "Nucleus static datatypes"
86foreach x ($edir/nucleus/*.c)
87  embossdatacheck.pl $x >> ../edata.check
88  embossdatadoc.pl $x >> ../edata.out
89end
90cat *.srsdata >> ../edata.dat
91foreach x (*html)
92  if (-e $wdir/datadef/$x) then
93    echo "Warning: Nucleus overwriting $wdir/datadef/$x"
94  endif
95  \cp $x $wdir/datadef/
96end
97cp *.empty $wdir/datadef/
98
99\rm *html
100\rm *.srsdata
101\rm *.empty
102
103#echo "Emboss functions"
104foreach x ($edir/emboss/*.c)
105  embossdoccheck.pl $x >> ../efunc.check
106  embossdoc.pl $x >> ../efunc.out
107end
108cat *.srs >> ../efunc.dat
109\cp *html $wdir/appsource/
110
111\rm *html
112\rm *.srs
113
114#echo "Emboss static datatypes"
115foreach x ($edir/emboss/*.c)
116  embossdatacheck.pl $x >> ../edata.check
117  embossdatadoc.pl $x >> ../edata.out
118end
119cat *.srsdata >> ../edata.dat
120foreach x (*html)
121  if (-e $wdir/datadef/$x) then
122    echo "Warning: Emboss overwriting $wdir/datadef/$x"
123  endif
124  \cp $x $wdir/datadef/
125end
126
127\rm *html
128\rm *.srsdata
129
130#echo "Ajax datatypes"
131foreach x ($edir/ajax/core/*.h $edir/ajax/graphics/*.h $edir/ajax/ajaxdb/*.h  $edir/ajax/acd/*.h $edir/ajax/ensembl/*.h)
132  embossdatacheck.pl $x >> ../edata.check
133  embossdatadoc.pl $x >> ../edata.out
134end
135cat *.srsdata >> ../edata.dat
136foreach x (*html)
137  if (-e $wdir/datadef/$x) then
138    if (-e $wdir/datadef/$x:r.empty) then
139#      echo "Note: Ajax headers overwriting $wdir/datadef/$x is empty"
140      \cp $x $wdir/datadef/
141    else if  (-e $x:r.empty) then
142#      echo "Note: Ajax header $x is empty - keep previous"
143#      ls -al $x $x:r.empty $wdir/datadef/$x:r.empty $wdir/datadef/$x
144    else
145      echo "Warning: Ajax headers overwriting $wdir/datadef/$x"
146      \cp $x $wdir/datadef/
147    endif
148  else
149    \cp $x $wdir/datadef/
150  endif
151end
152
153\rm *html
154\rm *.srsdata
155\rm *.empty
156
157#echo "Nucleus datatypes"
158foreach x ($edir/nucleus/*.h)
159  embossdatacheck.pl $x >> ../edata.check
160  embossdatadoc.pl $x >> ../edata.out
161end
162foreach x (*html)
163  if (-e $wdir/datadef/$x) then
164    if (-e $wdir/datadef/$x:r.empty) then
165#      echo "Note: Nucleus headers overwriting $wdir/datadef/$x is empty"
166      \cp $x $wdir/datadef/
167    else if  (-e $x:r.empty) then
168#      echo "Note: Nucleus header $x is empty - keep previous"
169#      ls -al $x $x:r.empty $wdir/datadef/$x:r.empty $wdir/datadef/$x
170    else
171      echo "Warning: Nucleus headers overwriting $wdir/datadef/$x"
172      \cp $x $wdir/datadef/
173    endif
174  else
175    \cp $x $wdir/datadef/
176  endif
177end
178cat *.srsdata >> ../edata.dat
179
180\rm *html
181\rm *.srsdata
182\rm *.empty
183
184cp deprecated.new ~/devemboss/deprecated.txt
185cd ..
186\rm -rf x/
187
188# Check the categories are all defined
189
190embossdoccategories.pl efunc.out edata.out >! ecat.out
191
192#source ~/srsfunc/etc/prep_srs
193#
194#srsbuild efunc -nn
195#srsbuild efunc -rel '2.9.0'
196#
197#srsbuild edata -nn
198#srsbuild edata -rel '2.9.0'
199#
200#srsbuild -l efunc
201#srsbuild -l edata
202