1 files changed, 97 insertions, 0 deletions
diff --git a/tests/lookup_shadow.c b/tests/lookup_shadow.c
new file mode 100644
index 0000000..5c96108
--- /dev/null
+++ b/tests/lookup_shadow.c
@@ -0,0 +1,97 @@
+/*
+   lookup_shadow.c - simple lookup code for shadow entries
+
+   Copyright (C) 2013 Arthur de Jong
+
+   This library is free software; you can redistribute it and/or
+   modify it under the terms of the GNU Lesser General Public
+   License as published by the Free Software Foundation; either
+   version 2.1 of the License, or (at your option) any later version.
+
+   This 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
+   Lesser General Public License for more details.
+
+   You should have received a copy of the GNU Lesser General Public
+   License along with this library; if not, write to the Free Software
+   Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
+   02110-1301 USA
+*/
+
+#include "config.h"
+
+#include <string.h>
+#include <stdio.h>
+#include <errno.h>
+#include <stdlib.h>
+
+#ifndef HAVE_SHADOW_H
+/* dummy implementation that does nothing for FreeBSD */
+int main(int argc,char *argv[])
+{
+  fprintf(stderr, "%s: shadow lookups unsupported\n", argv[0]);
+  return 1;
+}
+#else /* HAVE_SHADOW_H */
+
+#include <shadow.h>
+
+static void print_shadow(struct spwd *result)
+{
+  printf("%s:%s:", result->sp_namp, result->sp_pwdp);
+  if (result->sp_lstchg >= 0)
+    printf("%d", result->sp_lstchg);
+  printf(":");
+  if (result->sp_min >= 0)
+    printf("%d", (int)result->sp_min);
+  printf(":");
+  if (result->sp_max >= 0)
+    printf("%d", (int)result->sp_max);
+  printf(":");
+  if (result->sp_warn >= 0)
+    printf("%d", (int)result->sp_warn);
+  printf(":");
+  if (result->sp_inact >= 0)
+    printf("%d", (int)result->sp_inact);
+  printf(":");
+  if (result->sp_expire >= 0)
+    printf("%d", (int)result->sp_expire);
+  printf(":");
+  if (result->sp_flag >= 0)
+    printf("%x", (int)result->sp_flag);
+  printf("\n");
+}
+
+/* the main program... */
+int main(int argc,char *argv[])
+{
+  struct spwd *result;
+  /* check arguments */
+  if ((argc != 1) && (argc != 2))
+  {
+    fprintf(stderr, "Usage: %s [USERNAME]\n", argv[0]);
+    exit(EXIT_FAILURE);
+  }
+  /* start lookup */
+  if (argc == 2)
+  {
+    /* get entry by name */
+    errno = 0;
+    result = getspnam(argv[1]);
+    if (result == NULL)
+      exit(EXIT_FAILURE);
+    print_shadow(result);
+  }
+  else /* argc == 1 */
+  {
+    /* get all entries */
+    setspent();
+    while ((result = getspent()) != NULL)
+      print_shadow(result);
+    endspent();
+  }
+  return 0;
+}
+
+#endif /* HAVE_SHADOW_H */