← Back to branch summary

~ubuntu-branches/ubuntu/vivid/mpich/vivid-proposed

« back to all changes in this revision

Viewing changes to maint/extracterrmsgs

  • Committer: Package Import Robot
  • Author(s): Anton Gladky
  • Date: 2014-04-01 20:24:20 UTC
  • mfrom: (5.2.4 sid)
  • Revision ID: package-import@ubuntu.com-20140401202420-t5ey1ia2klt5dkq3
Tags: 3.1-4
http://bugs.debian.org/743047
* [c3e3398] Disable test_primitives, which is unreliable on some platforms.
            (Closes: #743047)
* [265a699] Add minimal autotest.

Show diffs side-by-side

added added

removed removed

Lines of Context:
maint/extracterrmsgs
22
22
$showfiles = 0;
23
23
$quiet = 0;
24
24
$build_test_pgm = 1;
 
25
# FIXME: checkErrClass should be set to 1; currently set to zero
 
26
# to permit autogen.sh to complete
 
27
$checkErrClass = 1;
25
28
 
26
29
# Strict is used to control checking of error message strings.
27
30
$gStrict = 0;
629
632
        #  location of __LINE__ (-1 for none)
630
633
        #  specific msg arg required (0 for no, > 0 for yes)
631
634
        #  is the generic message an indirect from errnames.txt (1=yes 0=no)
632
 
        %KnownErrRoutines = ( 'MPIR_Err_create_code'      => '5:3:1:1', 
633
 
                              'MPIO_Err_create_code'      => '5:3:1:0', 
634
 
                              'MPIU_ERR_SET'              => '2:-1:0:1',
635
 
                              'MPIU_ERR_SETSIMPLE'        => '2:-1:0:1',
636
 
                              'MPIU_ERR_SET1'             => '2:-1:1:1',
637
 
                              'MPIU_ERR_SET2'             => '2:-1:2:1',
638
 
                              'MPIU_ERR_SETANDSTMT'       => '3:-1:0:1',
639
 
                              'MPIU_ERR_SETANDSTMT1'      => '3:-1:1:1', 
640
 
                              'MPIU_ERR_SETANDSTMT2'      => '3:-1:1:1', 
641
 
                              'MPIU_ERR_SETANDSTMT3'      => '3:-1:1:1', 
642
 
                              'MPIU_ERR_SETANDSTMT4'      => '3:-1:1:1', 
643
 
                              'MPIU_ERR_SETANDJUMP'       => '2:-1:0:1',
644
 
                              'MPIU_ERR_SETANDJUMP1'      => '2:-1:1:1', 
645
 
                              'MPIU_ERR_SETANDJUMP2'      => '2:-1:1:1', 
646
 
                              'MPIU_ERR_SETANDJUMP3'      => '2:-1:1:1', 
647
 
                              'MPIU_ERR_SETANDJUMP4'      => '2:-1:1:1', 
648
 
                              'MPIU_ERR_CHKANDSTMT'       => '4:-1:0:1', 
649
 
                              'MPIU_ERR_CHKANDSTMT1'      => '4:-1:1:1', 
650
 
                              'MPIU_ERR_CHKANDSTMT2'      => '4:-1:1:1', 
651
 
                              'MPIU_ERR_CHKANDSTMT3'      => '4:-1:1:1', 
652
 
                              'MPIU_ERR_CHKANDSTMT4'      => '4:-1:1:1', 
653
 
                              'MPIU_ERR_CHKANDJUMP'       => '3:-1:0:1',
654
 
                              'MPIU_ERR_CHKANDJUMP1'      => '3:-1:1:1',
655
 
                              'MPIU_ERR_CHKANDJUMP2'      => '3:-1:1:1',
656
 
                              'MPIU_ERR_CHKANDJUMP3'      => '3:-1:1:1',
657
 
                              'MPIU_ERR_CHKANDJUMP4'      => '3:-1:1:1',
658
 
                              'MPIU_ERR_SETFATAL'         => '2:-1:0:1',
659
 
                              'MPIU_ERR_SETFATALSIMPLE'   => '2:-1:0:1',
660
 
                              'MPIU_ERR_SETFATAL1'        => '2:-1:1:1',
661
 
                              'MPIU_ERR_SETFATAL2'        => '2:-1:2:1',
662
 
                              'MPIU_ERR_SETFATALANDSTMT'  => '3:-1:0:1',
663
 
                              'MPIU_ERR_SETFATALANDSTMT1' => '3:-1:1:1', 
664
 
                              'MPIU_ERR_SETFATALANDSTMT2' => '3:-1:1:1', 
665
 
                              'MPIU_ERR_SETFATALANDSTMT3' => '3:-1:1:1', 
666
 
                              'MPIU_ERR_SETFATALANDSTMT4' => '3:-1:1:1', 
667
 
                              'MPIU_ERR_SETFATALANDJUMP'  => '2:-1:0:1',
668
 
                              'MPIU_ERR_SETFATALANDJUMP1' => '2:-1:1:1', 
669
 
                              'MPIU_ERR_SETFATALANDJUMP2' => '2:-1:1:1', 
670
 
                              'MPIU_ERR_SETFATALANDJUMP3' => '2:-1:1:1', 
671
 
                              'MPIU_ERR_SETFATALANDJUMP4' => '2:-1:1:1', 
672
 
                              'MPIU_ERR_CHKFATALANDSTMT'  => '4:-1:0:1', 
673
 
                              'MPIU_ERR_CHKFATALANDSTMT1' => '4:-1:1:1', 
674
 
                              'MPIU_ERR_CHKFATALANDSTMT2' => '4:-1:1:1', 
675
 
                              'MPIU_ERR_CHKFATALANDSTMT3' => '4:-1:1:1', 
676
 
                              'MPIU_ERR_CHKFATALANDSTMT4' => '4:-1:1:1', 
677
 
                              'MPIU_ERR_CHKFATALANDJUMP'  => '3:-1:0:1',
678
 
                              'MPIU_ERR_CHKFATALANDJUMP1' => '3:-1:1:1',
679
 
                              'MPIU_ERR_CHKFATALANDJUMP2' => '3:-1:1:1',
680
 
                              'MPIU_ERR_CHKFATALANDJUMP3' => '3:-1:1:1',
681
 
                              'MPIU_ERR_CHKFATALANDJUMP4' => '3:-1:1:1',
682
 
                              'MPIR_ERRTEST_VALID_HANDLE' => '4:-1:0:1',
 
635
        #  location of the error class
 
636
        %KnownErrRoutines = ( 'MPIR_Err_create_code'      => '5:3:1:1:4', 
 
637
                              'MPIO_Err_create_code'      => '5:3:1:0:-1', 
 
638
                              'MPIU_ERR_SET'              => '2:-1:0:1:1',
 
639
                              'MPIU_ERR_SETSIMPLE'        => '2:-1:0:1:1',
 
640
                              'MPIU_ERR_SET1'             => '2:-1:1:1:1',
 
641
                              'MPIU_ERR_SET2'             => '2:-1:2:1:1',
 
642
                              'MPIU_ERR_SETANDSTMT'       => '3:-1:0:1:1',
 
643
                              'MPIU_ERR_SETANDSTMT1'      => '3:-1:1:1:1', 
 
644
                              'MPIU_ERR_SETANDSTMT2'      => '3:-1:1:1:1', 
 
645
                              'MPIU_ERR_SETANDSTMT3'      => '3:-1:1:1:1', 
 
646
                              'MPIU_ERR_SETANDSTMT4'      => '3:-1:1:1:1', 
 
647
                              'MPIU_ERR_SETANDJUMP'       => '2:-1:0:1:1',
 
648
                              'MPIU_ERR_SETANDJUMP1'      => '2:-1:1:1:1', 
 
649
                              'MPIU_ERR_SETANDJUMP2'      => '2:-1:1:1:1', 
 
650
                              'MPIU_ERR_SETANDJUMP3'      => '2:-1:1:1:1', 
 
651
                              'MPIU_ERR_SETANDJUMP4'      => '2:-1:1:1:1', 
 
652
                              'MPIU_ERR_CHKANDSTMT'       => '4:-1:0:1:2', 
 
653
                              'MPIU_ERR_CHKANDSTMT1'      => '4:-1:1:1:2', 
 
654
                              'MPIU_ERR_CHKANDSTMT2'      => '4:-1:1:1:2', 
 
655
                              'MPIU_ERR_CHKANDSTMT3'      => '4:-1:1:1:2', 
 
656
                              'MPIU_ERR_CHKANDSTMT4'      => '4:-1:1:1:2', 
 
657
                              'MPIU_ERR_CHKANDJUMP'       => '3:-1:0:1:2',
 
658
                              'MPIU_ERR_CHKANDJUMP1'      => '3:-1:1:1:2',
 
659
                              'MPIU_ERR_CHKANDJUMP2'      => '3:-1:1:1:2',
 
660
                              'MPIU_ERR_CHKANDJUMP3'      => '3:-1:1:1:2',
 
661
                              'MPIU_ERR_CHKANDJUMP4'      => '3:-1:1:1:2',
 
662
                              'MPIU_ERR_SETFATAL'         => '2:-1:0:1:1',
 
663
                              'MPIU_ERR_SETFATALSIMPLE'   => '2:-1:0:1:1',
 
664
                              'MPIU_ERR_SETFATAL1'        => '2:-1:1:1:1',
 
665
                              'MPIU_ERR_SETFATAL2'        => '2:-1:2:1:1',
 
666
                              'MPIU_ERR_SETFATALANDSTMT'  => '3:-1:0:1:1',
 
667
                              'MPIU_ERR_SETFATALANDSTMT1' => '3:-1:1:1:1', 
 
668
                              'MPIU_ERR_SETFATALANDSTMT2' => '3:-1:1:1:1', 
 
669
                              'MPIU_ERR_SETFATALANDSTMT3' => '3:-1:1:1:1', 
 
670
                              'MPIU_ERR_SETFATALANDSTMT4' => '3:-1:1:1:1', 
 
671
                              'MPIU_ERR_SETFATALANDJUMP'  => '2:-1:0:1:1',
 
672
                              'MPIU_ERR_SETFATALANDJUMP1' => '2:-1:1:1:1', 
 
673
                              'MPIU_ERR_SETFATALANDJUMP2' => '2:-1:1:1:1', 
 
674
                              'MPIU_ERR_SETFATALANDJUMP3' => '2:-1:1:1:1', 
 
675
                              'MPIU_ERR_SETFATALANDJUMP4' => '2:-1:1:1:1', 
 
676
                              'MPIU_ERR_CHKFATALANDSTMT'  => '4:-1:0:1:2', 
 
677
                              'MPIU_ERR_CHKFATALANDSTMT1' => '4:-1:1:1:2', 
 
678
                              'MPIU_ERR_CHKFATALANDSTMT2' => '4:-1:1:1:2', 
 
679
                              'MPIU_ERR_CHKFATALANDSTMT3' => '4:-1:1:1:2', 
 
680
                              'MPIU_ERR_CHKFATALANDSTMT4' => '4:-1:1:1:2', 
 
681
                              'MPIU_ERR_CHKFATALANDJUMP'  => '3:-1:0:1:2',
 
682
                              'MPIU_ERR_CHKFATALANDJUMP1' => '3:-1:1:1:2',
 
683
                              'MPIU_ERR_CHKFATALANDJUMP2' => '3:-1:1:1:2',
 
684
                              'MPIU_ERR_CHKFATALANDJUMP3' => '3:-1:1:1:2',
 
685
                              'MPIU_ERR_CHKFATALANDJUMP4' => '3:-1:1:1:2',
 
686
                              'MPIR_ERRTEST_VALID_HANDLE' => '4:-1:0:1:3',
683
687
                              );
684
688
        while (/(MPI[OUR]_E[A-Za-z0-9_]+)\s*(\(.*)$/) {
685
689
            my $routineName = $1;
689
693
                last;
690
694
            }
691
695
            print "Found $routineName\n" if $debug;
692
 
            my ($genericArgLoc,$hasLine,$hasSpecific,$onlyIndirect) = 
 
696
            my ($genericArgLoc,$hasLine,$hasSpecific,$onlyIndirect,$errClassLoc) = 
693
697
                split(/:/,$KnownErrRoutines{$routineName});
694
698
 
695
699
            ($leader, $remainder, @args ) = &GetSubArgs( FD, $arglist );
719
723
                }
720
724
                next;
721
725
            }
 
726
            if ($errClassLoc >= 0 && $checkErrClass) {
 
727
                if (!($args[$errClassLoc] =~ /^MPI_ERR_/)  &&
 
728
                    !($args[$errClassLoc] =~ /^MPI_T_ERR_/) &&
 
729
                    !($args[$errClassLoc] =~ /^MPIDU_SOCK_ERR_/) &&
 
730
                    !($args[$errClassLoc] =~ /^MPIX_ERR_/) &&
 
731
                    !($args[$errClassLoc] =~ /^errclass/) ) {
 
732
                    $bad_syntax_in_file{$filename} = 1;
 
733
                    print STDERR "Invalid argument $args[$errClassLoc] for the MPI Error class in $routineName in $filename\n";
 
734
                    next;
 
735
                }
 
736
            }
722
737
            
723
738
            #my $last_errcode = $args[0];
724
739
            #my $fatal_flag = $args[1];