[cwscore-commit] CVS update: MODIFIED: test, globus-service-engine-start-stop-test.pl

Joe Bester commit at globus.org
Mon Oct 27 15:24:27 CDT 2008


, globus-xsd-deserialize-test.pl
, initialize-from-dom-test.pl
, initialize-to-dom-test.pl, xsd-builtins-test.pl, xsd-type-info-test.pl
 ...

  User: bester  
  Date: 08/10/27 15:24:27

  Modified:    c/message/test Tag: globus_4_2_branch
                        globus-service-engine-start-stop-test.pl
                        globus-xsd-deserialize-test.pl
                        initialize-from-dom-test.pl
                        initialize-to-dom-test.pl xsd-anyAttributes-test.pl
                        xsd-builtins-test.pl xsd-qname-hashtable-test.pl
                        xsd-type-info-test.pl
  Log:
  Instrument test scripts with valgrind hooks
  
  Revision  Changes    Path
  No                   revision
  
  http://viewcvs.globus.org/viewcvs.cgi/wsrf/c/message/test/Tag:
  No                   revision
  
  http://viewcvs.globus.org/viewcvs.cgi/wsrf/c/message/test/globus_4_2_branch
  1.2.18.1  +12 -1     wsrf/c/message/test/globus-service-engine-start-stop-test.pl
  
  http://viewcvs.globus.org/viewcvs.cgi/wsrf/c/message/test/globus-service-engine-start-stop-test.pl.diff?r1=1.2&r2=1.2.18.1
  
  (In the diff below, changes in quantity of whitespace are not shown.)
  
  Index: globus-service-engine-start-stop-test.pl
  ===================================================================
  RCS file: /home/globdev/CVS/globus-packages/wsrf/c/message/test/globus-service-engine-start-stop-test.pl,v
  retrieving revision 1.2
  retrieving revision 1.2.18.1
  diff -u -b -r1.2 -r1.2.18.1
  --- globus-service-engine-start-stop-test.pl	14 Mar 2006 22:37:46 -0000	1.2
  +++ globus-service-engine-start-stop-test.pl	27 Oct 2008 20:24:27 -0000	1.2.18.1
  @@ -2,4 +2,15 @@
   
   use strict;
   
  -print `./globus-service-engine-start-stop-test`;
  +my $valgrind = "";
  +
  +if (exists $ENV{VALGRIND})
  +{
  +    $valgrind = "valgrind --log-file=VALGRIND-start_stop_test.log";
  +    if (exists $ENV{VALGRIND_OPTIONS})
  +    {
  +        $valgrind .= ' ' . $ENV{VALGRIND_OPTIONS};
  +    }
  +}
  +
  +print `$valgrind ./globus-service-engine-start-stop-test`;
  
  
  
  1.3.6.1   +14 -1     wsrf/c/message/test/globus-xsd-deserialize-test.pl
  
  http://viewcvs.globus.org/viewcvs.cgi/wsrf/c/message/test/globus-xsd-deserialize-test.pl.diff?r1=1.3&r2=1.3.6.1
  
  (In the diff below, changes in quantity of whitespace are not shown.)
  
  Index: globus-xsd-deserialize-test.pl
  ===================================================================
  RCS file: /home/globdev/CVS/globus-packages/wsrf/c/message/test/globus-xsd-deserialize-test.pl,v
  retrieving revision 1.3
  retrieving revision 1.3.6.1
  diff -u -b -r1.3 -r1.3.6.1
  --- globus-xsd-deserialize-test.pl	1 Nov 2007 21:11:54 -0000	1.3
  +++ globus-xsd-deserialize-test.pl	27 Oct 2008 20:24:27 -0000	1.3.6.1
  @@ -11,8 +11,21 @@
   
   sub run_test {
       my $case = shift;
  +    my $valgrind = "";
  +    my $type = $case;
  +    $type =~ s/\.xml//;
   
  -    system("./globus-xsd-deserialize-test $case");
  +    if (exists $ENV{VALGRIND})
  +    {
  +        $valgrind = "valgrind --log-file=VALGRIND-xsd_deserialize_${type}_test.log";
  +        if (exists $ENV{VALGRIND_OPTIONS})
  +        {
  +            $valgrind .= ' ' . $ENV{VALGRIND_OPTIONS};
  +        }
  +    }
  +
  +
  +    system("$valgrind ./globus-xsd-deserialize-test $case");
   }
   
   plan tests => scalar(@test_cases);
  
  
  
  1.1.52.1  +11 -1     wsrf/c/message/test/initialize-from-dom-test.pl
  
  http://viewcvs.globus.org/viewcvs.cgi/wsrf/c/message/test/initialize-from-dom-test.pl.diff?r1=1.1&r2=1.1.52.1
  
  (In the diff below, changes in quantity of whitespace are not shown.)
  
  Index: initialize-from-dom-test.pl
  ===================================================================
  RCS file: /home/globdev/CVS/globus-packages/wsrf/c/message/test/initialize-from-dom-test.pl,v
  retrieving revision 1.1
  retrieving revision 1.1.52.1
  diff -u -b -r1.1 -r1.1.52.1
  --- initialize-from-dom-test.pl	20 Jun 2005 20:58:04 -0000	1.1
  +++ initialize-from-dom-test.pl	27 Oct 2008 20:24:27 -0000	1.1.52.1
  @@ -2,4 +2,14 @@
   
   use strict;
   
  -print `./initialize-from-dom-test`;
  +my $valgrind = "";
  +if (exists $ENV{VALGRIND})
  +{
  +    $valgrind = "valgrind --log-file=VALGRIND-initialize_from_dom_test.log";
  +    if (exists $ENV{VALGRIND_OPTIONS})
  +    {
  +        $valgrind .= ' ' . $ENV{VALGRIND_OPTIONS};
  +    }
  +}
  +
  +print `$valgrind ./initialize-from-dom-test`;
  
  
  
  1.2.16.1  +11 -1     wsrf/c/message/test/initialize-to-dom-test.pl
  
  http://viewcvs.globus.org/viewcvs.cgi/wsrf/c/message/test/initialize-to-dom-test.pl.diff?r1=1.2&r2=1.2.16.1
  
  (In the diff below, changes in quantity of whitespace are not shown.)
  
  Index: initialize-to-dom-test.pl
  ===================================================================
  RCS file: /home/globdev/CVS/globus-packages/wsrf/c/message/test/initialize-to-dom-test.pl,v
  retrieving revision 1.2
  retrieving revision 1.2.16.1
  diff -u -b -r1.2 -r1.2.16.1
  --- initialize-to-dom-test.pl	18 May 2006 15:20:23 -0000	1.2
  +++ initialize-to-dom-test.pl	27 Oct 2008 20:24:27 -0000	1.2.16.1
  @@ -2,4 +2,14 @@
   
   use strict;
   
  -print `./initialize-to-dom-test`;
  +my $valgrind = "";
  +if (exists $ENV{VALGRIND})
  +{
  +    $valgrind = "valgrind --log-file=VALGRIND-initialize_to_dom_test.log";
  +    if (exists $ENV{VALGRIND_OPTIONS})
  +    {
  +        $valgrind .= ' ' . $ENV{VALGRIND_OPTIONS};
  +    }
  +}
  +
  +print `$valgrind ./initialize-to-dom-test`;
  
  
  
  1.1.2.1   +13 -1     wsrf/c/message/test/xsd-anyAttributes-test.pl
  
  http://viewcvs.globus.org/viewcvs.cgi/wsrf/c/message/test/xsd-anyAttributes-test.pl.diff?r1=1.1&r2=1.1.2.1
  
  (In the diff below, changes in quantity of whitespace are not shown.)
  
  Index: xsd-anyAttributes-test.pl
  ===================================================================
  RCS file: /home/globdev/CVS/globus-packages/wsrf/c/message/test/xsd-anyAttributes-test.pl,v
  retrieving revision 1.1
  retrieving revision 1.1.2.1
  diff -u -b -r1.1 -r1.1.2.1
  --- xsd-anyAttributes-test.pl	14 May 2008 19:12:05 -0000	1.1
  +++ xsd-anyAttributes-test.pl	27 Oct 2008 20:24:27 -0000	1.1.2.1
  @@ -1,3 +1,15 @@
   #! /usr/bin/env perl
   
  -print `./xsd-anyAttributes-test`;
  +use strict;
  +
  +my $valgrind = "";
  +if (exists $ENV{VALGRIND})
  +{
  +    $valgrind = "valgrind --log-file=VALGRIND-xsd_anyAttributes_test.log";
  +    if (exists $ENV{VALGRIND_OPTIONS})
  +    {
  +        $valgrind .= ' ' . $ENV{VALGRIND_OPTIONS};
  +    }
  +}
  +
  +print `$valgrind ./xsd-anyAttributes-test`;
  
  
  
  1.1.16.1  +13 -1     wsrf/c/message/test/xsd-builtins-test.pl
  
  http://viewcvs.globus.org/viewcvs.cgi/wsrf/c/message/test/xsd-builtins-test.pl.diff?r1=1.1&r2=1.1.16.1
  
  (In the diff below, changes in quantity of whitespace are not shown.)
  
  Index: xsd-builtins-test.pl
  ===================================================================
  RCS file: /home/globdev/CVS/globus-packages/wsrf/c/message/test/xsd-builtins-test.pl,v
  retrieving revision 1.1
  retrieving revision 1.1.16.1
  diff -u -b -r1.1 -r1.1.16.1
  --- xsd-builtins-test.pl	9 Jun 2006 20:21:10 -0000	1.1
  +++ xsd-builtins-test.pl	27 Oct 2008 20:24:27 -0000	1.1.16.1
  @@ -1,3 +1,15 @@
   #! /usr/bin/env perl
   
  -print `./xsd-builtins-test`;
  +use strict;
  +
  +my $valgrind = "";
  +if (exists $ENV{VALGRIND})
  +{
  +    $valgrind = "valgrind --log-file=VALGRIND-xsd_builtins_test.log";
  +    if (exists $ENV{VALGRIND_OPTIONS})
  +    {
  +        $valgrind .= ' ' . $ENV{VALGRIND_OPTIONS};
  +    }
  +}
  +
  +print `$valgrind ./xsd-builtins-test`;
  
  
  
  1.2.54.1  +11 -1     wsrf/c/message/test/xsd-qname-hashtable-test.pl
  
  http://viewcvs.globus.org/viewcvs.cgi/wsrf/c/message/test/xsd-qname-hashtable-test.pl.diff?r1=1.2&r2=1.2.54.1
  
  (In the diff below, changes in quantity of whitespace are not shown.)
  
  Index: xsd-qname-hashtable-test.pl
  ===================================================================
  RCS file: /home/globdev/CVS/globus-packages/wsrf/c/message/test/xsd-qname-hashtable-test.pl,v
  retrieving revision 1.2
  retrieving revision 1.2.54.1
  diff -u -b -r1.2 -r1.2.54.1
  --- xsd-qname-hashtable-test.pl	2 Jun 2005 20:04:16 -0000	1.2
  +++ xsd-qname-hashtable-test.pl	27 Oct 2008 20:24:27 -0000	1.2.54.1
  @@ -2,4 +2,14 @@
   
   use strict;
   
  -print `./xsd-qname-hashtable-test`;
  +my $valgrind = "";
  +if (exists $ENV{VALGRIND})
  +{
  +    $valgrind = "valgrind --log-file=VALGRIND-xsd_qname_hashtable_test.log";
  +    if (exists $ENV{VALGRIND_OPTIONS})
  +    {
  +        $valgrind .= ' ' . $ENV{VALGRIND_OPTIONS};
  +    }
  +}
  +
  +print `$valgrind ./xsd-qname-hashtable-test`;
  
  
  
  1.2.54.1  +11 -1     wsrf/c/message/test/xsd-type-info-test.pl
  
  http://viewcvs.globus.org/viewcvs.cgi/wsrf/c/message/test/xsd-type-info-test.pl.diff?r1=1.2&r2=1.2.54.1
  
  (In the diff below, changes in quantity of whitespace are not shown.)
  
  Index: xsd-type-info-test.pl
  ===================================================================
  RCS file: /home/globdev/CVS/globus-packages/wsrf/c/message/test/xsd-type-info-test.pl,v
  retrieving revision 1.2
  retrieving revision 1.2.54.1
  diff -u -b -r1.2 -r1.2.54.1
  --- xsd-type-info-test.pl	2 Jun 2005 20:04:16 -0000	1.2
  +++ xsd-type-info-test.pl	27 Oct 2008 20:24:27 -0000	1.2.54.1
  @@ -2,4 +2,14 @@
   
   use strict;
   
  -print `./xsd-type-info-test`;
  +my $valgrind = "";
  +if (exists $ENV{VALGRIND})
  +{
  +    $valgrind = "valgrind --log-file=VALGRIND-xsd_type_info_test.log";
  +    if (exists $ENV{VALGRIND_OPTIONS})
  +    {
  +        $valgrind .= ' ' . $ENV{VALGRIND_OPTIONS};
  +    }
  +}
  +
  +print `$valgrind ./xsd-type-info-test`;
  
  
  




More information about the cwscore-commit mailing list