Subversion Repositories or1k

/*
 *  POSIX 1003.1b - 9.2.1 - Group Database Access Routines
 *
 *  The license and distribution terms for this file may be
 *  found in the file LICENSE in this distribution or at
 *  http://www.OARcorp.com/rtems/license.html.
 *
 *  getgrent.c,v 1.6 2001/08/09 22:11:19 joel Exp
 */
 
#if HAVE_CONFIG_H
#include "config.h"
#endif
 
#include <stdio.h>
#include <sys/types.h>
#include <grp.h>
#include <errno.h>
#include <unistd.h>
#include <stdlib.h>
#include <string.h>
#include <limits.h>
 
#include <rtems/libio_.h>
 
 
static struct group gr_group;    /* password structure */
static FILE *group_fp;
 
/*
 *  The size of these buffers is arbitrary and there is no provision
 *  to protect any of them from overflowing.  The scanf patterns
 *  need to be changed to prevent overflowing.  In addition,
 *  the limits on these needs to be examined.
 */
 
static char groupname[8];
static char password[1024];
static char groups[1024];
static char *gr_mem[16] = { } ;
 
extern void init_etc_passwd_group(void);
 
int getgrnam_r(
  const char     *name,
  struct group   *grp,
  char           *buffer,
  size_t          bufsize,
  struct group  **result
)
{
  FILE *fp;
  rtems_user_env_t * aux=rtems_current_user_env; /* save */
 
  init_etc_passwd_group();
  rtems_current_user_env=&rtems_global_user_env; /* set root */
 
  if ((fp = fopen ("/etc/group", "r")) == NULL) {
    errno = EINVAL;
    rtems_current_user_env=aux; /* restore */
    return -1;
  }
 
  while (fgets (buffer, bufsize, fp)) {
    sscanf (buffer, "%[^:]:%[^:]:%d:%s\n",
      groupname, password, (int *) &grp->gr_gid,
      groups);
    grp->gr_name = groupname;
    grp->gr_passwd = password;
    grp->gr_mem = gr_mem ;
 
    if (!strcmp (groupname, name)) {
      fclose (fp);
      *result = grp;
      rtems_current_user_env=aux; /* restore */
      return 0;
    }
  }
  fclose (fp);
  errno = EINVAL;
  rtems_current_user_env=aux; /* restore */
  return -1;
}
 
struct group *getgrnam(
  const char *name
)
{
  char   buf[1024];
  struct group *g;
 
  if ( getgrnam_r( name, &gr_group, buf, 1024, &g ) )
    return NULL;
 
  return g;
}
 
int getgrgid_r(
  gid_t           gid,
  struct group   *grp,
  char           *buffer,
  size_t          bufsize,
  struct group  **result
)
{
  FILE *fp;
  rtems_user_env_t * aux=rtems_current_user_env; /* save */
 
 
  init_etc_passwd_group();
  rtems_current_user_env=&rtems_global_user_env; /* set root */
 
  if ((fp = fopen ("/etc/group", "r")) == NULL) {
    errno = EINVAL;
    rtems_current_user_env=aux; /* restore */
    return -1;
  }
 
  while (fgets (buffer, bufsize, fp)) {
    sscanf (buffer, "%[^:]:%[^:]:%d:%s\n",
      groupname, password, (int *) &gr_group.gr_gid,
      groups);
    gr_group.gr_name = groupname;
    gr_group.gr_passwd = password;
    gr_group.gr_mem = gr_mem ;
 
 
    if (gid == gr_group.gr_gid) {
      fclose (fp);
      *result = grp;
      rtems_current_user_env=aux; /* restore */
      return 0;
    }
  }
  fclose (fp);
  errno = EINVAL;
  rtems_current_user_env=aux; /* restore */
  return -1;
}
 
struct group *getgrgid (
  gid_t gid
)
{
  char   buf[1024];
  struct group *g;
 
  if ( getgrgid_r( gid, &gr_group, buf, 1024, &g ) )
    return NULL;
 
  return g;
}
 
struct group *getgrent( void )
{
  char buf[1024];
 
  if (group_fp == NULL)
    return NULL;
 
  if (fgets (buf, sizeof (buf), group_fp) == NULL)
    return NULL;
 
  sscanf (buf, "%[^:]:%[^:]:%d:%s\n",
    groupname, password, (int *) &gr_group.gr_gid,
    groups);
  gr_group.gr_name = groupname;
  gr_group.gr_passwd = password;
  gr_group.gr_mem = gr_mem ;
 
  return &gr_group;
}
 
void
setgrent ()
{
  rtems_user_env_t * aux=rtems_current_user_env; /* save */
  init_etc_passwd_group();
  rtems_current_user_env=&rtems_global_user_env; /* set root */
 
  if (group_fp != NULL)
    fclose (group_fp);
 
  group_fp = fopen ("/etc/group", "r");
  rtems_current_user_env=aux; /* restore */
}
 
void
endgrent ()
{
  if (group_fp != NULL)
    fclose (group_fp);
}