Remove CVS from the base system.

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

1 files changed, 0 insertions, 503 deletions

diff --git a/contrib/cvs/src/ignore.c b/contrib/cvs/src/ignore.c
deleted file mode 100644
index 65b2260..0000000
--- a/contrib/cvs/src/ignore.c
+++ /dev/null
@@ -1,503 +0,0 @@
-/* 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.  */
-
-/*
- * .cvsignore file support contributed by David G. Grubbs <dgg@odi.com>
- */
-
-#include "cvs.h"
-#include "getline.h"
-
-/*
- * Ignore file section.
- * 
- *	"!" may be included any time to reset the list (i.e. ignore nothing);
- *	"*" may be specified to ignore everything.  It stays as the first
- *	    element forever, unless a "!" clears it out.
- */
-
-static char **ign_list;			/* List of files to ignore in update
-					 * and import */
-static char **s_ign_list = NULL;
-static int ign_count;			/* Number of active entries */
-static int s_ign_count = 0;
-static int ign_size;			/* This many slots available (plus
-					 * one for a NULL) */
-static int ign_hold = -1;		/* Index where first "temporary" item
-					 * is held */
-
-const char *ign_default = ". .. core RCSLOG tags TAGS RCS SCCS .make.state\
- .nse_depinfo #* .#* cvslog.* ,* CVS CVS.adm .del-* *.a *.olb *.o *.obj\
- *.so *.Z *~ *.old *.elc *.ln *.bak *.BAK *.orig *.rej *.exe _$* *$";
-
-#define IGN_GROW 16			/* grow the list by 16 elements at a
-					 * time */
-
-/* Nonzero if we have encountered an -I ! directive, which means one should
-   no longer ask the server about what is in CVSROOTADM_IGNORE.  */
-int ign_inhibit_server;
-
-
-
-/*
- * To the "ignore list", add the hard-coded default ignored wildcards above,
- * the wildcards found in $CVSROOT/CVSROOT/cvsignore, the wildcards found in
- * ~/.cvsignore and the wildcards found in the CVSIGNORE environment
- * variable.
- */
-void
-ign_setup ()
-{
-    char *home_dir;
-    char *tmp;
-
-    ign_inhibit_server = 0;
-
-    /* Start with default list and special case */
-    tmp = xstrdup (ign_default);
-    ign_add (tmp, 0);
-    free (tmp);
-
-    /* The client handles another way, by (after it does its own ignore file
-       processing, and only if !ign_inhibit_server), letting the server
-       know about the files and letting it decide whether to ignore
-       them based on CVSROOOTADM_IGNORE.  */
-    if (!current_parsed_root->isremote)
-    {
-	char *file = xmalloc (strlen (current_parsed_root->directory) + sizeof (CVSROOTADM)
-			      + sizeof (CVSROOTADM_IGNORE) + 10);
-	/* Then add entries found in repository, if it exists */
-	(void) sprintf (file, "%s/%s/%s", current_parsed_root->directory,
-			CVSROOTADM, CVSROOTADM_IGNORE);
-	ign_add_file (file, 0);
-	free (file);
-    }
-
-    /* Then add entries found in home dir, (if user has one) and file exists */
-    home_dir = get_homedir ();
-    /* If we can't find a home directory, ignore ~/.cvsignore.  This may
-       make tracking down problems a bit of a pain, but on the other
-       hand it might be obnoxious to complain when CVS will function
-       just fine without .cvsignore (and many users won't even know what
-       .cvsignore is).  */
-    if (home_dir)
-    {
-	char *file = strcat_filename_onto_homedir (home_dir, CVSDOTIGNORE);
-	ign_add_file (file, 0);
-	free (file);
-    }
-
-    /* Then add entries found in CVSIGNORE environment variable. */
-    ign_add (getenv (IGNORE_ENV), 0);
-
-    /* Later, add ignore entries found in -I arguments */
-}
-
-
-
-/*
- * Open a file and read lines, feeding each line to a line parser. Arrange
- * for keeping a temporary list of wildcards at the end, if the "hold"
- * argument is set.
- */
-void
-ign_add_file (file, hold)
-    char *file;
-    int hold;
-{
-    FILE *fp;
-    char *line = NULL;
-    size_t line_allocated = 0;
-
-    /* restore the saved list (if any) */
-    if (s_ign_list != NULL)
-    {
-	int i;
-
-	for (i = 0; i < s_ign_count; i++)
-	    ign_list[i] = s_ign_list[i];
-	ign_count = s_ign_count;
-	ign_list[ign_count] = NULL;
-
-	s_ign_count = 0;
-	free (s_ign_list);
-	s_ign_list = NULL;
-    }
-
-    /* is this a temporary ignore file? */
-    if (hold)
-    {
-	/* re-set if we had already done a temporary file */
-	if (ign_hold >= 0)
-	{
-	    int i;
-
-	    for (i = ign_hold; i < ign_count; i++)
-		free (ign_list[i]);
-	    ign_count = ign_hold;
-	    ign_list[ign_count] = NULL;
-	}
-	else
-	{
-	    ign_hold = ign_count;
-	}
-    }
-
-    /* load the file */
-    fp = CVS_FOPEN (file, "r");
-    if (fp == NULL)
-    {
-	if (! existence_error (errno))
-	    error (0, errno, "cannot open %s", file);
-	return;
-    }
-    while (getline (&line, &line_allocated, fp) >= 0)
-	ign_add (line, hold);
-    if (ferror (fp))
-	error (0, errno, "cannot read %s", file);
-    if (fclose (fp) < 0)
-	error (0, errno, "cannot close %s", file);
-    free (line);
-}
-
-
-
-/* Parse a line of space-separated wildcards and add them to the list. */
-void
-ign_add (ign, hold)
-    char *ign;
-    int hold;
-{
-    if (!ign || !*ign)
-	return;
-
-    for (; *ign; ign++)
-    {
-	char *mark;
-	char save;
-
-	/* ignore whitespace before the token */
-	if (isspace ((unsigned char) *ign))
-	    continue;
-
-	/* If we have used up all the space, add some more.  Do this before
-	   processing `!', since an "empty" list still contains the `CVS'
-	   entry.  */
-	if (ign_count >= ign_size)
-	{
-	    ign_size += IGN_GROW;
-	    ign_list = (char **) xrealloc ((char *) ign_list,
-					   (ign_size + 1) * sizeof (char *));
-	}
-
-	/*
-	 * if we find a single character !, we must re-set the ignore list
-	 * (saving it if necessary).  We also catch * as a special case in a
-	 * global ignore file as an optimization
-	 */
-	if ((!*(ign+1) || isspace ((unsigned char) *(ign+1)))
-	    && (*ign == '!' || *ign == '*'))
-	{
-	    if (!hold)
-	    {
-		/* permanently reset the ignore list */
-		int i;
-
-		for (i = 0; i < ign_count; i++)
-		    free (ign_list[i]);
-		ign_count = 1;
-		/* Always ignore the "CVS" directory.  */
-		ign_list[0] = xstrdup("CVS");
-		ign_list[1] = NULL;
-
-		/* if we are doing a '!', continue; otherwise add the '*' */
-		if (*ign == '!')
-		{
-		    ign_inhibit_server = 1;
-		    continue;
-		}
-	    }
-	    else if (*ign == '!')
-	    {
-		/* temporarily reset the ignore list */
-		int i;
-
-		if (ign_hold >= 0)
-		{
-		    for (i = ign_hold; i < ign_count; i++)
-			free (ign_list[i]);
-		    ign_hold = -1;
-		}
-		if (s_ign_list)
-		{
-		    /* Don't save the ignore list twice - if there are two
-		     * bangs in a local .cvsignore file then we don't want to
-		     * save the new list the first bang created.
-		     *
-		     * We still need to free the "new" ignore list.
-		     */
-		    for (i = 0; i < ign_count; i++)
-			free (ign_list[i]);
-		}
-		else
-		{
-		    /* Save the ignore list for later.  */
-		    s_ign_list = xmalloc (ign_count * sizeof (char *));
-		    for (i = 0; i < ign_count; i++)
-			s_ign_list[i] = ign_list[i];
-		    s_ign_count = ign_count;
-		}
-		ign_count = 1;
-		/* Always ignore the "CVS" directory.  */
-		ign_list[0] = xstrdup ("CVS");
-		ign_list[1] = NULL;
-		continue;
-	    }
-	}
-
-	/* find the end of this token */
-	for (mark = ign; *mark && !isspace ((unsigned char) *mark); mark++)
-	     /* do nothing */ ;
-
-	save = *mark;
-	*mark = '\0';
-
-	ign_list[ign_count++] = xstrdup (ign);
-	ign_list[ign_count] = NULL;
-
-	*mark = save;
-	if (save)
-	    ign = mark;
-	else
-	    ign = mark - 1;
-    }
-}
-
-
-
-/* Return true if the given filename should be ignored by update or import,
- * else return false.
- */
-int
-ign_name (name)
-    char *name;
-{
-    char **cpp = ign_list;
-
-    if (cpp == NULL)
-	return 0;
-
-    while (*cpp)
-	if (CVS_FNMATCH (*cpp++, name, 0) == 0)
-	    return 1;
-
-    return 0;
-}
-
-
-
-/* FIXME: This list of dirs to ignore stuff seems not to be used.
-   Really?  send_dirent_proc and update_dirent_proc both call
-   ignore_directory and do_module calls ign_dir_add.  No doubt could
-   use some documentation/testsuite work.  */
-
-static char **dir_ign_list = NULL;
-static int dir_ign_max = 0;
-static int dir_ign_current = 0;
-
-/* Add a directory to list of dirs to ignore.  */
-void
-ign_dir_add (name)
-    char *name;
-{
-    /* Make sure we've got the space for the entry.  */
-    if (dir_ign_current <= dir_ign_max)
-    {
-	dir_ign_max += IGN_GROW;
-	dir_ign_list =
-	    (char **) xrealloc (dir_ign_list,
-				(dir_ign_max + 1) * sizeof (char *));
-    }
-
-    dir_ign_list[dir_ign_current++] = xstrdup (name);
-}
-
-
-/* Return nonzero if NAME is part of the list of directories to ignore.  */
-
-int
-ignore_directory (name)
-    const char *name;
-{
-    int i;
-
-    if (!dir_ign_list)
-	return 0;
-
-    i = dir_ign_current;
-    while (i--)
-    {
-	if (strncmp (name, dir_ign_list[i], strlen (dir_ign_list[i])+1) == 0)
-	    return 1;
-    }
-
-    return 0;
-}
-
-
-
-/*
- * Process the current directory, looking for files not in ILIST and
- * not on the global ignore list for this directory.  If we find one,
- * call PROC passing it the name of the file and the update dir.
- * ENTRIES is the entries list, which is used to identify known
- * directories.  ENTRIES may be NULL, in which case we assume that any
- * directory with a CVS administration directory is known.
- */
-void
-ignore_files (ilist, entries, update_dir, proc)
-    List *ilist;
-    List *entries;
-    const char *update_dir;
-    Ignore_proc proc;
-{
-    int subdirs;
-    DIR *dirp;
-    struct dirent *dp;
-    struct stat sb;
-    char *file;
-    const char *xdir;
-    List *files;
-    Node *p;
-
-    /* Set SUBDIRS if we have subdirectory information in ENTRIES.  */
-    if (entries == NULL)
-	subdirs = 0;
-    else
-    {
-	struct stickydirtag *sdtp = entries->list->data;
-
-	subdirs = sdtp == NULL || sdtp->subdirs;
-    }
-
-    /* we get called with update_dir set to "." sometimes... strip it */
-    if (strcmp (update_dir, ".") == 0)
-	xdir = "";
-    else
-	xdir = update_dir;
-
-    dirp = CVS_OPENDIR (".");
-    if (dirp == NULL)
-    {
-	error (0, errno, "cannot open current directory");
-	return;
-    }
-
-    ign_add_file (CVSDOTIGNORE, 1);
-    wrap_add_file (CVSDOTWRAPPER, 1);
-
-    /* Make a list for the files.  */
-    files = getlist ();
-
-    while (errno = 0, (dp = CVS_READDIR (dirp)) != NULL)
-    {
-	file = dp->d_name;
-	if (strcmp (file, ".") == 0 || strcmp (file, "..") == 0)
-	    continue;
-	if (findnode_fn (ilist, file) != NULL)
-	    continue;
-	if (subdirs)
-	{
-	    Node *node;
-
-	    node = findnode_fn (entries, file);
-	    if (node != NULL
-		&& ((Entnode *) node->data)->type == ENT_SUBDIR)
-	    {
-		char *p;
-		int dir;
-
-		/* For consistency with past behaviour, we only ignore
-		   this directory if there is a CVS subdirectory.
-		   This will normally be the case, but the user may
-		   have messed up the working directory somehow.  */
-		p = xmalloc (strlen (file) + sizeof CVSADM + 10);
-		sprintf (p, "%s/%s", file, CVSADM);
-		dir = isdir (p);
-		free (p);
-		if (dir)
-		    continue;
-	    }
-	}
-
-	/* We could be ignoring FIFOs and other files which are neither
-	   regular files nor directories here.  */
-	if (ign_name (file))
-	    continue;
-
-	if (
-#ifdef DT_DIR
-		dp->d_type != DT_UNKNOWN ||
-#endif
-		CVS_LSTAT (file, &sb) != -1) 
-	{
-
-	    if (
-#ifdef DT_DIR
-		dp->d_type == DT_DIR
-		|| (dp->d_type == DT_UNKNOWN && S_ISDIR (sb.st_mode))
-#else
-		S_ISDIR (sb.st_mode)
-#endif
-		)
-	    {
-		if (! subdirs)
-		{
-		    char *temp;
-
-		    temp = xmalloc (strlen (file) + sizeof (CVSADM) + 10);
-		    (void) sprintf (temp, "%s/%s", file, CVSADM);
-		    if (isdir (temp))
-		    {
-			free (temp);
-			continue;
-		    }
-		    free (temp);
-		}
-	    }
-#ifdef S_ISLNK
-	    else if (
-#ifdef DT_DIR
-		     dp->d_type == DT_LNK
-		     || (dp->d_type == DT_UNKNOWN && S_ISLNK(sb.st_mode))
-#else
-		     S_ISLNK (sb.st_mode)
-#endif
-		     )
-	    {
-		continue;
-	    }
-#endif
-	}
-
-	p = getnode ();
-	p->type = FILES;
-	p->key = xstrdup (file);
-	(void) addnode (files, p);
-    }
-    if (errno != 0)
-	error (0, errno, "error reading current directory");
-    (void) CVS_CLOSEDIR (dirp);
-
-    sortlist (files, fsortcmp);
-    for (p = files->list->next; p != files->list; p = p->next)
-	(*proc) (p->key, xdir);
-    dellist (&files);
-}