cvs/src/recurse.c

27 static void addfile PROTO((List **listp, char *dir, char *file));
225 	 * called with the list of sub-dirs of the current dir as args
297 	    char *dir;
303 	    dir = xstrdup (argv[i]);
305 	     * dir ourselves.
307 	    comp = (char *)last_component (dir);
308 	    if (comp == dir)
310 		/* no dir component.  What we have is an implied "./" */
311 		dir = xstrdup(".");
334 		addfile (&files_by_dir, dir, comp);
335 	    else if (isdir (dir))
346 					      + strlen (dir)
353 		    (void) strcat (tmp_update_dir, dir);
356 		    repos = Name_Repository (dir, tmp_update_dir);
366 			addfile (&files_by_dir, dir, comp);
372 		    addfile (&files_by_dir, dir, comp);
375 		error (1, 0, "no such directory `%s'", dir);
378 	    free (dir);
908     char *dir = p->key;
919     if (fncmp (dir, CVSADM) == 0)
943 		   dir);
946 		   CVSADM, dir);
954 			  + strlen (dir)
959     if (strcmp (dir, ".") != 0)
964 	    (void) strcat (update_dir, dir);
967 	    (void) strcpy (update_dir, dir);
980 	    newrepos = xmalloc (strlen (repository) + strlen (dir) + 5);
981 	    sprintf (newrepos, "%s/%s", repository, dir);
987 	    (void) strcpy (update_dir, dir);
1010 	cvsadmdir = xmalloc (strlen (dir)
1015 	strcpy (cvsadmdir, dir);
1020 	    strcpy (cvsadmdir, dir);
1036 		strcpy (cvsadmdir, dir);
1067 	cvsroot_t *this_root = Name_Root (dir, update_dir);
1094     /* call-back dir entry proc (if any) */
1104 	    dir_return = frame->direntproc (frame->callerdat, dir, newrepos,
1113 	if ((frame->which & W_LOCAL) && !isdir (dir))
1119     /* only process the dir if the return code was 0 */
1130 	if (CVS_CHDIR (dir) < 0)
1131 	    error (1, errno, "could not chdir to %s", dir);
1153 	    if (strcmp (dir, ".") == 0)
1158 					     + strlen (dir)
1160 		sprintf (xframe.repository, "%s/%s", repository, dir);
1176 	/* call-back dir leave proc (if any) */
1178 	    err = frame->dirleaveproc (frame->callerdat, dir, err, update_dir,
1215 addfile (listp, dir, file)
1217     char *dir;
1223     /* add this dir. */
1224     addlist (listp, dir);
1226     n = findnode (*listp, dir);
1229 	error (1, 0, "can't find recently added dir node `%s' in start_recursion.",
1230 	       dir);
1252     /* if this dir was also an explicitly named argument, then skip