Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- <#
- ~ Coded by AnonGuy ~
- [~] an0nguy [at] protonmail.ch
- [~] http://blog.lolwaleet.com
- Usage ~ Just replace "D:\joomla.txt" with your list of joomla websites
- Pic ~ http://i.imgur.com/5ofqvSD.png
- Note ~ If the site is not using joomla/admin hid the file which discloses the version it'd throw an error and show previous site's version -- Can check if it throws a 404 using System.Net.WebRequest but naah xD
- PS ~ The "color-Write" function is coded by Jesse Chisholm.
- #>
- Clear-Host
- function color-Write{
- $allColors = ("-Black", "-DarkBlue", "-DarkGreen", "-DarkCyan", "-DarkRed", "-DarkMagenta", "-DarkYellow", "-Gray", "-Darkgray", "-Blue", "-Green", "-Cyan", "-Red", "-Magenta", "-Yellow", "-White")
- $foreground = (Get-Host).UI.RawUI.ForegroundColor # current foreground
- $color = $foreground
- [bool]$nonewline = $false
- $sofar = ""
- $total = ""
- foreach($arg in $args){
- if ($arg -eq "-nonewline") { $nonewline = $true }
- elseif ($arg -eq "-foreground"){
- if ($sofar) {Write-Host $sofar -foreground $color -nonewline}
- $color = $foregrnd
- $sofar = ""}
- elseif ($allColors -contains $arg){
- if ($sofar) { Write-Host $sofar -foreground $color -nonewline }
- $color = $arg.substring(1)
- $sofar = ""}
- else {
- $sofar += "$arg "
- $total += "$arg "}}
- if (!$nonewline) {Write-Host $sofar -foreground $color}
- elseif($sofar) {Write-Host $sofar -foreground $color -nonewline}}
- $c = 0
- color-Write -White "--------------------------------------------------"
- color-Write -White "- " JoOmla Version Finder by -Red AnonGuy -White " -"
- color-Write -White "--------------------------------------------------"
- foreach ($x in get-content D:\joomla.txt){
- $url = $x + "/language/en-GB/en-GB.xml"
- $z = New-Object Xml.XmlDocument
- $z.Load($url)
- $t = $z.metafile.version[1]
- $global:c++
- color-Write -Yellow [$global:c] -Cyan "--" -White $x -Cyan "--" -Red $t}
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement