Return to 264.html CVS log

Up to [parser3project] / parser3 / tests

Annotation of parser3/tests/264.html, revision 1.5

1.1       moko        1: @main[]
                      2: 
                      3: $s[ 
                      4:        ^taint[html][ some <a href="/?a&b">html</a> code ]
                      5:        ^taint[parser-code][ ^$b(2+2) ]
                      6:        ^taint[regex][ ^^(.*?)^$ ]
                      7:        ^taint[ some <?dirty?> code ]
                      8: ]
                      9: 
                     10: ^apply-taint[$s]
                     11: ^apply-taint[html;$s]
                     12: ^apply-taint[regex;$s]
                     13: 
1.2       moko       14: $f[^file::exec[cat^os[-windows].sh; $.stdin[$s] ;stdin]]
1.1       moko       15: $f.text
1.3       moko       16: 
                     17: code coverage tests:
                     18: 
                     19: 2. ^try-catch{ ^file::exec[cat^os[-windows].sh; $.HTTP_OK[value] $.CGI_OK[value] $.REMOTE_ADDR[allowed]  $.unsafe_env_name[env_value] ] }
                     20: 3. ^try-catch{ ^file::exec[text] }
                     21: 4. ^try-catch{ ^file::exec[cat^os[-windows].sh; $.stdin[ $.hash[] ] ] }
                     22: 5. ^try-catch{ ^file::exec[cat^os[-windows].sh; ;arg1;^table::create[nameless]{arg2}; $.arg_hash[] ] }
1.4       moko       23: 
                     24: 6. $f[^file::exec[cat^os[-windows].sh; ;args;^table::create[nameless]{arg 2};;^table::create[nameless]{arg 4^#0Aarg 5};arg 6]]
                     25:    $f.text
                     26: 
                     27: 7. $f[^file::exec[cat^os[-windows].sh; ;^array::create[args;arg 2;;arg4]](5)[arg6]]
                     28:    $f.text
                     29: 
1.5     ! moko       30: 8. $f[^file::exec[cat^os[-windows].sh; ;args;]]
        !            31:    $f.text
1.4       moko       32: 
1.5     ! moko       33: 9. $f[^file::exec[cat^os[-windows].sh; ;args;arg 2;;]]
        !            34:    $f.text
        !            35: 
        !            36: 10. ^try-catch{ $f[^file::exec[cat^os[-windows].sh; ;^array::create[args; $.bug[yes] ]]] }