glibc/sysdeps/mach/hurd/errnos.awk
Roland McGrath 0923c7a543 Mon Feb 20 04:04:57 1995 Roland McGrath <roland@duality.gnu.ai.mit.edu>
* config.h.in [HAVE_ELF || HAVE_GNU_LD]: Define HAVE_WEAK_SYMBOLS.

	* stdlib/strtod.c (PASTE, PASTE1): New helper macros; use these in
 	access to float.h macros.

	* misc/efgcvt.c: New file.
	* misc/Makefile (routines): Add efgcvt.
1995-02-20 09:50:50 +00:00

159 lines
4.3 KiB
Awk

# Copyright (C) 1991, 1992, 1993, 1994, 1995 Free Software Foundation, Inc.
# This file is part of the GNU C Library.
# The GNU C Library is free software; you can redistribute it and/or
# modify it under the terms of the GNU Library General Public License
# as published by the Free Software Foundation; either version 2 of
# the License, or (at your option) any later version.
# The GNU C Library is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
# Library General Public License for more details.
# You should have received a copy of the GNU Library General Public
# License along with the GNU C Library; see the file COPYING.LIB. If
# not, write to the Free Software Foundation, Inc., 675 Mass Ave,
# Cambridge, MA 02139, USA.
# errno.texinfo contains lines like:
# @comment errno.h
# @comment POSIX.1: Function not implemented
# @deftypevr Macro int ENOSYS
# @comment errno 123
BEGIN {
printf "/* This file generated by";
for (i = 0; i < ARGC; ++i)
printf " %s", ARGV[i];
printf ". */\n";
print "";
print "/* The Hurd uses Mach error system 0x10, currently only subsystem 0. */";
print "#ifndef _HURD_ERRNO";
print "#define _HURD_ERRNO(n)\t((0x10 << 26) | ((n) & 0x3fff))";
print "#endif";
print "";
print "#ifdef _ERRNO_H\n";
print "enum __error_t_codes\n{";
errnoh = 0;
maxerrno = 0;
in_mach_errors = 0;
in_math = 0;
edom = erange = "";
print "#undef EDOM\n#undef ERANGE";
}
$1 == "@comment" && $2 == "errno.h" { errnoh=1; next }
$1 == "@comment" && errnoh == 1 \
{
++errnoh;
etext = "";
for (i = 3; i <= NF; ++i)
etext = etext " " $i;
next;
}
errnoh == 2 && $1 == "@deftypevr" && $2 == "Macro" && $3 == "int" \
{ ++errnoh; e = $4; next; }
errnoh == 3 && $1 == "@comment" && $2 == "errno" {
errno = $3 + 0;
if (errno > maxerrno) maxerrno = errno;
if (e == "EWOULDBLOCK")
{
print "#define EWOULDBLOCK EAGAIN /* Operation would block */";
next;
}
x = sprintf ("%-40s/*%s */", sprintf ("%-24s%s", "#define\t" e,
"_HURD_ERRNO (" errno ")"),
etext);
if (e == "EDOM")
edom = x;
else if (e == "ERANGE")
erange = x;
printf "\t%-16s= _HURD_ERRNO (%d),\n", e, errno;
print x;
next;
}
{ errnoh=0 }
NF == 3 && $1 == "#define" && $2 == "MACH_SEND_IN_PROGRESS" \
{
in_mach_errors = 1;
print "\n\t/* Errors from <mach/message.h>. */";
}
NF == 3 && $1 == "#define" && $2 == "KERN_SUCCESS" \
{
in_mach_errors = 1;
print "\n\t/* Errors from <mach/kern_return.h>. */";
next;
}
in_mach_errors && $2 == "MACH_IPC_COMPAT" \
{
in_mach_errors = 0;
}
in_mach_errors == 1 && NF == 3 && $1 == "#define" \
{
printf "\t%-32s= %s,\n", "E" $2, $3;
}
$1 == "#define" && $2 == "_MACH_MIG_ERRORS_H_" \
{
in_mig_errors = 1;
print "\n\t/* Errors from <mach/mig_errors.h>. */";
next;
}
in_mig_errors && $1 == "#endif" && $3 == "_MACH_MIG_ERRORS_H_" \
{
in_mig_errors = 0;
}
(in_mig_errors && $1 == "#define" && $3 <= -300) || \
(in_device_errors && $1 == "#define") \
{
printf "%-32s", sprintf ("\t%-24s= %s,", "E" $2, $3);
for (i = 4; i <= NF; ++i)
printf " %s", $i;
printf "\n";
}
$1 == "#define" && $2 == "D_SUCCESS" \
{
in_device_errors = 1;
print "\n\t/* Errors from <device/device_types.h>. */";
next;
}
in_device_errors && $1 == "#endif" \
{
in_device_errors = 0;
}
END \
{
print "";
print "};";
print "";
printf "#define\t_HURD_ERRNOS\t%d\n", maxerrno+1;
print "";
print "\
/* User-visible type of error codes. It is ok to use `int' or\n\
`kern_return_t' for these, but with `error_t' the debugger prints\n\
symbolic values. */";
print "#ifdef __USE_GNU";
print "typedef enum __error_t_codes error_t;"
print "#endif";
print "";
print "/* errno is a per-thread variable. */";
print "#include <hurd/threadvar.h>";
print "#define errno (*__hurd_errno_location ())";
print "";
print "#endif /* <errno.h> included. */";
print "";
print "#if !defined (_ERRNO_H) && defined (__need_Emath)";
print edom; print erange;
print "#endif /* <errno.h> not included and need math error codes. */";
}