cvs/src/modules.c

110 my_module (db, mname, m_type, msg, callback_proc, where, shorten,
114     char *mname;
158 		       + strlen (mname)
164 		 mname, msg, where ? where : "",
179     if (isabsolute (mname))
180 	error (1, 0, "Absolute module reference invalid: `%s'", mname);
185     if (pathname_levels (mname) > 0)
187                mname);
190     if (mname[0] == '!' && mname[1] != '\0')
192 	ign_dir_add (mname+1);
197     strip_trailing_slashes (mname);
201      *	1) look for mname as a module name
202      *	2) look for mname as a directory
203      *	3) look for mname as a file
204      *  4) take mname up to the first slash and look it up as a module name
209     key.dptr = mname;
232 	mwhere = xstrdup (mname);
242 	/* check to see if mname is a directory or file */
244 			+ strlen (mname) + sizeof(RCSEXT) + 2);
245 	(void) sprintf (file, "%s/%s", current_parsed_root->directory, mname);
247 			      + strlen (mname)
249 	if ((acp = strrchr (mname, '/')) != NULL)
253 			    mname, CVSATTIC, acp + 1, RCSEXT);
259 			    CVSATTIC, mname, RCSEXT);
264 	    modargv[0] = xstrdup (mname);
273 		/* if mname was a file, we have to split it into "dir file" */
274 		if ((cp = strrchr (mname, '/')) != NULL && cp != mname)
277 		    modargv[0] = xmalloc (strlen (mname) + 2);
278 		    strncpy (modargv[0], mname, cp - mname);
279 		    modargv[0][cp - mname] = '\0';
290 		    if (cp == mname)
295 			modargv[1] = xstrdup (mname + 1);
303 			modargv[1] = xstrdup (mname);
329 				  local_specified, mname, msg);
344     if (mname[0] != '/' && (cp = strchr (mname, '/')) != NULL)
348 	key.dptr = mname;
378 	    mwhere = xstrdup (mname);
382 	    /* put the / back in mname */
388 	/* put the / back in mname */
393     error (0, 0, "cannot find module `%s' - ignored", mname);
495 	error (0, 0, "modules file missing directory for module %s", mname);
531 	    if (stack && findnode (stack, mname))
534 		       mname);
538 		push_string (stack, mname);
554 	       mname);
563 			      local_specified, mname, msg);
576 	dir = where ? where : (mwhere ? mwhere : mname);
637 	change_to = where ? where : (mwhere ? mwhere : mname);
680 		   CVSMODULE_SPEC, mname);
784 do_module (db, mname, m_type, msg, callback_proc, where, shorten,
787     char *mname;
798     return my_module (db, mname, m_type, msg, callback_proc, where, shorten,