/*

   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", (int)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 */