OpenCores
URL https://opencores.org/ocsvn/pci/pci/trunk

Subversion Repositories pci

[/] [pci/] [tags/] [rel_12/] [sim/] [rtl_sim/] [run/] [run_pci_sim_regr.scr] - Diff between revs 26 and 45

Go to most recent revision | Show entire file | Details | Blame | View Log

Rev 26 Rev 45
Line 1... Line 1...
#!/bin/csh -f
#!/bin/csh -f
 
 
set arg_num = $#; # number of arguments
set arg_num = $#argv; # number of arguments
 
 
 
if ($arg_num > 4) then
 
    echo "    Too many parameters ( $arg_num )"
 
    echo "    Maximum number of parameters is 4:"
 
    echo "      - xilinx"
 
    echo "      - artisan"
 
    echo "      - regression"
 
    echo "      - waves"
 
    exit
 
endif
 
 
# current iterration
# current iterration
set iter = 1;
set iter = 1;
# number of tests with DEFINES + test with user defined constants!
# number of tests with DEFINES + test with user defined constants!
set all_iterations = 13;
set all_iterations = 13;
Line 19... Line 29...
set arg_regression = 0;
set arg_regression = 0;
set arg_xilinx = 0;
set arg_xilinx = 0;
set arg_artisan = 0;
set arg_artisan = 0;
set arg_waves = 0;
set arg_waves = 0;
 
 
if ($arg_num == 0) then
@ arg_num     = 1
                  @ arg_regression = 0;
set arg_check = 0
else
 
  if ($arg_num == 1) then
