From 8c042f99cc7465c86351d21331a129111b75345d Mon Sep 17 00:00:00 2001 From: "Arnold D. Robbins" Date: Fri, 16 Jul 2010 12:41:09 +0300 Subject: Move to gawk-3.0.0. --- awklib/eg/lib/grcat.c | 34 ++++++++++++++++++++++++++++++++++ 1 file changed, 34 insertions(+) create mode 100644 awklib/eg/lib/grcat.c (limited to 'awklib/eg/lib/grcat.c') diff --git a/awklib/eg/lib/grcat.c b/awklib/eg/lib/grcat.c new file mode 100644 index 00000000..9742c592 --- /dev/null +++ b/awklib/eg/lib/grcat.c @@ -0,0 +1,34 @@ +/* + * grcat.c + * + * Generate a printable version of the group database + * + * Arnold Robbins, arnold@gnu.ai.mit.edu + * May 1993 + * Public Domain + */ + +#include +#include + +int +main(argc, argv) +int argc; +char **argv; +{ + struct group *g; + int i; + + while ((g = getgrent()) != NULL) { + printf("%s:%s:%d:", g->gr_name, g->gr_passwd, + g->gr_gid); + for (i = 0; g->gr_mem[i] != NULL; i++) { + printf("%s", g->gr_mem[i]); + if (g->gr_mem[i+1] != NULL) + putchar(','); + } + putchar('\n'); + } + endgrent(); + exit(0); +} -- cgit v1.2.3