OSDN Git Service

PR libfortran/15266
[pf3gnuchains/gcc-fork.git] / fixincludes / inclhack.def
1 /* -*- Mode: C -*-  */
2
3 autogen definitions fixincl;
4
5 /* Define all the fixes we know about for repairing damaged headers.
6    Please see the README before adding or changing entries in this file.
7
8    This is the sort command:
9
10    blocksort output=inclhack.sorted \
11           pattern='^/\*$' \
12           trailer='^/\*EOF\*[/]' \
13           input=inclhack.def \
14           key='hackname[        ]*=[    ]*(.*);'
15
16    Set up a debug test so we can make the templates emit special
17    code while debugging these fixes:  */
18
19 #ifdef DEBUG
20 FIXINC_DEBUG = yes;
21 #endif
22
23 /*
24  *  This fixes __FD_ZERO bug for linux 2.x.y (x <= 2 && y <= some n)
25  */
26 fix = {
27     hackname = AAB_fd_zero_asm_posix_types_h;
28     files    = asm/posix_types.h;
29     mach     = 'i[34567]86-*-linux*';
30     bypass   = '} while';
31
32     /*
33      * Define _POSIX_TYPES_H_WRAPPER at the end of the wrapper, not
34      * the start, so that if #include_next gets another instance of
35      * the wrapper, this will follow the #include_next chain until
36      * we arrive at the real <asm/posix_types.h>.
37      */
38     replace  = <<-  _EndOfHeader_
39         /* This file fixes a bug in the __FD_ZERO macro
40            for older versions of the Linux kernel. */
41         #ifndef _POSIX_TYPES_H_WRAPPER
42         #include <features.h>
43          #include_next <asm/posix_types.h>
44         
45         #if defined(__FD_ZERO) && !defined(__GLIBC__)
46         #undef __FD_ZERO
47         #define __FD_ZERO(fdsetp) \
48           do { \
49             int __d0, __d1; \
50                         __asm__ __volatile__("cld ; rep ; stosl" \
51                                 : "=&c" (__d0), "=&D" (__d1) \
52                                 : "a" (0), "0" (__FDSET_LONGS), \
53                                   "1" ((__kernel_fd_set *) (fdsetp)) :"memory"); \
54           } while (0)
55         #endif
56         
57         #define _POSIX_TYPES_H_WRAPPER
58         #endif /* _POSIX_TYPES_H_WRAPPER */
59         _EndOfHeader_;
60 };
61
62
63 /*
64  *  This fixes __FD_ZERO bug for glibc-1.x
65  */
66 fix = {
67     hackname = AAB_fd_zero_gnu_types_h;
68     files    = gnu/types.h;
69     mach     = 'i[34567]86-*-linux*';
70
71     /*
72      * Define _TYPES_H_WRAPPER at the end of the wrapper, not
73      * the start, so that if #include_next gets another instance of
74      * the wrapper, this will follow the #include_next chain until
75      * we arrive at the real <gnu/types.h>.
76      */
77     replace  = <<-  _EndOfHeader_
78         /* This file fixes a bug in the __FD_ZERO macro present in glibc 1.x. */
79         #ifndef _TYPES_H_WRAPPER
80         #include <features.h>
81         #include_next <gnu/types.h>
82
83         #if defined(__FD_ZERO) && !defined(__GLIBC__)
84         #undef __FD_ZERO
85         # define __FD_ZERO(fdsetp) \
86           do { \
87             int __d0, __d1; \
88                 __asm__ __volatile__("cld ; rep ; stosl" \
89                 : "=&c" (__d0), "=&D" (__d1) \
90                 : "a" (0), "0" (__FDSET_LONGS), \
91                   "1" ((__fd_set *) (fdsetp)) :"memory"); \
92           } while (0)
93         #endif
94
95         #define _TYPES_H_WRAPPER
96         #endif /* _TYPES_H_WRAPPER */
97         _EndOfHeader_;
98 };
99
100
101 /*
102  *  This fixes __FD_ZERO bug for glibc-2.0.x
103  */
104 fix = {
105     hackname = AAB_fd_zero_selectbits_h;
106     files    = selectbits.h;
107     mach     = 'i[34567]86-*-linux*';
108
109     /*
110      * Define _SELECTBITS_H_WRAPPER at the end of the wrapper, not
111      * the start, so that if #include_next gets another instance of
112      * the wrapper, this will follow the #include_next chain until
113      * we arrive at the real <selectbits.h>.
114      */
115     replace  = <<-  _EndOfHeader_
116         /* This file fixes a bug in the __FD_ZERO macro present in glibc 2.0.x. */
117         #ifndef _SELECTBITS_H_WRAPPER
118           #include <features.h>
119           #include_next <selectbits.h>
120
121           #if defined(__FD_ZERO) && defined(__GLIBC__) \\
122           && defined(__GLIBC_MINOR__) && __GLIBC__ == 2 \\
123           && __GLIBC_MINOR__ == 0
124              #undef __FD_ZERO
125              #define __FD_ZERO(fdsetp) \\
126              do { \\
127                 int __d0, __d1; \\
128               __asm__ __volatile__ ("cld; rep; stosl" \\
129                         : "=&c" (__d0), "=&D" (__d1) \\
130                         : "a" (0), "0" (sizeof (__fd_set) \\
131                                         / sizeof (__fd_mask)), \\
132                           "1" ((__fd_mask *) (fdsetp)) \\
133                         : "memory"); \\
134               } while (0)
135           #endif
136
137           #define _SELECTBITS_H_WRAPPER
138         #endif /* _SELECTBITS_H_WRAPPER */
139         _EndOfHeader_;
140 };
141
142
143 /*
144  * Solaris <sys/varargs.h> is a DDK (aka kernel-land) header providing
145  * the same interface as <stdarg.h>.  No idea why they couldn't have just
146  * used the standard header.
147  */
148 fix = {
149     hackname = AAB_solaris_sys_varargs_h;
150     files    = "sys/varargs.h";
151     mach     = '*-*-solaris*';
152     replace  = <<-  _EndOfHeader_
153         #ifdef __STDC__
154           #include <stdarg.h>
155         #else
156           #include <varargs.h>
157         #endif
158         _EndOfHeader_;
159 };
160
161
162 /*
163  *  Fix non-ANSI memcpy declaration that conflicts with gcc's builtin
164  *  declaration on Sun OS 4.x.  We must only fix this on Sun OS 4.x, because
165  *  many other systems have similar text but correct versions of the file.
166  *  To ensure only Sun's is fixed, we grep for a likely unique string.
167  *  Fix also on sysV68 R3V7.1 (head/memory.h\t50.1\t )
168  */
169 fix = {
170     hackname = AAB_sun_memcpy;
171     files    = memory.h;
172     select   = "/\\*\t@\\(#\\)"
173              "(head/memory.h\t50.1\t "
174              "|memory\\.h 1\\.[2-4] 8./../.. SMI; from S5R2 1\\.2\t)\\*/";
175
176     replace = <<-  _EndOfHeader_
177         /* This file was generated by fixincludes */
178         #ifndef __memory_h__
179           #define __memory_h__
180
181           #ifdef __STDC__
182             extern void *memccpy();
183             extern void *memchr();
184             extern void *memcpy();
185             extern void *memset();
186           #else
187             extern char *memccpy();
188             extern char *memchr();
189             extern char *memcpy();
190             extern char *memset();
191           #endif /* __STDC__ */
192
193           extern int memcmp();
194
195         #endif /* __memory_h__ */
196         _EndOfHeader;
197 };
198
199
200 /*
201  *  Completely replace <sys/varargs.h> with a file that includes gcc's
202  *  stdarg.h or varargs.h files as appropriate.
203  */
204 #ifdef SVR4
205 fix = {
206     hackname = AAB_svr4_no_varargs;
207     files    = sys/varargs.h;
208     replace  = "/* This file was generated by fixincludes.  */\n"
209                "#ifndef _SYS_VARARGS_H\n"
210                "#define _SYS_VARARGS_H\n\n"
211
212                "#ifdef __STDC__\n"
213                "#include <stdarg.h>\n"
214                "#else\n"
215                "#include <varargs.h>\n"
216                "#endif\n\n"
217
218                "#endif  /* _SYS_VARARGS_H */\n";
219 };
220 #endif
221
222
223 /*
224  *  Completely replace <sys/byteorder.h> with a file that implements gcc's
225  *  optimized byteswapping.  (The original probably implemented some
226  *  incompatible optimized byteswapping.)
227  */
228 fix = {
229     hackname = AAB_svr4_replace_byteorder;
230     mach     = "*-*-sysv4*";
231     mach     = "i[34567]86-*-sysv5*";
232     mach     = "i[34567]86-*-sco3.2v5*";
233     mach     = "i[34567]86-*-udk*";
234     mach     = "i[34567]86-*-solaris2.[0-4]";
235     mach     = "powerpcle-*-solaris2.[0-4]";
236     mach     = "sparc-*-solaris2.[0-4]";
237     mach     = "i[34567]86-sequent-ptx*";
238     files    = sys/byteorder.h;
239     replace  = <<-  _EndOfHeader_
240         #ifndef _SYS_BYTEORDER_H
241         #define _SYS_BYTEORDER_H
242
243         /* Functions to convert `short' and `long' quantities from host byte order
244            to (internet) network byte order (i.e. big-endian).
245
246            Written by Ron Guilmette (rfg@ncd.com).
247
248            This isn't actually used by GCC.  It is installed by fixinc.svr4.
249
250            For big-endian machines these functions are essentially no-ops.
251
252            For little-endian machines, we define the functions using specialized
253            asm sequences in cases where doing so yields better code (e.g. i386).  */
254
255         #if !defined (__GNUC__) && !defined (__GNUG__)
256           #error You lose!  This file is only useful with GNU compilers.
257         #endif
258
259         #ifndef __BYTE_ORDER__
260           /* Byte order defines.  These are as defined on UnixWare 1.1, but with
261              double underscores added at the front and back.  */
262           #define __LITTLE_ENDIAN__   1234
263           #define __BIG_ENDIAN__      4321
264           #define __PDP_ENDIAN__      3412
265         #endif
266
267         #ifdef __STDC__
268           static __inline__ unsigned long htonl (unsigned long);
269           static __inline__ unsigned short htons (unsigned int);
270           static __inline__ unsigned long ntohl (unsigned long);
271           static __inline__ unsigned short ntohs (unsigned int);
272         #endif /* defined (__STDC__) */
273
274         #if defined (__i386__)
275
276           #ifndef __BYTE_ORDER__
277             #define __BYTE_ORDER__ __LITTLE_ENDIAN__
278           #endif
279
280           /* Convert a host long to a network long.  */
281
282           /* We must use a new-style function definition, so that this will also
283              be valid for C++.  */
284           static __inline__ unsigned long
285           htonl (unsigned long __arg)
286           {
287             register unsigned long __result;
288
289             __asm__ ("xchg%B0 %b0,%h0
290                   ror%L0 $16,%0
291                   xchg%B0 %b0,%h0" : "=q" (__result) : "0" (__arg));
292             return __result;
293           }
294
295           /* Convert a host short to a network short.  */
296
297           static __inline__ unsigned short
298           htons (unsigned int __arg)
299           {
300             register unsigned short __result;
301
302             __asm__ ("xchg%B0 %b0,%h0" : "=q" (__result) : "0" (__arg));
303             return __result;
304           }
305
306         #elif (defined (__ns32k__) || defined (__vax__) || defined (__arm__))
307
308           #ifndef __BYTE_ORDER__
309             #define __BYTE_ORDER__ __LITTLE_ENDIAN__
310           #endif
311
312           /* For other little-endian machines, using C code is just as efficient as
313              using assembly code.  */
314
315           /* Convert a host long to a network long.  */
316
317           static __inline__ unsigned long
318           htonl (unsigned long __arg)
319           {
320             register unsigned long __result;
321
322             __result = (__arg >> 24) & 0x000000ff;
323             __result |= (__arg >> 8) & 0x0000ff00;
324             __result |= (__arg << 8) & 0x00ff0000;
325             __result |= (__arg << 24) & 0xff000000;
326             return __result;
327           }
328
329           /* Convert a host short to a network short.  */
330
331           static __inline__ unsigned short
332           htons (unsigned int __arg)
333           {
334             register unsigned short __result;
335
336             __result = (__arg << 8) & 0xff00;
337             __result |= (__arg >> 8) & 0x00ff;
338             return __result;
339           }
340
341         #else /* must be a big-endian machine */
342
343           #ifndef __BYTE_ORDER__
344             #define __BYTE_ORDER__ __BIG_ENDIAN__
345           #endif
346
347           /* Convert a host long to a network long.  */
348
349           static __inline__ unsigned long
350           htonl (unsigned long __arg)
351           {
352             return __arg;
353           }
354
355           /* Convert a host short to a network short.  */
356
357           static __inline__ unsigned short
358           htons (unsigned int __arg)
359           {
360             return __arg;
361           }
362
363         #endif /* big-endian */
364
365         /* Convert a network long to a host long.  */
366
367         static __inline__ unsigned long
368         ntohl (unsigned long __arg)
369         {
370           return htonl (__arg);
371         }
372
373         /* Convert a network short to a host short.  */
374
375         static __inline__ unsigned short
376         ntohs (unsigned int __arg)
377         {
378           return htons (__arg);
379         }
380         #endif
381         _EndOfHeader_;
382 };
383
384
385 /*
386  *  Cancel out ansi_compat.h on Ultrix.  Replace it with an empty file.
387  */
388 fix = {
389     hackname = AAB_ultrix_ansi_compat;
390     files    = ansi_compat.h;
391     select   = ULTRIX;
392     replace  = "/* This file intentionally left blank.  */\n";
393 };
394
395
396 /*
397  *  The Ultrix 4.3 file limits.h is a symbolic link to sys/limits.h.
398  *  Replace limits.h with a file that includes sys/limits.h.
399  */
400 fix = {
401     hackname = AAB_ultrix_limits;
402     files    = limits.h;
403     mach     = "*-*-ultrix4.3";
404     replace  = <<-  _EndOfHeader_
405         #ifndef _LIMITS_INCLUDED
406           #define _LIMITS_INCLUDED
407           #include <sys/limits.h>
408         #endif /* _LIMITS_INCLUDED */
409         _EndOfHeader_;
410 };
411
412
413 /*
414  *  The ULTRIX 4.3 version of memory.h duplicates definitions
415  *  present in strings.h.  Replace memory.h with a file that includes
416  *  strings.h to prevent problems from multiple inclusion.
417  */
418 fix = {
419     hackname = AAB_ultrix_memory;
420     files    = memory.h;
421     mach     = "*-*-ultrix4.3";
422     replace  = <<-  _EndOfHeader_
423         #ifndef _MEMORY_INCLUDED
424           #define _MEMORY_INCLUDED
425           #include <strings.h>
426         #endif /* _MEMORY_INCLUDED */
427         _EndOfHeader_;
428 };
429
430
431 /*
432  *  The Ultrix 4.3 file string.h is a symbolic link to strings.h.
433  *  Replace string.h link with a file that includes strings.h to prevent
434  *  problems from multiple inclusion.
435  */
436 fix = {
437     hackname = AAB_ultrix_string;
438     files    = string.h;
439     mach     = "*-*-ultrix4.3";
440     replace  = <<-  _EndOfHeader_
441         #ifndef _STRING_INCLUDED
442           #define _STRING_INCLUDED
443           #include <strings.h>
444         #endif /* _STRING_INCLUDED */
445         _EndOfHeader_;
446 };
447
448
449 /*
450  *  pthread.h on AIX 4.3.3 tries to define a macro without whitspace
451  *  which violates a requirement of ISO C.
452  */
453 fix = {
454     hackname  = aix_pthread;
455     files     = "pthread.h";
456     select    = "(#define [A-Za-z_0-9]+)(\\\\\n[^A-Za-z_0-9 \t\n(])";
457     c_fix     = format;
458     c_fix_arg = "%1 %2";
459     test_text = "#define PTHREAD_MUTEX_INITIALIZER\\\\\n"
460                 "{...init stuff...}";
461 };
462
463
464 /*
465  *  sys/machine.h on AIX 4.3.3 puts whitespace between a \ and a newline
466  *  in an otherwise harmless (and #ifed out) macro definition
467  */
468 fix = {
469     hackname  = aix_sysmachine;
470     files     = sys/machine.h;
471     select    = "\\\\ +\n";
472     c_fix     = format;
473     c_fix_arg = "\\\n";
474     test_text = "#define FOO \\\n"
475     " bar \\ \n baz \\ \n bat";
476 };
477
478
479 /*
480  *  sys/wait.h on AIX 3.2.5 puts the declaration of wait3 before the
481  *  definition of struct rusage, so the prototype added by fixproto fails.
482  */
483 fix = {
484     hackname  = aix_syswait;
485     files     = sys/wait.h;
486     select    = "^extern pid_t wait3\\(\\);\n";
487     select    = "bos325,";
488     c_fix     = format;
489     c_fix_arg = "struct rusage;\n%0";
490     test_text = "/* bos325, */\n"
491     "extern pid_t wait3();\n"
492     "\t/* pid_t wait3(int *, int, struct rusage *); */";
493 };
494
495
496 /*
497  *  sys/wait.h on AIX 5.2 defines macros that have both signed and
498  *  unsigned types in conditional expressions.
499  */
500 fix = {
501     hackname  = aix_syswait_2;
502     files     = sys/wait.h;
503     select    = '\? (\(\(\(\(unsigned[^)]*\)[^)]*\) >> [^)]*\) \& 0xff\) : -1)';
504     c_fix     = format;
505     c_fix_arg = "? (int)%1";
506     test_text = "#define WSTOPSIG(__x)    (int)(WIFSTOPPED(__x) ? ((((unsigned int)__x) >> 8) & 0xff) : -1)";
507 };
508
509
510 /*
511  *  sys/signal.h on some versions of AIX uses volatile in the typedef of
512  *  sig_atomic_t, which causes gcc to generate a warning about duplicate
513  *  volatile when a sig_atomic_t variable is declared volatile, as
514  *  required by ANSI C.
515  */
516 fix = {
517     hackname  = aix_volatile;
518     files     = sys/signal.h;
519     select    = "typedef volatile int sig_atomic_t";
520     c_fix     = format;
521     c_fix_arg = "typedef int sig_atomic_t";
522     test_text = "typedef volatile int sig_atomic_t;";
523 };
524
525
526 /*
527  *  Fix __assert declaration in assert.h on Alpha OSF/1.
528  */
529 fix = {
530     hackname  = alpha___assert;
531     files     = "assert.h";
532     select    = '__assert\(char \*, char \*, int\)';
533     c_fix     = format;
534     c_fix_arg = "__assert(const char *, const char *, int)";
535     test_text = 'extern void __assert(char *, char *, int);';
536 };
537
538
539 /*
540  *  Obey __PRAGMA_EXTERN_PREFIX for Tru64 UNIX V4/5 headers.
541  */
542 fix = {
543     hackname  = alpha___extern_prefix;
544     select    = "(.*)(defined\\(__DECC\\)|def[ \t]*__DECC)[ \t]*\n(#[ \t]*pragma[ \t]*extern_prefix.*)";
545
546     mach      = "alpha*-dec-osf*";
547     c_fix     = format;
548     c_fix_arg = "%1 (defined(__DECC) || defined(__PRAGMA_EXTERN_PREFIX))\n%3";
549
550     test_text = "#ifdef  __DECC\n"
551                 "#pragma extern_prefix \"_P\"\n"
552                 "#   if defined(__DECC)\n"
553                 "#     pragma extern_prefix \"_E\"\n"
554                 "# if !defined(_LIBC_POLLUTION_H_) && defined(__DECC)\n"
555                 "#  pragma extern_prefix \"\"";
556 };
557
558
559 /*
560  *  Obey __PRAGMA_EXTERN_PREFIX for Tru64 UNIX V4/5 <standards.h>.
561  */
562 fix = {
563     hackname  = alpha___extern_prefix_standards;
564     files     = standards.h;
565     select    = ".*!defined\\(_LIBC_POLLUTION_H_\\) && !defined\\(__DECC\\)";
566
567     mach      = "alpha*-dec-osf*";
568     c_fix     = format;
569     c_fix_arg = "%0 && !defined(__PRAGMA_EXTERN_PREFIX)";
570
571     test_text = "#if (_ISO_C_SOURCE>=19990L) && !defined(_LIBC_POLLUTION_H_) && !defined(__DECC)";
572 };
573
574
575 /*
576  *  Obey __PRAGMA_EXTERN_PREFIX for Tru64 UNIX V5 <sys/mount.h> and
577  *  <sys/stat.h>.  The tests for __DECC are special in various ways, so
578  *  alpha__extern_prefix cannot be used.
579  */
580 fix = {
581     hackname  = alpha___extern_prefix_sys_stat;
582     files     = sys/stat.h;
583     files     = sys/mount.h;
584     select    = "#[ \t]*if[ \t]*defined\\(__DECC\\)";
585
586     mach      = "alpha*-dec-osf5*";
587     c_fix     = format;
588     c_fix_arg = "%0 || defined(__PRAGMA_EXTERN_PREFIX)";
589
590     test_text = "#   if defined(__DECC)";
591 };
592
593
594 /*
595  *  Fix assert macro in assert.h on Alpha OSF/1.
596  *  The superfluous int cast breaks C++.
597  */
598 fix = {
599     hackname  = alpha_assert;
600     files     = "assert.h";
601     select    = '(#define assert\(EX\).*)\(\(int\) \(EX\)\)';
602     c_fix     = format;
603     c_fix_arg = "%1(EX)";
604     test_text = '#define assert(EX) (((int) (EX)) ? (void)0 : __assert(#EX, __FILE__, __LINE__))';
605 };
606
607
608 /*
609  *  Fix #defines under Alpha OSF/1:
610  *  The following files contain '#pragma extern_prefix "_FOO"' followed by
611  *  a '#define something(x,y,z) _FOOsomething(x,y,z)'.  The intent of these
612  *  statements is to reduce namespace pollution.  While these macros work
613  *  properly in most cases, they don't allow you to take a pointer to the
614  *  "something" being modified.  To get around this limitation, change these
615  *  statements to be of the form '#define something _FOOsomething'.
616  *
617  *  sed ain't egrep, lesson 2463:  sed can use self-referential
618  *  regular expressions.  In the substitute expression below,
619  *  "\\1" and "\\2" refer to subexpressions found earlier in the
620  *  same match.  So, we continue to use sed.  "extern_prefix" will
621  *  be a rare match anyway...
622  */
623 fix = {
624     hackname = alpha_bad_lval;
625
626     select   = "^[ \t]*#[ \t]*pragma[ \t]+extern_prefix";
627     mach      = "alpha*-dec-osf*";
628
629     sed      =
630         "s/^[ \t]*#[ \t]*define[ \t][ \t]*\\([^(]*\\)\\(([^)]*)\\)[ \t]*"
631                "\\(_.*\\)\\1\\2[ \t]*$/#define \\1 \\3\\1/";
632
633     test_text = '#pragma extern_prefix "_FOO"'"\n"
634                 "#define something(x,y,z) _FOOsomething(x,y,z)\n"
635                 "#define mumble _FOOmumble";
636 };
637
638
639 /*
640  *  Fix getopt declarations in stdio.h and stdlib.h on Alpha OSF/1 and AIX.
641  */
642 fix = {
643     hackname  = alpha_getopt;
644     files     = "stdio.h";
645     files     = "stdlib.h";
646     select    = 'getopt\(int, char \*\[\], *char \*\)';
647     c_fix     = format;
648     c_fix_arg = "getopt(int, char *const[], const char *)";
649     test_text = 'extern int getopt(int, char *[], char *);';
650 };
651
652
653 /*
654  * Remove erroneous parentheses in sym.h on Alpha OSF/1.
655  */
656 fix = {
657     hackname  = alpha_parens;
658     files     = sym.h;
659     select    = '#ifndef\(__mips64\)';
660     c_fix     = format;
661     c_fix_arg = "#ifndef __mips64";
662     test_text = "#ifndef(__mips64) /* bogus */\nextern int foo;\n#endif";
663 };
664
665
666 /*
667  *  Obey __PRAGMA_EXTERN_PREFIX for Tru64 UNIX <pthread.h>.
668  */
669 fix = {
670     hackname  = alpha_pthread;
671     files     = pthread.h;
672     select    = "((#[ \t]*if)([ \t]*defined[ \t]*\\(_PTHREAD_ENV_DECC\\)|def _PTHREAD_ENV_DECC)(.*))\n"
673                 "(#[ \t]*define _PTHREAD_USE_PTDNAM_)";
674
675     mach      = "alpha*-dec-osf*";
676     c_fix     = format;
677     c_fix_arg = "%2 defined (_PTHREAD_ENV_DECC)%4 || defined (__PRAGMA_EXTERN_PREFIX)\n%5";
678
679     test_text = "#  if defined (_PTHREAD_ENV_DECC) || defined (_PTHREAD_ENV_EPCC)\n"
680                 "#   define _PTHREAD_USE_PTDNAM_\n"
681                 "#  endif\n"
682                 "#  ifdef _PTHREAD_ENV_DECC\n"
683                 "#   define _PTHREAD_USE_PTDNAM_\n"
684                 "#  endif";
685 };
686
687
688 /*
689  *  Recognize GCC in Tru64 UNIX V5.1B <pthread.h>.
690  */
691 fix = {
692     hackname  = alpha_pthread_gcc;
693     files     = pthread.h;
694     select    = "#else\n# error <pthread.h>: unrecognized compiler.";
695
696     mach      = "alpha*-dec-osf*";
697     c_fix     = format;
698     c_fix_arg = "#elif defined (__GNUC__)\n"
699                 "# define _PTHREAD_ENV_GCC\n"
700                 "%0";
701
702     test_text = "# define _PTHREAD_ENV_INTELC\n"
703                 "#else\n"
704                 "# error <pthread.h>: unrecognized compiler.\n"
705                 "#endif";
706 };
707
708 /*
709  * Compaq Tru64 v5.1 defines all of its PTHREAD_*_INITIALIZER macros
710  * incorrectly, specifying less fields in the initializers than are
711  * defined in the corresponding structure types.  Use of these macros
712  * in user code results in spurious warnings.
713  */
714 fix = {
715     hackname  = alpha_pthread_init;
716     files     = pthread.h;
717     select    = ' \* @\(#\).RCSfile: pthread\.h,v \$'
718                 ' .Revision: 1\.1\.33\.21 \$ \(DEC\)'
719                 ' .Date: 2000/08/15 15:30:13 \$';
720     mach      = "alpha*-dec-osf*";
721     sed       = "s@MVALID\\(.*\\)A}@MVALID\\1A, 0, 0, 0, 0, 0, 0 }@\n"
722                 "s@MVALID\\(.*\\)_}@MVALID\\1_, 0, 0, 0, 0 }@\n"
723                 "s@CVALID\\(.*\\)A}@CVALID\\1A, 0, 0, 0, 0 }@\n"
724                 "s@CVALID\\(.*\\)_}@CVALID\\1_, 0, 0 }@\n"
725                 "s@WVALID\\(.*\\)A}@WVALID\\1A, 0, 0, 0, 0, 0, 0, 0, 0, 0 }@\n"
726                 "s@WVALID\\(.*\\)_}@WVALID\\1_, 0, 0, 0, 0, 0, 0, 0 }@\n";
727     test_text = "/*\n"
728                 " * @(#)_RCSfile: pthread.h,v \\$ "
729                 "_Revision: 1.1.33.21 \\$ (DEC) "
730                 "_Date: 2000/08/15 15:30:13 \\$\n"
731                 " */\n"
732 "#ifndef _PTHREAD_NOMETER_STATIC\n"
733 "# define PTHREAD_MUTEX_INITIALIZER \\\n"
734 "    {_PTHREAD_MSTATE_CONFIG, _PTHREAD_MVALID | _PTHREAD_MVF_STA}\n"
735 "# define PTHREAD_COND_INITIALIZER \\\n"
736 "    {_PTHREAD_CSTATE_SLOW, _PTHREAD_CVALID | _PTHREAD_CVF_STA}\n"
737 "# define PTHREAD_MUTEX_INITWITHNAME_NP(_n_,_a_) \\\n"
738 "    {_PTHREAD_MSTATE_CONFIG, _PTHREAD_MVALID | _PTHREAD_MVF_STA, _n_, _a_}\n"
739 "# define PTHREAD_COND_INITWITHNAME_NP(_n_,_a_) \\\n"
740 "    {_PTHREAD_CSTATE_SLOW, _PTHREAD_CVALID | _PTHREAD_CVF_STA, _n_, _a_}\n"
741 "#else\n"
742 "# define PTHREAD_MUTEX_INITIALIZER {0, _PTHREAD_MVALID | _PTHREAD_MVF_STA}\n"
743 "# define PTHREAD_MUTEX_INITWITHNAME_NP(_n_,_a_) \\\n"
744 "    {0, _PTHREAD_MVALID | _PTHREAD_MVF_STA, _n_, _a_}\n"
745 "# define PTHREAD_COND_INITWITHNAME_NP(_n_,_a_) \\\n"
746 "    {0, _PTHREAD_CVALID | _PTHREAD_CVF_STA, _n_, _a_}\n"
747 "#endif\n\n"
748 "#define PTHREAD_RWLOCK_INITIALIZER {_PTHREAD_RWVALID | _PTHREAD_RWVF_STA}\n"
749 "#define PTHREAD_RWLOCK_INITWITHNAME_NP(_n_,_a_) \\\n"
750 "        {_PTHREAD_RWVALID | _PTHREAD_RWVF_STA, _n_, _a_}\n";
751 };
752
753 /*
754  *  Fix return value of sbrk in unistd.h on Alpha OSF/1 V2.0
755  *  And OpenBSD.
756  */
757 fix = {
758     hackname = alpha_sbrk;
759     files    = unistd.h;
760     select   = "char[ \t]*\\*[\t ]*sbrk[ \t]*\\(";
761     c_fix     = format;
762     c_fix_arg = "void *sbrk(";
763     test_text = "extern char* sbrk(ptrdiff_t increment);";
764 };
765
766
767 /*
768  *  Change external names of wcstok/wcsftime via asm instead of macros on
769  *  Tru64 UNIX V4.0.
770  */
771 fix = {
772     hackname = alpha_wchar;
773     files    = wchar.h;
774
775     mach     = "alpha*-dec-osf4*";
776     select   = "#define wcstok wcstok_r";
777     sed      = "s@#define wcstok wcstok_r@extern wchar_t *wcstok __((wchar_t *, const wchar_t *, wchar_t **)) __asm__(\"wcstok_r\");@";
778     sed      = "s@#define wcsftime __wcsftime_isoc@extern size_t   wcsftime __((wchar_t *, size_t, const wchar_t *, const struct tm *)) __asm__(\"__wcsftime_isoc\");@";
779     test_text = "#define wcstok wcstok_r\n"
780                 "#define wcsftime __wcsftime_isoc";
781 };
782
783
784 /*
785  *  For C++, avoid any typedef or macro definition of bool,
786  *  and use the built in type instead.
787  *  HP/UX 10.20 also has it in curses_colr/curses.h.
788  */
789 fix = {
790     hackname  = avoid_bool_define;
791     files     = curses.h;
792     files     = curses_colr/curses.h;
793     files     = term.h;
794     files     = tinfo.h;
795
796     select    = "#[ \t]*define[ \t]+bool[ \t]";
797     bypass    = "__cplusplus";
798
799     c_fix     = format;
800     c_fix_arg = "#ifndef __cplusplus\n%0\n#endif";
801     c_fix_arg = "^[ \t]*#[ \t]*define[ \t]+bool[ \t].*";
802
803     test_text = "# define bool\t char \n";
804 };
805
806
807 fix = {
808     hackname = avoid_bool_type;
809     files    = curses.h;
810     files    = curses_colr/curses.h;
811     files    = term.h;
812     files    = tinfo.h;
813
814     select    = "^[ \t]*typedef[ \t].*[ \t]bool[ \t]*;";
815     bypass    = "__cplusplus";
816
817     c_fix     = format;
818     c_fix_arg = "#ifndef __cplusplus\n%0\n#endif";
819
820     test_text = "typedef unsigned int\tbool \t; /* bool\n type */";
821 };
822
823
824 /*
825  *  For C++, avoid any typedef definition of wchar_t,
826  *  and use the built in type instead.
827  *  Don't do this for headers that are smart enough to do the right
828  *  thing (recent [n]curses.h and Xlib.h).
829  *  Don't do it for <linux/nls.h> which is never used from C++ anyway,
830  *  and will be broken by the edit.
831  */
832
833 fix = {
834     hackname = avoid_wchar_t_type;
835
836     select    = "^[ \t]*typedef[ \t].*[ \t]wchar_t[ \t]*;";
837     bypass    = "__cplusplus";
838     bypass    = "_LINUX_NLS_H";
839     bypass    = "XFree86: xc/lib/X11/Xlib\\.h";
840
841     c_fix     = format;
842     c_fix_arg = "#ifndef __cplusplus\n%0\n#endif";
843
844     test_text = "typedef unsigned short\twchar_t \t; /* wchar_t\n type */";
845 };
846
847
848 /*
849  *  Fix `typedef struct term;' on hppa1.1-hp-hpux9.
850  */
851 fix = {
852     hackname  = bad_struct_term;
853     files     = curses.h;
854     select    = "^[ \t]*typedef[ \t]+struct[ \t]+term[ \t]*;";
855     c_fix     = format;
856     c_fix_arg = "struct term;";
857
858     test_text = 'typedef struct term;';
859 };
860
861
862 /*
863  *  Fix one other error in this file:
864  *  a mismatched quote not inside a C comment.
865  */
866 fix = {
867     hackname  = badquote;
868     files     = sundev/vuid_event.h;
869     select    = "doesn't";
870     c_fix     = format;
871     c_fix_arg = "does not";
872
873     test_text = "/* doesn't have matched single quotes */";
874 };
875
876
877 /*
878  *  check for broken assert.h that needs stdio.h
879  */
880 fix = {
881     hackname  = broken_assert_stdio;
882     files     = assert.h;
883     select    = stderr;
884     bypass    = "include.*stdio\\.h";
885     c_fix     = wrap;
886     c_fix_arg = "#include <stdio.h>\n";
887     test_text = "extern FILE* stderr;";
888 };
889
890
891 /*
892  *  check for broken assert.h that needs stdlib.h
893  */
894 fix = {
895     hackname  = broken_assert_stdlib;
896     files     = assert.h;
897     select    = 'exit *\(|abort *\(';
898     bypass    = "include.*stdlib\\.h";
899     c_fix     = wrap;
900     c_fix_arg = "#ifdef __cplusplus\n"
901                 "#include <stdlib.h>\n"
902                 "#endif\n";
903     test_text = "extern void exit ( int );";
904 };
905
906
907 /*
908  *  Remove `extern double cabs' declarations from math.h.
909  *  This conflicts with C99.  Discovered on AIX.
910  *  IRIX 5 and IRIX 6 before 6.5.18 (where C99 support was introduced)
911  *  declares cabs() to take a struct __cabs_s argument.
912  *  SunOS4 has its cabs() declaration followed by a comment which
913  *  terminates on the following line.
914  *  Darwin hides its broken cabs in architecture-specific subdirs.
915  */
916 fix = {
917     hackname = broken_cabs;
918     files    = "math.h";
919     files    = "architecture/ppc/math.h";
920     files    = "architecture/i386/math.h";
921     select   = "^extern[ \t]+double[ \t]+cabs";
922
923     c_fix     = format;
924     c_fix_arg = "";
925     c_fix_arg = "^extern[ \t]+double[ \t]+cabs[ \t]*\\([^\\)]*\\);";
926
927     test_text = "#ifdef __STDC__\n"
928                 "extern     double   cabs(struct dbl_hypot);\n"
929                 "#else\n"
930                 "extern     double   cabs();\n"
931                 "#endif\n"
932                 "extern double cabs ( _Complex z );\n"
933                 "extern double cabs(); /* This is a comment\n"
934                 "                         and it ends here. */\n"
935                 "extern double  cabs(struct __cabs_s);";
936 };
937
938
939 /*
940  *  Various systems derived from BSD4.4 contain a macro definition
941  *  for vfscanf that interacts badly with requirements of builtin-attrs.def.
942  *  Known to be fixed in FreeBSD 5 system headers.
943  */
944 fix = {
945     hackname  = bsd_stdio_attrs_conflict;
946     mach      = *-*-*bsd*;
947     mach      = *-*-*darwin*;
948     files     = stdio.h;
949     select    = "^#define[ \t]*vfscanf[ \t]*__svfscanf[ \t]*$";
950     c_fix     = format;
951     c_fix_arg = '#define _BSD_STRING(_BSD_X) _BSD_STRINGX(_BSD_X)' "\n"
952                 '#define _BSD_STRINGX(_BSD_X) #_BSD_X' "\n"
953                 'int vfscanf(FILE *, const char *, __builtin_va_list) '
954                 '__asm__ (_BSD_STRING(__USER_LABEL_PREFIX__) "__svfscanf");';
955     test_text = '#define  vfscanf       __svfscanf';
956 };
957
958
959 /*
960  *  Fix various macros used to define ioctl numbers.
961  *  The traditional syntax was:
962  *
963  *    #define _CTRL(n, x) (('n'<<8)+x)
964  *    #define TCTRLCFOO _CTRL(T, 1)
965  *
966  *  but this does not work with the C standard, which disallows macro
967  *  expansion inside strings.  We have to rewrite it thus:
968  *
969  *    #define _CTRL(n, x) ((n<<8)+x)
970  *    #define TCTRLCFOO  _CTRL('T', 1)
971  *
972  *  The select expressions match too much, but the c_fix code is cautious.
973  *
974  *  CTRL might be: CTRL _CTRL ISCTRL BSD43_CTRL ...
975  */
976 fix = {
977     hackname  = ctrl_quotes_def;
978     select    = "define[ \t]+[A-Z0-9_]+CTRL\\([a-zA-Z][,)]";
979     c_fix     = char_macro_def;
980     c_fix_arg = "CTRL";
981
982     /*
983      *  This is two tests in order to ensure that the "CTRL(c)" can
984      *  be selected in isolation from the multi-arg format
985      */
986     test_text = "#define BSD43_CTRL(n, x) (('n'<<8)+x)\n";
987     test_text = "#define _CTRL(c) ('c'&037)";
988 };
989
990 fix = {
991     hackname  = ctrl_quotes_use;
992     select    = "define[ \t]+[A-Z0-9_]+[ \t]+[A-Z0-9_]+CTRL[ \t]*\\( *[^,']";
993     c_fix     = char_macro_use;
994     c_fix_arg = "CTRL";
995     test_text = "#define TCTRLFOO BSD43_CTRL(T, 1)";
996 };
997
998
999 /*
1000  *  sys/mman.h on HP/UX is not C++ ready,
1001  *  even though NO_IMPLICIT_EXTERN_C is defined on HP/UX.
1002  *
1003  *  rpc/types.h on OSF1/2.0 is not C++ ready,
1004  *  even though NO_IMPLICIT_EXTERN_C is defined for the alpha.
1005  *
1006  *  The problem is the declaration of malloc.
1007  */
1008 fix = {
1009     hackname = cxx_unready;
1010     files    = sys/mman.h;
1011     files    = rpc/types.h;
1012     select   = '[^#]+malloc.*;';  /* Catch any form of declaration
1013                                      not within a macro.  */
1014     bypass   = '"C"|__BEGIN_DECLS';
1015
1016     c_fix     = wrap;
1017     c_fix_arg = "#ifdef __cplusplus\n"
1018                 "extern \"C\" {\n"
1019                 "#endif\n";
1020     c_fix_arg = "#ifdef __cplusplus\n"
1021                 "}\n"
1022                 "#endif\n";
1023     test_text = "extern void* malloc( size_t );";
1024 };
1025
1026
1027 /*
1028  * AvailabilityMacros.h on Darwin breaks with GCC 4.0, because of
1029  * bad __GNUC__ tests.
1030  */
1031
1032 fix = {
1033   hackname  = darwin_gcc4_breakage;
1034   mach      = "*-*-darwin*";
1035   files     = AvailabilityMacros.h;
1036   select    = "\\(__GNUC__ >= 3\\) && \\(__GNUC_MINOR__ >= 1\\)";
1037   c_fix     = format;
1038   c_fix_arg = "((__GNUC__ >= 4) || (__GNUC__ == 3 && __GNUC_MINOR__ >= 1))";
1039   test_text = "#if defined(__GNUC__) && (__GNUC__ >= 3) && "
1040               "(__GNUC_MINOR__ >= 1)\n";
1041 };
1042
1043
1044 /*
1045  *  __private_extern__ doesn't exist in FSF GCC.  Even if it did,
1046  *  why would you ever put it in a system header file?
1047  */
1048 fix = {
1049   hackname  = darwin_private_extern;
1050   mach      = "*-*-darwin*";
1051   files     = mach-o/dyld.h;
1052   select    = "__private_extern__ [a-z_]+ _dyld_";
1053   c_fix     = format;
1054   c_fix_arg = "extern";
1055   c_fix_arg = "__private_extern__";
1056   test_text = "__private_extern__ int _dyld_func_lookup(\n"
1057               "const char *dyld_func_name,\n"
1058               "unsigned long *address);\n";
1059 };
1060
1061
1062 /*
1063  *  Fix <c_asm.h> on Digital UNIX V4.0:
1064  *  It contains a prototype for a DEC C internal asm() function,
1065  *  clashing with gcc's asm keyword.  So protect this with __DECC.
1066  */
1067 fix = {
1068     hackname = dec_intern_asm;
1069     files    = c_asm.h;
1070     sed = "/^[ \t]*float[ \t]*fasm/i\\\n#ifdef __DECC\n";
1071     sed = "/^[ \t]*#[ \t]*pragma[ \t]*intrinsic([ \t]*dasm/a\\\n"
1072           "#endif\n";
1073     test_text =
1074     "float fasm {\n"
1075     "    ... asm stuff ...\n"
1076     "};\n#pragma intrinsic( dasm )\n/* END ASM TEST*/";
1077 };
1078
1079
1080 /*
1081  * Fix typo in <wchar.h> on DJGPP 2.03.
1082  */
1083 fix = {
1084     hackname  = djgpp_wchar_h;
1085     file      = wchar.h;
1086     select    = "__DJ_wint_t";
1087     bypass    = "sys/djtypes.h";
1088     c_fix     = format;
1089     c_fix_arg = "%0\n#include <sys/djtypes.h>";
1090     c_fix_arg = "#include <stddef.h>";
1091     test_text = "#include <stddef.h>\n"
1092                 "extern __DJ_wint_t x;\n";
1093 };
1094
1095
1096 /*
1097  * Fix these Sun OS files to avoid an invalid identifier in an #ifdef.
1098  */
1099 fix = {
1100     hackname  = ecd_cursor;
1101     files     = "sunwindow/win_lock.h";
1102     files     = "sunwindow/win_cursor.h";
1103     select    = 'ecd\.cursor';
1104     c_fix     = format;
1105     c_fix_arg = 'ecd_cursor';
1106
1107     test_text = "#ifdef ecd.cursor\n#error bogus\n#endif /* ecd+cursor */";
1108 };
1109
1110
1111 /*
1112  *  math.h on SunOS 4 puts the declaration of matherr before the definition
1113  *  of struct exception, so the prototype (added by fixproto) causes havoc.
1114  *  This must appear before the math_exception fix.
1115  */
1116 fix = {
1117     hackname  = exception_structure;
1118     files     = math.h;
1119
1120     /*  If matherr has a prototype already, the header needs no fix.  */
1121     bypass    = 'matherr.*(struct exception|__MATH_EXCEPTION|[ \t]*__FP_EXCEPTION[ \t]*\*[ \t]*)';
1122     select    = matherr;
1123
1124     c_fix     = wrap;
1125     c_fix_arg = "struct exception;\n";
1126
1127     test_text = "extern int matherr();";
1128 };
1129
1130
1131 /*
1132  *  Between 8/24/1998 and 2/17/2001, FreeBSD system headers presume
1133  *  neither the existence of GCC 3 nor its exact feature set yet break
1134  *  (by design?) when __GNUC__ is set beyond 2.
1135  */
1136 fix = {
1137     hackname  = freebsd_gcc3_breakage;
1138     mach      = *-*-freebsd*;
1139     files     = sys/cdefs.h;
1140     select    = '^#if __GNUC__ == 2 && __GNUC_MINOR__ >= 7$';
1141     bypass    = '__GNUC__[ \t]*([>=]=[ \t]*[3-9]|>[ \t]*2)';
1142     c_fix     = format;
1143     c_fix_arg = '%0 || __GNUC__ >= 3';
1144     test_text = '#if __GNUC__ == 2 && __GNUC_MINOR__ >= 7';
1145 };
1146
1147
1148 /*
1149  *  Some releases of FreeBSD 4 and FreeBSD 5.0 and 5.1 system headers presume
1150  *  neither the existence of GCC 4 nor its exact feature set yet break
1151  *  (by design?) when __GNUC__ is set beyond 3.
1152  */
1153 fix = {
1154     hackname  = freebsd_gcc4_breakage;
1155     mach      = *-*-freebsd*; 
1156     files     = sys/cdefs.h;
1157     select    = '^#if __GNUC__ == 2 && __GNUC_MINOR__ >= 7 \|\| __GNUC__ == 3$';
1158     c_fix     = format;
1159     c_fix_arg = '#if __GNUC__ == 2 && __GNUC_MINOR__ >= 7 || __GNUC__ >= 3';
1160     test_text = '#if __GNUC__ == 2 && __GNUC_MINOR__ >= 7 || __GNUC__ == 3';
1161 };
1162
1163
1164 /*
1165  * Fix these files to use the types we think they should for
1166  * ptrdiff_t, size_t, and wchar_t.
1167  *
1168  * This defines the types in terms of macros predefined by our 'cpp'.
1169  * This is supposedly necessary for glibc's handling of these types.
1170  * It's probably not necessary for anyone else, but it doesn't hurt.
1171  */
1172 fix = {
1173     hackname  = gnu_types;
1174     files  = "sys/types.h";
1175     files  = "stdlib.h";
1176     files  = "sys/stdtypes.h";
1177     files  = "stddef.h";
1178     files  = "memory.h";
1179     files  = "unistd.h";
1180     bypass    = '_GCC_(PTRDIFF|SIZE|WCHAR)_T';
1181     select    = "^[ \t]*typedef[ \t]+.*[ \t](ptrdiff|size|wchar)_t;";
1182     c_fix     = gnu_type;
1183     /* The Solaris 10 headers already define these types correctly.  */
1184     mach   = '*-*-solaris2.1[0-9]*';
1185     not_machine = true;
1186
1187     test_text = "typedef long int ptrdiff_t; /* long int */\n"
1188                 "typedef uint_t size_t; /* uint_t */\n"
1189                 "typedef ushort_t wchar_t; /* ushort_t */";
1190 };
1191
1192
1193 /*
1194  *  Fix HP & Sony's use of "../machine/xxx.h"
1195  *  to refer to:  <machine/xxx.h>
1196  */
1197 fix = {
1198     hackname  = hp_inline;
1199     files     = sys/spinlock.h;
1200     files     = machine/machparam.h;
1201     select    = "[ \t]*#[ \t]*include[ \t]+"  '"\.\./machine/';
1202
1203     c_fix     = format;
1204     c_fix_arg = "%1<machine/%2.h>";
1205
1206     c_fix_arg = "([ \t]*#[ \t]*include[ \t]+)"  '"\.\./machine/'
1207                 '([a-z]+)\.h"';
1208
1209     test_text = ' # include "../machine/mumble.h"';
1210 };
1211
1212
1213 /*
1214  *  Check for (...) in C++ code in HP/UX sys/file.h.
1215  */
1216 fix = {
1217     hackname  = hp_sysfile;
1218     files     = sys/file.h;
1219     select    = "HPUX_SOURCE";
1220
1221     c_fix     = format;
1222     c_fix_arg = "(struct file *, ...)";
1223     c_fix_arg = '\(\.\.\.\)';
1224
1225     test_text = "extern void foo(...); /* HPUX_SOURCE - bad varargs */";
1226 };
1227
1228
1229 /*
1230  * Delete C++ double pow (double, int) inline function from HP-UX 10 & 11
1231  * math.h to prevent clash with define in c_std/bits/std_cmath.h.
1232  */
1233 fix = {
1234     hackname  = hpux10_cpp_pow_inline;
1235     files     = fixinc-test-limits.h, math.h;
1236     select    = <<-     END_POW_INLINE
1237         ^# +ifdef +__cplusplus
1238          +\}
1239          +inline +double +pow\(double +__d,int +__expon\) +\{
1240         [       ]+return +pow\(__d,\(double\)__expon\);
1241          +\}
1242          +extern +"C" +\{
1243         #else
1244         # +endif
1245         END_POW_INLINE;
1246  
1247     c_fix     = format;
1248     c_fix_arg = "";
1249
1250     test_text =
1251         "#    ifdef __cplusplus\n"
1252         "     }\n"
1253         "     inline double pow(double __d,int __expon) {\n"
1254         "\t return pow(__d,(double)__expon);\n"
1255         "     }\n"
1256         '     extern "C"' " {\n"
1257         "#else\n"
1258         "#    endif";
1259 };
1260
1261 fix = {
1262      hackname  = hpux11_cpp_pow_inline;
1263      files     = math.h;
1264      select    = " +inline double pow\\(double d,int expon\\) \\{\n"
1265                  " +return pow\\(d, \\(double\\)expon\\);\n"
1266                  " +\\}\n";
1267      c_fix     = format;
1268      c_fix_arg = "";
1269
1270      test_text =
1271             "   inline double pow(double d,int expon) {\n"
1272             "     return pow(d, (double)expon);\n"
1273             "   }\n";
1274 };
1275
1276
1277 /*
1278  *  Fix hpux 10.X missing ctype declarations 1
1279  */
1280 fix = {
1281     hackname = hpux10_ctype_declarations1;
1282     files    = ctype.h;
1283     select   = "^#[ \t]*define _toupper\\(__c\\)[ \t]*__toupper\\(__c\\)";
1284     bypass   = "^[ \t]*extern[ \t]*int[ \t]*__tolower[ \t]*\\(";
1285     c_fix     = format;
1286     c_fix_arg = "#ifdef _PROTOTYPES\n"
1287                 "extern int __tolower(int);\n"
1288                 "extern int __toupper(int);\n"
1289                 "#else /* NOT _PROTOTYPES */\n"
1290                 "extern int __tolower();\n"
1291                 "extern int __toupper();\n"
1292                 "#endif /* _PROTOTYPES */\n\n"
1293                 "%0\n";
1294
1295     test_text = "#  define _toupper(__c)         __toupper(__c)\n";
1296 };
1297
1298
1299 /*
1300  *  Fix hpux 10.X missing ctype declarations 2
1301  */
1302 fix = {
1303     hackname = hpux10_ctype_declarations2;
1304     files    = ctype.h;
1305     select   = "^#  if defined\\(_SB_CTYPE_MACROS\\) && \\!defined\\(__lint\\)";
1306     bypass   = "^[ \t]*extern[ \t]*int[ \t]*_isalnum[ \t]*\\(";
1307     c_fix     = format;
1308     c_fix_arg = "%0\n\n"
1309                 "#ifdef _PROTOTYPES\n"
1310                 "     extern int _isalnum(int);\n"
1311                 "     extern int _isalpha(int);\n"
1312                 "     extern int _iscntrl(int);\n"
1313                 "     extern int _isdigit(int);\n"
1314                 "     extern int _isgraph(int);\n"
1315                 "     extern int _islower(int);\n"
1316                 "     extern int _isprint(int);\n"
1317                 "     extern int _ispunct(int);\n"
1318                 "     extern int _isspace(int);\n"
1319                 "     extern int _isupper(int);\n"
1320                 "     extern int _isxdigit(int);\n"
1321                 "#  else /* not _PROTOTYPES */\n"
1322                 "     extern int _isalnum();\n"
1323                 "     extern int _isalpha();\n"
1324                 "     extern int _iscntrl();\n"
1325                 "     extern int _isdigit();\n"
1326                 "     extern int _isgraph();\n"
1327                 "     extern int _islower();\n"
1328                 "     extern int _isprint();\n"
1329                 "     extern int _ispunct();\n"
1330                 "     extern int _isspace();\n"
1331                 "     extern int _isupper();\n"
1332                 "     extern int _isxdigit();\n"
1333                 "#endif /* _PROTOTYPES */\n";
1334
1335     test_text = "#  if defined(_SB_CTYPE_MACROS) && !defined(__lint)\n"
1336                 "     extern unsigned int *__SB_masks;\n";
1337 };
1338
1339
1340 /*
1341  *  Fix hpux 10.X missing stdio declarations
1342  */
1343 fix = {
1344     hackname = hpux10_stdio_declarations;
1345     files    = stdio.h;
1346     select   = "^#[ \t]*define _iob[ \t]*__iob";
1347     bypass   = "^[ \t]*extern[ \t]*int[ \t]*vsnprintf[ \t]*\\(";
1348     c_fix     = format;
1349     c_fix_arg = "%0\n\n"
1350         "#  if defined(__STDC__) || defined(__cplusplus)\n"
1351         "     extern int snprintf(char *, size_t, const char *, ...);\n"
1352         "     extern int vsnprintf(char *, size_t, const char *, __va_list);\n"
1353         "#  else /* not __STDC__) || __cplusplus */\n"
1354         "     extern int snprintf();\n"
1355         "     extern int vsnprintf();\n"
1356         "#  endif /* __STDC__) || __cplusplus */\n";
1357
1358     test_text = "#  define _iob __iob\n";
1359 };
1360
1361
1362 /*
1363  *  Make sure hpux defines abs in header.
1364  */
1365 fix = {
1366     hackname  = hpux11_abs;
1367     mach      = ia64-hp-hpux11*;
1368     files     = stdlib.h;
1369     select    = "ifndef _MATH_INCLUDED";
1370     c_fix     = format;
1371     c_fix_arg = "if !defined(_MATH_INCLUDED) || defined(__GNUG__)";
1372 //  sed       = "s/ifndef _MATH_INCLUDED/if !defined(_MATH_INCLUDED) || defined(__GNUG__)/";
1373     test_text = "#ifndef _MATH_INCLUDED";
1374 };
1375
1376
1377 /*
1378  *  Keep HP-UX 11 from stomping on C++ math namespace
1379  *  with defines for fabsf.
1380  */
1381 fix = {
1382     hackname  = hpux11_fabsf;
1383     files     = math.h;
1384     select    = "^[ \t]*#[ \t]*define[ \t]+fabsf\\(.*";
1385     bypass    = "__cplusplus";
1386
1387     c_fix     = format;
1388     c_fix_arg = "#ifndef __cplusplus\n%0\n#endif";
1389
1390     test_text =
1391     "#ifdef _PA_RISC\n"
1392     "#  define fabsf(x) ((float)fabs((double)(float)(x)))\n"
1393     "#endif";
1394 };
1395
1396
1397 /*
1398  * Prevent HP-UX 11 from defining __size_t and preventing size_t from
1399  * being defined by having it define _hpux_size_t instead.
1400  */
1401 fix = {
1402     hackname  = hpux11_size_t;
1403     mach      = "*-hp-hpux11*";
1404     select    = "__size_t";
1405
1406     c_fix     = format;
1407     c_fix_arg = "_hpux_size_t";
1408
1409     test_text =
1410     "#define __size_t size_t\n"
1411     "       extern int getpwuid_r( char *, __size_t, struct passwd **);\n";
1412 };
1413
1414
1415 /*
1416  *  Fix hpux 11.00 broken snprintf declaration
1417  *  (third argument is char *, needs to be const char * to prevent
1418  *  spurious warnings with -Wwrite-strings or in C++).
1419  */
1420 fix = {
1421     hackname = hpux11_snprintf;
1422     files    = stdio.h;
1423     select   = '(extern int snprintf *\(char *\*, *(|__|_hpux_)size_t,)'
1424                                     ' *(char *\*, *\.\.\.\);)';
1425     c_fix     = format;
1426     c_fix_arg = '%1 const %3';
1427
1428     test_text = "extern int snprintf(char *, size_t, char *, ...);\n"
1429                 "extern int snprintf(char *, __size_t, char *, ...);\n"
1430                 "extern int snprintf(char *, _hpux_size_t, char *, ...);";
1431 };
1432
1433
1434 /*
1435  * In inttypes.h on HPUX 11, the use of __CONCAT__ in the definition
1436  * of UINT32_C has undefined behavior according to ISO/ANSI:
1437  * the arguments to __CONCAT__ are not macro expanded before the
1438  * concatination happens so the trailing ')' in the first argument
1439  * is concatinated with the 'l' in the second argument creating an
1440  * invalid pp token.  The behavior of invalid pp tokens is undefined.
1441  * GCC does not handle these invalid tokens the way the HP compiler does.
1442  * This problem will potentially occur anytime macros are used in the
1443  * arguments to __CONCAT__.  A general solution to this problem would be to
1444  * insert another layer of macro between __CONCAT__ and its use
1445  * in UINT32_C.  An example of this solution can be found in the C standard.
1446  * A more specific solution, the one used here, is to change the UINT32_C
1447  * macro to not used macros in the arguments to __CONCAT__.
1448  */
1449 fix = {
1450     hackname = hpux11_uint32_c;
1451     files    = inttypes.h;
1452     select   = "^#define UINT32_C\\(__c\\)[ \t]*"
1453                          "__CONCAT__\\(__CONCAT_U__\\(__c\\),l\\)";
1454     c_fix    = format;
1455     c_fix_arg = '#define UINT32_C(__c) __CONCAT__(__c,ul)';
1456     test_text =
1457     "#define CONCAT_U__(__c)\t__CONCAT__(__c,u)\n"
1458     "#define UINT32_C(__c)\t__CONCAT__(__CONCAT_U__(__c),l)";
1459 };
1460
1461
1462 /*
1463  *  Fix hpux 11.00 broken vsnprintf declaration
1464  */
1465 fix = {
1466     hackname = hpux11_vsnprintf;
1467     files    = stdio.h;
1468     select   = '(extern int vsnprintf\(char \*, _[hpux]*_size_t, '
1469                                      'const char \*,) __va__list\);';
1470     c_fix     = format;
1471     c_fix_arg = "%1 __va_list);";
1472
1473     test_text = 'extern int vsnprintf(char *, _hpux_size_t, const char *,'
1474                                      ' __va__list);';
1475 };
1476
1477
1478 /*
1479  *  get rid of bogus inline definitions in HP-UX 8.0
1480  */
1481 fix = {
1482     hackname = hpux8_bogus_inlines;
1483     files    = math.h;
1484     select   = inline;
1485     bypass   = "__GNUG__";
1486     sed = "s@inline int abs(int [a-z][a-z]*) {.*}"
1487            "@extern \"C\" int abs(int);@";
1488     sed = "s@inline double abs(double [a-z][a-z]*) {.*}@@";
1489     sed = "s@inline int sqr(int [a-z][a-z]*) {.*}@@";
1490     sed = "s@inline double sqr(double [a-z][a-z]*) {.*}@@";
1491     test_text = "inline int abs(int v) { return (v>=0)?v:-v; }\n"
1492                 "inline double sqr(double v) { return v**0.5; }";
1493 };
1494
1495
1496 /*
1497  *  Fix hpux broken ctype macros
1498  */
1499 fix = {
1500     hackname = hpux_ctype_macros;
1501     files    = ctype.h;
1502     select   = '((: |\()__SB_masks \? )'
1503                '(__SB_masks\[__(alnum|c)\] & _IS)';
1504     c_fix     = format;
1505     c_fix_arg = "%1(int)%3";
1506
1507     test_text = ": __SB_masks ? __SB_masks[__alnum] & _ISCNTRL\n"
1508                 "# define isalpha(__c) (__SB_masks ? __SB_masks[__c] & _IS\n";
1509 };
1510
1511
1512 /*
1513  *  Fix hpux broken #ifndef _XOPEN_SOURCE_EXTENDED conditional on htonl etc.
1514  */
1515 fix = {
1516     hackname = hpux_htonl;
1517     files    = netinet/in.h;
1518     select   = "#ifndef _XOPEN_SOURCE_EXTENDED\n"
1519                "(/\\*\n"
1520                " \\* Macros for number representation conversion\\.\n"
1521                " \\*/\n"
1522                "#ifndef ntohl)";
1523     c_fix     = format;
1524     c_fix_arg = "#if 1\n%1";
1525
1526     test_text = "#ifndef _XOPEN_SOURCE_EXTENDED\n"
1527                 "/*\n"
1528                 " * Macros for number representation conversion.\n"
1529                 " */\n"
1530                 "#ifndef ntohl\n"
1531                 "#define ntohl(x)        (x)\n"
1532                 "#define ntohs(x)        (x)\n"
1533                 "#define htonl(x)        (x)\n"
1534                 "#define htons(x)        (x)\n"
1535                 "#endif\n"
1536                 "#endif  /* ! _XOPEN_SOURCE_EXTENDED */";
1537 };
1538
1539
1540 /*
1541  * HP-UX long_double
1542  */
1543 fix = {
1544     hackname  = hpux_long_double;
1545     files     = stdlib.h;
1546     select    = "extern[ \t]long_double[ \t]strtold";
1547     bypass    = "long_double_t";
1548     sed       = "/^#[ \t]*ifndef _LONG_DOUBLE/,/\\/\\* _LONG_DOUBLE \\*\\//D";
1549     sed       = "s/long_double/long double/g";
1550
1551     test_text = "#  ifndef _LONG_DOUBLE\n"
1552                 "#    define _LONG_DOUBLE\n"
1553                 "     typedef struct {\n"
1554                 "       unsigned int word1, word2, word3, word4;\n"
1555                 "     } long_double;\n"
1556                 "#  endif /* _LONG_DOUBLE */\n"
1557                 "extern long_double strtold(const char *, char **);\n";
1558 };
1559
1560
1561 /*
1562  *  Fix hpux10.20 <sys/time.h> to avoid invalid forward decl
1563  */
1564 fix = {
1565     hackname = hpux_systime;
1566     files    = sys/time.h;
1567     select   = "^extern struct sigevent;";
1568
1569     c_fix     = format;
1570     c_fix_arg = "struct sigevent;";
1571
1572     test_text = 'extern struct sigevent;';
1573 };
1574
1575
1576 /*
1577  *  Fix return type of abort and free
1578  */
1579 fix = {
1580     hackname  = int_abort_free_and_exit;
1581     files     = stdlib.h;
1582     select    = "int[ \t]+(abort|free|exit)[ \t]*\\(";
1583     bypass    = "_CLASSIC_ANSI_TYPES";
1584
1585     c_fix     = format;
1586     c_fix_arg = "void\t%1(";
1587
1588     test_text = "extern int abort(int);\n"
1589                 "extern int free(void*);\n"
1590                 "extern int exit(void*);";
1591 };
1592
1593
1594 /*
1595  *  Fix various macros used to define ioctl numbers.
1596  *  The traditional syntax was:
1597  *
1598  *    #define _IO(n, x) (('n'<<8)+x)
1599  *    #define TIOCFOO _IO(T, 1)
1600  *
1601  *  but this does not work with the C standard, which disallows macro
1602  *  expansion inside strings.  We have to rewrite it thus:
1603  *
1604  *    #define _IO(n, x) ((n<<8)+x)
1605  *    #define TIOCFOO  _IO('T', 1)
1606  *
1607  *  The select expressions match too much, but the c_fix code is cautious.
1608  *
1609  *  _IO might be: _IO DESIO BSD43__IO with W, R, WR, C, ... suffixes.
1610  */
1611 fix = {
1612     hackname  = io_quotes_def;
1613     select    = "define[ \t]+[A-Z0-9_]+IO[A-Z]*\\([a-zA-Z][,)]";
1614     c_fix     = char_macro_def;
1615     c_fix_arg = "IO";
1616     test_text =
1617     "#define BSD43__IOWR(n, x) (('n'<<8)+x)\n"
1618     "#define _IOWN(x,y,t)  (_IOC_IN|(((t)&_IOCPARM_MASK)<<16)|('x'<<8)|y)\n"
1619     "#define _IO(x,y)      ('x'<<8|y)";
1620     test_text =
1621     "#define XX_IO(x)        ('x'<<8|256)";
1622 };
1623
1624 fix = {
1625     hackname  = io_quotes_use;
1626     select    = "define[ \t]+[A-Z0-9_]+[ \t]+[A-Z0-9_]+IO[A-Z]*[ \t]*"
1627                 "\\( *[^,']";
1628     c_fix     = char_macro_use;
1629     c_fix_arg = "IO";
1630     test_text = "#define TIOCFOO BSD43__IOWR(T, 1)\n"
1631                 "#define TIOCFOO \\\\\n"
1632                 "BSD43__IOWR(T, 1) /* Some are multi-line */";
1633 };
1634
1635
1636 /*
1637  *  Check for missing ';' in struct
1638  */
1639 fix = {
1640     hackname = ip_missing_semi;
1641     files    = netinet/ip.h;
1642     select   = "}$";
1643     sed      = "/^struct/,/^};/s/}$/};/";
1644     test_text=
1645     "struct mumble {\n"
1646     "  union {\n"
1647     "    int x;\n"
1648     "  }\n"
1649     "}; /* mumbled struct */\n";
1650 };
1651
1652
1653 /*
1654  *  IRIX 6.5.1[89] <internal/sgimacros.h> unconditionally defines
1655  *  __restrict as restrict iff __c99.  This is wrong for C++, which
1656  *  needs many C99 features, but only supports __restrict.
1657  */
1658 fix = {
1659     hackname  = irix___restrict;
1660     files     = internal/sgimacros.h;
1661     select    = "(#ifdef __c99\n)(#[ \t]*define __restrict restrict)";
1662
1663     mach      = "mips-sgi-irix6.5";
1664     c_fix     = format;
1665     c_fix_arg = "%1"
1666                 "#  ifndef __cplusplus\n%2\n#  endif";
1667
1668     test_text = "#ifdef __c99\n#  define __restrict restrict";
1669 };
1670
1671 /*
1672  * IRIX 6.5.22 <internal/math_core.h> uses the SGI c99 __generic() intrinsic
1673  * to define the fpclasify, isfinite, isinf, isnan, isnormal and signbit 
1674  * functions.
1675  *
1676  * This was probably introduced around IRIX 6.5.18
1677  */
1678 fix = {
1679     hackname  = irix___generic1;
1680     files     = internal/math_core.h;
1681     mach      = "mips-sgi-irix6.5";
1682     select    = "#define ([a-z]+)\\(x\\) *__generic.*";
1683
1684     c_fix     = format;
1685     c_fix_arg = "extern int %1(double);\n"
1686                 "extern int %1f(float);\n"
1687                 "extern int %1l(long double);\n"
1688                 "#define %1(x) (sizeof(x) == sizeof(double) ? _%1(x) \\\n"
1689                 "               : sizeof(x) == sizeof(float) ? _%1f(x) \\\n"
1690                 "               : _%1l(x))\n";
1691
1692     test_text = 
1693       "#define isnan(x) __generic(x,,, _isnan, _isnanf, _isnanl,,,)(x)\n";
1694 };
1695
1696
1697 /* Likewise <internal/math_core.h> on IRIX 6.5.19 and later uses the SGI
1698    compiler's __generic intrinsic to define isgreater, isgreaterequal,
1699    isless, islessequal, islessgreater and isunordered functions.  */
1700 fix = {
1701     hackname  = irix___generic2;
1702     files     = internal/math_core.h;
1703     mach      = "mips-sgi-irix6.5";
1704     select    = "#define ([a-z]+)\\(x,y\\) *__generic.*";
1705
1706     c_fix     = format;
1707     c_fix_arg = "#define %1(x,y) \\\n"
1708                 "  ((sizeof(x)<=4 && sizeof(y)<=4) ? _%1f(x,y) \\\n"
1709                 "   : (sizeof(x)<=8 && sizeof(y)<=8) ? _%1(x,y) \\\n"
1710                 "   : _%1l(x,y))\n";
1711
1712     test_text = 
1713       "#define isless(x,y)         __generic(x,y,, _isless, _islessf, _islessl,,,)(x,y)";
1714 };
1715
1716
1717 /*
1718  *  IRIX 5.2's <sys/asm.h> contains an asm comment with a contraction
1719  *  that causes the assembly preprocessor to complain about an
1720  *  unterminated character constant.
1721  */
1722 fix = {
1723     hackname  = irix_asm_apostrophe;
1724     files     = sys/asm.h;
1725
1726     select    = "^[ \t]*#.*[Ww]e're";
1727     c_fix     = format;
1728     c_fix_arg = "%1 are";
1729     c_fix_arg = "^([ \t]*#.*[Ww]e)'re";
1730     test_text = "\t# and we're on vacation";
1731 };
1732
1733
1734 /*
1735  *  Non-traditional "const" declaration in Irix's limits.h.
1736  */
1737 fix = {
1738     hackname    = irix_limits_const;
1739     files       = fixinc-test-limits.h, limits.h;
1740     select      = "^extern const ";
1741     c_fix       = format;
1742     c_fix_arg   = "extern __const ";
1743     test_text   = "extern const char limit; /* test limits */";
1744 };
1745
1746
1747 /*
1748  *  IRIX 6.5.1[78] <sys/socket.h> has a broken definition of socklen_t.
1749  *  Various socket function prototypes use different types instead,
1750  *  depending on the API in use (BSD, XPG4/5), but the socklen_t
1751  *  definition doesn't reflect this (SGI Bug Id 864477, fixed in
1752  *  IRIX 6.5.19).
1753  */
1754 fix = {
1755     hackname  = irix_socklen_t;
1756     files     = sys/socket.h;
1757     select    = "(#define _SOCKLEN_T\n)(typedef u_int32_t socklen_t;)";
1758
1759     mach      = "mips-sgi-irix6.5";
1760     c_fix     = format;
1761     c_fix_arg = "%1"
1762                 "#if _NO_XOPEN4 && _NO_XOPEN5\n"
1763                 "typedef int socklen_t;\n"
1764                 "#else\n"
1765                 "%2\n"
1766                 "#endif /* _NO_XOPEN4 && _NO_XOPEN5 */";
1767
1768     test_text = "#define _SOCKLEN_T\ntypedef u_int32_t socklen_t;";
1769 };
1770
1771 /*
1772  *  IRIX 5.x's stdio.h and IRIX 6.5's internal/stdio_core.h declare
1773  *  some functions that take a va_list as
1774  *  taking char *.  However, GCC uses void * for va_list, so
1775  *  calling vfprintf with a va_list fails in C++.  */
1776 fix = {
1777     hackname  = irix_stdio_va_list;
1778     files     = stdio.h;
1779     files     = internal/stdio_core.h;
1780
1781     select = '/\* va_list \*/ char \*';
1782     c_fix  = format;
1783     c_fix_arg = "__gnuc_va_list";
1784     test_text =
1785     "extern int printf( const char *, /* va_list */ char * );";
1786 };
1787
1788
1789 /*
1790  *  IRIX 6.5.19 <internal/wchar_core.h> provides the XPG4 variant of
1791  *  wcsftime by default.  ISO C99 requires the XPG5 variant instead.
1792  */
1793 fix = {
1794     hackname  = irix_wcsftime;
1795     files     = internal/wchar_core.h;
1796     select    = "#if _NO_XOPEN5\n(extern size_t[ \t]+wcsftime.*const char \*.*)";
1797
1798     mach      = "mips-sgi-irix6.5";
1799     c_fix     = format;
1800     c_fix_arg = "#if _NO_XOPEN5 && !defined(__c99)\n%1";
1801
1802     test_text = "#if _NO_XOPEN5\n"
1803                 "extern size_t          wcsftime(wchar_t *, __SGI_LIBC_NAMESPACE_QUALIFIER size_t, const char *, const struct tm *);";
1804 };
1805
1806 /*
1807  * Fixing ISC fmod declaration
1808  */
1809 fix = {
1810     hackname  = isc_fmod;
1811     files     = math.h;
1812     select    = 'fmod\(double\)';
1813     c_fix     = format;
1814     c_fix_arg = "fmod(double, double)";
1815     test_text = "extern double  fmod(double);";
1816 };
1817
1818
1819 /*
1820  *  On Interactive Unix 2.2, certain traditional Unix definitions
1821  *  (notably getc and putc in stdio.h) are omitted if __STDC__ is
1822  *  defined, not just if _POSIX_SOURCE is defined.  This makes it
1823  *  impossible to compile any nontrivial program except with -posix.
1824  */
1825 fix = {
1826     hackname = isc_omits_with_stdc;
1827
1828     files     = "stdio.h";
1829     files     = "math.h";
1830     files     = "ctype.h";
1831     files     = "sys/limits.h";
1832     files     = "sys/fcntl.h";
1833     files     = "sys/dirent.h";
1834
1835     select    = '!defined\(__STDC__\) && !defined\(_POSIX_SOURCE\)';
1836     c_fix     = format;
1837     c_fix_arg = '!defined(_POSIX_SOURCE)';
1838     test_text = "#if !defined(__STDC__) && !defined(_POSIX_SOURCE) /* ? ! */"
1839                 "\nint foo;\n#endif";
1840 };
1841
1842
1843 /*
1844  * These files in Sun OS 4.x and ARM/RISCiX and BSD4.3
1845  * use / * * / to concatenate tokens.
1846  */
1847 fix = {
1848     hackname = kandr_concat;
1849     files  = "sparc/asm_linkage.h";
1850     files  = "sun3/asm_linkage.h";
1851     files  = "sun3x/asm_linkage.h";
1852     files  = "sun4/asm_linkage.h";
1853     files  = "sun4c/asm_linkage.h";
1854     files  = "sun4m/asm_linkage.h";
1855     files  = "sun4c/debug/asm_linkage.h";
1856     files  = "sun4m/debug/asm_linkage.h";
1857     files  = "arm/as_support.h";
1858     files  = "arm/mc_type.h";
1859     files  = "arm/xcb.h";
1860     files  = "dev/chardefmac.h";
1861     files  = "dev/ps_irq.h";
1862     files  = "dev/screen.h";
1863     files  = "dev/scsi.h";
1864     files  = "sys/tty.h";
1865     files  = "Xm.acorn/XmP.h";
1866     files  = bsd43/bsd43_.h;
1867     select = '/\*\*/';
1868     c_fix     = format;
1869     c_fix_arg = '##';
1870     test_text = "#define __CONCAT__(a,b) a/**/b";
1871 };
1872
1873
1874 /*
1875  *  Fix libc1 _G_va_list definition, used in declarations of several
1876  *  more-or-less standard functions, for example vasprintf.
1877  */
1878 fix = {
1879     hackname = libc1_G_va_list;
1880     files    = _G_config.h;
1881     mach     = '*-*-linux*libc1';
1882     select   = 'typedef void \* _G_va_list;';
1883     c_fix     = format;
1884     c_fix_arg = "typedef __builtin_va_list _G_va_list;";
1885     test_text = 'typedef void * _G_va_list;';
1886 };
1887
1888
1889 /*
1890  *  GNU libc1 string.h does not prototype memcpy and memcmp for gcc
1891  *  versions > 1.  This fix will open up the declaration for all
1892  *  versions of GCC and for g++.
1893  */
1894 fix = {
1895     hackname  = libc1_ifdefd_memx;
1896
1897     /* The string.h result is overwritten by AAB_ultrix_string when doing
1898        "make check" and will fail.  Therefore, we add the following kludgery
1899        to insert the test_text into the special testing header.  :-}  */
1900     files     = testing.h;
1901     files     = string.h;
1902
1903     c_fix     = format;
1904     select    = "' is a built-in function for gcc 2\\.x\\. \\*/";
1905     bypass    = __cplusplus;
1906     c_fix_arg = "%1";
1907     c_fix_arg =
1908        '/\* `mem...\' is a built-in function for gcc 2\.x\. \*/' "\n"
1909        '#if defined\(__STDC__\) && __GNUC__ < 2'                 "\n"
1910        "(/\\* .* \\*/\n"
1911        "extern [a-z_]+ mem.*(\n[^#].*)*;)\n"
1912        "#endif";
1913
1914     test_text =
1915     "/* \\`memcpy' is a built-in function for gcc 2.x. */\n"
1916     "#if defined(__STDC__) && __GNUC__ < 2\n"
1917     "/* Copy N bytes of SRC to DEST.  */\n"
1918     "extern __ptr_t memcpy __P ((__ptr_t __dest, __const __ptr_t __src,\n"
1919     "                         size_t __n));\n"
1920     "#endif";
1921 };
1922
1923
1924 /* The /usr/include/sys/ucontext.h on ia64-*linux-gnu systems defines
1925  * an _SC_GR0_OFFSET macro using an idiom that isn't a compile time
1926  * constant on recent versions of g++.
1927  */
1928 fix = {
1929     hackname = linux_ia64_ucontext;
1930     files = "sys/ucontext.h";
1931     mach = "ia64-*-linux*";
1932     select = '\(\(\(char \*\) &\(\(struct sigcontext \*\) 0\)'
1933              '->sc_gr\[0\]\) - \(char \*\) 0\)';
1934     c_fix = format;
1935     c_fix_arg = "__builtin_offsetof \(struct sigcontext, sc_gr[0]\)";
1936     test_text = "# define _SC_GR0_OFFSET\t\\\\\n"
1937         "\t(((char *) &((struct sigcontext *) 0)->sc_gr[0]) - (char *) 0)\n";
1938 };
1939
1940
1941 /*
1942  * Apparently some SVR4 systems typedef longlong_t to long ?
1943  */
1944 #ifdef SVR4
1945 fix = {
1946     hackname  = longlong_t;
1947     select    = "typedef[ \t]+(unsigned[ \t]+)?long[ \t]+(u_)?longlong_t";
1948     c_fix     = format;
1949     c_fix_arg = "typedef %1long long %2longlong_t";
1950     test_text = "typedef long longlong_t\n"
1951                 "typedef unsigned long u_longlong_t";
1952 };
1953 #endif
1954
1955 /* 
1956  *  Remove header file warning from sys/time.h.  Autoconf's
1957  *  AC_HEADER_TIME recommends to include both sys/time.h and time.h
1958  *  which causes warning on LynxOS.  Remove the warning.
1959  */
1960 fix = {
1961     hackname  = lynxos_no_warning_in_sys_time_h;
1962     files     = sys/time.h;
1963     select    = "#warning[ \t]+Using <time.h> instead of <sys/time.h>";
1964     c_fix     = format;
1965     c_fix_arg = "";
1966     test_text = "#warning Using <time.h> instead of <sys/time.h>";
1967 };
1968
1969
1970 /* 
1971  *  Add missing declaration for putenv.
1972  */
1973 fix = {
1974     hackname  = lynxos_missing_putenv;
1975     mach      = '*-*-lynxos*';
1976     files     = stdlib.h;
1977     bypass    = 'putenv[ \t]*\\(';
1978     select    = "extern char \\*getenv[ \t]*_AP\\(\\(const char \\*\\)\\);";
1979     c_fix     = format;
1980     c_fix_arg = "%0\n"
1981         "extern int putenv                              _AP((char *));";
1982     c_fix_arg = "extern char \\*getenv[ \t]*_AP\\(\\(const char \\*\\)\\);";
1983     test_text = "extern char *getenv    _AP((const char *));";
1984 };
1985
1986
1987 /*
1988  * Fix BSD machine/ansi.h to use __builtin_va_list to define _BSD_VA_LIST_.
1989  *
1990  * On NetBSD, machine is a symbolic link to an architecture specific
1991  * directory name, so we can't match a specific file name here.
1992  */
1993 fix = {
1994     hackname = machine_ansi_h_va_list;
1995     select   = "define[ \t]+_BSD_VA_LIST_[ \t]";
1996     bypass   = '__builtin_va_list';
1997
1998     c_fix     = format;
1999     c_fix_arg = "%1__builtin_va_list";
2000     c_fix_arg = "(define[ \t]+_BSD_VA_LIST_[ \t]+).*";
2001
2002     test_text = " # define _BSD_VA_LIST_\tchar**";
2003 };
2004
2005
2006 /*
2007  *  Fix non-ansi machine name defines
2008  */
2009 fix = {
2010     hackname  = machine_name;
2011     c_test    = machine_name;
2012     c_fix     = machine_name;
2013
2014     test_text = "/* MACH_DIFF: */\n"
2015     "#if defined( i386 ) || defined( sparc ) || defined( vax )"
2016     "\n/* no uniform test, so be careful  :-) */";
2017 };
2018
2019
2020 /*
2021  *  Some math.h files define struct exception (it's in the System V
2022  *  Interface Definition), which conflicts with the class exception defined
2023  *  in the C++ file std/stdexcept.h.  We redefine it to __math_exception.
2024  *  This is not a great fix, but I haven't been able to think of anything
2025  *  better.  Note that we have to put the #ifdef/#endif blocks at beginning
2026  *  and end of file, because fixproto runs after us and may insert
2027  *  additional references to struct exception.
2028  */
2029 fix = {
2030     hackname  = math_exception;
2031     files     = math.h;
2032     select    = "struct exception";
2033     /*
2034      * This should be bypassed on __cplusplus, but some supposedly C++ C++
2035      * aware headers, such as Solaris 8 and 9, don't wrap their struct
2036      * exception either.  So currently we bypass only for glibc, based on a
2037      * comment in the fixed glibc header.  Ick.
2038      */
2039     bypass    = 'We have a problem when using C\+\+|for C\+\+, _[a-z0-9A-Z_]+_exception; for C, exception';
2040     c_fix     = wrap;
2041
2042     c_fix_arg = "#ifdef __cplusplus\n"
2043                 "#define exception __math_exception\n"
2044                 "#endif\n";
2045
2046     c_fix_arg = "#ifdef __cplusplus\n"
2047                 "#undef exception\n"
2048                 "#endif\n";
2049
2050     test_text = "typedef struct exception t_math_exception;";
2051 };
2052
2053
2054 /*
2055  *  This looks pretty broken to me.  ``dbl_max_def'' will contain
2056  *  "define DBL_MAX " at the start, when what we really want is just
2057  *  the value portion.  Can't figure out how to write a test case
2058  *  for this either  :-(
2059  */
2060 fix = {
2061     hackname = math_huge_val_from_dbl_max;
2062     files    = math.h;
2063
2064     /*
2065      * IF HUGE_VAL is defined to be DBL_MAX *and* DBL_MAX is _not_ defined
2066      * in math.h, this fix applies.
2067      */
2068     select   = "define[ \t]+HUGE_VAL[ \t]+DBL_MAX";
2069     bypass   = "define[ \t]+DBL_MAX";
2070
2071     shell    =
2072     /*
2073      *  See if we have a definition for DBL_MAX in float.h.
2074      *  If we do, we will replace the one in math.h with that one.
2075      */
2076
2077     "\tdbl_max_def=`egrep 'define[ \t]+DBL_MAX[ \t]+.*' float.h "
2078                    "| sed 's/.*DBL_MAX[ \t]*//' 2>/dev/null`\n\n"
2079
2080     "\tif ( test -n \"${dbl_max_def}\" ) > /dev/null 2>&1\n"
2081     "\tthen sed -e '/define[ \t]*HUGE_VAL[ \t]*DBL_MAX/"
2082                         "s@DBL_MAX@'\"$dbl_max_def@\"\n"
2083     "\telse cat\n"
2084     "\tfi";
2085
2086     test_text =
2087     "`echo '#define DBL_MAX\t3.1415e+9 /* really big */' >> float.h`\n"
2088     "#define HUGE_VAL DBL_MAX";
2089 };
2090
2091
2092 /*
2093  *  nested comment
2094  */
2095 fix = {
2096     hackname  = nested_auth_des;
2097     files     = rpc/rpc.h;
2098     select    = '(/\*.*rpc/auth_des\.h>.*)/\*';
2099     c_fix     = format;
2100     c_fix_arg = "%1*/ /*";
2101     test_text = "/*#include <rpc/auth_des.h> /* skip this */";
2102 };
2103
2104
2105 /*
2106  * Fix nested comments in Motorola's <limits.h> and <sys/limits.h>
2107  */
2108 fix = {
2109     hackname = nested_motorola;
2110     mach     = "m68k-motorola-sysv*";
2111     files    = sys/limits.h;
2112     files    = limits.h;
2113     select   = "max # bytes atomic in write|error value returned by Math lib";
2114
2115     sed = "s@^\\(#undef[ \t][ \t]*PIPE_BUF[ \t]*"
2116                    "/\\* max # bytes atomic in write to a\\)$@\\1 */@";
2117     sed = "s@\\(/\\*#define\tHUGE_VAL\t3.[0-9e+]* \\)"
2118           "\\(/\\*error value returned by Math lib\\*/\\)$@\\1*/ \\2@";
2119
2120     test_text =
2121     "#undef PIPE_BUF /* max # bytes atomic in write to a\n"
2122     "\t\t/* PIPE */\n"
2123     "/*#define\tHUGE_VAL\t3.9e+9 /*error value returned by Math lib*/";
2124 };
2125
2126
2127 /*
2128  * Fixing nested comments in ISC <sys/limits.h>
2129  */
2130 fix = {
2131     hackname = nested_sys_limits;
2132     files  = sys/limits.h;
2133     select = CHILD_MAX;
2134     sed    = "/CHILD_MAX/s,/\\* Max, Max,";
2135     sed    = "/OPEN_MAX/s,/\\* Max, Max,";
2136     test_text = "/*\n#define CHILD_MAX 20 /* Max, Max, ... */ /*\n"
2137                 "#define OPEN_MAX  20 /* Max, Max, ... */\n";
2138 };
2139
2140
2141 /*
2142  * NetBSD has a semicolon after the ending '}' for some extern "C".
2143  */
2144 fix = {
2145     hackname  = netbsd_extra_semicolon;
2146     mach      = *-*-netbsd*;
2147     files     = sys/cdefs.h;
2148     select    = "#define[ \t]*__END_DECLS[ \t]*};";
2149
2150     c_fix     = format;
2151     c_fix_arg = "#define __END_DECLS }";
2152
2153     test_text = "#define __END_DECLS };";
2154 };
2155
2156
2157 /*
2158  *  NeXT 3.2 adds const prefix to some math functions.
2159  *  These conflict with the built-in functions.
2160  */
2161 fix = {
2162     hackname  = next_math_prefix;
2163     files     = ansi/math.h;
2164     select    = "^extern[ \t]+double[ \t]+__const__[ \t]";
2165
2166     c_fix     = format;
2167     c_fix_arg = "extern double %1(";
2168     c_fix_arg = "^extern[ \t]+double[ \t]+__const__[ \t]+([a-z]+)\\(";
2169
2170     test_text = "extern\tdouble\t__const__\tmumble();";
2171 };
2172
2173
2174 /*
2175  *  NeXT 3.2 uses the word "template" as a parameter for some
2176  *  functions. GCC reports an invalid use of a reserved key word
2177  *  with the built-in functions.
2178  */
2179 fix = {
2180     hackname = next_template;
2181     files    = bsd/libc.h;
2182     select   = "[ \t]template\\)";
2183
2184     c_fix     = format;
2185     c_fix_arg = "(%1)";
2186     c_fix_arg = "\\(([^)]*)[ \t]template\\)";
2187     test_text = "extern mumble( char * template); /* fix */";
2188 };
2189
2190
2191 /*
2192  *  NeXT 3.2 includes the keyword volatile in the abort() and  exit()
2193  *  function prototypes. That conflicts with the  built-in functions.
2194  */
2195 fix = {
2196     hackname = next_volitile;
2197     files    = ansi/stdlib.h;
2198     select   = "^extern[ \t]+volatile[ \t]+void[ \t]";
2199
2200     c_fix     = format;
2201     c_fix_arg = "extern void %1(";
2202     c_fix_arg = "^extern[ \t]+volatile[ \t]+void[ \t]+(exit|abort)\\(";
2203
2204     test_text = "extern\tvolatile\tvoid\tabort();";
2205 };
2206
2207
2208 /*
2209  *  NeXT 2.0 defines 'int wait(union wait*)', which conflicts with Posix.1.
2210  *  Note that version 3 of the NeXT system has wait.h in a different directory,
2211  *  so that this code won't do anything.  But wait.h in version 3 has a
2212  *  conditional, so it doesn't need this fix.  So everything is okay.
2213  */
2214 fix = {
2215     hackname  = next_wait_union;
2216     files     = sys/wait.h;
2217
2218     select    = 'wait\(union wait';
2219     c_fix     = format;
2220     c_fix_arg = "wait(void";
2221     test_text = "extern pid_d wait(union wait*);";
2222 };
2223
2224
2225 /*
2226  *  a missing semi-colon at the end of the nodeent structure definition.
2227  */
2228 fix = {
2229     hackname  = nodeent_syntax;
2230     files     = netdnet/dnetdb.h;
2231     select    = "char[ \t]*\\*na_addr[ \t]*$";
2232     c_fix     = format;
2233     c_fix_arg = "%0;";
2234     test_text = "char *na_addr\t";
2235 };
2236
2237
2238 /*
2239  *  obstack.h used casts as lvalues.
2240  *
2241  *  We need to change postincrements of casted pointers (which are
2242  *  then dereferenced and assigned into) of the form
2243  *
2244  *    *((TYPE*)PTRVAR)++ = (VALUE)
2245  *
2246  *  into expressions like
2247  *
2248  *    ((*((TYPE*)PTRVAR) = (VALUE)), (PTRVAR += sizeof (TYPE)))
2249  *
2250  *  which is correct for the cases used in obstack.h since PTRVAR is
2251  *  of type char * and the value of the expression is not used.
2252  */
2253 fix = {
2254     hackname  = obstack_lvalue_cast;
2255     files     = obstack.h;
2256     select    = '\*\(\(([^()]*)\*\)(.*)\)\+\+ = \(([^()]*)\)';
2257     c_fix     = format;
2258     c_fix_arg = "((*((%1*)%2) = (%3)), (%2 += sizeof (%1)))";
2259     test_text = "*((void **) (h)->next_free)++ = (aptr)";
2260 };
2261
2262
2263 /*
2264  *  sys/lc_core.h on some versions of OSF1/4.x pollutes the namespace by
2265  *  defining regex.h related types.  This causes libg++ build and usage
2266  *  failures.  Fixing this correctly requires checking and modifying 3 files.
2267  */
2268 fix = {
2269     hackname = osf_namespace_a;
2270     files    = reg_types.h;
2271     files    = sys/lc_core.h;
2272     test     = " -r reg_types.h";
2273     test     = " -r sys/lc_core.h";
2274     test     = " -n \"`grep '} regex_t;' reg_types.h`\"";
2275     test     = " -z \"`grep __regex_t regex.h`\"";
2276
2277     c_fix     = format;
2278     c_fix_arg = "__%0";
2279     c_fix_arg = "reg(ex|off|match)_t";
2280
2281     test_text = "`touch sys/lc_core.h`"
2282     "typedef struct {\n  int stuff, mo_suff;\n} regex_t;\n"
2283     "extern regex_t    re;\n"
2284     "extern regoff_t   ro;\n"
2285     "extern regmatch_t rm;\n";
2286 };
2287
2288 fix = {
2289     hackname = osf_namespace_c;
2290     files    = regex.h;
2291     test     = " -r reg_types.h";
2292     test     = " -r sys/lc_core.h";
2293     test     = " -n \"`grep '} regex_t;' reg_types.h`\"";
2294     test     = " -z \"`grep __regex_t regex.h`\"";
2295
2296     select    = "#include <reg_types\.h>.*";
2297     c_fix     = format;
2298     c_fix_arg = "%0\n"
2299                 "typedef __regex_t\tregex_t;\n"
2300                 "typedef __regoff_t\tregoff_t;\n"
2301                 "typedef __regmatch_t\tregmatch_t;";
2302
2303     test_text = "#include <reg_types.h>";
2304 };
2305
2306
2307 /*
2308  *  Fix __page_size* declarations in pthread.h AIX 4.1.[34].
2309  *  The original ones fail if uninitialized externs are not common.
2310  *  This is the default for all ANSI standard C++ compilers.
2311  */
2312 fix = {
2313     hackname  = pthread_page_size;
2314     files     = pthread.h;
2315     select    = "^int __page_size";
2316     c_fix     = format;
2317     c_fix_arg = "extern %0";
2318     test_text = "int __page_size;";
2319 };
2320
2321 /*
2322  * On broken glibc-2.3.3 systems an array of incomplete structures is
2323  * passed to __sigsetjmp.  Fix that to take a pointer instead.
2324  */
2325 fix = {
2326     hackname  = pthread_incomplete_struct_argument;
2327     files     = pthread.h;
2328     select    = "struct __jmp_buf_tag";
2329     c_fix     = format;
2330     c_fix_arg = "%1 *%2%3";
2331     c_fix_arg = "^(extern int __sigsetjmp \\(struct __jmp_buf_tag) (__env)\\[1\\](.*)$";
2332     test_text = "extern int __sigsetjmp (struct __jmp_buf_tag __env[1], int __savemask);";
2333 };
2334
2335 /*
2336  * On DYNIX/ptx, sys/mc_param.h has an embedded asm for the cpuid instruction
2337  * on the P5. This is not used by anything else so we ifdef it out.
2338  * Current GCC doesn't seem to complain about the asm, though.
2339  */
2340 #ifdef PTX
2341 fix = {
2342     hackname  = ptx_sys_mc_param_h;
2343     files     = sys/mc_param.h;
2344     sed       = "/__asm/,/}/{"
2345                   "/__asm/i\\\n"
2346                   "#if !defined (__GNUC__) && !defined (__GNUG__)\n"
2347                   "/}/a\\\n"
2348                   "#endif\n"
2349                 "}";
2350     test_text = "__asm\n"
2351                 "int _CPUID()\n"
2352                 "{\n"
2353                 "   non-GNU assembly here\n"
2354                 "}";
2355 };
2356 #endif
2357
2358
2359 /*
2360  *  Fix return type of fread and fwrite on sysV68
2361  */
2362 fix = {
2363     hackname = read_ret_type;
2364     files    = stdio.h;
2365     select   = "extern int\t.*, fread\\(\\), fwrite\\(\\)";
2366     c_fix     = format;
2367     c_fix_arg = "extern unsigned int fread(), fwrite();\n%1%2";
2368     c_fix_arg = "(extern int\t.*), fread\\(\\), fwrite\\(\\)(.*)";
2369
2370     test_text = "extern int\tfclose(), fflush(), fread(), fwrite(), foo();";
2371 };
2372
2373
2374 /*
2375  *  Fix casts as lvalues in glibc's <rpc/xdr.h>.
2376  */
2377 fix = {
2378     hackname  = rpc_xdr_lvalue_cast_a;
2379     files     = rpc/xdr.h;
2380     select    = "#define[ \t]*IXDR_GET_LONG.*\\\\\n.*__extension__.*";
2381     c_fix     = format;
2382     c_fix_arg = "#define IXDR_GET_LONG(buf) ((long)IXDR_GET_U_INT32(buf))";
2383     test_text = "#define IXDR_GET_LONG(buf) \\\\\n"
2384                 "\t((long)ntohl((u_long)*__extension__((u_int32_t*)(buf))++))";
2385 };
2386
2387
2388 fix = {
2389     hackname  = rpc_xdr_lvalue_cast_b;
2390     files     = rpc/xdr.h;
2391     select    = "#define[ \t]*IXDR_PUT_LONG.*\\\\\n.*__extension__.*";
2392     c_fix     = format;
2393     c_fix_arg = "#define IXDR_PUT_LONG(buf, v) ((long)IXDR_PUT_INT32(buf, (long)(v)))";
2394     test_text = "#define IXDR_PUT_LONG(buf, v) \\\\\n"
2395                 "\t(*__extension__((u_int32_t*)(buf))++ = (long)htonl((u_long)(v)))";
2396 };
2397
2398
2399 /*
2400  *  function class(double x) conflicts with C++ keyword on rs/6000
2401  */
2402 fix = {
2403     hackname  = rs6000_double;
2404     files     = math.h;
2405     select    = '[^a-zA-Z_]class\(';
2406
2407     c_fix     = format;
2408     c_fix_arg = "#ifndef __cplusplus\n%0\n#endif";
2409     c_fix_arg = '^.*[^a-zA-Z_]class\(.*';
2410
2411     test_text = "extern int class();";
2412 };
2413
2414
2415 /*
2416  *  Wrong fchmod prototype on RS/6000.
2417  */
2418 fix = {
2419     hackname  = rs6000_fchmod;
2420     files     = sys/stat.h;
2421     select    = 'fchmod\(char \*';
2422     c_fix     = format;
2423     c_fix_arg = "fchmod(int";
2424     test_text = "extern int fchmod(char *, mode_t);";
2425 };
2426
2427
2428 /*
2429  *  parameters conflict with C++ new on rs/6000
2430  */
2431 fix = {
2432     hackname  = rs6000_param;
2433     files     = "stdio.h";
2434     files     = "unistd.h";
2435
2436     select    = 'rename\(const char \*old, const char \*new\)';
2437     c_fix     = format;
2438     c_fix_arg = 'rename(const char *_old, const char *_new)';
2439
2440     test_text = 'extern int rename(const char *old, const char *new);';
2441 };
2442
2443
2444 /*
2445  *  On OpenServer and on UnixWare 7, <math.h> uses the native compiler
2446  *  __builtin_generic. We fix that usage to use the GCC equivalent.
2447  * It also has a plethora of inline functions that conflict with libstdc++.
2448  */
2449 fix = {
2450     hackname = sco_math;
2451     files    = math.h;
2452     files    = ansi/math.h;
2453     files    = posix/math.h;
2454     files    = xpg4/math.h;
2455     files    = xpg4v2/math.h;
2456     files    = xpg4plus/math.h;
2457     files    = ods_30_compat/math.h;
2458     files    = oldstyle/math.h;
2459     select   = "inline double abs";
2460     bypass   = "__GNUG__";
2461     sed      = "/#define.*__fp_class(a) \\\\/i\\\n"
2462                "#ifndef __GNUC__\n";
2463     sed      =
2464 "/.*__builtin_generic/a\\\n"
2465 "#else\\\n"
2466 "#define __fp_class(a) \\\\\\\n"
2467 "  __builtin_choose_expr(__builtin_types_compatible_p(typeof(a),long double),\\\\\\\n"
2468 "   __fpclassifyl(a), \\\\\\\n"
2469 "    __builtin_choose_expr(__builtin_types_compatible_p(typeof(a), float), \\\\\\\n"
2470 "      __fpclassifyf(a),__fpclassify(a)))\\\n"
2471 "#endif";
2472
2473     sed      = "/extern \"C\\+\\+\"/N;"
2474                "/inline double abs/i\\\n"
2475                "#ifndef __GNUC__\n";
2476     sed      = "/inline long double trunc/N;"
2477                "/inline long double trunc.*}.*extern \"C\\+\\+\"/a\\\n"
2478                "#endif /* ! __GNUC__ */";
2479
2480     test_text =
2481     "#define __fp_class(a) \\\\\n"
2482     " __builtin_generic(a,\"ld:__fplcassifyl;f:__fpclassifyf;:__fpclassify\")\n";
2483
2484 };
2485
2486
2487 /*
2488  *  On SCO OpenServer prior to 5.0.7UP1, <sys/regset.h> and <ieeefp.h>
2489  *  have a clash on struct _fpstate and struct fpstate.
2490  */
2491 fix = {
2492     hackname = sco_regset;
2493     files    = sys/regset.h;
2494     mach     = "*-*-sco3.2v5*";
2495     select   = "(struct[ \t]+.*)fpstate";
2496     c_fix     = format;
2497     c_fix_arg = "%1rsfpstate";
2498
2499     test_text =
2500     "union u_fps {\n"
2501     "    struct\tfpstate\n"
2502     "    {\n"
2503     "       int whatever;\n"
2504     "    }\n"
2505     "};\n"
2506     "union _u_fps {\n"
2507     "    struct _fpstate\n"
2508     "    {\n"
2509     "       int whatever;\n"
2510     "    }\n"
2511     "};\n";
2512 };
2513
2514
2515 /*
2516  *  The static functions lstat() and fchmod() in <sys/stat.h>
2517  *  cause G++ grief since they're not wrapped in "if __cplusplus".
2518  *
2519  *  On SCO OpenServer 5.0.0 through (at least) 5.0.5 <sys/stat.h> contains
2520  *  tiny static wrappers that aren't C++ safe.
2521  */
2522 fix = {
2523     hackname = sco_static_func;
2524     files    = sys/stat.h;
2525     mach     = "i?86-*-sco3.2*";
2526     select   = "^static int";
2527
2528     sed      = "/^static int/i\\\n"
2529                "#if __cplusplus\\\n"
2530                "extern \"C\" {\\\n"
2531                "#endif /* __cplusplus */";
2532
2533     sed      = "/^}$/a\\\n"
2534                "#if __cplusplus\\\n"
2535                " }\\\n"
2536                "#endif /* __cplusplus */";
2537
2538     test_text =
2539     "#ifdef __STDC__\n"
2540     "static int\tstat(const char *__f, struct stat *__p) {\n"
2541     "\treturn __stat32(__f, __p);\n"
2542     "}\n\n#  else /* !__STDC__ THIS FAILS ON BSD SYSTEMS */\n"
2543
2544     "static int\tstat(__f, __p)\n"
2545     "\tchar *__f;\n"
2546     "\tstruct stat *__p;\n"
2547     "{\n"
2548     "\treturn __stat32(__f, __p);\n"
2549     "}\n"
2550     "#endif";
2551 };
2552
2553
2554 /*
2555  *  Fix prototype declaration of utime in sys/times.h.
2556  *  In 3.2v4.0 the const is missing.
2557  */
2558 fix = {
2559     hackname  = sco_utime;
2560     files     = sys/times.h;
2561     mach      = "i?86-*-sco3.2v4*";
2562
2563     select    = '\(const char \*, struct utimbuf \*\);';
2564     c_fix     = format;
2565     c_fix_arg = '(const char *, const struct utimbuf *);';
2566
2567     test_text = "extern int utime(const char *, struct utimbuf *);";
2568 };
2569
2570 /*
2571  * Sun Solaris 10 defines several C99 math macros in terms of
2572  * builtins specific to the Studio compiler, in particular not
2573  * compatible with the GNU compiler.
2574  */
2575 fix = {
2576     hackname = solaris_math_1;
2577     select = '@\(#\)math_c99.h' "[ \t]+1.[0-9]+[ \t]+[0-9/]+ SMI";
2578     bypass = "__GNUC__";
2579     files = iso/math_c99.h;
2580     c_fix = format;
2581     c_fix_arg = "#define\tHUGE_VA%1\t(__builtin_huge_va%2())";
2582     c_fix_arg = "^#define[ \t]+HUGE_VA([LF]+)[ \t]+__builtin_huge_va([lf]+)";
2583     test_text =
2584     '#ident     "@(#)math_c99.h 1.9     04/11/01 SMI"'"\n"
2585     "#undef     HUGE_VAL\n"
2586     "#define    HUGE_VAL        __builtin_huge_val\n"
2587     "#undef     HUGE_VALF\n"
2588     "#define    HUGE_VALF       __builtin_huge_valf\n"
2589     "#undef     HUGE_VALL\n"
2590     "#define    HUGE_VALL       __builtin_huge_vall";
2591 };
2592
2593 fix = {
2594     hackname = solaris_math_2;
2595     select = '@\(#\)math_c99.h' "[ \t]+1.[0-9]+[ \t]+[0-9/]+ SMI";
2596     bypass = "__GNUC__";
2597     files = iso/math_c99.h;
2598     c_fix = format;
2599     c_fix_arg = "#define\tINFINITY\t(__builtin_inff())";
2600     c_fix_arg = "^#define[ \t]+INFINITY[ \t]+__builtin_infinity";
2601     test_text =
2602     '#ident     "@(#)math_c99.h 1.9     04/11/01 SMI"'"\n"
2603     "#undef     INFINITY\n"
2604     "#define    INFINITY        __builtin_infinity";
2605 };
2606
2607 fix = {
2608     hackname = solaris_math_3;
2609     select = '@\(#\)math_c99.h' "[ \t]+1.[0-9]+[ \t]+[0-9/]+ SMI";
2610     bypass = "__GNUC__";
2611     files = iso/math_c99.h;
2612     c_fix = format;
2613     c_fix_arg = "#define\tNAN\t\t(__builtin_nanf(\"\"))";
2614     c_fix_arg = "^#define[ \t]+NAN[ \t]+__builtin_nan";
2615     test_text =
2616     '#ident     "@(#)math_c99.h 1.9     04/11/01 SMI"'"\n"
2617     "#undef     NAN\n"
2618     "#define    NAN     __builtin_nan";
2619 };
2620
2621 fix = {
2622     hackname = solaris_math_4;
2623     select = '@\(#\)math_c99.h' "[ \t]+1.[0-9]+[ \t]+[0-9/]+ SMI";
2624     bypass = "__GNUC__";
2625     files = iso/math_c99.h;
2626     c_fix = format;
2627     c_fix_arg = "#define\tfpclassify(x) \\\n"
2628                 "  __extension__ ({ __typeof(x) __x_fp = (x); \\\n"
2629                 "\t\t   isnan(__x_fp) \\\n"
2630                 "\t\t     ? FP_NAN \\\n"
2631                 "\t\t     : isinf(__x_fp) \\\n"
2632                 "\t\t       ? FP_INFINITE \\\n"
2633                 "\t\t       : isnormal(__x_fp) \\\n"
2634                 "\t\t\t ? FP_NORMAL \\\n"
2635                 "\t\t\t : __x_fp == 0.0 \\\n"
2636                 "\t\t\t   ? FP_ZERO \\\n"
2637                 "\t\t\t   : FP_SUBNORMAL; })";
2638     c_fix_arg = "^#define[ \t]+fpclassify\\(x\\)[ \t]+__builtin_fpclassify\\(x\\)";
2639     test_text =
2640     '#ident     "@(#)math_c99.h 1.9     04/11/01 SMI"'"\n"
2641     "#undef     fpclassify\n"
2642     "#define    fpclassify(x)   __builtin_fpclassify(x)";
2643 };
2644
2645 fix = {
2646     hackname = solaris_math_5;
2647     select = '@\(#\)math_c99.h' "[ \t]+1.[0-9]+[ \t]+[0-9/]+ SMI";
2648     bypass = "__GNUC__";
2649     files = iso/math_c99.h;
2650     c_fix = format;
2651     c_fix_arg = "#define\tisfinite(x) \\\n"
2652                 "  __extension__ ({ __typeof (x) __x_f = (x); \\\n"
2653                 "\t\t   __builtin_expect(!isnan(__x_f - __x_f), 1); })";
2654     c_fix_arg = "^#define[ \t]+isfinite\\(x\\)[ \t]+__builtin_isfinite\\(x\\)";
2655     test_text =
2656     '#ident     "@(#)math_c99.h 1.9     04/11/01 SMI"'"\n"
2657     "#undef     isfinite\n"
2658     "#define    isfinite(x)     __builtin_isfinite(x)";
2659 };
2660
2661 fix = {
2662     hackname = solaris_math_6;
2663     select = '@\(#\)math_c99.h' "[ \t]+1.[0-9]+[ \t]+[0-9/]+ SMI";
2664     bypass = "__GNUC__";
2665     files = iso/math_c99.h;
2666     c_fix = format;
2667     c_fix_arg = "#define\tisinf(x) \\\n"
2668                 "  __extension__ ({ __typeof (x) __x_i = (x); \\\n"
2669                 "\t\t   __builtin_expect(!isnan(__x_i) && !isfinite(__x_i), 0); })";
2670     c_fix_arg = "^#define[ \t]+isinf\\(x\\)[ \t]+__builtin_isinf\\(x\\)";
2671     test_text =
2672     '#ident     "@(#)math_c99.h 1.9     04/11/01 SMI"'"\n"
2673     "#undef     isinf\n"
2674     "#define    isinf(x)        __builtin_isinf(x)";
2675 };
2676
2677 fix = {
2678     hackname = solaris_math_7;
2679     select = '@\(#\)math_c99.h' "[ \t]+1.[0-9]+[ \t]+[0-9/]+ SMI";
2680     bypass = "__GNUC__";
2681     files = iso/math_c99.h;
2682     c_fix = format;
2683     c_fix_arg = "#define\tisnormal(x) \\\n"
2684                 "  __extension__ ({ __typeof(x) __x_n = (x); \\\n"
2685                 "\t\t   if (__x_n < 0.0) __x_n = -__x_n; \\\n"
2686                 "\t\t   __builtin_expect(isfinite(__x_n) \\\n"
2687                 "\t\t\t\t    && (sizeof(__x_n) == sizeof(float) \\\n"
2688                 "\t\t\t\t\t  ? __x_n >= __FLT_MIN__ \\\n"
2689                 "\t\t\t\t\t  : sizeof(__x_n) == sizeof(long double) \\\n"
2690                 "\t\t\t\t\t    ? __x_n >= __LDBL_MIN__ \\\n"
2691                 "\t\t\t\t\t    : __x_n >= __DBL_MIN__), 1); })";
2692     c_fix_arg = "^#define[ \t]+isnormal\\(x\\)[ \t]+__builtin_isnormal\\(x\\)";
2693     test_text =
2694     '#ident     "@(#)math_c99.h 1.9     04/11/01 SMI"'"\n"
2695     "#undef     isnormal\n"
2696     "#define    isnormal(x)     __builtin_isnormal(x)";
2697 };
2698
2699 fix = {
2700     hackname = solaris_math_8;
2701     select = '@\(#\)math_c99.h' "[ \t]+1.[0-9]+[ \t]+[0-9/]+ SMI";
2702     bypass = "__GNUC__";
2703     files = iso/math_c99.h;
2704     c_fix = format;
2705     c_fix_arg = "#define\tsignbit(x)\t(sizeof(x) == sizeof(float) \\\n"
2706                 "\t\t\t   ? __builtin_signbitf(x) \\\n"
2707                 "\t\t\t   : sizeof(x) == sizeof(long double) \\\n"
2708                 "\t\t\t     ? __builtin_signbitl(x) \\\n"
2709                 "\t\t\t     : __builtin_signbit(x))";
2710     c_fix_arg = "^#define[ \t]+signbit\\(x\\)[ \t]+__builtin_signbit\\(x\\)";
2711     test_text =
2712     '#ident     "@(#)math_c99.h 1.9     04/11/01 SMI"'"\n"
2713     "#undef     signbit\n"
2714     "#define    signbit(x)      __builtin_signbit(x)";
2715 };
2716
2717 fix = {
2718     hackname = solaris_math_9;
2719     select = '@\(#\)math_c99.h' "[ \t]+1.[0-9]+[ \t]+[0-9/]+ SMI";
2720     bypass = "__GNUC__";
2721     files = iso/math_c99.h;
2722     c_fix = format;
2723     c_fix_arg = "#define\t%1(x, y)%2__builtin_%1(x, y)";
2724     c_fix_arg = "^#define[ \t]+([a-z]+)\\(x, y\\)([ \t]+)\\(\\(x\\) __builtin_[a-z]+\\(y\\)\\)";
2725     test_text =
2726     '#ident     "@(#)math_c99.h 1.9     04/11/01 SMI"'"\n"
2727     "#undef     isgreater\n"
2728     "#define    isgreater(x, y)         ((x) __builtin_isgreater(y))\n"
2729     "#undef     isgreaterequal\n"
2730     "#define    isgreaterequal(x, y)    ((x) __builtin_isgreaterequal(y))\n"
2731     "#undef     isless\n"
2732     "#define    isless(x, y)            ((x) __builtin_isless(y))\n"
2733     "#undef     islessequal\n"
2734     "#define    islessequal(x, y)       ((x) __builtin_islessequal(y))\n"
2735     "#undef     islessgreater\n"
2736     "#define    islessgreater(x, y)     ((x) __builtin_islessgreater(y))\n"
2737     "#undef     isunordered\n"
2738     "#define    isunordered(x, y)       ((x) __builtin_isunordered(y))";
2739 };
2740
2741 /*
2742  *  Sun Solaris 2.5.1, 2.6 defines PTHREAD_{MUTEX|COND}_INITIALIZER
2743  *  incorrectly, so we replace them with versions that correspond to
2744  *  the definition.  We also explicitly name this fix "1" and the next
2745  *  fix "2" because this one does not deal with the last field.  This
2746  *  fix needs to run before the next.
2747  */
2748 fix = {
2749     hackname = solaris_mutex_init_1;
2750     select = '@\(#\)pthread.h' "[ \t]+1.1[0-9][ \t]+9[567]/[0-9/]+ SMI";
2751     files = pthread.h;
2752     sed   = "/define[ \t]*PTHREAD_MUTEX_INI/s/{0, 0,/{{{0}, 0}, {{{0}}},/\n"
2753             "/define[ \t]*PTHREAD_COND_INI/s/{0,/{{{0},0},/";
2754     test_text =
2755     '#ident "@(#)pthread.h  1.16    97/05/05 SMI"'"\n"
2756     "#define PTHREAD_MUTEX_INITIALIZER\t{0, 0, 0}\n"
2757     "#define PTHREAD_COND_INITIALIZER\t{0, 0} /* */\n";
2758 };
2759
2760
2761 /*
2762  * Sun Solaris defines PTHREAD_MUTEX_INITIALIZER with a trailing
2763  * "0" for the last field of the pthread_mutex_t structure, which is
2764  * of type upad64_t, which itself is typedef'd to int64_t, but with
2765  * __STDC__ defined (e.g. by -ansi) it is a union. So change the
2766  * initializer to "{0}" instead
2767  */
2768 fix = {
2769     hackname = solaris_mutex_init_2;
2770     select = '@\(#\)pthread.h' "[ \t]+1.[0-9]+[ \t]+[0-9/]+ SMI";
2771     files = pthread.h;
2772     c_fix = format;
2773     c_fix_arg = "#if __STDC__ - 0 == 0 && !defined(_NO_LONGLONG)\n"
2774                 "%0\n"
2775                 "#else\n"
2776                 "%1, {0}}%3\n"
2777                 "#endif";
2778     c_fix_arg = "(^#define[ \t]+PTHREAD_(MUTEX|COND)_INITIALIZER[ \t]+\\{.*)"
2779                 ",[ \t]*0\\}" "(|[ \t].*)$";
2780     test_text =
2781     '#ident "@(#)pthread.h  1.26  98/04/12 SMI"'"\n"
2782     "#define PTHREAD_MUTEX_INITIALIZER\t{{{0},0}, {{{0}}}, 0}\n"
2783     "#define PTHREAD_COND_INITIALIZER\t{{{0}, 0}, 0}\t/* DEFAULTCV */\n"
2784     "#define PTHREAD_RWLOCK_INITIALIZER\t"
2785              "{0, 0, 0, {0, 0, 0}, {0, 0}, {0, 0}}";
2786 };
2787
2788
2789 /*
2790  * Solaris 2.5.1 and 2.6 use an outdated prototype for send & recv
2791  * in sys/socket.h.  This is corrected in Solaris 7 and up.
2792  */
2793 fix = {
2794     hackname = solaris_socket;
2795     files = sys/socket.h;
2796     select = '@\(#\)socket.h' "[ \t]+1.[123][0-9][ \t]+9[567]/[0-9/]+ SMI";
2797     c_fix = format;
2798     c_fix_arg = "extern int %1(int, %2void *, int, int);";
2799     c_fix_arg = '^extern int (recv|send)\(int,'
2800                 ' (const )*char '
2801                 '\*, int, int\);';
2802
2803     test_text = '#ident   "@(#)socket.h   1.30    97/01/20 SMI"'"\n"
2804                 "extern int recv(int, char *, int, int);\n"
2805                 "extern int send(int, const char *, int, int);";
2806 };
2807
2808
2809 /*
2810  * Solaris 2.8 has what appears to be some gross workaround for 
2811  * some old version of their c++ compiler.  G++ doesn't want it
2812  * either, but doesn't want to be tied to SunPRO version numbers.
2813  */
2814 fix = {
2815     hackname = solaris_stdio_tag;
2816     files    = stdio_tag.h;
2817
2818     select   = '__cplusplus < 54321L';
2819     /* In Solaris 10, the code in stdio_tag.h is conditionalized on 
2820        "!defined(__GNUC__)" so we no longer need to fix it.  */
2821     bypass   = '__GNUC__';
2822     sed      = 's/defined(__cplusplus) && (__cplusplus < 54321L)/0/';
2823
2824     test_text = "#if\tdefined(__cplusplus) && (__cplusplus < 54321L)";
2825 };
2826
2827
2828 /*
2829  * Sun Solaris 2.5.1 doesn't define 'getpagesize' in <unistd.h>, as is done
2830  * on Solaris 2.6 and up.
2831  */
2832 fix = {
2833     hackname  = solaris_unistd;
2834     files = unistd.h;
2835     select = '@\(#\)unistd.h' "[ \t]+1.3[0-9][ \t]+9[567]/[0-9/]+ SMI";
2836     bypass = "getpagesize";
2837     c_fix = format;
2838     c_fix_arg = "extern int getpagesize();\n%0";
2839     c_fix_arg = '^extern (pid_t|int) getpgid\(.*\);';
2840     test_text = '#ident "@(#)unistd.h   1.33    95/08/28 SMI"'"\n"
2841                 "extern pid_t getpgid(pid_t);\n"
2842                 "extern int getpgid();";
2843 };
2844
2845
2846 /*
2847  * <widec.h> until Solaris 2.5.1 defines macros for a couple of <wchar.h>
2848  * functions, breaking their prototypes if that file is included afterwards.
2849  * Include <wchar.h> early to avoid this issue, as is done on Solaris 2.6
2850  * and up.
2851  */
2852 fix = {
2853     hackname  = solaris_widec;
2854     files     = widec.h;
2855     mach      = '*-*-solaris2.[0-5]';
2856     mach      = '*-*-solaris2.[0-5].*';
2857     bypass    = "include.*wchar\\.h";
2858     select    = "#include <euc.h>";
2859     c_fix     = format;
2860     c_fix_arg = "%0\n#include <wchar.h>";
2861     test_text = "#include <euc.h>";
2862 };
2863
2864
2865 /*
2866  *  a missing semi-colon at the end of the statsswtch structure definition.
2867  */
2868 fix = {
2869     hackname  = statsswtch;
2870     files     = rpcsvc/rstat.h;
2871     select    = "boottime$";
2872     c_fix     = format;
2873     c_fix_arg = "boottime;";
2874     test_text = "struct statswtch {\n  int boottime\n};";
2875 };
2876
2877
2878 /*
2879  *  Arrange for stdio.h to use stdarg.h to define __gnuc_va_list.
2880  *  On 4BSD-derived systems, stdio.h defers to machine/ansi.h; that's
2881  *  OK too.
2882  */
2883 fix = {
2884     hackname = stdio_stdarg_h;
2885     files    = stdio.h;
2886     bypass   = "include.*(stdarg\.h|machine/ansi\.h)";
2887     /*
2888      * On Solaris 10, this fix is unncessary; <stdio.h> includes
2889      * <iso/stdio_iso.h>, which includes <sys/va_list.h>.
2890       */
2891     mach     = '*-*-solaris2.1[0-9]*';
2892     not_machine = true;
2893
2894     c_fix     = wrap;
2895
2896     c_fix_arg = "#define __need___va_list\n#include <stdarg.h>\n";
2897
2898     test_text = "";
2899 };
2900
2901
2902 /*
2903  *  Don't use or define the name va_list in stdio.h.  This is for
2904  *  ANSI.  Note _BSD_VA_LIST_ is dealt with elsewhere.  The presence
2905  *  of __gnuc_va_list, __DJ_va_list, or _G_va_list is taken to
2906  *  indicate that the header knows what it's doing -- under SUSv2,
2907  *  stdio.h is required to define va_list, and we shouldn't break
2908  *  that.  On IRIX 6.5, internal/wchar_core.h used to get its
2909  *  definition of va_list from stdio.h.  Since this doesn't happen any
2910  *  longer, use __gnuc_va_list there, too.
2911  */
2912 fix = {
2913     hackname = stdio_va_list;
2914     files    = stdio.h;
2915     files    = internal/stdio_core.h;
2916     files    = internal/wchar_core.h;
2917     bypass   = '__gnuc_va_list|_BSD_VA_LIST_|__DJ_va_list|_G_va_list';
2918     /* 
2919      * On Solaris 10, the definition in 
2920      * <stdio.h> is guarded appropriately by the _XPG4 feature macro; 
2921      * there is therefore no need for this fix there.
2922      */
2923     mach = '*-*-solaris2.1[0-9]*';
2924     not_machine = true;
2925
2926     /*
2927      * Use __gnuc_va_list in arg types in place of va_list.
2928      * On 386BSD use __gnuc_va_list instead of _VA_LIST_.  On Tru64 UNIX V5.1A
2929      * use __gnuc_va_list instead of __VA_LIST__.  We're hoping the
2930      * trailing parentheses and semicolon save all other systems from this.
2931      * Define __not_va_list__ (something harmless and unused)
2932      * instead of va_list.
2933      * Don't claim to have defined va_list.
2934      */
2935     sed = "s@[ \t]va_list\\([ \t)]\\)@ __gnuc_va_list\\1@\n"
2936           "s@(va_list)&@(__gnuc_va_list)\\&@\n"
2937           "s@ _VA_LIST_));@ __gnuc_va_list));@\n"
2938           "s@ __VA_LIST__));@ __gnuc_va_list));@\n"
2939           "s@ va_list@ __not_va_list__@\n"
2940           "s@\\*va_list@*__not_va_list__@\n"
2941           "s@ __va_list)@ __gnuc_va_list)@\n"
2942           "s@typedef[ \t]\\(.*\\)[ \t]va_list[ \t]*;"
2943            "@typedef \\1 __not_va_list__;@\n"
2944           "s@typedef[ \t]*__va_list__@typedef __gnuc_va_list@\n"
2945           "s@GNUC_VA_LIST@GNUC_Va_LIST@\n"
2946           "s@_VA_LIST_DEFINED@_Va_LIST_DEFINED@\n"
2947           "s@_NEED___VA_LIST@_NEED___Va_LIST@\n"
2948           "s@VA_LIST@DUMMY_VA_LIST@\n"
2949           "s@_Va_LIST@_VA_LIST@";
2950     test_text = "extern void mumble( va_list);";
2951 };
2952
2953
2954 /*
2955  *  Fix headers that use va_list from stdio.h to use the updated
2956  *  va_list from the stdio_va_list change.  Note _BSD_VA_LIST_ is
2957  *  dealt with elsewhere.  The presence of __gnuc_va_list,
2958  *  __DJ_va_list, or _G_va_list is taken to indicate that the header
2959  *  knows what it's doing.
2960  */
2961 fix = {
2962     hackname = stdio_va_list_clients;
2963     files    = com_err.h;
2964     files    = cps.h;
2965     files    = curses.h;
2966     files    = krb5.h;
2967     files    = lc_core.h;
2968     files    = pfmt.h;
2969     files    = wchar.h;
2970     files    = curses_colr/curses.h;
2971     bypass   = '__gnuc_va_list|_BSD_VA_LIST_|__DJ_va_list|_G_va_list';
2972     /* Don't fix, if we use va_list from stdarg.h, or if the use is
2973        otherwise protected.  */
2974     bypass   = 'include <stdarg\.h>|#ifdef va_start';
2975
2976     /*
2977      * Use __gnuc_va_list in arg types in place of va_list.
2978      * On 386BSD use __gnuc_va_list instead of _VA_LIST_.  On Tru64 UNIX V5.1A
2979      * use __gnuc_va_list instead of __VA_LIST__.  We're hoping the
2980      * trailing parentheses and semicolon save all other systems from this.
2981      * Define __not_va_list__ (something harmless and unused)
2982      * instead of va_list.
2983      * Don't claim to have defined va_list.
2984      */
2985     sed = "s@[ \t]va_list\\([ \t)]\\)@ __gnuc_va_list\\1@\n"
2986           "s@(va_list)&@(__gnuc_va_list)\\&@\n"
2987           "s@ _VA_LIST_));@ __gnuc_va_list));@\n"
2988           "s@ __VA_LIST__));@ __gnuc_va_list));@\n"
2989           "s@ va_list@ __not_va_list__@\n"
2990           "s@\\*va_list@*__not_va_list__@\n"
2991           "s@ __va_list)@ __gnuc_va_list)@\n"
2992           "s@typedef[ \t]\\(.*\\)[ \t]va_list[ \t]*;"
2993            "@typedef \\1 __not_va_list__;@\n"
2994           "s@typedef[ \t]*__va_list__@typedef __gnuc_va_list@\n"
2995           "s@GNUC_VA_LIST@GNUC_Va_LIST@\n"
2996           "s@_VA_LIST_DEFINED@_Va_LIST_DEFINED@\n"
2997           "s@_NEED___VA_LIST@_NEED___Va_LIST@\n"
2998           "s@VA_LIST@DUMMY_VA_LIST@\n"
2999           "s@_Va_LIST@_VA_LIST@";
3000     test_text = "extern void mumble( va_list);";
3001 };
3002
3003
3004 /*
3005  *  "!__STDC__" or "__STDC__==0" or "__STDC__!=1" or "__STDC__-0==0"
3006  *  is "!defined( __STRICT_ANSI__ )"
3007  */
3008 fix = {
3009     hackname = strict_ansi_not;
3010     select   = "^([ \t]*#[ \t]*if.*)"
3011                "(!__STDC__"
3012                "|__STDC__[ \t]*==[ \t]*0"
3013                "|__STDC__[ \t]*!=[ \t]*1"
3014                "|__STDC__[ \t]*-[ \t]*0[ \t]*==[ \t]*0)";
3015     /* Tru64 UNIX V4.0F/V5.1 <standards.h> supports GCC usage of __STDC__. */
3016     bypass = 'GNU and MIPS C compilers define __STDC__ differently';
3017     /* GNU gmp.h uses "__STDC__ != 1" only if __SCO_VERSION__, which
3018        is not defined by GCC, so it is safe.  */
3019     bypass = '__SCO_VERSION__.*__STDC__ != 1';
3020     c_test   = stdc_0_in_system_headers;
3021
3022     c_fix     = format;
3023     c_fix_arg = "%1 !defined(__STRICT_ANSI__)";
3024
3025     test_text = "#if !__STDC__ \n"
3026                 "#if __STDC__ == 0\n"
3027                 "#if __STDC__ != 1\n"
3028                 "#if __STDC__ - 0 == 0"
3029                "/* not std C */\nint foo;\n"
3030                "\n#end-end-end-end-if :-)";
3031 };
3032
3033 /*
3034  *  "__STDC__-0==0"
3035  *  is "!defined( __STRICT_ANSI__ )" on continued #if-s
3036  */
3037 fix = {
3038     hackname = strict_ansi_not_ctd;
3039     files    = math.h, limits.h, stdio.h, signal.h,
3040                stdlib.h, sys/signal.h, time.h;
3041     /*
3042      * Starting at the beginning of a line, skip white space and
3043      * a leading "(" or "&&" or "||".  One of those must be found.
3044      * Then, zero, one or more copies of a "defined(_FOO_BAR_) &&"
3045      * expression.  If these are nested, then they must accumulate
3046      * because we won't match any closing parentheses.  Finally,
3047      * after skipping over all that, we must then match our suspect
3048      * phrase:  "__STDC__-0==0" with or without white space.
3049      */
3050     select   = "^([ \t]*" '(\(|&&|\|\|)'
3051                "([ \t(]*!*[ \t]*defined\\([a-zA-Z_0-9]+\\)[ \t]*[|&][|&])*"
3052                "[ \t(]*)"
3053                "(__STDC__[ \t]*(|-[ \t]*0[ \t]*)==[ \t]*0)";
3054     c_test   = stdc_0_in_system_headers;
3055
3056     c_fix     = format;
3057     c_fix_arg = "%1 !defined(__STRICT_ANSI__)";
3058
3059     test_text = "#if 1 && \\\\\n"
3060                "&& defined(mumbling) |& (__STDC__ - 0 == 0) \\\\\n"
3061                "( __STDC__ == 0 && !defined(_XOPEN_SOURCE) \\\\\n"
3062                "|| __STDC__ - 0 == 0 ) /* not std C */\n"
3063                "int foo;\n#endif";
3064 };
3065
3066
3067 /*
3068  *  "__STDC__!=0" or "__STDC__==1" or "__STDC__-0==1"
3069  *  is "defined( __STRICT_ANSI__ )"
3070  */
3071 fix = {
3072     hackname = strict_ansi_only;
3073     select   = "^([ \t]*#[ \t]*if.*)"
3074                "(__STDC__[ \t]*!=[ \t]*0"
3075                "|__STDC__[ \t]*==[ \t]*1"
3076                "|__STDC__[ \t]*-[ \t]*0[ \t]*==[ \t]*1"
3077                "|__STDC__[ \t]*-[ \t]*0[ \t]*!=[ \t]*0)";
3078     c_test   = stdc_0_in_system_headers;
3079
3080     c_fix     = format;
3081     c_fix_arg = "%1 defined(__STRICT_ANSI__)";
3082
3083     test_text = "#if __STDC__ == 1 /* is std C\n */\nint foo;\n#endif";
3084 };
3085
3086
3087 /*
3088  *  IRIX 4.0.5 <rpc/xdr.h> uses struct __file_s
3089  *  in prototype without previous definition.
3090  */
3091 fix = {
3092     hackname  = struct_file;
3093     files     = rpc/xdr.h;
3094     select    = '^.*xdrstdio_create.*struct __file_s';
3095     c_fix     = format;
3096     c_fix_arg = "struct __file_s;\n%0";
3097     test_text = "extern void xdrstdio_create( struct __file_s* );";
3098 };
3099
3100
3101 /*
3102  *  IRIX 4.0.5 <rpc/auth.h> uses struct sockaddr
3103  *  in prototype without previous definition.
3104  *
3105  *  Don't fix OpenBSD, which uses struct sockaddr_in prototyping the same
3106  *  function, and does define it.
3107  */
3108 fix = {
3109     hackname  = struct_sockaddr;
3110     files     = rpc/auth.h;
3111     select    = "^.*authdes_create.*struct sockaddr[^_]";
3112     bypass    = "<sys/socket\.h>";
3113     bypass    = "struct sockaddr;\n";
3114     c_fix     = format;
3115     c_fix_arg = "struct sockaddr;\n%0";
3116     test_text = "extern AUTH* authdes_create( struct sockaddr* );";
3117 };
3118
3119
3120 /*
3121  *  Apply fix this to all OSs since this problem seems to effect
3122  *  more than just SunOS.
3123  */
3124 fix = {
3125     hackname = sun_auth_proto;
3126     files    = rpc/auth.h;
3127     files    = rpc/clnt.h;
3128     files    = rpc/svc.h;
3129     files    = rpc/xdr.h;
3130     bypass   = "__cplusplus";
3131     /*
3132      *  Select those files containing '(*name)()'.
3133      */
3134     select    = '\(\*[a-z][a-z_]*\)\(\)';
3135
3136     c_fix     = format;
3137     c_fix_arg = "#ifdef __cplusplus\n%1(...);%2\n"
3138                 "#else\n%1();%2\n#endif";
3139     c_fix_arg = '(.*\(\*[a-z][a-z_]*\))\(\);(.*)';
3140
3141     test_text =
3142     "struct auth_t {\n"
3143     "    int (*name)(); /* C++ bad */\n"
3144     "};";
3145 };
3146
3147
3148 /*
3149  *  Fix bogus #ifdef on SunOS 4.1.
3150  */
3151 fix = {
3152     hackname  = sun_bogus_ifdef;
3153     files     = "hsfs/hsfs_spec.h";
3154     files     = "hsfs/iso_spec.h";
3155     select    = '#ifdef(.*\|\|.*)';
3156     c_fix     = format;
3157     c_fix_arg = "#if%1";
3158
3159     test_text = "#ifdef  __i386__ || __vax__ || __sun4c__";
3160 };
3161
3162
3163 /*
3164  *  Fix the CAT macro in SunOS memvar.h.
3165  */
3166 fix = {
3167     hackname  = sun_catmacro;
3168     files     = pixrect/memvar.h;
3169     select    = "^#define[ \t]+CAT\\(a,b\\).*";
3170     c_fix     = format;
3171
3172     c_fix_arg =
3173     "#ifdef __STDC__\n"
3174     "#  define CAT(a,b) a##b\n"
3175     "#else\n%0\n#endif";
3176
3177     test_text =
3178     "#define CAT(a,b)\ta/**/b";
3179 };
3180
3181
3182 /*
3183  *  Fix return type of free and {c,m,re}alloc in <malloc.h> on SunOS 4.1.
3184  *  Also fix return type of {m,re}alloc in <malloc.h> on sysV68
3185  */
3186 fix = {
3187     hackname = sun_malloc;
3188     files    = malloc.h;
3189     bypass   = "_CLASSIC_ANSI_TYPES";
3190
3191     sed   = "s/typedef[ \t]char \\*\tmalloc_t/typedef void \\*\tmalloc_t/g";
3192     sed   = "s/int[ \t][ \t]*free/void\tfree/g";
3193     sed   = "s/char\\([ \t]*\\*[ \t]*malloc\\)/void\\1/g";
3194     sed   = "s/char\\([ \t]*\\*[ \t]*realloc\\)/void\\1/g";
3195     sed   = "s/char\\([ \t]*\\*[ \t]*calloc\\)/void\\1/g";
3196
3197     test_text =
3198     "typedef char *\tmalloc_t;\n"
3199     "int \tfree();\n"
3200     "char*\tmalloc();\n"
3201     "char*\tcalloc();\n"
3202     "char*\trealloc();";
3203 };
3204
3205
3206 /*
3207  *  Check for yet more missing ';' in struct (in SunOS 4.0.x)
3208  */
3209 fix = {
3210     hackname = sun_rusers_semi;
3211     files    = rpcsvc/rusers.h;
3212     select   = "_cnt$";
3213     sed      = "/^struct/,/^};/s/_cnt$/_cnt;/";
3214     test_text = "struct mumble\n  int _cnt\n};";
3215 };
3216
3217
3218 /*
3219  *  signal.h on SunOS defines signal using (),
3220  *  which causes trouble when compiling with g++ -pedantic.
3221  */
3222 fix = {
3223     hackname = sun_signal;
3224     files    = sys/signal.h;
3225     files    = signal.h;
3226     select   = "^void\t" '\(\*signal\(\)\)\(\);.*';
3227
3228     c_fix     = format;
3229     c_fix_arg =
3230           "#ifdef __cplusplus\n"
3231           "void\t(*signal(...))(...);\n"
3232           "#else\n%0\n#endif";
3233
3234     test_text = "void\t(*signal())();";
3235 };
3236
3237
3238 /*
3239  *  Correct the return type for strlen in strings.h in SunOS 4.
3240  */
3241 fix = {
3242     hackname = sunos_strlen;
3243     files    = strings.h;
3244     select   = "int[ \t]*strlen\\(\\);(.*)";
3245     c_fix     = format;
3246     c_fix_arg = "__SIZE_TYPE__ strlen();%1";
3247     test_text = " int\tstrlen(); /* string length */";
3248 };
3249
3250
3251 /*
3252  *  Disable apparent native compiler optimization cruft in SVR4.2 <string.h>
3253  *  that is visible to any ANSI compiler using this include.  Simply
3254  *  delete the lines that #define some string functions to internal forms.
3255  */
3256 fix = {
3257     hackname = svr4_disable_opt;
3258     files    = string.h;
3259     select   = '#define.*__std_hdr_';
3260     sed      = '/#define.*__std_hdr_/d';
3261     test_text = "#define strlen __std_hdr_strlen\n";
3262 };
3263
3264
3265 /*
3266  *  Conditionalize some of <sys/endian.h> on __GNUC__ and __GNUG__.
3267  *  On some systems (UnixWare 2, UnixWare 7), the file is byteorder.h
3268  *  but we still "hijack" it and redirect it to the GNU byteorder.h..
3269  */
3270 #ifdef SVR5
3271 fix = {
3272     hackname = svr4_endian;
3273     files    = sys/endian.h;
3274 #ifdef LATER
3275     /*
3276      * since we emit our own sys/byteorder.h,
3277      * this fix can never be applied to that file.
3278      */
3279     files    = sys/byteorder.h;
3280 #endif
3281     bypass   = '__GNUC__';
3282
3283     sed      = "/#\tifdef\t__STDC__/i\\\n"
3284                "#   if !defined (__GNUC__) && !defined (__GNUG__)\n";
3285
3286     sed      = "/#\t\tinclude\t<sys\\/byteorder.h>/s/\t\t/   /";
3287
3288     sed      = "/#   include\t<sys\\/byteorder.h>/i\\\n"
3289                "#   endif /* !defined (__GNUC__) && !defined (__GNUG__) */\n";
3290 };
3291 #endif /* SVR5 */
3292
3293
3294 /*
3295  *  Remove useless extern keyword from struct forward declarations
3296  *  in <sys/stream.h> and <sys/strsubr.h>
3297  */
3298 #ifdef SVR4
3299 fix = {
3300     hackname = svr4_extern_struct;
3301     files    = sys/stream.h;
3302     files    = sys/strsubr.h;
3303     select   = 'extern struct [a-z_]*;';
3304     sed      = 's/extern struct \([a-z][a-z_]*\)/struct \1/';
3305 };
3306 #endif
3307
3308 /*
3309  *  Fix declarations of `ftw' and `nftw' in <ftw.h>.  On some/most SVR4
3310  *  systems the file <ftw.h> contains extern declarations of these
3311  *  functions followed by explicitly `static' definitions of these
3312  *  functions... and that's not allowed according to ANSI C.  (Note
3313  *  however that on Solaris, this header file glitch has been pre-fixed by
3314  *  Sun.  In the Solaris version of <ftw.h> there are no static
3315  *  definitions of any function so we don't need to do any of this stuff
3316  *  when on Solaris.
3317  */
3318 #ifdef SVR4
3319 #ifndef SOLARIS
3320 fix = {
3321     hackname = svr4_ftw;
3322     files    = ftw.h;
3323     select   = '^extern int ftw\(const';
3324
3325     sed = '/^extern int ftw(const/i' "\\\n"
3326             "#if !defined(_STYPES)\\\n"
3327             "static\\\n"
3328             "#else\\\n"
3329             "extern\\\n"
3330             "#endif";
3331     sed = 's/extern \(int ftw(const.*\)$/\1/';
3332     sed = "/^extern int nftw/i\\\n"
3333             "#if defined(_STYPES)\\\n"
3334             "static\\\n"
3335             "#else\\\n"
3336             "extern\\\n"
3337             "#endif";
3338     sed = 's/extern \(int nftw.*\)$/\1/';
3339     sed = "/^extern int ftw(),/c\\\n"
3340             "#if !defined(_STYPES)\\\n"
3341             "static\\\n"
3342             "#else\\\n"
3343             "extern\\\n"
3344             "#endif\\\n"
3345             "  int ftw();\\\n"
3346             "#if defined(_STYPES)\\\n"
3347             "static\\\n"
3348             "#else\\\n"
3349             "extern\\\n"
3350             "#endif\\\n"
3351             "  int nftw();";
3352 };
3353 #endif
3354 #endif
3355
3356
3357 /*
3358  *   Fix broken decl of getcwd present on some svr4 systems.
3359  */
3360 fix = {
3361     hackname = svr4_getcwd;
3362     files    = stdlib.h;
3363     files    = unistd.h;
3364     files    = prototypes.h;
3365     select   = 'getcwd\(char \*, int\)';
3366
3367     c_fix     = format;
3368     c_fix_arg = "getcwd(char *, size_t)";
3369
3370     test_text = "extern char* getcwd(char *, int);";
3371 };
3372
3373
3374 /*
3375  *  Wrap some files on System V r4 and DYNIX/ptx systems with
3376  *  #ifdef _KERNEL, presumably to prevent kernel headers from
3377  *  leaking into userspace.  This may not be necessary at all,
3378  *  but it was in the old scripts, so it seems safest to keep it for now.
3379  */
3380 fix = {
3381     /* Can't name this with _kernel, or the test case will hit the bypass! */
3382     hackname = svr4_krnl;
3383     /* Since I'm rather unsure about the validity of this, limit it
3384      * to the specific systems it was operating on before.  It should
3385      * also be bypassed for i?86-*-sysv4.3uw2, by that rule, but I didn't
3386      * see an easy way to do that.  Hopefully it will be harmless
3387      * in any case. -- Nathanael */
3388     mach     = '*-*-sysv4*';
3389     mach     = 'i?86-sequent-ptx*';
3390     files    = fs/rfs/rf_cache.h;
3391     files    = sys/erec.h;
3392     files    = sys/err.h;
3393     files    = sys/char.h;
3394     files    = sys/getpages.h;
3395     files    = sys/map.h;
3396     files    = sys/cmn_err.h;
3397     files    = sys/kdebugger.h;
3398
3399     /* This bypass will match _KERNEL, __KERNEL, __KERNEL__, etc.
3400      * It will also match SVR4_KERNEL_CHECK, which means that the
3401      * testsuite case will always be bypassed.  Which is fine with me. */
3402     bypass   = '_KERNEL';
3403
3404     c_fix     = wrap;
3405     c_fix_arg = "#ifdef _KERNEL\n";
3406     c_fix_arg = "#endif /* _KERNEL */\n";
3407
3408     /* There's no reasonable test for this given that we don't know exactly
3409      * what problem inspired it in the first place. */
3410     test_text = "";
3411 };
3412
3413
3414 /*
3415  *  Delete any #defines of `__i386' which may be present in <ieeefp.h>.  They
3416  *  tend to conflict with the compiler's own definition of this symbol.  (We
3417  *  will use the compiler's definition.)
3418  *  Likewise __sparc, for Solaris, and __i860, and a few others
3419  *  (guessing it is necessary for all of them).
3420  */
3421 #ifdef SVR4
3422 fix = {
3423     hackname = svr4_mach_defines;
3424     files    = ieeefp.h;
3425     select   = "#define[ \t]*__(i386|mips|sparc|m88k|m68k)[ \t]";
3426     sed      = "/#define[ \t]*__\\(i386|mips|sparc|m88k|m68k\\)[ \t]/d";
3427 };
3428 #endif
3429
3430
3431 /*
3432  *  Fix declarations of `makedev', `major', and `minor' in <sys/mkdev.h>.
3433  *  They are declared as non-static then immediately redeclared as static.
3434  */
3435 #ifdef SVR5
3436 fix = {
3437     hackname = svr4_mkdev;
3438     files    = sys/mkdev.h;
3439     select   = '^static';
3440
3441     sed      = "/^dev_t makedev(/s/^/static /";
3442     sed      = "/^major_t major(/s/^/static /";
3443     sed      = "/^minor_t minor(/s/^/static /";
3444 };
3445 #endif /* SVR5 */
3446
3447
3448 /*
3449  *  Fix reference to NC_NPI_RAW in <sys/netcspace.h>.
3450  *  Also fix types of array initializers.
3451  */
3452 #ifdef SVR4
3453 fix = {
3454     hackname = svr4_netcspace;
3455     files    = sys/netcspace.h;
3456     select   = 'NC_NPI_RAW';
3457     sed      = 's/NC_NPI_RAW/NC_TPI_RAW/g';
3458     sed      = 's/NC_/(unsigned long) NC_/';
3459 };
3460 #endif
3461
3462 /*
3463  *  Fix reference to NMSZ in <sys/adv.h>.
3464  */
3465 #ifdef SVR4
3466 fix = {
3467     hackname = svr4_nmsz;
3468     files    = sys/adv.h;
3469     select   = '\[NMSZ\]';
3470     sed      = 's/\[NMSZ\]/\[RFS_NMSZ\]/g';
3471 };
3472 #endif
3473
3474
3475 /*
3476  * Some SVR4 systems supposedly use these non-ANSI preprocessor directives.
3477  */
3478 #ifdef SVR4
3479 fix = {
3480     hackname  = svr4_preproc_lint_on;
3481     select    = '#lint\(on\)';
3482     c_fix     = format;
3483     c_fix_arg = 'defined(lint)';
3484     test_text = "#if #lint(on)";
3485 };
3486 fix = {
3487     hackname  = svr4_preproc_lint_off;
3488     select    = '#lint\(off\)';
3489     c_fix     = format;
3490     c_fix_arg = '!defined(lint)';
3491     test_text = "#if #lint(off)";
3492 };
3493 fix = {
3494     hackname  = svr4_preproc_machine;
3495     select    = '#(machine|system|cpu)\(([^)]*)\)';
3496     c_fix     = format;
3497     c_fix_arg = 'defined(__%1__)';
3498     test_text = "#if #machine(i386) || #system(vax) || #cpu(sparc)";
3499 };
3500 #endif
3501
3502
3503 /*
3504  *   Fix broken decl of profil present on some svr4 systems.
3505  */
3506 fix = {
3507     hackname = svr4_profil;
3508     files    = stdlib.h;
3509     files    = unistd.h;
3510
3511     select    =
3512     'profil\(unsigned short \*, unsigned int, unsigned int, unsigned int\)';
3513     /* The fix is wrong on IRIX 5/6 and creates a conflict with another
3514        prototype in <sys/profil.h>.  */
3515     bypass    = 'Silicon Graphics';
3516     c_fix     = format;
3517     c_fix_arg = 'profil(unsigned short *, size_t, int, unsigned int)';
3518
3519     test_text =
3520     'profil(unsigned short *, unsigned int, unsigned int, unsigned int);';
3521 };
3522
3523
3524 /*
3525  *  Convert functions to prototype form, and fix arg names in <sys/stat.h>.
3526  */
3527 #ifdef SVR4
3528 fix = {
3529     hackname = svr4_proto_form;
3530     files    = sys/stat.h;
3531     select   = 'const extern';
3532
3533     sed      = "/^stat([ \t]*[^c]/ {\nN\nN\n"
3534                    "s/(.*)\\n/( /\n"
3535                    "s/;\\n/, /\n"
3536                    "s/;$/)/\n"  "}";
3537
3538     sed      = "/^lstat([ \t]*[^c]/ {\nN\nN\n"
3539                    "s/(.*)\\n/( /\n"
3540                    "s/;\\n/, /\n"
3541                    "s/;$/)/\n"  "}";
3542
3543     sed      = "/^fstat([ \t]*[^i]/ {\nN\nN\n"
3544                    "s/(.*)\\n/( /\n"
3545                    "s/;\\n/, /\n"
3546                    "s/;$/)/\n"  "}";
3547
3548     sed      = "/^mknod([ \t]*[^c]/{\nN\nN\nN\n"
3549                    "s/(.*)\\n/( /\n"
3550                    "s/;\\n/, /g\n"
3551                    "s/;$/)/\n"  "}";
3552
3553     sed      = "1,$s/\\([^A-Za-z]\\)path\\([^A-Za-z]\\)/\\1__path\\2/g";
3554     sed      = "1,$s/\\([^A-Za-z]\\)buf\\([^A-Za-z]\\)/\\1__buf\\2/g";
3555     sed      = "1,$s/\\([^A-Za-z]\\)fd\\([^A-Za-z]\\)/\\1__fd\\2/g";
3556     sed      = "1,$s/ret\\([^u]\\)/__ret\\1/g";
3557     sed      = "1,$s/\\([^_]\\)mode\\([^_]\\)/\\1__mode\\2/g";
3558     sed      = "1,$s/\\([^_r]\\)dev\\([^_]\\)/\\1__dev\\2/g";
3559 };
3560 #endif
3561
3562 /*
3563  *  Add a prototyped declaration of mmap to <sys/mman.h>.
3564  */
3565 #ifdef SVR4
3566 fix = {
3567     hackname = svr4_proto_mmap;
3568     files    = sys/mman.h;
3569     select   = '^extern caddr_t mmap();$';
3570     sed = '/^extern caddr_t mmap();$/c' "\\\n"
3571           "#ifdef __STDC__\\\n"
3572           "extern caddr_t mmap (caddr_t, size_t, int, int, int, off_t);\\\n"
3573           "#else /* !defined(__STDC__) */\\\n"
3574           "extern caddr_t mmap ();\\\n"
3575           "#endif /* !defined(__STDC__) */\\\n";
3576 };
3577 #endif
3578
3579 /*
3580  *  Add a #define of _SIGACTION_ into <sys/signal.h>.
3581  */
3582 #ifdef SVR4
3583 fix = {
3584     hackname = svr4_sigaction;
3585     files    = sys/signal.h;
3586     sed      = "/^struct sigaction {/i\\\n"
3587                "#define _SIGACTION_";
3588     sed      = 's/(void *(\*)())/(void (*)(int))/';
3589 };
3590 #endif
3591
3592
3593 /*
3594  * Correct types for signal handler constants like SIG_DFL; they might be
3595  * void (*) (), and should be void (*) (int).  C++ doesn't like the
3596  * old style.
3597  */
3598 fix = {
3599     hackname = svr4_sighandler_type;
3600     files = sys/signal.h;
3601     select = 'void *\(\*\)\(\)';
3602     c_fix = format;
3603     c_fix_arg = "void (*)(int)";
3604     test_text = "#define SIG_DFL (void(*)())0\n"
3605                 "#define SIG_IGN (void (*)())0\n";
3606 };
3607
3608 /*
3609  *  Put storage class at start of decl, to avoid warning.
3610  */
3611 #ifdef SVR4
3612 fix = {
3613     hackname = svr4_storage_class;
3614     files    = rpc/types.h;
3615     select   = 'const extern';
3616     sed      = 's/const extern/extern const/g';
3617 };
3618 #endif
3619
3620
3621 /*
3622  *  Some SysV r4 systems, including Sequent's DYNIX/ptx, use the local
3623  *  function 'getrnge' in <regexp.h> before they declare it.  For these
3624  *  systems add a 'static int' declaration of 'getrnge' into <regexp.h>
3625  *  early on.
3626  *
3627  *  'getrnge' traditionally manipulates a file-scope global called 'size',
3628  *  so put the declaration right after the declaration of 'size'.
3629  *
3630  *  Don't do this if there is already a `static void getrnge' declaration
3631  *  present, since this would cause a redeclaration error.  Solaris 2.x has
3632  *  such a declaration.
3633  */
3634 fix = {
3635     hackname  = svr4_undeclared_getrnge;
3636     files     = regexp.h;
3637     select    = "getrnge";
3638     bypass    = "static void getrnge";
3639     c_fix     = format;
3640     c_fix_arg = "%0\n"
3641                 "static int getrnge ();";
3642     c_fix_arg = "^static int[ \t]+size;";
3643     test_text = "static int size;\n"
3644                 "/* stuff which calls getrnge() */\n"
3645                 "static getrnge()\n"
3646                 "{}";
3647 };
3648
3649
3650 /*
3651  *  Like svr4_mach_defines, but with newfangled syntax.
3652  *  Source lines are of #define __i386 #machine(i386).   Delete them.
3653  */
3654 #ifdef SVR5
3655 fix = {
3656     hackname = svr5_mach_defines;
3657     files    = ieeefp.h;
3658     select   = "#define[ \t]*__i386.*\(i386\)";
3659     sed      = "/#define[ \t]*__i386.*/d";
3660 };
3661 #endif /*  SVR5 */
3662
3663
3664 /*
3665  *  Fix return value of mem{ccpy,chr,cpy,set} and str{len,spn,cspn}
3666  *  in string.h on sysV68
3667  *  Correct the return type for strlen in string.h on Lynx.
3668  *  Correct the argument type for ffs in string.h on Alpha OSF/1 V2.0.
3669  *  Add missing const for strdup on OSF/1 V3.0.
3670  *  On sysV88 layout is slightly different.
3671  */
3672 fix = {
3673     hackname = sysv68_string;
3674     files    = testing.h;
3675     files    = string.h;
3676     bypass   = "_CLASSIC_ANSI_TYPES";
3677
3678     sed = "s/extern[ \t]*int[ \t]*strlen();/extern unsigned int strlen();/";
3679     sed = "s/extern[ \t]*int[ \t]*ffs[ \t]*(long);/extern int ffs(int);/";
3680     sed = "s/strdup(char \\*s1);/strdup(const char *s1);/";
3681
3682     sed = "/^extern char$/N";
3683     sed = "s/^extern char\\(\\n\t\\*memccpy(),\\)$/extern void\\1/";
3684
3685     sed = "/^extern int$/N";
3686     sed = "s/^extern int\\(\\n\tstrlen(),\\)/extern size_t\\1/";
3687
3688     sed = "/^\tstrncmp(),$/N";
3689     sed = 's/^\(' "\t" 'strncmp()\),\n\(' "\t" 'strlen(),\)$/'
3690             '\1;' "\\\nextern unsigned int\\\n\\2/";
3691
3692     test_text =
3693     "extern int strlen();\n"
3694
3695     "extern int ffs(long);\n"
3696
3697     "extern char\n"
3698     "\t*memccpy(),\n"
3699     "\tmemcpy();\n"
3700
3701     "extern int\n"
3702     "\tstrcmp(),\n"
3703     "\tstrncmp(),\n"
3704     "\tstrlen(),\n"
3705     "\tstrspn();\n"
3706
3707     "extern int\n"
3708     "\tstrlen(), strspn();";
3709 };
3710
3711
3712 /*
3713  *  Fix return type of calloc, malloc, realloc, bsearch and exit
3714  */
3715 fix = {
3716     hackname = sysz_stdlib_for_sun;
3717     files    = stdlib.h;
3718     bypass   = "_CLASSIC_ANSI_TYPES";
3719
3720     select    = "char[ \t]*\\*[ \t]*(calloc|malloc|realloc|bsearch)[ \t]*\\(";
3721     c_fix     = format;
3722     c_fix_arg = "void *\t%1(";
3723
3724     test_text =
3725     "extern char*\tcalloc(size_t);\n"
3726     "extern char*\tmalloc(size_t);\n"
3727     "extern char*\trealloc(void*,size_t);\n"
3728     "extern char*\tbsearch(void*,size_t,size_t);\n";
3729 };
3730
3731
3732 /*
3733  * __thread is now a keyword.
3734  */
3735 fix = {
3736     hackname  = thread_keyword;
3737     files     = "pthread.h";
3738     files     = "bits/sigthread.h";
3739     select    = "([* ])__thread([,)])";
3740     c_fix     = format;
3741     c_fix_arg = "%1__thr%2";
3742
3743     test_text =
3744         "extern int pthread_create (pthread_t *__restrict __thread,\n"
3745         "extern int pthread_kill (pthread_t __thread, int __signo);\n"
3746         "extern int pthread_cancel (pthread_t __thread);";
3747 };
3748
3749 /*
3750  *  if the #if says _cplusplus, not the double underscore __cplusplus
3751  *  that it should be
3752  */
3753 fix = {
3754     hackname = tinfo_cplusplus;
3755     files    = tinfo.h;
3756     select   = "[ \t]_cplusplus";
3757
3758     c_fix     = format;
3759     c_fix_arg = " __cplusplus";
3760     test_text = "#ifdef _cplusplus\nint bogus;\n#endif";
3761 };
3762
3763
3764 /*
3765  *  function parameter to atexit is missing "void" on VAX Ultrix 4.3.
3766  */
3767 fix = {
3768     hackname = ultrix_atexit_param;
3769     files    = stdlib.h;
3770     select   = 'atexit\(.*\(\)';
3771
3772     c_fix     = format;
3773     c_fix_arg = "atexit( void (*__func)( void )";
3774
3775     test_text = "int atexit( void (*__func)() );\n";
3776 };
3777
3778
3779 /*
3780  *  parameter to atof not const on DECstation Ultrix V4.0 and NEWS-OS 4.2R.
3781  */
3782 fix = {
3783     hackname = ultrix_atof_param;
3784     files    = math.h;
3785     select   = "atof\\([ \t]*char";
3786
3787     c_fix     = format;
3788     c_fix_arg = "atof(const char";
3789
3790     test_text = "extern double atof( char *__nptr);\n";
3791 };
3792
3793
3794 /*
3795  *  parameters not const on DECstation Ultrix V4.0 and OSF/1.
3796  */
3797 fix = {
3798     hackname  = ultrix_const;
3799     files     = stdio.h;
3800     select    = 'perror\( char \*';
3801
3802     c_fix     = format;
3803     c_fix_arg = "%1 const %3 *__";
3804     c_fix_arg = "([ \t*](perror|fputs|fwrite|scanf|fscanf)\\(.*)"
3805                 "[ \t]+(char|void) \\*__";
3806
3807     test_text =
3808     "extern void perror( char *__s );\n"
3809     "extern int fputs( char *__s, FILE *);\n"
3810     "extern size_t fwrite( void *__ptr, size_t, size_t, FILE *);\n"
3811     "extern int fscanf( FILE *__stream, char *__format, ...);\n"
3812     "extern int scanf( char *__format, ...);\n";
3813 };
3814
3815
3816 /*
3817  *  parameters not const on DECstation Ultrix V4.0 and OSF/1.
3818  */
3819 fix = {
3820     hackname  = ultrix_const2;
3821     files     = stdio.h;
3822
3823     select    = '\*fopen\( char \*';
3824     c_fix     = format;
3825     c_fix_arg = "%1( const char *%3, const char *";
3826     c_fix_arg = "([ \t*](fopen|sscanf|popen|tempnam))\\("
3827                "[ \t]*char[ \t]*\\*([^,]*),"
3828                "[ \t]*char[ \t]*\\*[ \t]*";
3829
3830     test_text =
3831     "extern FILE *fopen( char *__filename, char *__type );\n"
3832     "extern int sscanf( char *__s, char *__format, ...);\n"
3833     "extern FILE *popen(char *, char *);\n"
3834     "extern char *tempnam(char*,char*);\n";
3835 };
3836
3837
3838 /*
3839  *  parameters not const on Ultrix V4.3.
3840  */
3841 fix = {
3842     hackname  = ultrix_const3;
3843     files     = stdio.h;
3844     select    = 'fdopen\( .*, char \*';
3845
3846     c_fix     = format;
3847     c_fix_arg = "%1 const %3 *__";
3848     c_fix_arg = "([ \t*](fdopen)\\(.*)"
3849                 "[ \t]+(char|void) \\*__";
3850
3851     test_text =
3852     "extern FILE *      fdopen( int __filedes, char *__type );\n";
3853 };
3854
3855
3856 /*
3857  * Ultrix V4.[35] puts the declaration of uname before the definition
3858  * of struct utsname, so the prototype (added by fixproto) causes havoc.
3859  */
3860 fix = {
3861     hackname = ultrix_fix_fixproto;
3862     files    = sys/utsname.h;
3863     select   = ULTRIX;
3864
3865     c_fix     = format;
3866     c_fix_arg = "struct utsname;\n%0";
3867     c_fix_arg = "^[ \t]*extern[ \t]*int[ \t]*uname\\(\\);";
3868
3869     test_text =
3870     "/* ULTRIX's uname */\nextern\tint\tuname();";
3871 };
3872
3873
3874 /*
3875  *  Check for bad #ifdef line (in Ultrix 4.1)
3876  */
3877 fix = {
3878     hackname = ultrix_ifdef;
3879     select   = "^#ifdef KERNEL[ \t]+&&";
3880     files    = sys/file.h;
3881
3882     c_fix     = format;
3883     c_fix_arg = "#if defined(KERNEL) &&";
3884
3885     test_text =
3886     "#ifdef KERNEL\t&& defined( mumbojumbo )\nint oops;\n#endif";
3887 };
3888
3889
3890 /*
3891  *  Add once-only latch to Ultrix V4.3 locale.h.
3892  */
3893 fix = {
3894     hackname = ultrix_locale;
3895     files  = locale.h;
3896     select = "@\\(#\\)locale\\.h.*6\\.1.*\\(ULTRIX\\)";
3897     c_fix  = wrap;
3898     test_text =
3899     "@(#)locale.h   6.1     (ULTRIX)\n";
3900 };
3901
3902
3903 /*
3904  * Strip "|| CC$gfloat" from Ultrix math headers.
3905  */
3906 fix = {
3907     hackname  = ultrix_math_ifdef;
3908     files     = sys/limits.h;
3909     files     = float.h;
3910     files     = math.h;
3911     select    = "^(#if.*)\\|\\|[ \t]+CC\\$[a-z]+";
3912     c_fix     = format;
3913     c_fix_arg = "%1";
3914
3915     test_text = '#if     defined(__GFLOAT) || CC\$gfloat';
3916 };
3917
3918
3919 /*
3920  *  Avoid nested comments on Ultrix 4.3.
3921  */
3922 fix = {
3923     hackname = ultrix_nested_ioctl;
3924     files    = sys/ioctl.h;
3925     select   = "^/\\* #define SIOCSCREEN";
3926     sed      = "/^\\/\\* #define SIOCSCREEN/s@/\\* screend@*//* screend@";
3927     test_text =
3928     "/* #define SIOCSCREENON _IOWR('i', 49, int)"
3929     "/* screend, net/gw_screen.h */\n";
3930 };
3931
3932
3933 fix = {
3934     hackname = ultrix_nested_svc;
3935     files    = rpc/svc.h;
3936     select   = "^ \\*[ \t]*int protocol;  */\\*";
3937     sed      = "s@^\\( \\*\tint protocol;  \\)/\\*@\\1*/ /*@";
3938     test_text =
3939     " *\tint protocol;  /* like TCP or UDP\n";
3940 };
3941
3942
3943 /*
3944  *  Add missing prototype for lstat and define for S_ISLNK
3945  *  in Ultrix V4.3 sys/stat.h.
3946  */
3947 fix = {
3948     hackname = ultrix_stat;
3949     files  = sys/stat.h;
3950     select = "@\\(#\\)stat\\.h.*6\\.1.*\\(ULTRIX\\)";
3951     sed    = "/^#define[ \t]S_IFPORT[ \t]*S_IFIFO$/a\\\n"
3952                 "\\\n"
3953                 "/* macro to test for symbolic link */\\\n"
3954                 "#define S_ISLNK(mode) (((mode) & S_IFMT) == S_IFLNK)\\\n"
3955                 "\n";
3956     sed    = "/^[ \t]*fstat(),$/a\\\n"
3957                 "\tlstat(),\n";
3958     test_text =
3959     "@(#)stat.h      6.1     (ULTRIX)\n"
3960     "#define S_IFPORT S_IFIFO\n"
3961     "\tfstat(),\n/* THE INSERTION LINE FAILS ON BSD SYSTEMS */";
3962 };
3963
3964
3965 /*
3966  *  Check for superfluous `static' (in Ultrix 4.2)
3967  *  On Ultrix 4.3, includes of other files (r3_cpu.h,r4_cpu.h) is broken.
3968  */
3969 fix = {
3970     hackname = ultrix_static;
3971     files  = machine/cpu.h;
3972     select = '#include "r[34]_cpu';
3973     sed    = "s/^static struct tlb_pid_state/struct tlb_pid_state/";
3974     sed    = 's/^#include "r3_cpu\.h"$/#include <machine\/r3_cpu\.h>/';
3975     sed    = 's/^#include "r4_cpu\.h"$/#include <machine\/r4_cpu\.h>/';
3976     test_text =
3977     "static struct tlb_pid_state {\n"
3978     "#include \"r3_cpu.h\"\n";
3979 };
3980
3981
3982 /*
3983  *  Add missing declarations to Ultrix V4.3 stdlib.h.
3984  */
3985 fix = {
3986     hackname = ultrix_stdlib;
3987     files  = stdlib.h;
3988     select = "@\\(#\\)stdlib\\.h.*6\\.1.*\\(ULTRIX\\)";
3989
3990     sed    = "/^char.*getenv( const char .* );.*$/a\\\n"
3991     "int\t\tsetenv( const char *__name, const char *__val, int __ovrwrt );\\\n"
3992     "void\t\tunsetenv( const char *__name );\\\n"
3993     "int\t\tputenv( char *__s );\n";
3994
3995     sed    = "/^char.*getenv();.*$/a\\\n"
3996     "int\tsetenv();\\\n"
3997     "void\tunsetenv();\\\n"
3998     "int\tputenv();\n";
3999
4000     test_text =
4001     "@(#)stdlib.h      6.1     (ULTRIX)\n"
4002     "char *             getenv( const char *__name );\n"
4003     "char       *getenv();\n";
4004 };
4005
4006
4007 /*
4008  *  Add once-only latch to Ultrix V4.3 strings.h.
4009  */
4010 fix = {
4011     hackname = ultrix_strings;
4012     files  = strings.h;
4013     select = "@\\(#\\)strings\\.h.*6\\.1.*\\(ULTRIX\\)";
4014     c_fix  = wrap;
4015     test_text =
4016     "@(#)strings.h   6.1     (ULTRIX)\n";
4017 };
4018
4019
4020 /*
4021  *  Add missing declarations to Ultrix V4.3 strings.h.
4022  */
4023 fix = {
4024     hackname = ultrix_strings2;
4025     files  = strings.h;
4026     select = "@\\(#\\)strings\\.h.*6\\.1.*\\(ULTRIX\\)";
4027
4028     sed    = "/^.*strncmp( const .* );.*/a\\\n"
4029     "\\\n"
4030     "extern int\\\n"
4031     "\tstrcasecmp( const char *__s1, const char *__s2),\\\n"
4032     "\tstrncasecmp( const char *__s1, const char *__s2, size_t __n );\n";
4033
4034     sed    = "/^.*strncmp();.*/a\\\n"
4035     "extern int\\\n"
4036     "\tstrcasecmp(),\\\n"
4037     "\tstrncasecmp();\n";
4038
4039     test_text =
4040     "@(#)strings.h      6.1     (ULTRIX)\n"
4041     "\tstrncmp( const char *__s1, const char *__s2, size_t __n );\n"
4042     "\tstrncmp();\n";
4043 };
4044
4045
4046 /*
4047  *  Add missing declarations to Ultrix V4.3 sys/time.h.
4048  */
4049 fix = {
4050     hackname = ultrix_sys_time;
4051     files  = sys/time.h;
4052     select = "@\\(#\\)time\\.h.*6\\.1.*\\(ULTRIX\\)";
4053
4054     sed    = "/^extern.*time_t.*time( time_t .* );.*$/a\\\n"
4055     "\\\n"
4056     "extern int adjtime(struct timeval *, struct timeval *);\\\n"
4057     "extern int getitimer(int, struct itimerval *);\\\n"
4058     "extern int setitimer(int, struct itimerval *, struct itimerval *);\\\n"
4059     "extern int gettimeofday(struct timeval *, struct timezone *);\\\n"
4060     "extern int settimeofday(struct timeval *, struct timezone *);\\\n"
4061     "extern void profil(const void *, size_t, size_t, unsigned int);\\\n"
4062     "extern int stime(const time_t *);\\\n"
4063     "extern int utimes(const char *, const struct timeval[2]);\\\n"
4064     "extern int select(int, fd_set *, fd_set *, fd_set *, struct timeval *);\n";
4065
4066     sed    = "/^extern.*double.*difftime();.*$/a\\\n"
4067     "extern\tint adjtime();\\\n"
4068     "extern\tint getitimer();\\\n"
4069     "extern\tint setitimer();\\\n"
4070     "extern\tint gettimeofday();\\\n"
4071     "extern\tint settimeofday();\\\n"
4072     "extern\tvoid profil();\\\n"
4073     "extern\tint stime();\\\n"
4074     "extern\tint u