[metaconfig.git] / dist / U / Signal.U

?RCS: $Id$
?RCS:
?RCS: Copyright (c) 1991-1997, 2004-2006, Raphael Manfredi
?RCS: 
?RCS: You may redistribute only under the terms of the Artistic License,
?RCS: as specified in the README file that comes with the distribution.
?RCS: You may reuse parts of this distribution only within the terms of
?RCS: that same Artistic License; a copy of which may be found at the root
?RCS: of the source tree for dist 4.0.
?RCS:
?RCS: $Log: Signal.U,v $
?RCS: Revision 3.0.1.1  1997/02/28  15:20:01  ram
?RCS: patch61: created
?RCS:
?X:
?X: This unit produces three files:
?X:
?X: 1- A signal.c file, which, when compiled and run, produces an output like:
?X:
?X:   HUP 1
?X:   INT 2
?X:   QUIT 3
?X:   etc...
?X:
?X: 2- A signal.awk script to parse the output of signal.c, fill
?X: in gaps (up to NSIG) and move duplicates to the end.
?X:
?X: 3- A signal_cmd script to compile signal.c and run it
?X: through sort -n -k 2 | uniq | awk -f signal.awk.
?X: (we try also sort -n +1 since some old hosts don't grok sort -k)
?X: (This is called signal_cmd to avoid OS/2 confusion with
?X: signal.cmd vs. signal.
?X: The signal_cmd script also falls back on checking signals one at a
?X: time in case the signal.c program fails.  On at least one version of
?X: Linux 2.1.x, the header file #define'd SIGRTMAX to a symbol that
?X: is not defined by the compiler/linker. :-(.  Further, on that same
?X: version of Linux, the user had a defective C-shell that gave an
?X: incorrect list for kill -l, so the fall-back didn't work.
?X:
?X: This unit is then used by sig_name.U.
?X:
?MAKE:Signal: test tr rm awk cat grep startsh eunicefix sed sort uniq \
	Findhdr cppstdin +cppflags cppminus Compile trnl run
?MAKE:	-pick add $@ %<
?X:all files declared as "public" since they're used from other units
?F:signal.c signal_cmd signal.lst signal signal.awk
?T: xx xxx xxxfiles
?LINT:use rm run
: Trace out the files included by signal.h, then look for SIGxxx names.
?X: Remove SIGARRAYSIZE used by HPUX.
?X: Remove SIGSTKSIZE used by Linux.
?X: Remove SIGSTKSZ used by Posix.
?X: Remove SIGTYP void lines used by OS2.
?X: Some cpps, like os390, dont give the file name anywhere
if [ "X$fieldn" = X ]; then
	: Just make some guesses.  We check them later.
	xxx='/usr/include/signal.h /usr/include/sys/signal.h'
else
	xxx=`echo '#include <signal.h>' |
	$cppstdin $cppminus $cppflags 2>/dev/null |
	$grep '^[ 	]*#.*include' |
	$awk "{print \\$$fieldn}" | $sed 's!"!!g' |\
		$sed 's!\\\\\\\\!/!g' | $sort | $uniq`
fi
?X: Check this list of files to be sure we have parsed the cpp output ok.
?X: This will also avoid potentially non-existent files, such
?X: as ../foo/bar.h
xxxfiles=''
?X: Add /dev/null in case the $xxx list is empty.
for xx in $xxx /dev/null ; do
	$test -f "$xx" && xxxfiles="$xxxfiles $xx"
done
?X: If we have found no files, at least try signal.h
case "$xxxfiles" in
'')	xxxfiles=`./findhdr signal.h` ;;
esac
xxx=`awk '
$1 ~ /^#define$/ && $2 ~ /^SIG[A-Z0-9]*$/ && $2 !~ /SIGARRAYSIZE/ && $2 !~ /SIGSTKSIZE/ && $2 !~ /SIGSTKSZ/ && $3 !~ /void/ {
	print substr($2, 4, 20)
}
$1 == "#" && $2 ~ /^define$/ && $3 ~ /^SIG[A-Z0-9]*$/ && $3 !~ /SIGARRAYSIZE/ && $4 !~ /void/ {
	print substr($3, 4, 20)
}' $xxxfiles`
: Append some common names just in case the awk scan failed.
xxx="$xxx ABRT ALRM BUS CANCEL CHLD CLD CONT DIL EMT FPE"
xxx="$xxx FREEZE HUP ILL INT IO IOT KILL LOST LWP PHONE"
xxx="$xxx PIPE POLL PROF PWR QUIT RTMAX RTMIN SEGV STKFLT STOP"
xxx="$xxx SYS TERM THAW TRAP TSTP TTIN TTOU URG USR1 USR2"
xxx="$xxx USR3 USR4 VTALRM WAITING WINCH WIND WINDOW XCPU XFSZ"

: generate a few handy files for later
$cat > signal.c <<'EOCP'
#include <sys/types.h>
#include <signal.h>
#include <stdio.h>
int main() {

/* Strange style to avoid deeply-nested #if/#else/#endif */
#ifndef NSIG
#  ifdef _NSIG
#    define NSIG (_NSIG)
#  endif
#endif

#ifndef NSIG
#  ifdef SIGMAX
#    define NSIG (SIGMAX+1)
#  endif
#endif

#ifndef NSIG
#  ifdef SIG_MAX
#    define NSIG (SIG_MAX+1)
#  endif
#endif

#ifndef NSIG
#  ifdef MAXSIG
#    define NSIG (MAXSIG+1)
#  endif
#endif

#ifndef NSIG
#  ifdef MAX_SIG
#    define NSIG (MAX_SIG+1)
#  endif
#endif

#ifndef NSIG
#  ifdef SIGARRAYSIZE
#    define NSIG (SIGARRAYSIZE+1) /* Not sure of the +1 */
#  endif
#endif

#ifndef NSIG
#  ifdef _sys_nsig
#    define NSIG (_sys_nsig) /* Solaris 2.5 */
#  endif
#endif

/* Default to some arbitrary number that's big enough to get most
   of the common signals.
*/
#ifndef NSIG
#    define NSIG 50
#endif

printf("NSIG %d\n", NSIG);

#ifndef JUST_NSIG

EOCP

echo $xxx | $tr ' ' $trnl | $sort | $uniq | $awk '
{
	printf "#ifdef SIG"; printf $1; printf "\n"
	printf "printf(\""; printf $1; printf " %%d\\n\",SIG";
	printf $1; printf ");\n"
	printf "#endif\n"
}
END {
	printf "#endif /* JUST_NSIG */\n";
	printf "exit(0);\n}\n";
}
' >>signal.c
$cat >signal.awk <<'EOP'
BEGIN { ndups = 0 }
$1 ~ /^NSIG$/ { nsig = $2 }
($1 !~ /^NSIG$/) && (NF == 2) {
    if ($2 > maxsig) { maxsig = $2 }
    if (sig_name[$2]) {
	dup_name[ndups] = $1
	dup_num[ndups] = $2
	ndups++
    }
    else {
	sig_name[$2] = $1
	sig_num[$2] = $2
    }
}
END {
    if (nsig == 0) {
    	nsig = maxsig + 1
    }
    printf("NSIG %d\n", nsig);
    for (n = 1; n < nsig; n++) {
 	if (sig_name[n]) {
 	    printf("%s %d\n", sig_name[n], sig_num[n])
	}
 	else {
 	    printf("NUM%d %d\n", n, n)
 	}
    }
    for (n = 0; n < ndups; n++) {
 	printf("%s %d\n", dup_name[n], dup_num[n])
    }
}
EOP
$cat >signal_cmd <<EOS
$startsh
if $test -s signal.lst; then
    echo "Using your existing signal.lst file"
	exit 0
fi
xxx="$xxx"
EOS
?X: Avoid variable interpolation problems, especially with
?X: xxx, which contains newlines.
$cat >>signal_cmd <<'EOS'

set signal
if eval $compile_ok; then
	$run ./signal$_exe | ($sort -n -k 2 2>/dev/null || $sort -n +1) |\
		$uniq | $awk -f signal.awk >signal.lst
else
	echo "(I can't seem be able to compile the whole test program)" >&4
	echo "(I'll try it in little pieces.)" >&4
	set signal -DJUST_NSIG
	if eval $compile_ok; then
		$run ./signal$_exe > signal.nsg
		$cat signal.nsg
	else
		echo "I can't seem to figure out how many signals you have." >&4
		echo "Guessing 50." >&4
		echo 'NSIG 50' > signal.nsg
	fi
	: Now look at all the signal names, one at a time.
	for xx in `echo $xxx | $tr ' ' $trnl | $sort | $uniq`; do
		$cat > signal.c <<EOCP
#include <sys/types.h>
#include <signal.h>
#include <stdio.h>
int main() {
printf("$xx %d\n", SIG${xx});
return 0;
}
EOCP
		set signal
		if eval $compile; then
			echo "SIG${xx} found."
			$run ./signal$_exe  >> signal.ls1
		else
			echo "SIG${xx} NOT found."
		fi
	done
	if $test -s signal.ls1; then
		$cat signal.nsg signal.ls1 |
			$sort -n | $uniq | $awk -f signal.awk >signal.lst
	fi

fi
if $test -s signal.lst; then
	:
else
	echo "(AAK! I can't compile the test programs -- Guessing)" >&4
	echo 'kill -l' >signal
	set X `csh -f <signal`
	$rm -f signal
	shift
	case $# in
	0) set HUP INT QUIT ILL TRAP ABRT EMT FPE KILL BUS SEGV SYS PIPE ALRM TERM;;
	esac
	echo $@ | $tr ' ' $trnl | \
 	    $awk '{ printf "%s %d\n", $1, ++s; }
 		  END { printf "NSIG %d\n", ++s }' >signal.lst
fi
$rm -f signal.c signal$_exe signal$_o signal.nsg signal.ls1
EOS
chmod a+x signal_cmd
$eunicefix signal_cmd
Commit	Line	Data
33a01fd2	1	?RCS: $Id$
d8875586 MBT	2	?RCS:
d8875586 MBT	3	?RCS: Copyright (c) 1991-1997, 2004-2006, Raphael Manfredi
33a01fd2 MBT	4	?RCS:
33a01fd2 MBT	5	?RCS: You may redistribute only under the terms of the Artistic License,
d8875586 MBT	6	?RCS: as specified in the README file that comes with the distribution.
d8875586 MBT	7	?RCS: You may reuse parts of this distribution only within the terms of
33a01fd2	8	?RCS: that same Artistic License; a copy of which may be found at the root
d8875586 MBT	9	?RCS: of the source tree for dist 4.0.
	10	?RCS:
	11	?RCS: $Log: Signal.U,v $
	12	?RCS: Revision 3.0.1.1 1997/02/28 15:20:01 ram
	13	?RCS: patch61: created
	14	?RCS:
	15	?X:
	16	?X: This unit produces three files:
	17	?X:
	18	?X: 1- A signal.c file, which, when compiled and run, produces an output like:
	19	?X:
	20	?X: HUP 1
	21	?X: INT 2
	22	?X: QUIT 3
	23	?X: etc...
	24	?X:
	25	?X: 2- A signal.awk script to parse the output of signal.c, fill
	26	?X: in gaps (up to NSIG) and move duplicates to the end.
	27	?X:
	28	?X: 3- A signal_cmd script to compile signal.c and run it
	29	?X: through sort -n -k 2 \| uniq \| awk -f signal.awk.
	30	?X: (we try also sort -n +1 since some old hosts don't grok sort -k)
	31	?X: (This is called signal_cmd to avoid OS/2 confusion with
	32	?X: signal.cmd vs. signal.
	33	?X: The signal_cmd script also falls back on checking signals one at a
	34	?X: time in case the signal.c program fails. On at least one version of
	35	?X: Linux 2.1.x, the header file #define'd SIGRTMAX to a symbol that
	36	?X: is not defined by the compiler/linker. :-(. Further, on that same
	37	?X: version of Linux, the user had a defective C-shell that gave an
	38	?X: incorrect list for kill -l, so the fall-back didn't work.
	39	?X:
	40	?X: This unit is then used by sig_name.U.
	41	?X:
	42	?MAKE:Signal: test tr rm awk cat grep startsh eunicefix sed sort uniq \
	43	Findhdr cppstdin +cppflags cppminus Compile trnl run
	44	?MAKE: -pick add $@ %<
	45	?X:all files declared as "public" since they're used from other units
	46	?F:signal.c signal_cmd signal.lst signal signal.awk
	47	?T: xx xxx xxxfiles
	48	?LINT:use rm run
	49	: Trace out the files included by signal.h, then look for SIGxxx names.
	50	?X: Remove SIGARRAYSIZE used by HPUX.
	51	?X: Remove SIGSTKSIZE used by Linux.
	52	?X: Remove SIGSTKSZ used by Posix.
	53	?X: Remove SIGTYP void lines used by OS2.
	54	?X: Some cpps, like os390, dont give the file name anywhere
	55	if [ "X$fieldn" = X ]; then
	56	: Just make some guesses. We check them later.
	57	xxx='/usr/include/signal.h /usr/include/sys/signal.h'
	58	else
	59	xxx=`echo '#include <signal.h>' \|
	60	$cppstdin $cppminus $cppflags 2>/dev/null \|
	61	$grep '^[ ]#.include' \|
	62	$awk "{print \\$$fieldn}" \| $sed 's!"!!g' \|\
	63	$sed 's!\\\\\\\\!/!g' \| $sort \| $uniq`
	64	fi
	65	?X: Check this list of files to be sure we have parsed the cpp output ok.
	66	?X: This will also avoid potentially non-existent files, such
	67	?X: as ../foo/bar.h
	68	xxxfiles=''
	69	?X: Add /dev/null in case the $xxx list is empty.
	70	for xx in $xxx /dev/null ; do
	71	$test -f "$xx" && xxxfiles="$xxxfiles $xx"
	72	done
73	?X: If we have found no files, at least try signal.h
74	case "$xxxfiles" in
75	'') xxxfiles=`./findhdr signal.h` ;;
76	esac
77	xxx=`awk '
78	$1 ~ /^#define$/ && $2 ~ /^SIG[A-Z0-9]*$/ && $2 !~ /SIGARRAYSIZE/ && $2 !~ /SIGSTKSIZE/ && $2 !~ /SIGSTKSZ/ && $3 !~ /void/ {
79	print substr($2, 4, 20)
80	}
81	$1 == "#" && $2 ~ /^define$/ && $3 ~ /^SIG[A-Z0-9]*$/ && $3 !~ /SIGARRAYSIZE/ && $4 !~ /void/ {
82	print substr($3, 4, 20)
83	}' $xxxfiles`
84	: Append some common names just in case the awk scan failed.
85	xxx="$xxx ABRT ALRM BUS CANCEL CHLD CLD CONT DIL EMT FPE"
86	xxx="$xxx FREEZE HUP ILL INT IO IOT KILL LOST LWP PHONE"
87	xxx="$xxx PIPE POLL PROF PWR QUIT RTMAX RTMIN SEGV STKFLT STOP"
88	xxx="$xxx SYS TERM THAW TRAP TSTP TTIN TTOU URG USR1 USR2"
89	xxx="$xxx USR3 USR4 VTALRM WAITING WINCH WIND WINDOW XCPU XFSZ"
90
91	: generate a few handy files for later
92	$cat > signal.c <<'EOCP'
93	#include <sys/types.h>
94	#include <signal.h>
95	#include <stdio.h>
96	int main() {
97
98	/* Strange style to avoid deeply-nested #if/#else/#endif */
99	#ifndef NSIG
100	# ifdef _NSIG
101	# define NSIG (_NSIG)
102	# endif
103	#endif
104
105	#ifndef NSIG
106	# ifdef SIGMAX
107	# define NSIG (SIGMAX+1)
108	# endif
109	#endif
110
111	#ifndef NSIG
112	# ifdef SIG_MAX
113	# define NSIG (SIG_MAX+1)
114	# endif
115	#endif
116
117	#ifndef NSIG
118	# ifdef MAXSIG
119	# define NSIG (MAXSIG+1)
120	# endif
121	#endif
122
123	#ifndef NSIG
124	# ifdef MAX_SIG
125	# define NSIG (MAX_SIG+1)
126	# endif
127	#endif
128
129	#ifndef NSIG
130	# ifdef SIGARRAYSIZE
131	# define NSIG (SIGARRAYSIZE+1) /* Not sure of the +1 */
132	# endif
133	#endif
134
135	#ifndef NSIG
136	# ifdef _sys_nsig
137	# define NSIG (_sys_nsig) /* Solaris 2.5 */
138	# endif
139	#endif
140
141	/* Default to some arbitrary number that's big enough to get most
142	of the common signals.
143	*/
144	#ifndef NSIG
145	# define NSIG 50
146	#endif
147
148	printf("NSIG %d\n", NSIG);
149
150	#ifndef JUST_NSIG
151
152	EOCP
153
154	echo $xxx \| $tr ' ' $trnl \| $sort \| $uniq \| $awk '
155	{
156	printf "#ifdef SIG"; printf $1; printf "\n"
157	printf "printf(\""; printf $1; printf " %%d\\n\",SIG";
158	printf $1; printf ");\n"
159	printf "#endif\n"
160	}
161	END {
162	printf "#endif /* JUST_NSIG */\n";
163	printf "exit(0);\n}\n";
164	}
165	' >>signal.c
166	$cat >signal.awk <<'EOP'
167	BEGIN { ndups = 0 }
168	$1 ~ /^NSIG$/ { nsig = $2 }
169	($1 !~ /^NSIG$/) && (NF == 2) {
170	if ($2 > maxsig) { maxsig = $2 }
171	if (sig_name[$2]) {
172	dup_name[ndups] = $1
173	dup_num[ndups] = $2
174	ndups++
175	}
176	else {
177	sig_name[$2] = $1
178	sig_num[$2] = $2
179	}
180	}
181	END {
182	if (nsig == 0) {
183	nsig = maxsig + 1
184	}
185	printf("NSIG %d\n", nsig);
186	for (n = 1; n < nsig; n++) {
187	if (sig_name[n]) {
188	printf("%s %d\n", sig_name[n], sig_num[n])
189	}
190	else {
191	printf("NUM%d %d\n", n, n)
192	}
193	}
194	for (n = 0; n < ndups; n++) {
195	printf("%s %d\n", dup_name[n], dup_num[n])
196	}
197	}
198	EOP
199	$cat >signal_cmd <<EOS
200	$startsh
201	if $test -s signal.lst; then
202	echo "Using your existing signal.lst file"
203	exit 0
204	fi
205	xxx="$xxx"
206	EOS
207	?X: Avoid variable interpolation problems, especially with
208	?X: xxx, which contains newlines.
209	$cat >>signal_cmd <<'EOS'
210
211	set signal
212	if eval $compile_ok; then
213	$run ./signal$_exe \| ($sort -n -k 2 2>/dev/null \|\| $sort -n +1) \|\
214	$uniq \| $awk -f signal.awk >signal.lst
215	else
216	echo "(I can't seem be able to compile the whole test program)" >&4
217	echo "(I'll try it in little pieces.)" >&4
218	set signal -DJUST_NSIG
219	if eval $compile_ok; then
220	$run ./signal$_exe > signal.nsg
221	$cat signal.nsg
222	else
223	echo "I can't seem to figure out how many signals you have." >&4
224	echo "Guessing 50." >&4
225	echo 'NSIG 50' > signal.nsg
226	fi
227	: Now look at all the signal names, one at a time.
228	for xx in `echo $xxx \| $tr ' ' $trnl \| $sort \| $uniq`; do
229	$cat > signal.c <<EOCP
230	#include <sys/types.h>
231	#include <signal.h>
232	#include <stdio.h>
233	int main() {
234	printf("$xx %d\n", SIG${xx});
235	return 0;
236	}
237	EOCP
238	set signal
239	if eval $compile; then
240	echo "SIG${xx} found."
241	$run ./signal$_exe >> signal.ls1
242	else
243	echo "SIG${xx} NOT found."
244	fi
245	done
246	if $test -s signal.ls1; then
247	$cat signal.nsg signal.ls1 \|
248	$sort -n \| $uniq \| $awk -f signal.awk >signal.lst
249	fi
250
251	fi
252	if $test -s signal.lst; then
253	:
254	else
255	echo "(AAK! I can't compile the test programs -- Guessing)" >&4
256	echo 'kill -l' >signal
257	set X `csh -f <signal`
258	$rm -f signal
259	shift
260	case $# in
261	0) set HUP INT QUIT ILL TRAP ABRT EMT FPE KILL BUS SEGV SYS PIPE ALRM TERM;;
262	esac
263	echo $@ \| $tr ' ' $trnl \| \
264	$awk '{ printf "%s %d\n", $1, ++s; }
265	END { printf "NSIG %d\n", ++s }' >signal.lst
266	fi
267	$rm -f signal.c signal$_exe signal$_o signal.nsg signal.ls1
268	EOS
269	chmod a+x signal_cmd
270	$eunicefix signal_cmd
271