This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
var WHAK = new Object; | |
WHAK.com = 'alert("www.WHAK.com");'; | |
WHAK.ca = 'alert("www.WHAK.ca");'; | |
WHAK.us = 'alert("www.WHAK.us");'; | |
eval(WHAK.com+WHAK.ca+WHAK.us); |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
function html_entities(me) { | |
return me.replace(/^\s+|\s+$/g, "").replace(/(\r\n|\n|\r|\x0a)/gm, "\n").replace(/\n{2,}/g, "\n").replace(/\n/g, " ").replace(/\0/g, "�").replace(/\t{2,}/g, "\t").replace(/\x27/g, "'").replace(/\x22/g, """).replace(/ {2,}/g, " ").replace(/</g, "<").replace(/>/g, ">"); | |
} |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
function kleen(e, r) { | |
return e.replace(/^ +| +$/g, "").replace(/^\t+|\t+$/g, "").replace(/^\r+|\r+$/g, "").replace(/^\n+|\n+$/g, "").replace(/\r?\n|\r|\x0a/g, "\n").replace(/(\r\n|\n|\r|\x0a)/gm, "\n").replace(/\n{2,}/g, "\n").replace(/\0/g, "\\0").replace(/\f{2,}/g, "\f").replace(/\v{2,}/g, "").replace(/\/ +/g, "/").replace(/\t{2,}/g, " ").replace(/ {2,}/g, " ").replace(/\s\s+/g, " ").replace(/\s{2,}/g, "s").replace(/ *= */g, "=").replace(/<[^\S\f]*\![^\S\f]*--[^\S\f]*\[[^\S\f]*htmlclean-protect[^\S\f]*\][^\S\f]*--[^\S\f]*>([\s\S]*?)<[^\S\f]*\![^\S\f]*--[^\S\f]*\[[^\S\f]*\/[^\S\f]*htmlclean-protect[^\S\f]*\][^\S\f]*--[^\S\f]*>/gi, function(e, f) { | |
return r(f); | |
}).replace(/(<[^\S\f]*\?[^\S\f]*xml\b[^>]*?\?[^\S\f]*>)/gi, function(e, r) { | |
return o(r); | |
}).replace(/(<[^\S\f]*(\%|\?)[\s\S]*?\2[^\S\f]*>)/g, function(e, f) { | |
return r(f); | |
}).replace(/(<[^\S\f]*\?[^\S\f]*php\b[\s\S]*)/gi, function(e, f) { | |
return r(f); | |
}).replace(/(<[^\S\f]*jsp[^\S\f]*:[^>]*?>)/gi, function(e, f) { |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
function chunky(a, start, cmd, longest, shortest, joiner, before, after) { | |
"" == start && (start = 9); | |
"" == cmd && (cmd = "btoa"); | |
"" == longest && (longest = 75); | |
"" == shortest && (shortest = 1); | |
"" == before && (before = "//\\\n///\\\n///^\\\n//<->\\\n//WHAK\\\n//.COM/\\\n////////\\\n\\u0024 ='"); | |
"" == after && (after = "eval(atob($));"); | |
a = eval(cmd + "(a)"); | |
for (var b = [], c = start; a; ) { | |
c > longest && (c = start); |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
document.write('<h1 id="x">WHAK.com</h1>'); | |
var is = 0; | |
setInterval(function(r) { | |
r = document.getElementById("x"); | |
r.style.position = "absolute"; | |
r.style.top = 50 * Math.sin(is) + 80 + "px"; | |
is += .05; | |
}, 1e3 / 30); |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
function is_in(a,b,c,d){return c=RegExp(b),d=c.test(a)} | |
alert(is_in("WHAK.com's awesome haystack!","needle")); | |
//returns false | |
alert(is_in("WHAK.com's awesome haystack!","some")); | |
//returns true |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
<%@ LANGUAGE="VBSCRIPT" %> | |
<% | |
sub fetch(URL) | |
Set objXMLHTTP = Server.CreateObject("Microsoft.XMLHTTP") | |
objXMLHTTP.Open "GET", URL, false | |
objXMLHTTP.Send | |
Response.Write objXMLHTTP.responseText | |
Set objXMLHTTP = Nothing | |
response.end 'remove this if not using for 404.asp or it will kill the page after load | |
end sub |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
<%@ LANGUAGE="VBSCRIPT" %> | |
<% | |
'fetch("webpage.htm") | |
sub fetch(file) | |
Dim x | |
Set fso = Server.CreateObject("Scripting.FileSystemObject") | |
set fs = fso.OpenTextFile(Server.MapPath(file), 1, true) | |
Do Until fs.AtEndOfStream | |
x = fs.ReadLine | |
Response.Write x |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
<%@ LANGUAGE="VBSCRIPT" %> | |
<% | |
function load(ASPfile) | |
Server.Execute(ASPfile) | |
end function | |
'Call load("SameDirOrSubDir.asp") | |
%> |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
<%@ LANGUAGE="VBSCRIPT" %> | |
<% | |
function myFunction() | |
response.write("Hello world") | |
end function | |
eval("myFunction()") | |
%> |