/* * __getgrent.c - This file is part of the libc-8086/grp package for ELKS, * Copyright (C) 1995, 1996 Nat Friedman <ndf@linux.mit.edu>. * * This library is free software; you can redistribute it and/or * modify it under the terms of the GNU Library General Public * License as published by the Free Software Foundation; either * version 2 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 * Library General Public License for more details. * * You should have received a copy of the GNU Library General Public * License along with this library; if not, write to the Free * Software Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. * */ #include <features.h> #include <unistd.h> #include <stdlib.h> #include <string.h> #include "config.h" #ifdef __UCLIBC_HAS_THREADS__ #include <pthread.h> static pthread_mutex_t mylock = PTHREAD_MUTEX_INITIALIZER; # define LOCK pthread_mutex_lock(&mylock) # define UNLOCK pthread_mutex_unlock(&mylock); #else # define LOCK # define UNLOCK #endif /* * This is the core group-file read function. It behaves exactly like * getgrent() except that it is passed a file descriptor. getgrent() * is just a wrapper for this function. */ struct group *__getgrent(int grp_fd) { #ifdef GR_SCALE_DYNAMIC static char *line_buff = NULL; static char **members = NULL; short line_index; short buff_size; #else static char line_buff[GR_MAX_LINE_LEN]; static char *members[GR_MAX_MEMBERS]; #endif static struct group group; register char *ptr; char *field_begin; short member_num; char *endptr; int line_len; LOCK; /* We use the restart label to handle malformatted lines */ restart: #ifdef GR_SCALE_DYNAMIC line_index = 0; buff_size = 256; #endif #ifdef GR_SCALE_DYNAMIC line_buff = realloc(line_buff, buff_size); while (1) { if ((line_len = read(grp_fd, line_buff + line_index, buff_size - line_index)) <= 0) { UNLOCK; return NULL; } field_begin = strchr(line_buff, '\n'); if (field_begin != NULL) { lseek(grp_fd, (long) (1 + field_begin - (line_len + line_index + line_buff)), SEEK_CUR); *field_begin = '\0'; if (*line_buff == '#' || *line_buff == ' ' || *line_buff == '\n' || *line_buff == '\t') goto restart; break; } else { /* Allocate some more space */ line_index = buff_size; buff_size += 256; line_buff = realloc(line_buff, buff_size); } } #else /* Read the line into the static buffer */ if ((line_len = read(grp_fd, line_buff, GR_MAX_LINE_LEN)) <= 0) { UNLOCK; return NULL; } field_begin = strchr(line_buff, '\n'); if (field_begin != NULL) lseek(grp_fd, (long) (1 + field_begin - (line_buff + line_len)), SEEK_CUR); else { /* The line is too long - skip it :-\ */ do { if ((line_len = read(grp_fd, line_buff, GR_MAX_LINE_LEN)) <= 0) { UNLOCK; return NULL; } } while (!(field_begin = strchr(line_buff, '\n'))); lseek(grp_fd, (long) ((field_begin - line_buff) - line_len + 1), SEEK_CUR); goto restart; } if (*line_buff == '#' || *line_buff == ' ' || *line_buff == '\n' || *line_buff == '\t') goto restart; *field_begin = '\0'; #endif /* GR_SCALE_DYNAMIC */ /* Now parse the line */ group.gr_name = line_buff; ptr = strchr(line_buff, ':'); if (ptr == NULL) goto restart; *ptr++ = '\0'; group.gr_passwd = ptr; ptr = strchr(ptr, ':'); if (ptr == NULL) goto restart; *ptr++ = '\0'; field_begin = ptr; ptr = strchr(ptr, ':'); if (ptr == NULL) goto restart; *ptr++ = '\0'; group.gr_gid = (gid_t) strtoul(field_begin, &endptr, 10); if (*endptr != '\0') goto restart; member_num = 0; field_begin = ptr; #ifdef GR_SCALE_DYNAMIC if (members != NULL) free(members); members = (char **) malloc((member_num + 1) * sizeof(char *)); for ( ; field_begin && *field_begin != '\0'; field_begin = ptr) { if ((ptr = strchr(field_begin, ',')) != NULL) *ptr++ = '\0'; members[member_num++] = field_begin; members = (char **) realloc(members, (member_num + 1) * sizeof(char *)); } members[member_num] = NULL; #else while ((ptr = strchr(ptr, ',')) != NULL) { *ptr = '\0'; ptr++; members[member_num] = field_begin; field_begin = ptr; member_num++; } if (*field_begin == '\0') members[member_num] = NULL; else { members[member_num] = field_begin; members[member_num + 1] = NULL; } #endif group.gr_mem = members; UNLOCK; return &group; }