| OLD | NEW |
| 1 #!/usr/bin/perl -wT | 1 #!/usr/bin/perl -wT |
| 2 use strict; | 2 use strict; |
| 3 | 3 |
| 4 if ($ENV{"QUERY_STRING"} eq "clear=1") { | 4 if ($ENV{"QUERY_STRING"} eq "clear=1") { |
| 5 print "Content-Type: text/plain\r\n"; | 5 print "Content-Type: text/plain\r\n"; |
| 6 print "Set-Cookie: WK-websocket-test=0; Max-Age=0\r\n"; | 6 print "Set-Cookie: WK-websocket-test=0; Max-Age=0\r\n"; |
| 7 print "Set-Cookie: WK-websocket-test-httponly=0; HttpOnly; Max-Age=0\r\n"; | 7 print "Set-Cookie: WK-websocket-test-httponly=0; HttpOnly; Max-Age=0\r\n"; |
| 8 print "\r\n"; | 8 print "\r\n"; |
| 9 print "Cookies are cleared."; | 9 print "Cookies are cleared."; |
| 10 exit; | 10 exit; |
| 11 } | 11 } |
| 12 | 12 |
| 13 print "Content-Type: text/html\r\n"; | 13 print "Content-Type: text/html\r\n"; |
| 14 print "Set-Cookie: WK-websocket-test=1\r\n"; | 14 print "Set-Cookie: WK-websocket-test=1\r\n"; |
| 15 print "Set-Cookie: WK-websocket-test-httponly=1; HttpOnly\r\n"; | 15 print "Set-Cookie: WK-websocket-test-httponly=1; HttpOnly\r\n"; |
| 16 print "\r\n"; | 16 print "\r\n"; |
| 17 print <<HTML | 17 print <<HTML |
| 18 <html> | 18 <html> |
| 19 <head> | 19 <head> |
| 20 <script src="/js-test-resources/js-test-pre.js"></script> | 20 <script src="/js-test-resources/js-test.js"></script> |
| 21 </head> | 21 </head> |
| 22 <body> | 22 <body> |
| 23 <p>Test WebSocket sends HttpOnly cookies.</p> | 23 <p>Test WebSocket sends HttpOnly cookies.</p> |
| 24 <p>On success, you will see a series of "PASS" messages, followed by "TEST COMPL
ETE".</p> | 24 <p>On success, you will see a series of "PASS" messages, followed by "TEST COMPL
ETE".</p> |
| 25 <div id="console"></div> | 25 <div id="console"></div> |
| 26 <script> | 26 <script> |
| 27 window.jsTestIsAsync = true; | 27 window.jsTestIsAsync = true; |
| 28 | 28 |
| 29 var cookie; | 29 var cookie; |
| 30 | 30 |
| (...skipping 24 matching lines...) Expand all Loading... |
| 55 cookie = normalizeCookie(cookie); | 55 cookie = normalizeCookie(cookie); |
| 56 shouldBe("cookie", '"WK-websocket-test-httponly=1; WK-websocket-test=1"'); | 56 shouldBe("cookie", '"WK-websocket-test-httponly=1; WK-websocket-test=1"'); |
| 57 clearCookies(); | 57 clearCookies(); |
| 58 finishJSTest(); | 58 finishJSTest(); |
| 59 }; | 59 }; |
| 60 | 60 |
| 61 </script> | 61 </script> |
| 62 </body> | 62 </body> |
| 63 </html> | 63 </html> |
| 64 HTML | 64 HTML |
| OLD | NEW |