[svn-upgrade] Integrating new upstream version, shadow (4.0.18)
This commit is contained in:
nekral-guest
309
src/groupmems.c
Normal file
309
src/groupmems.c
Normal file
@@ -0,0 +1,309 @@
|
||||
/*
|
||||
* Copyright 2000, International Business Machines
|
||||
* George Kraft IV, gk4@us.ibm.com, 03/23/2000
|
||||
* All rights reserved.
|
||||
*
|
||||
* Redistribution and use in source and binary forms, with or without
|
||||
* modification, are permitted provided that the following conditions
|
||||
* are met:
|
||||
* 1. Redistributions of source code must retain the above copyright
|
||||
* notice, this list of conditions and the following disclaimer.
|
||||
* 2. Redistributions in binary form must reproduce the above copyright
|
||||
* notice, this list of conditions and the following disclaimer in the
|
||||
* documentation and/or other materials provided with the distribution.
|
||||
* 3. Neither the name of Julianne F. Haugh nor the names of its contributors
|
||||
* may be used to endorse or promote products derived from this software
|
||||
* without specific prior written permission.
|
||||
*
|
||||
* THIS SOFTWARE IS PROVIDED BY JULIE HAUGH AND CONTRIBUTORS ``AS IS'' AND
|
||||
* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
|
||||
* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
|
||||
* ARE DISCLAIMED. IN NO EVENT SHALL JULIE HAUGH OR CONTRIBUTORS BE LIABLE
|
||||
* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
|
||||
* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
|
||||
* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
|
||||
* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
|
||||
* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
|
||||
* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
|
||||
* SUCH DAMAGE.
|
||||
*/
|
||||
|
||||
#include <config.h>
|
||||
|
||||
#include <fcntl.h>
|
||||
#include <getopt.h>
|
||||
#include <grp.h>
|
||||
#include <stdio.h>
|
||||
#include <sys/types.h>
|
||||
#ifdef USE_PAM
|
||||
#include "pam_defs.h"
|
||||
#include <pwd.h>
|
||||
#endif /* USE_PAM */
|
||||
#include "defines.h"
|
||||
#include "groupio.h"
|
||||
|
||||
/* Exit Status Values */
|
||||
|
||||
#define EXIT_SUCCESS 0 /* success */
|
||||
#define EXIT_USAGE 1 /* invalid command syntax */
|
||||
#define EXIT_GROUP_FILE 2 /* group file access problems */
|
||||
#define EXIT_NOT_ROOT 3 /* not super user */
|
||||
#define EXIT_NOT_EROOT 4 /* not effective super user */
|
||||
#define EXIT_NOT_PRIMARY 5 /* not primary owner of group */
|
||||
#define EXIT_NOT_MEMBER 6 /* member of group does not exist */
|
||||
#define EXIT_MEMBER_EXISTS 7 /* member of group already exists */
|
||||
|
||||
#define TRUE 1
|
||||
#define FALSE 0
|
||||
|
||||
/*
|
||||
* Global variables
|
||||
*/
|
||||
extern int optind;
|
||||
extern char *optarg;
|
||||
static char *adduser = NULL;
|
||||
static char *deluser = NULL;
|
||||
static char *thisgroup = NULL;
|
||||
static int purge = FALSE;
|
||||
static int list = FALSE;
|
||||
static int exclusive = 0;
|
||||
|
||||
static int isroot (void)
|
||||
{
|
||||
return getuid ()? FALSE : TRUE;
|
||||
}
|
||||
|
||||
static int isgroup (void)
|
||||
{
|
||||
gid_t g = getgid ();
|
||||
struct group *grp = getgrgid (g);
|
||||
|
||||
return TRUE;
|
||||
}
|
||||
|
||||
static char *whoami (void)
|
||||
{
|
||||
struct group *grp = getgrgid (getgid ());
|
||||
struct passwd *usr = getpwuid (getuid ());
|
||||
|
||||
if (0 == strcmp (usr->pw_name, grp->gr_name)) {
|
||||
return (char *) strdup (usr->pw_name);
|
||||
} else {
|
||||
return NULL;
|
||||
}
|
||||
}
|
||||
|
||||
static void addtogroup (char *user, char **members)
|
||||
{
|
||||
int i;
|
||||
|
||||
for (i = 0; NULL != members[i]; i++) {
|
||||
if (0 == strcmp (user, members[i])) {
|
||||
fprintf (stderr, _("Member already exists\n"));
|
||||
exit (EXIT_MEMBER_EXISTS);
|
||||
}
|
||||
}
|
||||
|
||||
members = (char **) realloc (members, sizeof (char *) * i);
|
||||
members[i] = user;
|
||||
members[i + 1] = NULL;
|
||||
}
|
||||
|
||||
static void rmfromgroup (char *user, char **members)
|
||||
{
|
||||
int i;
|
||||
int found = FALSE;
|
||||
|
||||
i = 0;
|
||||
while (!found && NULL != members[i]) {
|
||||
if (0 == strcmp (user, members[i])) {
|
||||
found = TRUE;
|
||||
} else {
|
||||
i++;
|
||||
}
|
||||
}
|
||||
|
||||
while (found && NULL != members[i]) {
|
||||
members[i] = members[++i];
|
||||
}
|
||||
|
||||
if (!found) {
|
||||
fprintf (stderr, _("Member to remove could not be found\n"));
|
||||
exit (EXIT_NOT_MEMBER);
|
||||
}
|
||||
}
|
||||
|
||||
static void nomembers (char **members)
|
||||
{
|
||||
int i;
|
||||
|
||||
for (i = 0; NULL != members[i]; i++) {
|
||||
members[i] = NULL;
|
||||
}
|
||||
}
|
||||
|
||||
static void members (char **members)
|
||||
{
|
||||
int i;
|
||||
|
||||
for (i = 0; NULL != members[i]; i++) {
|
||||
printf ("%s ", members[i]);
|
||||
|
||||
if (NULL == members[i + 1]) {
|
||||
printf ("\n");
|
||||
} else {
|
||||
printf (" ");
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
static void usage (void)
|
||||
{
|
||||
fprintf (stderr,
|
||||
_
|
||||
("Usage: groupmems -a username | -d username | -D | -l [-g groupname]\n"));
|
||||
exit (EXIT_USAGE);
|
||||
}
|
||||
|
||||
int main (int argc, char **argv)
|
||||
{
|
||||
int arg;
|
||||
char *name;
|
||||
struct group *grp;
|
||||
|
||||
#ifdef USE_PAM
|
||||
pam_handle_t *pamh = NULL;
|
||||
struct passwd *pampw;
|
||||
int retval;
|
||||
#endif
|
||||
|
||||
setlocale (LC_ALL, "");
|
||||
bindtextdomain (PACKAGE, LOCALEDIR);
|
||||
textdomain (PACKAGE);
|
||||
|
||||
int option_index = 0;
|
||||
static struct option long_options[] = {
|
||||
{"add", required_argument, NULL, 'a'},
|
||||
{"delete", required_argument, NULL, 'd'},
|
||||
{"group", required_argument, NULL, 'g'},
|
||||
{"list", no_argument, NULL, 'l'},
|
||||
{"purge", no_argument, NULL, 'p'},
|
||||
{NULL, 0, NULL, '\0'}
|
||||
};
|
||||
|
||||
while ((arg =
|
||||
getopt_long (argc, argv, "a:d:g:lp", long_options,
|
||||
&option_index)) != EOF) {
|
||||
switch (arg) {
|
||||
case 'a':
|
||||
adduser = strdup (optarg);
|
||||
++exclusive;
|
||||
break;
|
||||
case 'd':
|
||||
deluser = strdup (optarg);
|
||||
++exclusive;
|
||||
break;
|
||||
case 'p':
|
||||
purge = TRUE;
|
||||
++exclusive;
|
||||
break;
|
||||
case 'g':
|
||||
thisgroup = strdup (optarg);
|
||||
break;
|
||||
case 'l':
|
||||
list = TRUE;
|
||||
++exclusive;
|
||||
break;
|
||||
default:
|
||||
usage ();
|
||||
}
|
||||
}
|
||||
|
||||
if (exclusive > 1 || optind < argc) {
|
||||
usage ();
|
||||
}
|
||||
|
||||
if (!isroot () && NULL != thisgroup) {
|
||||
fprintf (stderr,
|
||||
_("Only root can add members to different groups\n"));
|
||||
exit (EXIT_NOT_ROOT);
|
||||
} else if (isroot () && NULL != thisgroup) {
|
||||
name = thisgroup;
|
||||
} else if (!isgroup ()) {
|
||||
fprintf (stderr, _("Group access is required\n"));
|
||||
exit (EXIT_NOT_EROOT);
|
||||
} else if (NULL == (name = whoami ())) {
|
||||
fprintf (stderr, _("Not primary owner of current group\n"));
|
||||
exit (EXIT_NOT_PRIMARY);
|
||||
}
|
||||
#ifdef USE_PAM
|
||||
retval = PAM_SUCCESS;
|
||||
|
||||
pampw = getpwuid (getuid ());
|
||||
if (pampw == NULL) {
|
||||
retval = PAM_USER_UNKNOWN;
|
||||
}
|
||||
|
||||
if (retval == PAM_SUCCESS) {
|
||||
retval = pam_start ("groupmod", pampw->pw_name, &conv, &pamh);
|
||||
}
|
||||
|
||||
if (retval == PAM_SUCCESS) {
|
||||
retval = pam_authenticate (pamh, 0);
|
||||
if (retval != PAM_SUCCESS) {
|
||||
pam_end (pamh, retval);
|
||||
}
|
||||
}
|
||||
|
||||
if (retval == PAM_SUCCESS) {
|
||||
retval = pam_acct_mgmt (pamh, 0);
|
||||
if (retval != PAM_SUCCESS) {
|
||||
pam_end (pamh, retval);
|
||||
}
|
||||
}
|
||||
|
||||
if (retval != PAM_SUCCESS) {
|
||||
fprintf (stderr, _("PAM authentication failed for\n"));
|
||||
exit (1);
|
||||
}
|
||||
#endif
|
||||
|
||||
if (!gr_lock ()) {
|
||||
fprintf (stderr, _("Unable to lock group file\n"));
|
||||
exit (EXIT_GROUP_FILE);
|
||||
}
|
||||
|
||||
if (!gr_open (O_RDWR)) {
|
||||
fprintf (stderr, _("Unable to open group file\n"));
|
||||
exit (EXIT_GROUP_FILE);
|
||||
}
|
||||
|
||||
grp = (struct group *) gr_locate (name);
|
||||
|
||||
if (NULL != adduser) {
|
||||
addtogroup (adduser, grp->gr_mem);
|
||||
gr_update (grp);
|
||||
} else if (NULL != deluser) {
|
||||
rmfromgroup (deluser, grp->gr_mem);
|
||||
gr_update (grp);
|
||||
} else if (purge) {
|
||||
nomembers (grp->gr_mem);
|
||||
gr_update (grp);
|
||||
} else if (list) {
|
||||
members (grp->gr_mem);
|
||||
}
|
||||
|
||||
if (!gr_close ()) {
|
||||
fprintf (stderr, _("Cannot close group file\n"));
|
||||
exit (EXIT_GROUP_FILE);
|
||||
}
|
||||
|
||||
gr_unlock ();
|
||||
|
||||
#ifdef USE_PAM
|
||||
if (retval == PAM_SUCCESS) {
|
||||
pam_end (pamh, PAM_SUCCESS);
|
||||
}
|
||||
#endif /* USE_PAM */
|
||||
exit (EXIT_SUCCESS);
|
||||
}
|
||||
Reference in New Issue
Block a user