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) |
980ab937 | 245 | |
e888d449 | 246 | echo "Updating finder, custom and autoload data" |
59d05d2d | 247 | (cd lisp; make updates EMACS="$EMACS") |
7cf45b04 | 248 | |
5eea385d GM |
249 | if test -f leim/leim-list.el; then |
250 | echo "Updating leim-list.el" | |
251 | (cd leim; make leim-list.el EMACS="$EMACS") | |
252 | fi | |
29c98ed3 RS |
253 | |
254 | echo "Recompiling Lisp files" | |
29c98ed3 | 255 | $EMACS -batch -f batch-byte-recompile-directory lisp leim |
c75cfabd | 256 | fi |
0588a761 | 257 | |
f07eebe0 KH |
258 | echo "Making lisp/MANIFEST" |
259 | ||
73494596 RS |
260 | (cd lisp; |
261 | files=`echo [!=]*.el | sed -e 's/ subdirs.el / /' -e 's/ default.el / /'` | |
262 | for dir in [!=]*; do | |
5eea385d GM |
263 | if [ -d $dir ] && [ $dir != term ] && [ $dir != CVS ] && [ $dir != RCS ] |
264 | then | |
73494596 RS |
265 | echo $dir |
266 | thisdir=`echo $dir/[!=]*.el | sed -e 's/ subdirs.el / /'` | |
267 | files="$files $thisdir" | |
268 | fi | |
269 | done | |
270 | head -1 $files | grep '^;' | sed -e 's/;;; //' | sort > MANIFEST) | |
f07eebe0 | 271 | |
1260d6ba | 272 | echo "Creating staging directory: \`${tempparent}'" |
bb160193 | 273 | |
f7dbcf3c | 274 | mkdir ${tempparent} |
f7dbcf3c JB |
275 | tempdir="${tempparent}/${emacsname}" |
276 | ||
76fb0a58 JB |
277 | ### This trap ensures that the staging directory will be cleaned up even |
278 | ### when the script is interrupted in mid-career. | |
00c00348 | 279 | if [ "${clean_up}" = yes ]; then |
21764d60 | 280 | trap "echo 'Interrupted...cleaning up the staging directory'; rm -rf ${tempparent}; exit 1" 1 2 15 |
00c00348 ER |
281 | fi |
282 | ||
1260d6ba | 283 | echo "Creating top directory: \`${tempdir}'" |
f7dbcf3c JB |
284 | mkdir ${tempdir} |
285 | ||
76fb0a58 JB |
286 | ### We copy in the top-level files before creating the subdirectories in |
287 | ### hopes that this will make the top-level files appear first in the | |
288 | ### tar file; this means that people can start reading the INSTALL and | |
289 | ### README while the rest of the tar file is still unpacking. Whoopee. | |
21764d60 | 290 | echo "Making links to top-level files" |
ed5882b9 | 291 | ln AUTHORS FTP INSTALL README BUGS move-if-change ${tempdir} |
9d38d529 | 292 | ln ChangeLog Makefile.in configure configure.in aclocal.m4 ${tempdir} |
6f8b09f3 | 293 | ln config.bat make-dist update-subdirs vpath.sed ${tempdir} |
bb160193 | 294 | ### Copy these files; they're cross-filesystem symlinks. |
a4888c88 | 295 | cp mkinstalldirs ${tempdir} |
76fb0a58 | 296 | cp config.sub ${tempdir} |
2ed56345 | 297 | cp config.guess ${tempdir} |
dc7717ab | 298 | cp install-sh ${tempdir} |
f7dbcf3c | 299 | |
21764d60 | 300 | echo "Updating version number in README" |
f753e9aa JB |
301 | (cd ${tempdir} |
302 | awk \ | |
303 | '$1 " " $2 " " $3 " " $4 " " $5 == "This directory tree holds version" { $6 = version; print $0 } | |
304 | $1 " " $2 " " $3 " " $4 " " $5 != "This directory tree holds version"' \ | |
305 | version=${version} README > tmp.README | |
af559a4e | 306 | mv -f tmp.README README) |
f753e9aa JB |
307 | |
308 | ||
21764d60 | 309 | echo "Creating subdirectories" |
1d951084 | 310 | for subdir in lisp site-lisp lispref \ |
5f34e16f | 311 | leim real-leim real-leim/CXTERM-DIC real-leim/MISC-DIC \ |
0744c2f1 | 312 | real-leim/SKK-DIC real-leim/ja-dic real-leim/quail \ |
c660c0a7 | 313 | src src/m src/s src/bitmaps lib-src oldXMenu lwlib \ |
5ec8424f | 314 | nt nt/inc nt/inc/sys nt/inc/arpa nt/inc/netinet nt/icons \ |
b3635775 GM |
315 | etc etc/e lock info man msdos vms mac mac/inc mac/inc/sys \ |
316 | mac/src | |
317 | do | |
318 | echo " ${tempdir}/${subdir}" | |
f7dbcf3c JB |
319 | mkdir ${tempdir}/${subdir} |
320 | done | |
321 | ||
91741841 | 322 | echo "Initializing \`leim' subdirectory" |
a1363c1d | 323 | cp noleim-Makefile.in ${tempdir}/leim/Makefile.in |
91741841 | 324 | |
67ffab69 | 325 | echo "Making links to \`lisp' and its subdirectories" |
7b9cd64c | 326 | ### Don't distribute TAGS, =*.el files, site-init.el, site-load.el, or default.el. |
f7dbcf3c JB |
327 | (cd lisp |
328 | ln [a-zA-Z]*.el ../${tempdir}/lisp | |
329 | ln [a-zA-Z]*.elc ../${tempdir}/lisp | |
8d2197ac | 330 | ln [a-zA-Z]*.dat ../${tempdir}/lisp |
a1363c1d | 331 | for img in [a-zA-Z]*.xpm [a-zA-Z]*.xbm [a-zA-Z]*.pbm; do |
365949b7 GM |
332 | # If there are no images, the shell won't expand the pattern. |
333 | if [ -f $img ]; then | |
334 | ln $img ../${tempdir}/lisp | |
335 | fi | |
336 | done | |
76fb0a58 JB |
337 | ## simula.el doesn't keep abbreviations in simula.defns any more. |
338 | ## ln [a-zA-Z]*.defns ../${tempdir}/lisp | |
bf7e917e | 339 | ln ChangeLog Makefile.in makefile.nt ChangeLog.? ../${tempdir}/lisp |
b3635775 | 340 | ln makefile.w32-in ../${tempdir}/lisp |
5eea385d | 341 | test -f README && ln README ../${tempdir}/lisp |
67ffab69 RS |
342 | (cd ../${tempdir}/lisp |
343 | rm -f TAGS =* | |
344 | rm -f site-init site-init.el site-init.elc | |
345 | rm -f site-load site-load.el site-load.elc | |
346 | rm -f site-start site-start.el site-start.elc | |
347 | rm -f default default.el default.elc | |
348 | ) | |
349 | ||
350 | ## Find all subdirs of lisp dir | |
351 | for file in `find . -type d -print`; do | |
352 | case $file in | |
5eea385d | 353 | . | .. | */Old | */CVS | */RCS | */=*) |
67ffab69 RS |
354 | ;; |
355 | *) | |
356 | if [ -d $file ]; then | |
357 | subdirs="$file $subdirs" | |
358 | fi | |
359 | ;; | |
360 | esac | |
361 | done | |
362 | ||
363 | for file in $subdirs; do | |
364 | echo " lisp/$file" | |
365 | mkdir ../${tempdir}/lisp/$file | |
b3635775 GM |
366 | ln $file/[a-zA-Z0-9]*.el ../${tempdir}/lisp/$file |
367 | ln $file/[a-zA-Z0-9]*.elc ../${tempdir}/lisp/$file | |
368 | for img in $file/[a-zA-Z]*.xpm $file/[a-zA-Z]*.xbm $file/[a-zA-Z]*.pbm; do | |
365949b7 GM |
369 | if [ -f $img ]; then |
370 | ln $img ../${tempdir}/lisp/$file | |
371 | fi | |
372 | done | |
67ffab69 RS |
373 | if [ -f $file/README ]; then |
374 | ln $file/README ../${tempdir}/lisp/$file | |
375 | fi | |
b3635775 | 376 | |
dcf3ff7f RS |
377 | if [ -f $file/ChangeLog ]; then |
378 | ln $file/ChangeLog ../${tempdir}/lisp/$file | |
b3635775 GM |
379 | for f in $file/ChangeLog.[0-9]; do |
380 | if [ -f $f ]; then | |
381 | ln $f ../${tempdir}/lisp/$file | |
382 | fi | |
383 | done | |
dcf3ff7f | 384 | fi |
67ffab69 | 385 | done ) |
a78c106d | 386 | |
91741841 RS |
387 | echo "Making links to \`leim' and its subdirectories for the LEIM distribution" |
388 | ### Don't distribute TAGS, or =*.el files. | |
389 | (cd leim | |
b3635775 | 390 | ln makefile.nt makefile.w32-in ../${tempdir}/real-leim |
9089d8d7 | 391 | ln ChangeLog README ../${tempdir}/real-leim |
91741841 RS |
392 | |
393 | ln CXTERM-DIC/*.tit ../${tempdir}/real-leim/CXTERM-DIC | |
5f8d02be | 394 | ln SKK-DIC/README SKK-DIC/SKK-JISYO.L ../${tempdir}/real-leim/SKK-DIC |
5f34e16f | 395 | ln MISC-DIC/*.* ../${tempdir}/real-leim/MISC-DIC |
0744c2f1 | 396 | ln ja-dic/*.el ja-dic/*.elc ../${tempdir}/real-leim/ja-dic |
a1363c1d | 397 | ln Makefile.in ../${tempdir}/real-leim/Makefile.in |
7f39d6bb GM |
398 | ln quail/[a-z]*.el quail/[a-z]*.elc ../${tempdir}/real-leim/quail |
399 | rm -f ../${tempdir}/real-leim/quail/quick-b5.* | |
400 | rm -f ../${tempdir}/real-leim/quail/quick-cns.* | |
401 | rm -f ../${tempdir}/real-leim/quail/tsang-b5.* | |
402 | rm -f ../${tempdir}/real-leim/quail/tsang-cns.* | |
5eea385d | 403 | |
91741841 RS |
404 | cd ../${tempdir}/real-leim |
405 | rm -f TAGS =* */=*) | |
406 | ||
407 | ### Move the real-leim directory outside of Emacs proper. | |
65fda17c RS |
408 | (cd ${tempparent} |
409 | mkdir ${emacsname}-leim | |
410 | mkdir ${emacsname}-leim/${emacsname} | |
411 | mv ${emacsname}/real-leim ${emacsname}-leim/${emacsname}/leim) | |
91741841 | 412 | |
21764d60 | 413 | echo "Making links to \`src'" |
76fb0a58 | 414 | ### Don't distribute =*.[ch] files, or the configured versions of |
c3f1e1a9 | 415 | ### config.in, paths.in, or Makefile.in, or TAGS. |
f7dbcf3c | 416 | (cd src |
c75cfabd | 417 | echo " (It is ok if ln fails in some cases.)" |
f7dbcf3c JB |
418 | ln [a-zA-Z]*.c ../${tempdir}/src |
419 | ln [a-zA-Z]*.h ../${tempdir}/src | |
420 | ln [a-zA-Z]*.s ../${tempdir}/src | |
c75cfabd RS |
421 | ln [a-zA-Z]*.in ../${tempdir}/src |
422 | ln [a-zA-Z]*.opt ../${tempdir}/src | |
423 | ## If we ended up with a symlink, or if we did not get anything | |
424 | ## due to a cross-device symlink, copy the file. | |
425 | for file in [a-zA-Z]*.[hcs] [a-zA-Z]*.in [a-zA-Z]*.opt; do | |
426 | if test -f ../${tempdir}/src/$file; then | |
427 | # test -f appears to succeed for a symlink | |
428 | if test -L ../${tempdir}/src/$file; then | |
429 | rm ../${tempdir}/src/$file | |
62dfdaf0 | 430 | cp -p $file ../${tempdir}/src |
c75cfabd RS |
431 | chmod a-w ../${tempdir}/src/$file |
432 | fi | |
433 | else | |
434 | rm ../${tempdir}/src/$file | |
62dfdaf0 | 435 | cp -p $file ../${tempdir}/src |
c75cfabd RS |
436 | chmod a-w ../${tempdir}/src/$file |
437 | fi | |
438 | done | |
439 | ln README ChangeLog ChangeLog.*[0-9] ../${tempdir}/src | |
b3635775 | 440 | ln makefile.nt makefile.w32-in vms-pp.trans ../${tempdir}/src |
990ee059 | 441 | ln .gdbinit .dbxinit ../${tempdir}/src |
f7dbcf3c | 442 | cd ../${tempdir}/src |
8c28d444 | 443 | rm -f config.h epaths.h Makefile Makefile.c |
7b9cd64c | 444 | rm -f =* TAGS) |
f7dbcf3c | 445 | |
21764d60 | 446 | echo "Making links to \`src/bitmaps'" |
690eca32 JB |
447 | (cd src/bitmaps |
448 | ln README *.xbm ../../${tempdir}/src/bitmaps) | |
449 | ||
21764d60 | 450 | echo "Making links to \`src/m'" |
f7dbcf3c | 451 | (cd src/m |
facbb78e RS |
452 | # We call files for miscellaneous input (to linker etc) .inp. |
453 | ln README [a-zA-Z0-9]*.h *.inp ../../${tempdir}/src/m) | |
f7dbcf3c | 454 | |
21764d60 | 455 | echo "Making links to \`src/s'" |
f7dbcf3c | 456 | (cd src/s |
77427171 | 457 | ln README [a-zA-Z0-9]*.h ../../${tempdir}/src/s) |
f7dbcf3c | 458 | |
21764d60 | 459 | echo "Making links to \`lib-src'" |
f7dbcf3c | 460 | (cd lib-src |
375f1bd7 | 461 | ln [a-zA-Z]*.[chy] ../${tempdir}/lib-src |
c3f1e1a9 | 462 | ln ChangeLog Makefile.in README testfile vcdiff ../${tempdir}/lib-src |
dc7717ab | 463 | ln grep-changelog rcs2log rcs-checkin makefile.nt ../${tempdir}/lib-src |
b3635775 | 464 | ln makefile.w32-in ../${tempdir}/lib-src |
c75cfabd RS |
465 | ## If we ended up with a symlink, or if we did not get anything |
466 | ## due to a cross-device symlink, copy the file. | |
467 | for file in [a-zA-Z]*.[chy]; do | |
468 | if test -f ../${tempdir}/lib-src/$file; then | |
469 | # test -f appears to succeed for a symlink | |
470 | if test -L ../${tempdir}/lib-src/$file; then | |
471 | rm ../${tempdir}/lib-src/$file | |
472 | cp $file ../${tempdir}/lib-src | |
473 | chmod a-w ../${tempdir}/lib-src/$file | |
474 | fi | |
475 | else | |
476 | rm ../${tempdir}/lib-src/$file | |
477 | cp $file ../${tempdir}/lib-src | |
478 | chmod a-w ../${tempdir}/lib-src/$file | |
479 | fi | |
480 | done | |
1260d6ba | 481 | cd ../${tempdir}/lib-src |
c75cfabd | 482 | rm -f Makefile.c |
7b9cd64c | 483 | rm -f =* TAGS) |
f7dbcf3c | 484 | |
21764d60 | 485 | echo "Making links to \`nt'" |
391b3748 | 486 | (cd nt |
5eea385d | 487 | ln emacs.rc config.nt [a-z]*.in [a-z]*.c ../${tempdir}/nt |
80b97918 | 488 | ln _emacs nmake.defs gmake.defs subdirs.el ../${tempdir}/nt |
b47cc08a | 489 | ln [a-z]*.bat [a-z]*.h makefile.def makefile.nt ../${tempdir}/nt |
b3635775 | 490 | ln TODO ChangeLog INSTALL README makefile.w32-in ../${tempdir}/nt) |
391b3748 | 491 | |
21764d60 | 492 | echo "Making links to \`nt/inc'" |
391b3748 | 493 | (cd nt/inc |
77427171 | 494 | ln [a-z]*.h ../../${tempdir}/nt/inc) |
391b3748 | 495 | |
21764d60 | 496 | echo "Making links to \`nt/inc/sys'" |
391b3748 | 497 | (cd nt/inc/sys |
77427171 | 498 | ln [a-z]*.h ../../../${tempdir}/nt/inc/sys) |
391b3748 | 499 | |
e827bc37 RS |
500 | echo "Making links to \`nt/inc/arpa'" |
501 | (cd nt/inc/arpa | |
502 | ln [a-z]*.h ../../../${tempdir}/nt/inc/arpa) | |
503 | ||
504 | echo "Making links to \`nt/inc/netinet'" | |
505 | (cd nt/inc/netinet | |
506 | ln [a-z]*.h ../../../${tempdir}/nt/inc/netinet) | |
507 | ||
5ec8424f GV |
508 | echo "Making links to \`nt/icons'" |
509 | (cd nt/icons | |
91978d00 | 510 | ln [a-z]*.ico ../../${tempdir}/nt/icons) |
5ec8424f | 511 | |
b3635775 GM |
512 | echo "Making links to \`mac'" |
513 | (cd mac | |
514 | ln ChangeLog INSTALL README *.xml *.MPW ../${tempdir}/mac) | |
515 | ||
516 | echo "Making links to \`mac/inc'" | |
517 | (cd mac/inc | |
518 | ln [a-z]*.h ../../${tempdir}/mac/inc) | |
519 | ||
520 | echo "Making links to \`mac/inc/sys'" | |
521 | (cd mac/inc/sys | |
522 | ln [a-z]*.h ../../../${tempdir}/mac/inc/sys) | |
523 | ||
524 | echo "Making links to \`mac/src'" | |
525 | (cd mac/src | |
526 | ln [a-z]*.c *.r ../../${tempdir}/mac/src) | |
527 | ||
21764d60 | 528 | echo "Making links to \`msdos'" |
52d7b2e5 RS |
529 | (cd msdos |
530 | ln ChangeLog emacs.ico emacs.pif ../${tempdir}/msdos | |
7fd85d56 | 531 | ln is_exec.c sigaction.c mainmake mainmake.v2 sed*.inp ../${tempdir}/msdos |
52d7b2e5 RS |
532 | cd ../${tempdir}/msdos |
533 | rm -f =*) | |
534 | ||
21764d60 | 535 | echo "Making links to \`oldXMenu'" |
f7dbcf3c | 536 | (cd oldXMenu |
8bdbf9ed | 537 | ln *.c *.h *.in ../${tempdir}/oldXMenu |
df1ec566 | 538 | ln README Imakefile ChangeLog ../${tempdir}/oldXMenu |
f395c83a | 539 | ln compile.com descrip.mms ../${tempdir}/oldXMenu) |
f7dbcf3c | 540 | |
21764d60 | 541 | echo "Making links to \`lwlib'" |
c660c0a7 RS |
542 | (cd lwlib |
543 | ln *.c *.h *.in ../${tempdir}/lwlib | |
72e7e784 KH |
544 | ln README Imakefile ChangeLog ../${tempdir}/lwlib |
545 | cd ../${tempdir}/lwlib | |
546 | rm -f lwlib-Xol*) | |
c660c0a7 | 547 | |
21764d60 | 548 | echo "Making links to \`etc'" |
f395c83a JB |
549 | ### Don't distribute = files, TAGS, DOC files, backups, autosaves, or |
550 | ### tex litter. | |
f7dbcf3c | 551 | (cd etc |
5eea385d | 552 | files=`ls -d * | grep -v CVS | grep -v RCS | grep -v 'Old' | grep -v '^e$'` |
7a6ee7ae | 553 | ln $files ../${tempdir}/etc |
98d4c1d0 RS |
554 | ## If we ended up with a symlink, or if we did not get anything |
555 | ## due to a cross-device symlink, copy the file. | |
7a6ee7ae | 556 | for file in $files; do |
98d4c1d0 RS |
557 | if test -f ../${tempdir}/etc/$file; then |
558 | # test -f appears to succeed for a symlink | |
559 | if test -L ../${tempdir}/etc/$file; then | |
560 | rm ../${tempdir}/etc/$file | |
561 | cp $file ../${tempdir}/etc | |
562 | chmod a-w ../${tempdir}/etc/$file | |
563 | fi | |
564 | else | |
565 | rm ../${tempdir}/etc/$file | |
566 | cp $file ../${tempdir}/etc | |
567 | chmod a-w ../${tempdir}/etc/$file | |
568 | fi | |
569 | done | |
f7dbcf3c | 570 | cd ../${tempdir}/etc |
ebd32d7b | 571 | rm -f fns*.el |
23a58692 | 572 | rm -f DOC* *~ \#*\# *.dvi *.log *.orig *.rej *,v =* core |
f395c83a | 573 | rm -f TAGS) |
f7dbcf3c | 574 | |
21764d60 | 575 | echo "Making links to \`etc/e'" |
f08ad882 | 576 | (cd etc/e |
5eea385d | 577 | ln `ls -d * | grep -v CVS | grep -v RCS` ../../${tempdir}/etc/e |
a6903f09 | 578 | cd ../../${tempdir}/etc/e |
375f1bd7 | 579 | rm -f *~ \#*\# *,v =* core) |
f08ad882 | 580 | |
21764d60 | 581 | echo "Making links to \`info'" |
66afa119 RS |
582 | # Don't distribute backups or autosaves. |
583 | (cd info | |
b3635775 | 584 | ln `find . -type f -print | grep -v CVS | grep -v RCS | grep -v cvsignore` ../${tempdir}/info |
5eea385d | 585 | #ln [a-zA-Z]* ../${tempdir}/info |
66afa119 RS |
586 | cd ../${tempdir}/info |
587 | # Avoid an error when expanding the wildcards later. | |
588 | ln emacs dummy~ ; ln emacs \#dummy\# | |
589 | rm -f *~ \#*\# core) | |
fda4e8f6 | 590 | |
21764d60 | 591 | echo "Making links to \`man'" |
fda4e8f6 | 592 | (cd man |
298c8970 | 593 | ln *.texi *.aux *.cps *.fns *.kys *.vrs ../${tempdir}/man |
5e808bc0 | 594 | test -f README && ln README ../${tempdir}/man |
f08ad882 | 595 | test -f Makefile.in && ln Makefile.in ../${tempdir}/man |
5eea385d GM |
596 | ln ChangeLog ../${tempdir}/man |
597 | test -f split-man && ln split-man ../${tempdir}/man | |
f4500bec | 598 | cp texinfo.tex ../${tempdir}/man |
4f8cc93a | 599 | cd ../${tempdir}/man |
56c31c87 RS |
600 | rm -f \#*\# =* *~ core emacs-index* *.Z *.z xmail |
601 | rm -f emacs.?? termcap.?? gdb.?? *.log *.toc *.dvi *.oaux) | |
f7dbcf3c | 602 | |
1d951084 EZ |
603 | echo "Making links to \`lispref'" |
604 | (cd lispref | |
605 | ln *.texi *.aux *.cps *.fns *.kys *.vrs ../${tempdir}/lispref | |
606 | test -f README && ln README ../${tempdir}/lispref | |
607 | test -f Makefile.in && ln Makefile.in ../${tempdir}/lispref | |
608 | ln ChangeLog ../${tempdir}/lispref | |
609 | cd ../${tempdir}/lispref | |
610 | rm -f \#*\# =* *~ core elisp-index* *.Z *.z xmail | |
611 | rm -f elisp.?? *.log *.toc *.dvi *.oaux) | |
612 | ||
21764d60 | 613 | echo "Making links to \`vms'" |
40eef465 | 614 | (cd vms |
5eea385d | 615 | test -f README && ln README ../${tempdir}/vms |
40eef465 JB |
616 | cd ../${tempdir}/vms |
617 | rm -f *~) | |
618 | ||
c87b230f JB |
619 | ### It would be nice if they could all be symlinks to etc's copy, but |
620 | ### you're not supposed to have any symlinks in distribution tar files. | |
21764d60 | 621 | echo "Making sure copying notices are all copies of \`etc/COPYING'" |
1260d6ba ER |
622 | rm -f ${tempdir}/etc/COPYING |
623 | cp etc/COPYING ${tempdir}/etc/COPYING | |
8e583b5d | 624 | for subdir in lisp src lib-src info msdos; do |
f7dbcf3c JB |
625 | if [ -f ${tempdir}/${subdir}/COPYING ]; then |
626 | rm ${tempdir}/${subdir}/COPYING | |
627 | fi | |
96858c42 | 628 | cp etc/COPYING ${tempdir}/${subdir} |
f7dbcf3c JB |
629 | done |
630 | ||
5b8def65 JB |
631 | #### Make sure that there aren't any hard links between files in the |
632 | #### distribution; people with afs can't deal with that. Okay, | |
633 | #### actually we just re-copy anything with a link count greater | |
375f1bd7 KH |
634 | #### than two. (Yes, strictly greater than 2 is correct; since we |
635 | #### created these files by linking them in from the original tree, | |
636 | #### they'll have exactly two links normally.) | |
bb7e0f81 | 637 | #### |
908ff139 | 638 | #### Commented out since it's not strictly necessary; it should suffice |
bb7e0f81 | 639 | #### to just break the link on alloca.c. |
9b23a6c7 RS |
640 | #echo "Breaking intra-tree links." |
641 | #find ${tempdir} ! -type d -links +2 \ | |
642 | # -exec cp -p {} $$ \; -exec rm -f {} \; -exec mv $$ {} \; | |
bb7e0f81 KH |
643 | rm -f $tempdir/lib-src/alloca.c |
644 | cp $tempdir/src/alloca.c $tempdir/lib-src/alloca.c | |
5b8def65 | 645 | |
1260d6ba | 646 | if [ "${newer}" ]; then |
21764d60 | 647 | echo "Removing files older than $newer" |
76fb0a58 JB |
648 | ## We remove .elc files unconditionally, on the theory that anyone picking |
649 | ## up an incremental distribution already has a running Emacs to byte-compile | |
650 | ## them with. | |
1260d6ba ER |
651 | find ${tempparent} \( -name '*.elc' -o ! -newer ${newer} \) -exec rm -f {} \; |
652 | fi | |
653 | ||
4746118a | 654 | if [ "${make_tar}" = yes ]; then |
922ac4c5 | 655 | if [ "${default_gzip}" = "" ]; then |
21764d60 | 656 | echo "Looking for gzip" |
922ac4c5 JB |
657 | temppath=`echo $PATH | sed 's/^:/.:/ |
658 | s/::/:.:/g | |
659 | s/:$/:./ | |
660 | s/:/ /g'` | |
661 | default_gzip=`( | |
662 | for dir in ${temppath}; do | |
663 | if [ -f ${dir}/gzip ]; then echo 'gzip --best'; exit 0; fi | |
664 | done | |
665 | echo compress | |
666 | )` | |
667 | fi | |
f395c83a JB |
668 | case "${default_gzip}" in |
669 | compress* ) gzip_extension=.Z ;; | |
0dc610dd | 670 | * ) gzip_extension=.gz ;; |
f395c83a | 671 | esac |
91741841 | 672 | echo "Creating tar files" |
f395c83a JB |
673 | (cd ${tempparent} ; tar cvf - ${emacsname} ) \ |
674 | | ${default_gzip} \ | |
675 | > ${emacsname}.tar${gzip_extension} | |
65fda17c | 676 | (cd ${tempparent}/${emacsname}-leim ; tar cvf - ${emacsname} ) \ |
91741841 | 677 | | ${default_gzip} \ |
5eea385d | 678 | > leim-${version}${new_extension}.tar${gzip_extension} |
4746118a | 679 | fi |
f7dbcf3c | 680 | |
4746118a | 681 | if [ "${clean_up}" = yes ]; then |
21764d60 | 682 | echo "Cleaning up the staging directory" |
f395c83a | 683 | rm -rf ${tempparent} |
bb160193 | 684 | else |
91741841 | 685 | (cd ${tempparent}; mv ${emacsname} ${emacsname}-leim ..) |
bb160193 | 686 | rm -rf ${tempparent} |
f7dbcf3c | 687 | fi |
00c00348 | 688 | |
76fb0a58 | 689 | ### make-dist ends here |