From 3950ffe2a485479f6561c27364d3d7df5a21d124 Mon Sep 17 00:00:00 2001 From: Igor Pashev Date: Sun, 24 Jun 2012 22:28:35 +0000 Subject: Imported Upstream version 93u+ --- src/lib/libast/features/botch.c | 72 +++++++++++++++++++++++++++++++++++++++++ 1 file changed, 72 insertions(+) create mode 100644 src/lib/libast/features/botch.c (limited to 'src/lib/libast/features/botch.c') diff --git a/src/lib/libast/features/botch.c b/src/lib/libast/features/botch.c new file mode 100644 index 0000000..d30547d --- /dev/null +++ b/src/lib/libast/features/botch.c @@ -0,0 +1,72 @@ +/*********************************************************************** +* * +* This software is part of the ast package * +* Copyright (c) 1985-2011 AT&T Intellectual Property * +* and is licensed under the * +* Eclipse Public License, Version 1.0 * +* by AT&T Intellectual Property * +* * +* A copy of the License is available at * +* http://www.eclipse.org/org/documents/epl-v10.html * +* (with md5 checksum b35adb5213ca9657e911e9befb180842) * +* * +* Information and Software Systems Research * +* AT&T Research * +* Florham Park NJ * +* * +* Glenn Fowler * +* David Korn * +* Phong Vo * +* * +***********************************************************************/ +#pragma prototyped +/* + * Glenn Fowler + * AT&T Bell Laboratories + * + * generate ast traps for botched standard prototypes + */ + +#include + +#include "FEATURE/lib" +#include "FEATURE/sys" + +#if _lib_getgroups +extern int getgroups(int, gid_t*); +#endif + +int +main() +{ +#if _lib_getgroups + if (sizeof(int) > sizeof(gid_t)) + { + int n; + int i; + int r; + gid_t groups[32 * sizeof(int) / sizeof(gid_t)]; + + r = sizeof(int) / sizeof(gid_t); + if ((n = getgroups((sizeof(groups) / sizeof(groups[0])) / r, groups)) > 0) + for (i = 1; i <= n; i++) + { + groups[i] = ((gid_t)0); + if (getgroups(i, groups) != i) + goto botched; + if (groups[i] != ((gid_t)0)) + goto botched; + groups[i] = ((gid_t)-1); + if (getgroups(i, groups) != i) + goto botched; + if (groups[i] != ((gid_t)-1)) + goto botched; + } + } + return 0; + botched: + printf("#undef getgroups\n"); + printf("#define getgroups _ast_getgroups /* implementation botches gid_t* arg */\n"); +#endif + return 0; +} -- cgit v1.2.3