Remove CVS from the base system.

Discussed with:	many
Reviewed by:	peter, zi
Approved by:	core

1 files changed, 0 insertions, 187 deletions

diff --git a/contrib/cvs/src/create_adm.c b/contrib/cvs/src/create_adm.c
deleted file mode 100644
index ccf744f..0000000
--- a/contrib/cvs/src/create_adm.c
+++ /dev/null
@@ -1,187 +0,0 @@
-/*
- * Copyright (C) 1986-2005 The Free Software Foundation, Inc.
- *
- * Portions Copyright (C) 1998-2005 Derek Price, Ximbiot <http://ximbiot.com>,
- *                                  and others.
- *
- * Portions Copyright (C) 1992, Brian Berliner and Jeff Polk
- * Portions Copyright (C) 1989-1992, Brian Berliner
- * 
- * You may distribute under the terms of the GNU General Public License as
- * specified in the README file that comes with the CVS source distribution.
- * 
- * Create Administration.
- * 
- * Creates a CVS administration directory based on the argument repository; the
- * "Entries" file is prefilled from the "initrecord" argument.
- */
-
-#include "cvs.h"
-
-/* update_dir includes dir as its last component.
-
-   Return value is 0 for success, or 1 if we printed a warning message.
-   Note that many errors are still fatal; particularly for unlikely errors
-   a fatal error is probably better than a warning which might be missed
-   or after which CVS might do something non-useful.  If WARN is zero, then
-   don't print warnings; all errors are fatal then.  */
-
-int
-Create_Admin (dir, update_dir, repository, tag, date, nonbranch, warn,
-	      dotemplate)
-    const char *dir;
-    const char *update_dir;
-    const char *repository;
-    const char *tag;
-    const char *date;
-    int nonbranch;
-    int warn;
-    int dotemplate;
-{
-    FILE *fout;
-    char *cp;
-    char *reposcopy;
-    char *tmp;
-
-    if (trace)
-    {
-	fprintf (stderr, "%s-> Create_Admin (%s, %s, %s, %s, %s, %d, %d, %d)\n",
-		 CLIENT_SERVER_STR,
-		 dir, update_dir, repository, tag ? tag : "",
-		 date ? date : "", nonbranch, warn, dotemplate);
-    }
-
-    if (noexec)
-	return 0;
-
-    tmp = xmalloc (strlen (dir) + 100);
-    (void) sprintf (tmp, "%s/%s", dir, CVSADM);
-    if (isfile (tmp))
-	error (1, 0, "there is a version in %s already", update_dir);
-
-    if (CVS_MKDIR (tmp, 0777) < 0)
-    {
-	/* We want to print out the entire update_dir, since a lot of
-	   our code calls this function with dir == "." or dir ==
-	   NULL.  I hope that gives enough information in cases like
-	   absolute pathnames; printing out xgetwd or something would
-	   be way too verbose in the common cases.  */
-
-	if (warn)
-	{
-	    /* The reason that this is a warning, rather than silently
-	       just skipping creating the directory, is that we don't want
-	       CVS's behavior to vary subtly based on factors (like directory
-	       permissions) which are not made clear to the user.  With
-	       the warning at least we let them know what is going on.  */
-	    error (0, errno, "warning: cannot make directory %s in %s",
-		   CVSADM, update_dir);
-	    free (tmp);
-	    return 1;
-	}
-	else
-	    error (1, errno, "cannot make directory %s in %s",
-		   CVSADM, update_dir);
-    }
-
-    /* record the current cvs root for later use */
-
-    Create_Root (dir, current_parsed_root->original);
-    if (dir != NULL)
-	(void) sprintf (tmp, "%s/%s", dir, CVSADM_REP);
-    else
-	(void) strcpy (tmp, CVSADM_REP);
-    fout = CVS_FOPEN (tmp, "w+");
-    if (fout == NULL)
-    {
-	if (update_dir[0] == '\0')
-	    error (1, errno, "cannot open %s", tmp);
-	else
-	    error (1, errno, "cannot open %s/%s", update_dir, CVSADM_REP);
-    }
-    reposcopy = xstrdup (repository);
-    Sanitize_Repository_Name (reposcopy);
-
-    /* The top level of the repository is a special case -- we need to
-       write it with an extra dot at the end.  This trailing `.' stuff
-       rubs me the wrong way -- on the other hand, I don't want to
-       spend the time making sure all of the code can handle it if we
-       don't do it. */
-
-    if (strcmp (reposcopy, current_parsed_root->directory) == 0)
-    {
-	reposcopy = xrealloc (reposcopy, strlen (reposcopy) + 3);
-	strcat (reposcopy, "/.");
-    }
-
-    cp = reposcopy;
-
-    /*
-     * If the Repository file is to hold a relative path, try to strip off
-     * the leading CVSroot argument.
-     */
-    {
-    char *path = xmalloc (strlen (current_parsed_root->directory) + 2);
-
-    (void) sprintf (path, "%s/", current_parsed_root->directory);
-    if (strncmp (cp, path, strlen (path)) == 0)
-	cp += strlen (path);
-    free (path);
-    }
-
-    if (fprintf (fout, "%s\n", cp) < 0)
-    {
-	if (update_dir[0] == '\0')
-	    error (1, errno, "write to %s failed", tmp);
-	else
-	    error (1, errno, "write to %s/%s failed", update_dir, CVSADM_REP);
-    }
-    if (fclose (fout) == EOF)
-    {
-	if (update_dir[0] == '\0')
-	    error (1, errno, "cannot close %s", tmp);
-	else
-	    error (1, errno, "cannot close %s/%s", update_dir, CVSADM_REP);
-    }
-
-    /* now, do the Entries file */
-    if (dir != NULL)
-	(void) sprintf (tmp, "%s/%s", dir, CVSADM_ENT);
-    else
-	(void) strcpy (tmp, CVSADM_ENT);
-    fout = CVS_FOPEN (tmp, "w+");
-    if (fout == NULL)
-    {
-	if (update_dir[0] == '\0')
-	    error (1, errno, "cannot open %s", tmp);
-	else
-	    error (1, errno, "cannot open %s/%s", update_dir, CVSADM_ENT);
-    }
-    if (fclose (fout) == EOF)
-    {
-	if (update_dir[0] == '\0')
-	    error (1, errno, "cannot close %s", tmp);
-	else
-	    error (1, errno, "cannot close %s/%s", update_dir, CVSADM_ENT);
-    }
-
-    /* Create a new CVS/Tag file */
-    WriteTag (dir, tag, date, nonbranch, update_dir, repository);
-
-#ifdef SERVER_SUPPORT
-    if (server_active && dotemplate)
-    {
-	server_template (update_dir, repository);
-    }
-
-    if (trace)
-    {
-	fprintf (stderr, "%c<- Create_Admin\n",
-		 (server_active) ? 'S' : ' ');
-    }
-#endif
-
-    free (reposcopy);
-    free (tmp);
-    return 0;
-}