while($arg_num <= $#argv)
          if ($1 == "regression") then
    if ($argv[$arg_num] == "regression") then
                  @ arg_regression = 1;
        @ arg_regression = 1
          else
        @ arg_check      = $arg_check + 1
            if ($1 == "xilinx") then
 
                  @ arg_xilinx = 1;
 
            else
 
              if ($1 == "artisan") then
 
                  @ arg_artisan = 1;
 
              else
 
                if ($1 == "waves") then
 
                  @ arg_waves = 1;
 
                endif
 
              endif
 
            endif
 
          endif
 
  else
 
    if ($arg_num == 2) then
 
          if ($1 == "regression") then
 
                  @ arg_regression = 1;
 
          else
 
            if ($1 == "xilinx") then
 
                  @ arg_xilinx = 1;
 
            else
 
              if ($1 == "artisan") then
 
                  @ arg_artisan = 1;
 
              else
 
                if ($1 == "waves") then
 
                  @ arg_waves = 1;
 
                endif
 
              endif
 
            endif
 
          endif
 
          if ($2 == "regression") then
 
                  @ arg_regression = 1;
 
          else
 
            if ($2 == "xilinx") then
 
                  @ arg_xilinx = 1;
 
            else
 
              if ($2 == "artisan") then
 
                  @ arg_artisan = 1;
 
              else
 
                if ($2 == "waves") then
 
                  @ arg_waves = 1;
 
                endif
 
              endif
 
            endif
 
          endif
 
    else
 
      if ($arg_num == 3) then
 
          if ($1 == "regression") then
 
                  @ arg_regression = 1;
 
          else
 
            if ($1 == "xilinx") then
 
                  @ arg_xilinx = 1;
 
            else
 
              if ($1 == "artisan") then
 
                  @ arg_artisan = 1;
 
              else
 
                if ($1 == "waves") then
 
                  @ arg_waves = 1;
 
                endif
 
              endif
 
            endif
 
          endif
 
          if ($2 == "regression") then
 
                  @ arg_regression = 1;
 
          else
 
            if ($2 == "xilinx") then
 
                  @ arg_xilinx = 1;
 
            else
 
              if ($2 == "artisan") then
 
                  @ arg_artisan = 1;
 
              else
 
                if ($2 == "waves") then
 
                  @ arg_waves = 1;
 
                endif
 
              endif
 
            endif
 
          endif
 
          if ($3 == "regression") then
 
                  @ arg_regression = 1;
 
          else
 
            if ($3 == "xilinx") then
 
                  @ arg_xilinx = 1;
 
            else
 
              if ($3 == "artisan") then
 
                  @ arg_artisan = 1;
 
              else
 
                if ($3 == "waves") then
 
                  @ arg_waves = 1;
 
                endif
 
              endif
 
            endif
 
          endif
 
      else
 
        if ($arg_num == 4) then
 
          if ($1 == "regression") then
 
                  @ arg_regression = 1;
 
          else
 
            if ($1 == "xilinx") then
 
                  @ arg_xilinx = 1;
 
            else
 
              if ($1 == "artisan") then
 
                  @ arg_artisan = 1;
 
              else
 
                if ($1 == "waves") then
 
                  @ arg_waves = 1;
 
                endif
 
              endif
 
            endif
 
          endif
 
          if ($2 == "regression") then
 
                  @ arg_regression = 1;
 
          else
 
            if ($2 == "xilinx") then
 
                  @ arg_xilinx = 1;
 
            else
 
              if ($2 == "artisan") then
 
                  @ arg_artisan = 1;
 
              else
 
                if ($2 == "waves") then
 
                  @ arg_waves = 1;
 
                endif
 
              endif
 
            endif
 
          endif
 
          if ($3 == "regression") then
 
                  @ arg_regression = 1;
 
          else
 
            if ($3 == "xilinx") then
 
                  @ arg_xilinx = 1;
 
            else
 
              if ($3 == "artisan") then
 
                  @ arg_artisan = 1;
 
              else
 
                if ($3 == "waves") then
 
                  @ arg_waves = 1;
 
                endif
 
              endif
 
            endif
 
          endif
 
          if ($4 == "regression") then
 
                  @ arg_regression = 1;
 
          else
 
            if ($4 == "xilinx") then
 
                  @ arg_xilinx = 1;
 
            else
 
              if ($4 == "artisan") then
 
                  @ arg_artisan = 1;
 
              else
 
                if ($4 == "waves") then
 
                  @ arg_waves = 1;
 
                endif
                endif
 
 
 
    if ($argv[$arg_num] == "xilinx") then
 
        @ arg_xilinx = 1
 
        @ arg_check      = $arg_check + 1
              endif
              endif
 
 
 
    if($argv[$arg_num] == "artisan") then
 
        @ arg_artisan = 1
 
        @ arg_check      = $arg_check + 1
            endif
            endif
 
 
 
    if ($argv[$arg_num] == "waves") then
 
        @ arg_waves = 1
 
        @ arg_check      = $arg_check + 1
          endif
          endif
        else
 
          echo "    Too many parameters ( $arg_num )"
    if ($arg_check != $arg_num) then
          echo "    Maximum number of parameters is 4:"
        echo "Invalid argument found"
          echo "      - xilinx"
 
          echo "      - artisan"
 
          echo "      - regression"
 
          echo "      - waves"
 
          exit
          exit
        endif
        endif
      endif
    @ arg_num = $arg_num + 1
    endif
end
  endif
 
endif
 
 
 
 
 
# ITERATION LOOP
# ITERATION LOOP
iteration:
iteration:
 
 
echo ""
echo ""
Line 641... Line 507...
else
else
  echo "-input ../bin/ncsim.rc" >> ./ncsim.args
  echo "-input ../bin/ncsim.rc" >> ./ncsim.args
endif
endif
echo "worklib.bridge32:fun" >> ./ncsim.args
echo "worklib.bridge32:fun" >> ./ncsim.args
 
 
ncsim -file ./ncsim.args > /dev/null
ncsim -file ./ncsim.args #> /dev/null
 
 
if ($status != 0) then
if ($status != 0) then
  echo ""
  echo ""
  echo "TESTS couldn't start due to Errors!"
  echo "TESTS couldn't start due to Errors!"
  echo ""
  echo ""
  exit
  exit
Line 685... Line 552...
@ all_tests = $all_tests + $sub_tests;
@ all_tests = $all_tests + $sub_tests;
 
 
@ iter += 1;
@ iter += 1;
 
 
if (($arg_regression == 1) && ($iter <= $all_iterations)) then
if (($arg_regression == 1) && ($iter <= $all_iterations)) then
 
    rm -f ../bin/INCA_libs/worklib/*
 
    rm -f ../bin/INCA_libs/worklib/.*
    goto iteration
    goto iteration
else
else
    rm ./defines.args
    rm ./defines.args
    echo ""
    echo ""
    echo "<<<"
    echo "<<<"

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.