1 #!/bin/zsh

     2 

     3 # to make the script fail safely

     4 set -euo pipefail

     5 

     6 

     7 out=${1:-output}

     8 

     9 echo "" > $out

    10 

    11 echo `date` >> $out

    12 echo -e "Below is the feedback and provisional marks for your submission" >> $out

    13 echo -e "for the Preliminary Part of Part 2 (Scala).  Please note all marks are provisional until" >> $out

    14 echo -e "ratified by the assessment board -- this is not an official" >> $out

    15 echo -e "results transcript." >> $out

    16 echo -e "" >> $out

    17 

    18 echo -e "Below is the feedback for your submission docdiff.scala" >> $out

    19 echo -e "" >> $out

    20 

    21 # marks for CW7 preliminary part

    22 marks=$(( 0.0 ))

    23 

    24 

    25 # compilation tests

    26 

    27 function scala_compile {

    28   (ulimit -t 30; JAVA_OPTS="-Xmx1g" scala -Xprint:parser "$1" 2> c$out 1> c$out)

    29 }

    30 

    31 # functional tests

    32 

    33 function scala_assert {

    34   (ulimit -t 30; JAVA_OPTS="-Xmx1g" scala -nc -i "$1" -- "$2" -e "" 2> /dev/null 1> /dev/null)

    35 }

    36 

    37 # purity test

    38 

    39 function scala_vars {

    40    (egrep '\bvar\b|\breturn\b|\.par\.|\.par |ListBuffer|AtomicInteger|mutable|util.control|new Array' c$out 2> /dev/null 1> /dev/null)

    41 }

    42 

    43 

    44 ### compilation test

    45 

    46 echo -e "docdiff.scala runs?" |  tee -a $out

    47 

    48 if (scala_compile docdiff.scala)

    49 then

    50     echo -e "  --> success" |  tee -a $out

    51     tsts=$(( 0 ))

    52 else

    53     echo -e "  --> SCALA DID NOT RUN docdiff.scala\n" |  tee -a $out

    54     tsts=$(( 1 )) 

    55 fi

    56 

    57 

    58 # var, .par return, ListBuffer test

    59 #

    60 

    61 if  [ $tsts -eq 0 ]

    62 then     

    63    echo -e "docdiff.scala does not contain VARS, RETURNS etc?" |  tee -a $out

    64 

    65    if (scala_vars docdiff.scala)

    66    then

    67       echo -e "  --> test failed\n" | tee -a $out  

    68       tsts=$(( 1 ))

    69    else

    70       echo -e "  --> success" |  tee -a $out

    71       tsts=$(( 0 )) 

    72    fi

    73 else

    74    tsts=$(( 1 ))  

    75 fi 

    76 

    77 echo >> $out

    78 

    79 

    80 ### docdiff clean tests

    81 

    82 if [ $tsts -eq 0 ]

    83 then

    84   echo -e "docdiff.scala tests:" |  tee -a $out

    85   echo -e "  clean(\"ab a abc\") == List(\"ab\", \"a\", \"abc\")" |  tee -a $out

    86   echo -e "  clean(\"ab*a abc1\") == List(\"ab\", \"a\", \"abc1\")" |  tee -a $out

    87 

    88   if (scala_assert "docdiff.scala" "docdiff_test1.scala")

    89   then

    90       echo -e "  --> success" |  tee -a $out

    91       marks=$(( marks + 0.5 ))

    92   else

    93       echo -e "  --> ONE OF THE TESTS FAILED\n" |  tee -a $out

    94   fi

    95 fi

    96 

    97 ### docdiff occurrences tests

    98 

    99 if [ $tsts -eq 0 ]

   100 then

   101   echo -e "  occurrences(List(\"a\", \"b\", \"b\", \"c\", \"d\")) == " |  tee -a $out

   102   echo -e "      Map(\"a\" -> 1, \"b\" -> 2, \"c\" -> 1, \"d\" -> 1)" |  tee -a $out

   103   echo -e "  " |  tee -a $out

   104   echo -e "  occurrences(List(\"d\", \"b\", \"d\", \"b\", \"d\")) == " |  tee -a $out

   105   echo -e "      Map(\"d\" -> 3, \"b\" -> 2)" |  tee -a $out

   106   echo -e "  " |  tee -a $out

   107   echo -e "  occurrences(Nil) == Map() " |  tee -a $out

   108   echo -e "  " |  tee -a $out

   109   echo -e "  occurrences(List(\"b\", \"b\", \"b\", \"b\", \"b\")) == Map(\"b\" -> 5)" |  tee -a $out

   110 

   111   if (scala_assert "docdiff.scala" "docdiff_test2.scala") 

   112   then

   113       echo -e "  --> success" |  tee -a $out

   114       marks=$(( marks + 1.0 ))

   115   else

   116       echo -e "  --> ONE OF THE TESTS FAILED\n" |  tee -a $out

   117   fi

   118 fi

   119 

   120 ### docdiff prod tests

   121 

   122 if [ $tsts -eq 0 ]

   123 then

   124   echo -e "  val l1 = List(\"a\", \"b\", \"b\", \"c\", \"d\")" |  tee -a $out

   125   echo -e "  val l2 = List(\"d\", \"b\", \"d\", \"b\", \"d\")" |  tee -a $out

   126   echo -e "  " |  tee -a $out

   127   echo -e "  prod(l1, l2) == 7 " |  tee -a $out

   128   echo -e "  prod(l1, l1) == 7 " |  tee -a $out

   129   echo -e "  prod(l2, l2) == 13 " |  tee -a $out

   130   echo -e "  " |  tee -a $out

   131   echo -e "  val l3 = List(\"1\", \"2\", \"3\", \"4\", \"5\")" |  tee -a $out

   132   echo -e "  prod(l1, l3) == 0 " |  tee -a $out

   133 

   134   if (scala_assert "docdiff.scala" "docdiff_test3.scala") 

   135   then

   136       echo -e "  --> success" |  tee -a $out

   137       marks=$(( marks + 1.0 ))

   138   else

   139       echo -e "  --> ONE OF THE TESTS FAILED\n" |  tee -a $out

   140   fi

   141 fi

   142 

   143 ### docdiff overlap tests

   144 

   145 if [ $tsts -eq 0 ]

   146 then

   147   echo -e "  val l1 = List(\"a\", \"b\", \"b\", \"c\", \"d\")" |  tee -a $out

   148   echo -e "  val l2 = List(\"d\", \"b\", \"d\", \"b\", \"d\")" |  tee -a $out

   149   echo -e "  " |  tee -a $out

   150   echo -e "  overlap(l1, l2) == 0.5384615384615384 " |  tee -a $out

   151   echo -e "  overlap(l1, l1) == 1.0 " |  tee -a $out

   152   echo -e "  overlap(l2, l2) == 1.0 " |  tee -a $out

   153 

   154   if (scala_assert "docdiff.scala" "docdiff_test4.scala") 

   155   then

   156       echo -e "  --> success" |  tee -a $out

   157       marks=$(( marks + 0.5 ))

   158   else

   159       echo -e "  --> ONE OF THE TESTS FAILED\n" |  tee -a $out

   160   fi

   161 fi

   162 

   163 

   164 ## final marks

   165 echo -e "Overall mark for the Preliminary Part 2 (Scala)" | tee -a $out

   166 printf " %0.1f\n" $marks | tee -a $out

   167 

   168 

   169 #echo -e " $marks" | tee -a $out

   170