Implement mc_scan_plusargs.

libveriuser/Makefile.in

@@ -16,7 +16,7 @@
 #    59 Temple Place - Suite 330
 #    Boston, MA 02111-1307, USA
 #
-#ident "$Id: Makefile.in,v 1.3 2002/05/23 03:46:42 steve Exp $"
+#ident "$Id: Makefile.in,v 1.4 2002/05/24 20:29:07 steve Exp $"
 #
 #
 SHELL = /bin/sh
@@ -45,7 +45,7 @@ LDFLAGS = @LDFLAGS@
 STRIP = @STRIP@
 
 A = a_close.o a_initialize.o
-O = finish.o io_print.o $A
+O = finish.o io_print.o mc_scan_plusargs.o $A
 
 all: libveriuser.a
 
@@ -81,4 +81,4 @@ installdirs: mkinstalldirs
 uninstall::
 	rm -f $(libdir)/libveriuser.a
 
--include $(patsubst %.o, dep/%.d, $O $P)
+-include $(patsubst %.o, dep/%.d, $O)

libveriuser/mc_scan_plusargs.c

@@ -0,0 +1,74 @@
+/*
+ * Copyright (c) 2002 Michael Ruff (mruff at chiaro.com)
+ *
+ *    This source code is free software; you can redistribute it
+ *    and/or modify it in source code form under the terms of the GNU
+ *    General Public License as published by the Free Software
+ *    Foundation; either version 2 of the License, 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.
+ *
+ *    You should have received a copy of the GNU General Public License
+ *    along with this program; if not, write to the Free Software
+ *    Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA
+ */
+#if !defined(WINNT)
+#ident "$Id: mc_scan_plusargs.c,v 1.1 2002/05/24 20:29:07 steve Exp $"
+#endif
+
+# include  <string.h>
+# include  <vpi_user.h>
+# include  <veriuser.h>
+
+/*
+ * mc_scan_plusargs implemented using VPI interface
+ */
+char *mc_scan_plusargs(char *plusarg)
+{
+      int argc, diff;
+      char **argv, *a, *p;
+      s_vpi_vlog_info vpi_vlog_info;
+
+      /* get command line */
+      if (! vpi_get_vlog_info(&vpi_vlog_info))
+	    return (char *)0;
+
+      /* for each argument */
+      argv = vpi_vlog_info.argv;
+      for (argc = 0; argc < vpi_vlog_info.argc; argc++, argv++) {
+	    a = *argv;
+	    p = plusarg;
+
+	    /* skip plus */
+	    if (*a == '+') a++;
+
+	    /* impossible matches */
+	    if (strlen(a) < strlen(p)) continue;
+
+	    diff = 0;
+	    while (*p) {
+
+		if (*a != *p) {
+		    diff = 1;
+		    break;
+		}
+		a++; p++;
+	    }
+
+	    if (!diff) return a;
+      }
+
+      /* didn't find it yet */
+      return (char *)0;
+}
+
+/*
+ * $Log: mc_scan_plusargs.c,v $
+ * Revision 1.1  2002/05/24 20:29:07  steve
+ *  Implement mc_scan_plusargs.
+ *
+ */