--- ray/src/util/rtcontrib.c	2005/06/09 18:33:06	1.16
+++ ray/src/util/rtcontrib.c	2005/06/10 20:44:00	1.19
@@ -1,5 +1,5 @@
 #ifndef lint
-static const char RCSid[] = "$Id: rtcontrib.c,v 1.16 2005/06/09 18:33:06 greg Exp $";
+static const char RCSid[] = "$Id: rtcontrib.c,v 1.19 2005/06/10 20:44:00 greg Exp $";
 #endif
 /*
  * Gather rtrace output to compute contributions from particular sources
@@ -16,7 +16,9 @@ static const char RCSid[] = "$Id: rtcontrib.c,v 1.16 2
 #include  "lookup.h"
 #include  "calcomp.h"
 
+#ifndef	MAXMODLIST
 #define	MAXMODLIST	1024		/* maximum modifiers we'll track */
+#endif
 
 int	treebufsiz = BUFSIZ;		/* current tree buffer size */
 
@@ -72,7 +74,8 @@ struct rtproc {
 };				/* rtrace process buffer */
 
 					/* rtrace command and defaults */
-char		*rtargv[256] = { "rtrace", "-dj", ".5", "-dr", "3",
+char		*rtargv[256+2*MAXMODLIST] = { "rtrace",
+				"-dj", ".5", "-dr", "3",
 				"-ab", "1", "-ad", "128", };
 int  rtargc = 9;
 					/* overriding rtrace options */
@@ -110,6 +113,7 @@ const char	*modname[MAXMODLIST];	/* ordered modifier n
 int		nmods = 0;		/* number of modifiers */
 
 MODCONT *addmodifier(char *modn, char *outf, char *binv);
+void addmodfile(char *fname, char *outf, char *binv);
 
 void init(int np);
 int done_rprocs(struct rtproc *rtp);
@@ -257,6 +261,12 @@ main(int argc, char *argv[])
 				rtargv[rtargc++] = argv[++i];
 				addmodifier(argv[i], curout, binval);
 				continue;
+			case 'M':		/* modifier file */
+				if (argv[i][2] || i >= argc-1) break;
+				rtargv[rtargc++] = "-tI";
+				rtargv[rtargc++] = argv[++i];
+				addmodfile(argv[i], curout, binval);
+				continue;
 			}
 		rtargv[rtargc++] = argv[i];	/* assume rtrace option */
 	}
@@ -450,6 +460,18 @@ addmodifier(char *modn, char *outf, char *binv)
 	mp->nbins = 1;
 	setcolor(mp->cbin[0], 0., 0., 0.);
 	return mp;
+}
+
+/* add modifiers from a file list */
+void
+addmodfile(char *fname, char *outf, char *binv)
+{
+	char	*mname[MAXMODLIST];
+	int	i;
+					/* load the file & store strings */
+	wordfile(mname, fname);
+	for (i = 0; mname[i]; i++)	/* add each one */
+		addmodifier(mname[i], outf, binv);
 }
 
 /* put string to stderr */