Initial revision

1 files changed, 271 insertions, 0 deletions

diff --git a/src/chown.c b/src/chown.c
new file mode 100644
index 000000000..2bc6987af
--- /dev/null
+++ b/src/chown.c
@@ -0,0 +1,271 @@
+/* chown -- change user and group ownership of files
+   Copyright (C) 1989, 1990, 1991 Free Software Foundation, Inc.
+
+   This program is free software; you can redistribute it and/or modify
+   it under the terms of the GNU General Public License as published by
+   the Free Software Foundation; either version 2, or (at your option)
+   any later version.
+
+   This program 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 General Public License for more details.
+
+   You should have received a copy of the GNU General Public License
+   along with this program; if not, write to the Free Software
+   Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.  */
+
+/* 
+              |     		      user
+              | unchanged                 explicit
+ -------------|-------------------------+-------------------------|
+ g unchanged  | ---                     | chown u 		  |
+ r            |-------------------------+-------------------------|
+ o explicit   | chgrp g or chown .g     | chown u.g		  |
+ u            |-------------------------+-------------------------|
+ p from passwd| ---      	        | chown u.       	  |
+              |-------------------------+-------------------------|
+
+   Written by David MacKenzie <djm@gnu.ai.mit.edu>. */
+
+#include <stdio.h>
+#include <ctype.h>
+#include <sys/types.h>
+#include <pwd.h>
+#include <grp.h>
+#include <getopt.h>
+#include "system.h"
+
+#ifndef _POSIX_VERSION
+struct passwd *getpwnam ();
+struct group *getgrnam ();
+struct group *getgrgid ();
+#endif
+
+#ifdef _POSIX_SOURCE
+#define endgrent()
+#define endpwent()
+#endif
+
+int lstat ();
+
+char *parse_user_spec ();
+char *savedir ();
+char *xmalloc ();
+char *xrealloc ();
+int change_file_owner ();
+int change_dir_owner ();
+int isnumber ();
+void describe_change ();
+void error ();
+void usage ();
+
+/* The name the program was run with. */
+char *program_name;
+
+/* If nonzero, change the ownership of directories recursively. */
+int recurse;
+
+/* If nonzero, force silence (no error messages). */
+int force_silent;
+
+/* If nonzero, describe the files we process. */
+int verbose;
+
+/* If nonzero, describe only owners or groups that change. */
+int changes_only;
+
+/* The name of the user to which ownership of the files is being given. */
+char *username;
+
+/* The name of the group to which ownership of the files is being given. */
+char *groupname;
+
+struct option long_options[] =
+{
+  {"recursive", 0, 0, 'R'},
+  {"changes", 0, 0, 'c'},
+  {"silent", 0, 0, 'f'},
+  {"quiet", 0, 0, 'f'},
+  {"verbose", 0, 0, 'v'},
+  {0, 0, 0, 0}
+};
+
+void
+main (argc, argv)
+     int argc;
+     char **argv;
+{
+  uid_t user = -1;		/* New uid; -1 if not to be changed. */
+  gid_t group = -1;		/* New gid; -1 if not to be changed. */
+  int errors = 0;
+  int optc;
+  char *e;
+
+  program_name = argv[0];
+  recurse = force_silent = verbose = changes_only = 0;
+
+  while ((optc = getopt_long (argc, argv, "Rcfv", long_options, (int *) 0))
+	 != EOF)
+    {
+      switch (optc)
+	{
+	case 'R':
+	  recurse = 1;
+	  break;
+	case 'c':
+	  verbose = 1;
+	  changes_only = 1;
+	  break;
+	case 'f':
+	  force_silent = 1;
+	  break;
+	case 'v':
+	  verbose = 1;
+	  break;
+	default:
+	  usage ();
+	}
+    }
+
+  if (optind >= argc - 1)
+    usage ();
+
+  e = parse_user_spec (argv[optind], &user, &group, &username, &groupname);
+  if (e)
+    error (1, 0, "%s: %s", argv[optind], e);
+  if (username == NULL)
+    username = "";
+
+  for (++optind; optind < argc; ++optind)
+    errors |= change_file_owner (argv[optind], user, group);
+
+  exit (errors);
+}
+
+/* Change the ownership of FILE to UID USER and GID GROUP.
+   If it is a directory and -R is given, recurse.
+   Return 0 if successful, 1 if errors occurred. */
+
+int
+change_file_owner (file, user, group)
+     char *file;
+     uid_t user;
+     gid_t group;
+{
+  struct stat file_stats;
+  uid_t newuser;
+  gid_t newgroup;
+  int errors = 0;
+
+  if (lstat (file, &file_stats))
+    {
+      if (force_silent == 0)
+	error (0, errno, "%s", file);
+      return 1;
+    }
+
+  newuser = user == (uid_t) -1 ? file_stats.st_uid : user;
+  newgroup = group == (gid_t) -1 ? file_stats.st_gid : group;
+  if (newuser != file_stats.st_uid || newgroup != file_stats.st_gid)
+    {
+      if (verbose)
+	describe_change (file, 1);
+      if (chown (file, newuser, newgroup))
+	{
+	  if (force_silent == 0)
+	    error (0, errno, "%s", file);
+	  errors = 1;
+	}
+    }
+  else if (verbose && changes_only == 0)
+    describe_change (file, 0);
+
+  if (recurse && S_ISDIR (file_stats.st_mode))
+    errors |= change_dir_owner (file, user, group, &file_stats);
+  return errors;
+}
+
+/* Recursively change the ownership of the files in directory DIR
+   to UID USER and GID GROUP.
+   STATP points to the results of lstat on DIR.
+   Return 0 if successful, 1 if errors occurred. */
+
+int
+change_dir_owner (dir, user, group, statp)
+     char *dir;
+     uid_t user;
+     gid_t group;
+     struct stat *statp;
+{
+  char *name_space, *namep;
+  char *path;			/* Full path of each entry to process. */
+  unsigned dirlength;		/* Length of `dir' and '\0'. */
+  unsigned filelength;		/* Length of each pathname to process. */
+  unsigned pathlength;		/* Bytes allocated for `path'. */
+  int errors = 0;
+
+  errno = 0;
+  name_space = savedir (dir, statp->st_size);
+  if (name_space == NULL)
+    {
+      if (errno)
+	{
+	  if (force_silent == 0)
+	    error (0, errno, "%s", dir);
+	  return 1;
+	}
+      else
+	error (1, 0, "virtual memory exhausted");
+    }
+
+  dirlength = strlen (dir) + 1;	/* + 1 is for the trailing '/'. */
+  pathlength = dirlength + 1;
+  /* Give `path' a dummy value; it will be reallocated before first use. */
+  path = xmalloc (pathlength);
+  strcpy (path, dir);
+  path[dirlength - 1] = '/';
+
+  for (namep = name_space; *namep; namep += filelength - dirlength)
+    {
+      filelength = dirlength + strlen (namep) + 1;
+      if (filelength > pathlength)
+	{
+	  pathlength = filelength * 2;
+	  path = xrealloc (path, pathlength);
+	}
+      strcpy (path + dirlength, namep);
+      errors |= change_file_owner (path, user, group);
+    }
+  free (path);
+  free (name_space);
+  return errors;
+}
+
+/* Tell the user the user and group names to which ownership of FILE
+   has been given; if CHANGED is zero, FILE had those owners already. */
+
+void
+describe_change (file, changed)
+     char *file;
+     int changed;
+{
+  if (changed)
+    printf ("owner of %s changed to ", file);
+  else
+    printf ("owner of %s retained as ", file);
+  if (groupname)
+    printf ("%s.%s\n", username, groupname);
+  else
+    printf ("%s\n", username);
+}
+
+void
+usage ()
+{
+  fprintf (stderr, "\
+Usage: %s [-Rcfv] [--recursive] [--changes] [--silent] [--quiet]\n\
+       [--verbose] [user][:.][group] file...\n",
+	   program_name);
+  exit (1);
+}