Commit | Line | Data |
---|---|---|
f7dbcf3c | 1 | #!/bin/sh |
76fb0a58 JB |
2 | |
3 | #### make-dist: create an Emacs distribution tar file from the current | |
1d650ff1 | 4 | #### source tree. This basically creates a duplicate directory |
76fb0a58 JB |
5 | #### structure, and then hard links into it only those files that should |
6 | #### be distributed. This means that if you add a file with an odd name, | |
7 | #### you should make sure that this script will include it. | |
f7dbcf3c | 8 | |
5f34e16f | 9 | # Copyright (C) 1995, 1997, 1998, 2000, 2001 Free Software Foundation, Inc. |
4c9c1174 KH |
10 | # |
11 | # This file is part of GNU Emacs. | |
12 | # | |
13 | # GNU Emacs is free software; you can redistribute it and/or modify | |
14 | # it under the terms of the GNU General Public License as published by | |
15 | # the Free Software Foundation; either version 2, or (at your option) | |
16 | # any later version. | |
17 | # | |
18 | # GNU Emacs is distributed in the hope that it will be useful, | |
19 | # but WITHOUT ANY WARRANTY; without even the implied warranty of | |
20 | # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
21 | # GNU General Public License for more details. | |
22 | # | |
23 | # You should have received a copy of the GNU General Public License | |
1fb87c77 KH |
24 | # along with GNU Emacs; see the file COPYING. If not, write to the |
25 | # Free Software Foundation, Inc., 59 Temple Place - Suite 330, | |
26 | # Boston, MA 02111-1307, USA. | |
4c9c1174 | 27 | |
f7dbcf3c JB |
28 | progname="$0" |
29 | ||
76fb0a58 | 30 | ### Exit if a command fails. |
8c28d444 | 31 | #set -e |
f7dbcf3c | 32 | |
76fb0a58 | 33 | ### Print out each line we read, for debugging's sake. |
8c28d444 | 34 | #set -v |
f7dbcf3c | 35 | |
8df317a6 GM |
36 | LANGUAGE=C |
37 | LC_ALL=C | |
38 | LC_MESSAGES= | |
39 | LANG= | |
40 | export LANGUAGE LC_ALL LC_MESSAGES LANG | |
41 | ||
ccd57f4d | 42 | ## Don't restrict access to any files. |
67ffab69 RS |
43 | umask 0 |
44 | ||
c75cfabd | 45 | update=yes |
e4e1c623 | 46 | check=yes |
f22edcea RS |
47 | clean_up=no |
48 | make_tar=no | |
1260d6ba | 49 | newer="" |
f7dbcf3c JB |
50 | |
51 | while [ $# -gt 0 ]; do | |
52 | case "$1" in | |
f22edcea RS |
53 | ## This option tells make-dist to delete the staging directory |
54 | ## when done. It is useless to use this unless you make a tar file. | |
55 | "--clean-up" ) | |
56 | clean_up=yes | |
4746118a | 57 | ;; |
f22edcea RS |
58 | ## This option tells make-dist to make a tar file. |
59 | "--tar" ) | |
60 | make_tar=yes | |
f7dbcf3c | 61 | ;; |
c75cfabd RS |
62 | ## This option tells make-dist not to recompile or do analogous things. |
63 | "--no-update" ) | |
64 | update=no | |
65 | ;; | |
e4e1c623 RS |
66 | ## This option says don't check for bad file names, etc. |
67 | "--no-check" ) | |
68 | check=no | |
69 | ;; | |
76fb0a58 | 70 | ## This option tells make-dist to make the distribution normally, then |
7b9cd64c ER |
71 | ## remove all files older than the given timestamp file. This is useful |
72 | ## for creating incremental or patch distributions. | |
1260d6ba | 73 | "--newer") |
ef15f270 JB |
74 | newer="$2" |
75 | new_extension=".new" | |
1260d6ba ER |
76 | shift |
77 | ;; | |
922ac4c5 JB |
78 | ## This option tells make-dist to use `compress' instead of gzip. |
79 | ## Normally, make-dist uses gzip whenever it is present. | |
80 | "--compress") | |
81 | default_gzip="compress" | |
82 | ;; | |
2a714d4e GM |
83 | |
84 | "--snapshot") | |
85 | clean_up=yes | |
86 | make_tar=yes | |
87 | update=no | |
88 | check=no | |
89 | ;; | |
90 | ||
91 | "--help") | |
92 | echo "Usage: ${progname} [options]" | |
93 | echo "" | |
94 | echo " --clean-up delete staging directories when done" | |
95 | echo " --compress use compress instead of gzip" | |
96 | echo " --newer=TIME don't include files older than TIME" | |
97 | echo " --no-check don't check for bad file names etc." | |
98 | echo " --no-update don't recompile or do analogous things" | |
99 | echo " --snapshot same as --clean-up --no-update --tar --no-check" | |
100 | echo " --tar make a tar file" | |
101 | echo "" | |
102 | exit 0 | |
103 | ;; | |
104 | ||
f7dbcf3c JB |
105 | * ) |
106 | echo "${progname}: Unrecognized argument: $1" >&2 | |
107 | exit 1 | |
108 | ;; | |
109 | esac | |
110 | shift | |
111 | done | |
112 | ||
76fb0a58 | 113 | ### Make sure we're running in the right place. |
f7dbcf3c | 114 | if [ ! -d src -o ! -f src/lisp.h -o ! -d lisp -o ! -f lisp/version.el ]; then |
1260d6ba ER |
115 | echo "${progname}: Can't find \`src/lisp.h' and \`lisp/version.el'." >&2 |
116 | echo "${progname} must be run in the top directory of the Emacs" >&2 | |
0d122844 | 117 | echo "distribution tree. cd to that directory and try again." >&2 |
f7dbcf3c JB |
118 | exit 1 |
119 | fi | |
120 | ||
c75cfabd | 121 | ### Find where to run Emacs. |
fcea5346 KH |
122 | ### (We don't accept EMACS=t as an answer, since that probably only means |
123 | ### that the shell is running in an Emacs window.) | |
c75cfabd RS |
124 | if [ $update = yes ]; |
125 | then | |
59d05d2d | 126 | unset EMACS_UNIBYTE |
c75cfabd RS |
127 | if [ -f src/emacs ]; |
128 | then | |
129 | EMACS=`pwd`/src/emacs | |
130 | else | |
fcea5346 | 131 | if [ "x$EMACS" = "x" -o "x$EMACS" = "xt" ]; |
c75cfabd RS |
132 | then |
133 | echo You must specify the EMACS environment variable 2>&1 | |
134 | exit 1 | |
135 | fi | |
136 | fi | |
137 | fi | |
138 | ||
76fb0a58 | 139 | ### Find out which version of Emacs this is. |
0e0186f1 | 140 | shortversion=`grep 'defconst[ ]*emacs-version' lisp/version.el \ |
47d105b0 | 141 | | sed -e 's/^.*"\([0-9][0-9]*\.[0-9][0-9]*\).*$/\1/'` |
0e0186f1 RS |
142 | version=`grep 'defconst[ ]*emacs-version' lisp/version.el \ |
143 | | sed -e 's/^[^"]*"\([^"]*\)".*$/\1/'` | |
f7dbcf3c | 144 | if [ ! "${version}" ]; then |
21764d60 | 145 | echo "${progname}: can't find current Emacs version in \`./lisp/version.el'" >&2 |
f7dbcf3c JB |
146 | exit 1 |
147 | fi | |
148 | ||
21764d60 | 149 | echo Version numbers are $version and $shortversion |
47d105b0 | 150 | |
c75cfabd RS |
151 | if [ $update = yes ]; |
152 | then | |
153 | if grep -s "GNU Emacs version ${shortversion}" ./man/emacs.texi > /dev/null; then | |
154 | true | |
155 | else | |
156 | echo "You must update the version number in \`./man/emacs.texi'" | |
157 | sleep 5 | |
158 | fi | |
f753e9aa JB |
159 | fi |
160 | ||
bb160193 RS |
161 | ### Make sure we don't already have a directory emacs-${version}. |
162 | ||
163 | emacsname="emacs-${version}${new_extension}" | |
164 | ||
165 | if [ -d ${emacsname} ] | |
166 | then | |
167 | echo Directory "${emacsname}" already exists >&2 | |
168 | exit 1 | |
169 | fi | |
170 | ||
76fb0a58 | 171 | ### Make sure the subdirectory is available. |
1260d6ba | 172 | tempparent="make-dist.tmp.$$" |
f7dbcf3c | 173 | if [ -d ${tempparent} ]; then |
1260d6ba ER |
174 | echo "${progname}: staging directory \`${tempparent}' already exists. |
175 | Perhaps a previous invocation of \`${progname}' failed to clean up after | |
176 | itself. Check that directories whose names are of the form | |
177 | \`make-dist.tmp.NNNNN' don't contain any important information, remove | |
178 | them, and try again." >&2 | |
f7dbcf3c JB |
179 | exit 1 |
180 | fi | |
181 | ||
e4e1c623 RS |
182 | ### Find where to run Emacs. |
183 | if [ $check = yes ]; | |
184 | then | |
185 | ### Check for .elc files with no corresponding .el file. | |
186 | ls -1 lisp/[a-z]*.el lisp/[a-z]*/[a-z]*.el \ | |
5eea385d | 187 | leim/[a-z]*/[a-z]*.el | sed 's/\.el$/.elc/' > /tmp/el |
e4e1c623 | 188 | ls -1 lisp/[a-z]*.elc lisp/[a-z]*/[a-z]*.elc \ |
5eea385d | 189 | leim/[a-z]*/[a-z]*.elc > /tmp/elc |
e4e1c623 RS |
190 | bogosities="`comm -13 /tmp/el /tmp/elc`" |
191 | if [ "${bogosities}" != "" ]; then | |
192 | echo "The following .elc files have no corresponding .el files:" | |
193 | echo "${bogosities}" | |
8615e792 | 194 | fi |
e4e1c623 RS |
195 | rm -f /tmp/el /tmp/elc |
196 | ||
197 | ### Check for .el files with no corresponding .elc file. | |
3985f85d | 198 | (cd lisp; ls -1 [a-z]*.el [a-z]*/[a-z]*.el ; \ |
5eea385d | 199 | cd ../leim; ls -1 [a-z]*/[a-z]*.el) > /tmp/el |
3985f85d | 200 | (cd lisp; ls -1 [a-z]*.elc [a-z]*/[a-z]*.elc; \ |
5eea385d | 201 | cd ../leim; ls -1 [a-z]*/[a-z]*.elc) | sed 's/\.elc$/.el/' > /tmp/elc |
e4e1c623 RS |
202 | losers="`comm -23 /tmp/el /tmp/elc`" |
203 | bogosities= | |
204 | for file in $losers; do | |
205 | file1=`echo $file | sed -e "s|.*/||"` | |
bf7e917e | 206 | if ! sed -n -e "/^DONTCOMPILE/,/[^\\]\$/p" lisp/Makefile.in | |
aa501770 | 207 | grep -q "[ ]$file1\($\| \)"; then |
e4e1c623 RS |
208 | case $file in |
209 | site-init.el | site-load.el | site-start.el | default.el) | |
210 | ;; | |
211 | term/*) | |
212 | ;; | |
213 | *) | |
214 | bogosities="$file $bogosities" | |
215 | ;; | |
216 | esac | |
217 | fi | |
218 | done | |
219 | if [ x"${bogosities}" != x"" ]; then | |
220 | echo "The following .el files have no corresponding .elc files:" | |
221 | echo "${bogosities}" | |
222 | fi | |
223 | rm -f /tmp/el /tmp/elc | |
8615e792 | 224 | |
e4e1c623 RS |
225 | ### Check for .el files that would overflow the 14-char limit if compiled. |
226 | long=`find lisp leim -name '[a-zA-Z0-9]??????????*.el' -print` | |
227 | if [ "$long" != "" ]; then | |
228 | echo "The following .el file names are too long:" | |
229 | echo "$long" | |
230 | fi | |
f5674423 KH |
231 | fi |
232 | ||
b4e84d5d JB |
233 | ### Make sure configure is newer than configure.in. |
234 | if [ "x`ls -t configure configure.in | head -1`" != "xconfigure" ]; then | |
21764d60 KH |
235 | echo "\`./configure.in' is newer than \`./configure'" >&2 |
236 | echo "Running autoconf" >&2 | |
28335560 | 237 | autoconf || { x=$?; echo Autoconf FAILED! >&2; exit $x; } |
b4e84d5d JB |
238 | fi |
239 | ||
c75cfabd RS |
240 | if [ $update = yes ]; |
241 | then | |
242 | echo "Updating Info files" | |
870cfc55 | 243 | (cd man; make -f Makefile.in srcdir=. info) |
1d951084 | 244 | (cd lispref; make -f Makefile.in srcdir=. info) |
3716a206 | 245 | (cd lispintro; make -f Makefile.in srcdir=. info) |
980ab937 | 246 | |
e888d449 | 247 | echo "Updating finder, custom and autoload data" |
59d05d2d | 248 | (cd lisp; make updates EMACS="$EMACS") |
7cf45b04 | 249 | |
5eea385d GM |
250 | if test -f leim/leim-list.el; then |
251 | echo "Updating leim-list.el" | |
252 | (cd leim; make leim-list.el EMACS="$EMACS") | |
253 | fi | |
29c98ed3 RS |
254 | |
255 | echo "Recompiling Lisp files" | |
29c98ed3 | 256 | $EMACS -batch -f batch-byte-recompile-directory lisp leim |
c75cfabd | 257 | fi |
0588a761 | 258 | |
f07eebe0 KH |
259 | echo "Making lisp/MANIFEST" |
260 | ||
73494596 RS |
261 | (cd lisp; |
262 | files=`echo [!=]*.el | sed -e 's/ subdirs.el / /' -e 's/ default.el / /'` | |
263 | for dir in [!=]*; do | |
5eea385d GM |
264 | if [ -d $dir ] && [ $dir != term ] && [ $dir != CVS ] && [ $dir != RCS ] |
265 | then | |
73494596 RS |
266 | echo $dir |
267 | thisdir=`echo $dir/[!=]*.el | sed -e 's/ subdirs.el / /'` | |
268 | files="$files $thisdir" | |
269 | fi | |
270 | done | |
271 | head -1 $files | grep '^;' | sed -e 's/;;; //' | sort > MANIFEST) | |
f07eebe0 | 272 | |
1260d6ba | 273 | echo "Creating staging directory: \`${tempparent}'" |
bb160193 | 274 | |
f7dbcf3c | 275 | mkdir ${tempparent} |
f7dbcf3c JB |
276 | tempdir="${tempparent}/${emacsname}" |
277 | ||
76fb0a58 JB |
278 | ### This trap ensures that the staging directory will be cleaned up even |
279 | ### when the script is interrupted in mid-career. | |
00c00348 | 280 | if [ "${clean_up}" = yes ]; then |
21764d60 | 281 | trap "echo 'Interrupted...cleaning up the staging directory'; rm -rf ${tempparent}; exit 1" 1 2 15 |
00c00348 ER |
282 | fi |
283 | ||
1260d6ba | 284 | echo "Creating top directory: \`${tempdir}'" |
f7dbcf3c JB |
285 | mkdir ${tempdir} |
286 | ||
76fb0a58 JB |
287 | ### We copy in the top-level files before creating the subdirectories in |
288 | ### hopes that this will make the top-level files appear first in the | |
289 | ### tar file; this means that people can start reading the INSTALL and | |
290 | ### README while the rest of the tar file is still unpacking. Whoopee. | |
21764d60 | 291 | echo "Making links to top-level files" |
ed5882b9 | 292 | ln AUTHORS FTP INSTALL README BUGS move-if-change ${tempdir} |
bcea38a3 | 293 | ln ChangeLog Makefile.in configure configure.in ${tempdir} |
6f8b09f3 | 294 | ln config.bat make-dist update-subdirs vpath.sed ${tempdir} |
bb160193 | 295 | ### Copy these files; they're cross-filesystem symlinks. |
a4888c88 | 296 | cp mkinstalldirs ${tempdir} |
76fb0a58 | 297 | cp config.sub ${tempdir} |
2ed56345 | 298 | cp config.guess ${tempdir} |
dc7717ab | 299 | cp install-sh ${tempdir} |
f7dbcf3c | 300 | |
21764d60 | 301 | echo "Updating version number in README" |
f753e9aa JB |
302 | (cd ${tempdir} |
303 | awk \ | |
304 | '$1 " " $2 " " $3 " " $4 " " $5 == "This directory tree holds version" { $6 = version; print $0 } | |
305 | $1 " " $2 " " $3 " " $4 " " $5 != "This directory tree holds version"' \ | |
306 | version=${version} README > tmp.README | |
af559a4e | 307 | mv -f tmp.README README) |
f753e9aa JB |
308 | |
309 | ||
21764d60 | 310 | echo "Creating subdirectories" |
3716a206 | 311 | for subdir in lisp site-lisp lispref lispintro \ |
5f34e16f | 312 | leim real-leim real-leim/CXTERM-DIC real-leim/MISC-DIC \ |
0744c2f1 | 313 | real-leim/SKK-DIC real-leim/ja-dic real-leim/quail \ |
c660c0a7 | 314 | src src/m src/s src/bitmaps lib-src oldXMenu lwlib \ |
5ec8424f | 315 | nt nt/inc nt/inc/sys nt/inc/arpa nt/inc/netinet nt/icons \ |
b3635775 GM |
316 | etc etc/e lock info man msdos vms mac mac/inc mac/inc/sys \ |
317 | mac/src | |
318 | do | |
319 | echo " ${tempdir}/${subdir}" | |
f7dbcf3c JB |
320 | mkdir ${tempdir}/${subdir} |
321 | done | |
322 | ||
91741841 | 323 | echo "Initializing \`leim' subdirectory" |
a1363c1d | 324 | cp noleim-Makefile.in ${tempdir}/leim/Makefile.in |
91741841 | 325 | |
67ffab69 | 326 | echo "Making links to \`lisp' and its subdirectories" |
7b9cd64c | 327 | ### Don't distribute TAGS, =*.el files, site-init.el, site-load.el, or default.el. |
f7dbcf3c JB |
328 | (cd lisp |
329 | ln [a-zA-Z]*.el ../${tempdir}/lisp | |
330 | ln [a-zA-Z]*.elc ../${tempdir}/lisp | |
8d2197ac | 331 | ln [a-zA-Z]*.dat ../${tempdir}/lisp |
a1363c1d | 332 | for img in [a-zA-Z]*.xpm [a-zA-Z]*.xbm [a-zA-Z]*.pbm; do |
365949b7 GM |
333 | # If there are no images, the shell won't expand the pattern. |
334 | if [ -f $img ]; then | |
335 | ln $img ../${tempdir}/lisp | |
336 | fi | |
337 | done | |
76fb0a58 JB |
338 | ## simula.el doesn't keep abbreviations in simula.defns any more. |
339 | ## ln [a-zA-Z]*.defns ../${tempdir}/lisp | |
bf7e917e | 340 | ln ChangeLog Makefile.in makefile.nt ChangeLog.? ../${tempdir}/lisp |
b3635775 | 341 | ln makefile.w32-in ../${tempdir}/lisp |
5eea385d | 342 | test -f README && ln README ../${tempdir}/lisp |
67ffab69 RS |
343 | (cd ../${tempdir}/lisp |
344 | rm -f TAGS =* | |
345 | rm -f site-init site-init.el site-init.elc | |
346 | rm -f site-load site-load.el site-load.elc | |
347 | rm -f site-start site-start.el site-start.elc | |
348 | rm -f default default.el default.elc | |
349 | ) | |
350 | ||
351 | ## Find all subdirs of lisp dir | |
352 | for file in `find . -type d -print`; do | |
353 | case $file in | |
5eea385d | 354 | . | .. | */Old | */CVS | */RCS | */=*) |
67ffab69 RS |
355 | ;; |
356 | *) | |
357 | if [ -d $file ]; then | |
358 | subdirs="$file $subdirs" | |
359 | fi | |
360 | ;; | |
361 | esac | |
362 | done | |
363 | ||
364 | for file in $subdirs; do | |
365 | echo " lisp/$file" | |
366 | mkdir ../${tempdir}/lisp/$file | |
b3635775 GM |
367 | ln $file/[a-zA-Z0-9]*.el ../${tempdir}/lisp/$file |
368 | ln $file/[a-zA-Z0-9]*.elc ../${tempdir}/lisp/$file | |
369 | for img in $file/[a-zA-Z]*.xpm $file/[a-zA-Z]*.xbm $file/[a-zA-Z]*.pbm; do | |
365949b7 GM |
370 | if [ -f $img ]; then |
371 | ln $img ../${tempdir}/lisp/$file | |
372 | fi | |
373 | done | |
67ffab69 RS |
374 | if [ -f $file/README ]; then |
375 | ln $file/README ../${tempdir}/lisp/$file | |
376 | fi | |
b3635775 | 377 | |
dcf3ff7f RS |
378 | if [ -f $file/ChangeLog ]; then |
379 | ln $file/ChangeLog ../${tempdir}/lisp/$file | |
b3635775 GM |
380 | for f in $file/ChangeLog.[0-9]; do |
381 | if [ -f $f ]; then | |
382 | ln $f ../${tempdir}/lisp/$file | |
383 | fi | |
384 | done | |
dcf3ff7f | 385 | fi |
67ffab69 | 386 | done ) |
a78c106d | 387 | |
91741841 RS |
388 | echo "Making links to \`leim' and its subdirectories for the LEIM distribution" |
389 | ### Don't distribute TAGS, or =*.el files. | |
390 | (cd leim | |
b3635775 | 391 | ln makefile.nt makefile.w32-in ../${tempdir}/real-leim |
9089d8d7 | 392 | ln ChangeLog README ../${tempdir}/real-leim |
91741841 RS |
393 | |
394 | ln CXTERM-DIC/*.tit ../${tempdir}/real-leim/CXTERM-DIC | |
5f8d02be | 395 | ln SKK-DIC/README SKK-DIC/SKK-JISYO.L ../${tempdir}/real-leim/SKK-DIC |
5f34e16f | 396 | ln MISC-DIC/*.* ../${tempdir}/real-leim/MISC-DIC |
0744c2f1 | 397 | ln ja-dic/*.el ja-dic/*.elc ../${tempdir}/real-leim/ja-dic |
a1363c1d | 398 | ln Makefile.in ../${tempdir}/real-leim/Makefile.in |
7f39d6bb GM |
399 | ln quail/[a-z]*.el quail/[a-z]*.elc ../${tempdir}/real-leim/quail |
400 | rm -f ../${tempdir}/real-leim/quail/quick-b5.* | |
401 | rm -f ../${tempdir}/real-leim/quail/quick-cns.* | |
402 | rm -f ../${tempdir}/real-leim/quail/tsang-b5.* | |
403 | rm -f ../${tempdir}/real-leim/quail/tsang-cns.* | |
5eea385d | 404 | |
91741841 RS |
405 | cd ../${tempdir}/real-leim |
406 | rm -f TAGS =* */=*) | |
407 | ||
408 | ### Move the real-leim directory outside of Emacs proper. | |
65fda17c RS |
409 | (cd ${tempparent} |
410 | mkdir ${emacsname}-leim | |
411 | mkdir ${emacsname}-leim/${emacsname} | |
412 | mv ${emacsname}/real-leim ${emacsname}-leim/${emacsname}/leim) | |
91741841 | 413 | |
21764d60 | 414 | echo "Making links to \`src'" |
76fb0a58 | 415 | ### Don't distribute =*.[ch] files, or the configured versions of |
c3f1e1a9 | 416 | ### config.in, paths.in, or Makefile.in, or TAGS. |
f7dbcf3c | 417 | (cd src |
c75cfabd | 418 | echo " (It is ok if ln fails in some cases.)" |
f7dbcf3c JB |
419 | ln [a-zA-Z]*.c ../${tempdir}/src |
420 | ln [a-zA-Z]*.h ../${tempdir}/src | |
421 | ln [a-zA-Z]*.s ../${tempdir}/src | |
c75cfabd RS |
422 | ln [a-zA-Z]*.in ../${tempdir}/src |
423 | ln [a-zA-Z]*.opt ../${tempdir}/src | |
424 | ## If we ended up with a symlink, or if we did not get anything | |
425 | ## due to a cross-device symlink, copy the file. | |
426 | for file in [a-zA-Z]*.[hcs] [a-zA-Z]*.in [a-zA-Z]*.opt; do | |
427 | if test -f ../${tempdir}/src/$file; then | |
428 | # test -f appears to succeed for a symlink | |
429 | if test -L ../${tempdir}/src/$file; then | |
430 | rm ../${tempdir}/src/$file | |
62dfdaf0 | 431 | cp -p $file ../${tempdir}/src |
c75cfabd RS |
432 | chmod a-w ../${tempdir}/src/$file |
433 | fi | |
434 | else | |
435 | rm ../${tempdir}/src/$file | |
62dfdaf0 | 436 | cp -p $file ../${tempdir}/src |
c75cfabd RS |
437 | chmod a-w ../${tempdir}/src/$file |
438 | fi | |
439 | done | |
440 | ln README ChangeLog ChangeLog.*[0-9] ../${tempdir}/src | |
bcea38a3 | 441 | ln makefile.nt makefile.w32-in ../${tempdir}/src |
990ee059 | 442 | ln .gdbinit .dbxinit ../${tempdir}/src |
f7dbcf3c | 443 | cd ../${tempdir}/src |
8c28d444 | 444 | rm -f config.h epaths.h Makefile Makefile.c |
7b9cd64c | 445 | rm -f =* TAGS) |
f7dbcf3c | 446 | |
21764d60 | 447 | echo "Making links to \`src/bitmaps'" |
690eca32 JB |
448 | (cd src/bitmaps |
449 | ln README *.xbm ../../${tempdir}/src/bitmaps) | |
450 | ||
21764d60 | 451 | echo "Making links to \`src/m'" |
f7dbcf3c | 452 | (cd src/m |
facbb78e RS |
453 | # We call files for miscellaneous input (to linker etc) .inp. |
454 | ln README [a-zA-Z0-9]*.h *.inp ../../${tempdir}/src/m) | |
f7dbcf3c | 455 | |
21764d60 | 456 | echo "Making links to \`src/s'" |
f7dbcf3c | 457 | (cd src/s |
77427171 | 458 | ln README [a-zA-Z0-9]*.h ../../${tempdir}/src/s) |
f7dbcf3c | 459 | |
21764d60 | 460 | echo "Making links to \`lib-src'" |
f7dbcf3c | 461 | (cd lib-src |
375f1bd7 | 462 | ln [a-zA-Z]*.[chy] ../${tempdir}/lib-src |
c3f1e1a9 | 463 | ln ChangeLog Makefile.in README testfile vcdiff ../${tempdir}/lib-src |
dc7717ab | 464 | ln grep-changelog rcs2log rcs-checkin makefile.nt ../${tempdir}/lib-src |
b3635775 | 465 | ln makefile.w32-in ../${tempdir}/lib-src |
c75cfabd RS |
466 | ## If we ended up with a symlink, or if we did not get anything |
467 | ## due to a cross-device symlink, copy the file. | |
468 | for file in [a-zA-Z]*.[chy]; do | |
469 | if test -f ../${tempdir}/lib-src/$file; then | |
470 | # test -f appears to succeed for a symlink | |
471 | if test -L ../${tempdir}/lib-src/$file; then | |
472 | rm ../${tempdir}/lib-src/$file | |
473 | cp $file ../${tempdir}/lib-src | |
474 | chmod a-w ../${tempdir}/lib-src/$file | |
475 | fi | |
476 | else | |
477 | rm ../${tempdir}/lib-src/$file | |
478 | cp $file ../${tempdir}/lib-src | |
479 | chmod a-w ../${tempdir}/lib-src/$file | |
480 | fi | |
481 | done | |
1260d6ba | 482 | cd ../${tempdir}/lib-src |
c75cfabd | 483 | rm -f Makefile.c |
7b9cd64c | 484 | rm -f =* TAGS) |
f7dbcf3c | 485 | |
21764d60 | 486 | echo "Making links to \`nt'" |
391b3748 | 487 | (cd nt |
bcea38a3 PJ |
488 | ln emacs.rc config.nt [a-z]*.c ../${tempdir}/nt |
489 | ln nmake.defs gmake.defs subdirs.el ../${tempdir}/nt | |
b47cc08a | 490 | ln [a-z]*.bat [a-z]*.h makefile.def makefile.nt ../${tempdir}/nt |
bcea38a3 | 491 | ln ChangeLog INSTALL README makefile.w32-in ../${tempdir}/nt) |
391b3748 | 492 | |
21764d60 | 493 | echo "Making links to \`nt/inc'" |
391b3748 | 494 | (cd nt/inc |
77427171 | 495 | ln [a-z]*.h ../../${tempdir}/nt/inc) |
391b3748 | 496 | |
21764d60 | 497 | echo "Making links to \`nt/inc/sys'" |
391b3748 | 498 | (cd nt/inc/sys |
77427171 | 499 | ln [a-z]*.h ../../../${tempdir}/nt/inc/sys) |
391b3748 | 500 | |
e827bc37 RS |
501 | echo "Making links to \`nt/inc/arpa'" |
502 | (cd nt/inc/arpa | |
503 | ln [a-z]*.h ../../../${tempdir}/nt/inc/arpa) | |
504 | ||
505 | echo "Making links to \`nt/inc/netinet'" | |
506 | (cd nt/inc/netinet | |
507 | ln [a-z]*.h ../../../${tempdir}/nt/inc/netinet) | |
508 | ||
5ec8424f GV |
509 | echo "Making links to \`nt/icons'" |
510 | (cd nt/icons | |
91978d00 | 511 | ln [a-z]*.ico ../../${tempdir}/nt/icons) |
5ec8424f | 512 | |
b3635775 GM |
513 | echo "Making links to \`mac'" |
514 | (cd mac | |
515 | ln ChangeLog INSTALL README *.xml *.MPW ../${tempdir}/mac) | |
516 | ||
517 | echo "Making links to \`mac/inc'" | |
518 | (cd mac/inc | |
519 | ln [a-z]*.h ../../${tempdir}/mac/inc) | |
520 | ||
521 | echo "Making links to \`mac/inc/sys'" | |
522 | (cd mac/inc/sys | |
523 | ln [a-z]*.h ../../../${tempdir}/mac/inc/sys) | |
524 | ||
525 | echo "Making links to \`mac/src'" | |
526 | (cd mac/src | |
527 | ln [a-z]*.c *.r ../../${tempdir}/mac/src) | |
528 | ||
21764d60 | 529 | echo "Making links to \`msdos'" |
52d7b2e5 RS |
530 | (cd msdos |
531 | ln ChangeLog emacs.ico emacs.pif ../${tempdir}/msdos | |
7fd85d56 | 532 | ln is_exec.c sigaction.c mainmake mainmake.v2 sed*.inp ../${tempdir}/msdos |
52d7b2e5 RS |
533 | cd ../${tempdir}/msdos |
534 | rm -f =*) | |
535 | ||
21764d60 | 536 | echo "Making links to \`oldXMenu'" |
f7dbcf3c | 537 | (cd oldXMenu |
8bdbf9ed | 538 | ln *.c *.h *.in ../${tempdir}/oldXMenu |
df1ec566 | 539 | ln README Imakefile ChangeLog ../${tempdir}/oldXMenu |
f395c83a | 540 | ln compile.com descrip.mms ../${tempdir}/oldXMenu) |
f7dbcf3c | 541 | |
21764d60 | 542 | echo "Making links to \`lwlib'" |
c660c0a7 RS |
543 | (cd lwlib |
544 | ln *.c *.h *.in ../${tempdir}/lwlib | |
72e7e784 KH |
545 | ln README Imakefile ChangeLog ../${tempdir}/lwlib |
546 | cd ../${tempdir}/lwlib | |
547 | rm -f lwlib-Xol*) | |
c660c0a7 | 548 | |
21764d60 | 549 | echo "Making links to \`etc'" |
f395c83a JB |
550 | ### Don't distribute = files, TAGS, DOC files, backups, autosaves, or |
551 | ### tex litter. | |
d4fa890c | 552 | ### Don't distribute gfdl.1, since no man page references it. |
f7dbcf3c | 553 | (cd etc |
5eea385d | 554 | files=`ls -d * | grep -v CVS | grep -v RCS | grep -v 'Old' | grep -v '^e$'` |
7a6ee7ae | 555 | ln $files ../${tempdir}/etc |
98d4c1d0 RS |
556 | ## If we ended up with a symlink, or if we did not get anything |
557 | ## due to a cross-device symlink, copy the file. | |
7a6ee7ae | 558 | for file in $files; do |
98d4c1d0 RS |
559 | if test -f ../${tempdir}/etc/$file; then |
560 | # test -f appears to succeed for a symlink | |
561 | if test -L ../${tempdir}/etc/$file; then | |
562 | rm ../${tempdir}/etc/$file | |
563 | cp $file ../${tempdir}/etc | |
564 | chmod a-w ../${tempdir}/etc/$file | |
565 | fi | |
566 | else | |
567 | rm ../${tempdir}/etc/$file | |
568 | cp $file ../${tempdir}/etc | |
569 | chmod a-w ../${tempdir}/etc/$file | |
570 | fi | |
571 | done | |
f7dbcf3c | 572 | cd ../${tempdir}/etc |
d4fa890c | 573 | rm -f fns*.el gfdl.1 |
23a58692 | 574 | rm -f DOC* *~ \#*\# *.dvi *.log *.orig *.rej *,v =* core |
f395c83a | 575 | rm -f TAGS) |
f7dbcf3c | 576 | |
21764d60 | 577 | echo "Making links to \`etc/e'" |
f08ad882 | 578 | (cd etc/e |
5eea385d | 579 | ln `ls -d * | grep -v CVS | grep -v RCS` ../../${tempdir}/etc/e |
a6903f09 | 580 | cd ../../${tempdir}/etc/e |
375f1bd7 | 581 | rm -f *~ \#*\# *,v =* core) |
f08ad882 | 582 | |
21764d60 | 583 | echo "Making links to \`info'" |
66afa119 RS |
584 | # Don't distribute backups or autosaves. |
585 | (cd info | |
b3635775 | 586 | ln `find . -type f -print | grep -v CVS | grep -v RCS | grep -v cvsignore` ../${tempdir}/info |
5eea385d | 587 | #ln [a-zA-Z]* ../${tempdir}/info |
66afa119 RS |
588 | cd ../${tempdir}/info |
589 | # Avoid an error when expanding the wildcards later. | |
590 | ln emacs dummy~ ; ln emacs \#dummy\# | |
591 | rm -f *~ \#*\# core) | |
fda4e8f6 | 592 | |
21764d60 | 593 | echo "Making links to \`man'" |
fda4e8f6 | 594 | (cd man |
298c8970 | 595 | ln *.texi *.aux *.cps *.fns *.kys *.vrs ../${tempdir}/man |
5e808bc0 | 596 | test -f README && ln README ../${tempdir}/man |
f08ad882 | 597 | test -f Makefile.in && ln Makefile.in ../${tempdir}/man |
5eea385d GM |
598 | ln ChangeLog ../${tempdir}/man |
599 | test -f split-man && ln split-man ../${tempdir}/man | |
f4500bec | 600 | cp texinfo.tex ../${tempdir}/man |
4f8cc93a | 601 | cd ../${tempdir}/man |
56c31c87 RS |
602 | rm -f \#*\# =* *~ core emacs-index* *.Z *.z xmail |
603 | rm -f emacs.?? termcap.?? gdb.?? *.log *.toc *.dvi *.oaux) | |
f7dbcf3c | 604 | |
1d951084 EZ |
605 | echo "Making links to \`lispref'" |
606 | (cd lispref | |
7db6effa | 607 | ln *.texi *.aux *.cps *.fns *.kys *.vrs index.*perm ../${tempdir}/lispref |
7ccdf9b5 | 608 | ln *.txt *.el spellfile permute-index tindex.pl ../${tempdir}/lispref |
1d951084 EZ |
609 | test -f README && ln README ../${tempdir}/lispref |
610 | test -f Makefile.in && ln Makefile.in ../${tempdir}/lispref | |
611 | ln ChangeLog ../${tempdir}/lispref | |
612 | cd ../${tempdir}/lispref | |
613 | rm -f \#*\# =* *~ core elisp-index* *.Z *.z xmail | |
614 | rm -f elisp.?? *.log *.toc *.dvi *.oaux) | |
615 | ||
3716a206 EZ |
616 | echo "Making links to \`lispintro'" |
617 | (cd lispintro | |
618 | ln *.texi *.aux *.cps *.fns *.kys *.vrs *.eps ../${tempdir}/lispintro | |
619 | test -f texinfo.tex && ln texinfo.tex ../${tempdir}/lispintro | |
620 | test -f README && ln README ../${tempdir}/lispintro | |
621 | test -f Makefile.in && ln Makefile.in ../${tempdir}/lispintro | |
622 | ln ChangeLog ../${tempdir}/lispintro | |
623 | cd ../${tempdir}/lispintro | |
624 | rm -f \#*\# =* *~ core *.Z *.z xmail | |
625 | rm -f emacs-lisp-intro.?? *.log *.toc *.dvi *.oaux) | |
626 | ||
21764d60 | 627 | echo "Making links to \`vms'" |
40eef465 | 628 | (cd vms |
5eea385d | 629 | test -f README && ln README ../${tempdir}/vms |
40eef465 JB |
630 | cd ../${tempdir}/vms |
631 | rm -f *~) | |
632 | ||
c87b230f JB |
633 | ### It would be nice if they could all be symlinks to etc's copy, but |
634 | ### you're not supposed to have any symlinks in distribution tar files. | |
fd4bc580 | 635 | echo "Making sure copying notices are all copies of \`COPYING'" |
b37017c6 PJ |
636 | for subdir in . etc lisp src lib-src info msdos; do |
637 | rm -f ${tempdir}/${subdir}/COPYING | |
fd4bc580 | 638 | cp COPYING ${tempdir}/${subdir} |
f7dbcf3c JB |
639 | done |
640 | ||
5b8def65 JB |
641 | #### Make sure that there aren't any hard links between files in the |
642 | #### distribution; people with afs can't deal with that. Okay, | |
643 | #### actually we just re-copy anything with a link count greater | |
375f1bd7 KH |
644 | #### than two. (Yes, strictly greater than 2 is correct; since we |
645 | #### created these files by linking them in from the original tree, | |
646 | #### they'll have exactly two links normally.) | |
bb7e0f81 | 647 | #### |
908ff139 | 648 | #### Commented out since it's not strictly necessary; it should suffice |
bb7e0f81 | 649 | #### to just break the link on alloca.c. |
9b23a6c7 RS |
650 | #echo "Breaking intra-tree links." |
651 | #find ${tempdir} ! -type d -links +2 \ | |
652 | # -exec cp -p {} $$ \; -exec rm -f {} \; -exec mv $$ {} \; | |
bb7e0f81 KH |
653 | rm -f $tempdir/lib-src/alloca.c |
654 | cp $tempdir/src/alloca.c $tempdir/lib-src/alloca.c | |
5b8def65 | 655 | |
1260d6ba | 656 | if [ "${newer}" ]; then |
21764d60 | 657 | echo "Removing files older than $newer" |
76fb0a58 JB |
658 | ## We remove .elc files unconditionally, on the theory that anyone picking |
659 | ## up an incremental distribution already has a running Emacs to byte-compile | |
660 | ## them with. | |
1260d6ba ER |
661 | find ${tempparent} \( -name '*.elc' -o ! -newer ${newer} \) -exec rm -f {} \; |
662 | fi | |
663 | ||
4746118a | 664 | if [ "${make_tar}" = yes ]; then |
922ac4c5 | 665 | if [ "${default_gzip}" = "" ]; then |
21764d60 | 666 | echo "Looking for gzip" |
922ac4c5 JB |
667 | temppath=`echo $PATH | sed 's/^:/.:/ |
668 | s/::/:.:/g | |
669 | s/:$/:./ | |
670 | s/:/ /g'` | |
671 | default_gzip=`( | |
672 | for dir in ${temppath}; do | |
673 | if [ -f ${dir}/gzip ]; then echo 'gzip --best'; exit 0; fi | |
674 | done | |
675 | echo compress | |
676 | )` | |
677 | fi | |
f395c83a JB |
678 | case "${default_gzip}" in |
679 | compress* ) gzip_extension=.Z ;; | |
0dc610dd | 680 | * ) gzip_extension=.gz ;; |
f395c83a | 681 | esac |
91741841 | 682 | echo "Creating tar files" |
f395c83a JB |
683 | (cd ${tempparent} ; tar cvf - ${emacsname} ) \ |
684 | | ${default_gzip} \ | |
685 | > ${emacsname}.tar${gzip_extension} | |
65fda17c | 686 | (cd ${tempparent}/${emacsname}-leim ; tar cvf - ${emacsname} ) \ |
91741841 | 687 | | ${default_gzip} \ |
5eea385d | 688 | > leim-${version}${new_extension}.tar${gzip_extension} |
4746118a | 689 | fi |
f7dbcf3c | 690 | |
4746118a | 691 | if [ "${clean_up}" = yes ]; then |
21764d60 | 692 | echo "Cleaning up the staging directory" |
f395c83a | 693 | rm -rf ${tempparent} |
bb160193 | 694 | else |
91741841 | 695 | (cd ${tempparent}; mv ${emacsname} ${emacsname}-leim ..) |
bb160193 | 696 | rm -rf ${tempparent} |
f7dbcf3c | 697 | fi |
00c00348 | 698 | |
76fb0a58 | 699 | ### make-dist ends here |