Add Euro character.
[kopensolaris-gnu/glibc.git] / glibcbug.in
1 #! /bin/sh
2 #
3 # glibcbug - create a bug report and mail it to the bug address.
4 #
5 # configuration section:
6 #       these variables are filled in by configure
7 #
8 VERSION="@VERSION@"
9 RELEASE="@RELEASE@"
10 ADDONS="@subdirs@"
11 HOST="@host@"
12 CC='@CC@'
13 CFLAGS="@CFLAGS@"
14 SYSINCLUDES="@SYSINCLUDES@"
15 VERSIONING="@VERSIONING@"
16 BUILD_STATIC="@static@"
17 BUILD_SHARED="@shared@"
18 BUILD_PIC_DEFAULT="@pic_default@"
19 BUILD_PROFILE="@profile@"
20 BUILD_OMITFP="@omitfp@"
21 BUILD_BOUNDED="@bounded@"
22 BUILD_STATIC_NSS="@static_nss@"
23 STDIO="@stdio@"
24
25 TEMP=`mktemp -q /tmp/glibcbugXXXXXX 2>/dev/null`
26 if test $? -ne 0; then
27   TEMP=/tmp/glibcbug.$$
28   echo > $TEMP
29   chmod 600 $TEMP
30 fi
31 TEMPx=`mktemp -q /tmp/glibcbugXXXXXX 2>/dev/null`
32 if test $? -ne 0; then
33   TEMPx=/tmp/glibcbug.$$.x
34   echo > $TEMPx
35   chmod 600 $TEMPx
36 fi
37
38 if test "$RELEASE" = "stable"; then
39   BUGGLIBC="bugs@gnu.org"
40 else
41   BUGGLIBC="libc-alpha@cygnus.com"
42 fi
43
44 BUGADDR=${1-$BUGGLIBC}
45
46 : ${EDITOR=emacs}
47
48 : ${USER=${LOGNAME-`whoami`}}
49
50 trap 'rm -f $TEMP $TEMPx; exit 1' 1 2 3 13 15
51 trap 'rm -f $TEMP $TEMPx' 0
52
53
54 # How to read the passwd database.
55 PASSWD="cat /etc/passwd"
56
57 if [ -f /usr/lib/sendmail ] ; then
58         MAIL_AGENT="/usr/lib/sendmail -oi -t"
59 elif [ -f /usr/sbin/sendmail ] ; then
60         MAIL_AGENT="/usr/sbin/sendmail -oi -t"
61 else
62         MAIL_AGENT=rmail
63 fi
64
65 # Figure out how to echo a string without a trailing newline
66 N=`echo 'hi there\c'`
67 case "$N" in
68 *c)     ECHON1='echo -n' ECHON2= ;;
69 *)      ECHON1=echo ECHON2='\c' ;;
70 esac
71
72 # Find out the name of the originator of this PR.
73 if [ -n "$NAME" ]; then
74   ORIGINATOR="$NAME"
75 elif [ -f $HOME/.fullname ]; then
76   ORIGINATOR="`sed -e '1q' $HOME/.fullname`"
77 else
78   # Must use temp file due to incompatibilities in quoting behavior
79   # and to protect shell metacharacters in the expansion of $LOGNAME
80   $PASSWD | grep "^$LOGNAME:" | awk -F: '{print $5}' | sed -e 's/,.*//' > $TEMP
81   ORIGINATOR="`cat $TEMP`"
82 fi
83
84 if [ -n "$ORGANIZATION" ]; then
85   if [ -f "$ORGANIZATION" ]; then
86     ORGANIZATION="`cat $ORGANIZATION`"
87   fi
88 else
89   if [ -f $HOME/.organization ]; then
90     ORGANIZATION="`cat $HOME/.organization`"
91   elif [ -f $HOME/.signature ]; then
92     ORGANIZATION=`sed -e "s/^/  /" $HOME/.signature; echo ">"`
93   fi
94 fi
95
96 # If they don't have a preferred editor set, then use
97 if [ -z "$VISUAL" ]; then
98   if [ -z "$EDITOR" ]; then
99     EDIT=vi
100   else
101     EDIT="$EDITOR"
102   fi
103 else
104   EDIT="$VISUAL"
105 fi
106
107 # Find out some information.
108 SYSTEM=`( [ -f /bin/uname ] && /bin/uname -a ) || \
109         ( [ -f /usr/bin/uname ] && /usr/bin/uname -a ) || echo ""`
110 ARCH=`[ -f /bin/arch ] && /bin/arch`
111 MACHINE=`[ -f /bin/machine ] && /bin/machine`
112 CCVERSION=`$CC -v 2>&1 | sed -n 's/gcc version //p'`
113
114 case $HOST in *linux*)
115   KHDRS=`(echo '#include <linux/version.h>'
116           echo '! UTS_RELEASE' ) |
117          $CC $SYSINCLUDES -E - | sed -n '/!/s/[! "]//gp'`;;
118 esac
119
120 ORGANIZATION_C='<organization of PR author (multiple lines)>'
121 SYNOPSIS_C='<synopsis of the problem (one line)>'
122 SEVERITY_C='<[ non-critical | serious | critical ] (one line)>'
123 PRIORITY_C='<[ low | medium | high ] (one line)>'
124 CLASS_C='<[ sw-bug | doc-bug | change-request | support ] (one line)>'
125 RELEASE_C='<release number or tag (one line)>'
126 ENVIRONMENT_C='<machine, os, target, libraries (multiple lines)>'
127 DESCRIPTION_C='<precise description of the problem (multiple lines)>'
128 HOW_TO_REPEAT_C='<code/input/activities to reproduce the problem (multiple lines)>'
129 FIX_C='<how to correct or work around the problem, if known (multiple lines)>'
130
131
132 cat > $TEMP <<EOF
133 SEND-PR: -*- send-pr -*-
134 SEND-PR: Lines starting with \`SEND-PR' will be removed automatically, as
135 SEND-PR: will all comments (text enclosed in \`<' and \`>').
136 SEND-PR:
137 From: ${USER}
138 To: ${BUGADDR}
139 Subject: [50 character or so descriptive subject here (for reference)]
140
141 >Submitter-Id:  net
142 >Originator:    ${ORIGINATOR}
143 >Organization:
144 ${ORGANIZATION- $ORGANIZATION_C}
145 >Confidential:  no
146 >Synopsis:      $SYNOPSIS_C
147 >Severity:      $SEVERITY_C
148 >Priority:      $PRIORITY_C
149 >Category:      libc
150 >Class:         $CLASS_C
151 >Release:       libc-${VERSION}
152 >Environment:
153         $ENVIRONMENT_C
154 `[ -n "$HOST" ] && echo Host type: $HOST`
155 `[ -n "$SYSTEM" ] && echo System: $SYSTEM`
156 `[ -n "$ARCH" ] && echo Architecture: $ARCH`
157 `[ -n "$MACHINE" ] && echo Machine: $MACHINE`
158 `[ -n "$ADDONS" ] && echo Addons: $ADDONS`
159 `[ -n "$CFLAGS" ] && echo Build CFLAGS: $CFLAGS`
160 `[ -n "$CC" ] && echo Build CC: $CC`
161 `[ -n "$CCVERSION" ] && echo Compiler version: $CCVERSION`
162 `[ -n "$KHDRS" ] && echo Kernel headers: $KHDRS`
163 `[ -n "$VERSIONING" ] && echo Symbol versioning: $VERSIONING`
164 `[ -n "$BUILD_STATIC" ] && echo Build static: $BUILD_STATIC`
165 `[ -n "$BUILD_SHARED" ] && echo Build shared: $BUILD_SHARED`
166 `[ -n "$BUILD_PIC_DEFAULT" ] && echo Build pic-default: $BUILD_PIC_DEFAULT`
167 `[ -n "$BUILD_PROFILE" ] && echo Build profile: $BUILD_PROFILE`
168 `[ -n "$BUILD_OMITFP" ] && echo Build omitfp: $BUILD_OMITFP`
169 `[ -n "$BUILD_BOUNDED" ] && echo Build bounded: $BUILD_BOUNDED`
170 `[ -n "$BUILD_STATIC_NSS" ] && echo Build static-nss: $BUILD_STATIC_NSS`
171 `[ -n "$STDIO" ] && echo Stdio: $STDIO`
172
173 >Description:
174         $DESCRIPTION_C
175 >How-To-Repeat:
176         $HOW_TO_REPEAT_C
177 >Fix:
178         $FIX_C
179 EOF
180
181 chmod u+w $TEMP
182 cp $TEMP $TEMPx
183
184 eval $EDIT $TEMP
185
186 if cmp -s $TEMP $TEMPx; then
187         echo "File not changed, no bug report submitted."
188         exit 1
189 fi
190
191 #\f
192 #       Check the enumeration fields
193
194 # This is a "sed-subroutine" with one keyword parameter
195 # (with workaround for Sun sed bug)
196 #
197 SED_CMD='
198 /$PATTERN/{
199 s|||
200 s|<.*>||
201 s|^[    ]*||
202 s|[     ]*$||
203 p
204 q
205 }'
206
207
208 while :; do
209   CNT=0
210
211   #
212   # 1) Severity
213   #
214   PATTERN=">Severity:"
215   SEVERITY=`eval sed -n -e "\"$SED_CMD\"" $TEMP`
216   case "$SEVERITY" in
217     ""|non-critical|serious|critical) CNT=`expr $CNT + 1` ;;
218     *)  echo "$COMMAND: \`$SEVERITY' is not a valid value for \`Severity'."
219   esac
220   #
221   # 2) Priority
222   #
223   PATTERN=">Priority:"
224   PRIORITY=`eval sed -n -e "\"$SED_CMD\"" $TEMP`
225   case "$PRIORITY" in
226     ""|low|medium|high) CNT=`expr $CNT + 1` ;;
227     *)  echo "$COMMAND: \`$PRIORITY' is not a valid value for \`Priority'."
228   esac
229   #
230   # 3) Class
231   #
232   PATTERN=">Class:"
233   CLASS=`eval sed -n -e "\"$SED_CMD\"" $TEMP`
234   case "$CLASS" in
235     ""|sw-bug|doc-bug|change-request|support) CNT=`expr $CNT + 1` ;;
236     *)  echo "$COMMAND: \`$CLASS' is not a valid value for \`Class'."
237   esac
238
239   [ $CNT -lt 3 ] &&
240     echo "Errors were found with the problem report."
241
242   while :; do
243     $ECHON1 "a)bort, e)dit or s)end? $ECHON2"
244     read input
245     case "$input" in
246       a*)
247         echo "$COMMAND: problem report saved in $HOME/dead.glibcbug."
248         cat $TEMP >> $HOME/dead.glibcbug
249         xs=1; exit
250         ;;
251       e*)
252         eval $EDIT $TEMP
253         continue 2
254         ;;
255       s*)
256         break 2
257         ;;
258     esac
259   done
260 done
261 #
262 #       Remove comments and send the problem report
263 #       (we have to use patterns, where the comment contains regex chars)
264 #
265 # /^>Originator:/s;$ORIGINATOR;;
266 sed  -e "
267 /^SEND-PR:/d
268 /^>Organization:/,/^>[A-Za-z-]*:/s;$ORGANIZATION_C;;
269 /^>Confidential:/s;<.*>;;
270 /^>Synopsis:/s;$SYNOPSIS_C;;
271 /^>Severity:/s;<.*>;;
272 /^>Priority:/s;<.*>;;
273 /^>Class:/s;<.*>;;
274 /^>Release:/,/^>[A-Za-z-]*:/s;$RELEASE_C;;
275 /^>Environment:/,/^>[A-Za-z-]*:/s;$ENVIRONMENT_C;;
276 /^>Description:/,/^>[A-Za-z-]*:/s;$DESCRIPTION_C;;
277 /^>How-To-Repeat:/,/^>[A-Za-z-]*:/s;$HOW_TO_REPEAT_C;;
278 /^>Fix:/,/^>[A-Za-z-]*:/s;$FIX_C;;
279 " $TEMP > $TEMPx
280
281 if $MAIL_AGENT < $TEMPx; then
282   echo "$COMMAND: problem report sent"
283   xs=0; exit
284 else
285   echo "$COMMAND: mysterious mail failure, report not sent."
286   echo "$COMMAND: problem report saved in $HOME/dead.glibcbug."
287   cat $TEMP >> $HOME/dead.glibcbug
288 fi
289
290 exit 0