OutdatedTreebotlife bypapsser

Posts 1–15 of 16 · Page 1 of 2
Treebotlife bypapsser
Code:
-- Outputs functions and stuff in wiki format

OUTPUT = ""

if ( SERVER ) then
    xside = file.Read( "ClientFunctions.txt" )
else
    xside = file.Read( "ServerFunctions.txt" )
end

file.CreateDir( "wikipages" )

xside = xside or ""

local function XSide( class, name )
    if ( string.find( xside, class .. "    " .. name ) ) then return "shared" end
    if ( string.find( xside, class .. "    " .. name ) ) then return "shared" end
    if ( SERVER ) then return "server" end
    return "client"
    
end

IDelay = 1

local function AddWikiInfo( pagename, name, funcname )

    pagename = pagename:gsub( "^%l", string.upper )
    
    local url = "http://wiki.garrysmod.com/?title=" .. pagename
    local filename = "wikipages/"..pagename:Replace( ".", "_" )..".txt"
    if ( !file.Exists( filename, "GAME" ) ) then
    
        timer.Simple( IDelay, function()
        
            http.Get( url, "", function( c, s )
                if ( c != "" ) then
                    Msg( "WRITING TO "..filename.."\n" )
                end
                file.Write( filename, c )
            end
             )
             
        end )
        
        IDelay = IDelay + 0.1
    
         return "";
    end

    local str = file.Read( filename )
    
    local lines = string.Split( str, "\n" )
    local lineDesc = 0
    local lineSyntax = 0
    
    for num, line in pairs( lines ) do
    
        if ( line:find( "<b>Description:</b></td>" ) ) then lineDesc = num + 4 end
        if ( line:find( "<b>Syntax</b></td>" ) ) then lineSyntax = num + 2 end
                
    end
        
    local desc = tostring( lines[lineDesc] )
        desc = desc:Replace( "    ", " " )
        desc = desc:gsub("<[^>]+", "" )
        desc = desc:Replace( ">", "" )
        desc = desc:Replace( "&nbsp;", " " )
        desc = desc:Replace( "  ", " " )
        desc = desc:Replace( "  ", " " )
        desc = desc:Trim( " " )    
            

2.
________ _______  _______  _______  ______   _______ _________

3.
\__   __/(  ____ )(  ____ \(  ____ \(  ___ \ (  ___  )\__   __/ 

4.
   ) (   | (    )|| (    \/| (    \/| (   ) )| (   ) |   ) (    

5.
   | |   | (____)|| (__    | (__    | (__/ / | |   | |   | |    

6.
   | |   |     __)|  __)   |  __)   |  __ (  | |   | |   | | 

7.
   | |   | (\ (   | (      | (      | (  \ \ | |   | |   | | 

8.
   | |   | ) \ \__| (____/\| (____/\| )___) )| (___) |   | |

9.
   )_(   |/   \__/(_______/(_______/|/ \___/ (_______)   )_(

    local syntax = tostring( lines[lineSyntax] )
        syntax = syntax:Replace( "    ", " " )
        syntax = syntax:gsub("<[^>]+", "" )
        syntax = syntax:Replace( ">", "" )
        syntax = syntax:Replace( ">", "" )
        syntax = syntax:Replace( "&nbsp;", " " )
        syntax = syntax:Replace( "Where is this used?", "" )        
        syntax = syntax:Replace( "[", "" )
        syntax = syntax:Replace( "]", "" )
        syntax = syntax:Replace( "  ", " " )
        syntax = syntax:Replace( "  ", " " )
        syntax = syntax:Replace( name..":"..funcname, "" )
        syntax = syntax:Replace( name.."."..funcname, "" )
        syntax = syntax:Replace( funcname, "" )
        syntax = syntax:Replace( "(", "" )
        syntax = syntax:Replace( ")", "" )
        syntax = syntax:Replace( " ,", "," )
        syntax = syntax:Trim( " " )
        
    return desc .. "    " .. syntax

end


local function GetFunctions( tab )


2.
________ _______  _______  _______  ______   _______ _________

3.
\__   __/(  ____ )(  ____ \(  ____ \(  ___ \ (  ___  )\__   __/ 

4.
   ) (   | (    )|| (    \/| (    \/| (   ) )| (   ) |   ) (    

5.
   | |   | (____)|| (__    | (__    | (__/ / | |   | |   | |    

6.
   | |   |     __)|  __)   |  __)   |  __ (  | |   | |   | | 

7.
   | |   | (\ (   | (      | (      | (  \ \ | |   | |   | | 

8.
   | |   | ) \ \__| (____/\| (____/\| )___) )| (___) |   | |

9.
   )_(   |/   \__/(_______/(_______/|/ \___/ (_______)   )_(

    local functions = {}

    for k, v in pairs( tab ) do

        if ( isfunction(v) ) then
        
            table.insert( functions, tostring(k) )
        
        end
    
    end
    
    table.sort( functions )
    return functions

end


local function DoMetaTable( name )

2.
________ _______  _______  _______  ______   _______ _________

3.
\__   __/(  ____ )(  ____ \(  ____ \(  ___ \ (  ___  )\__   __/ 

4.
   ) (   | (    )|| (    \/| (    \/| (   ) )| (   ) |   ) (    

5.
   | |   | (____)|| (__    | (__    | (__/ / | |   | |   | |    

6.
   | |   |     __)|  __)   |  __)   |  __ (  | |   | |   | | 

7.
   | |   | (\ (   | (      | (      | (  \ \ | |   | |   | | 

8.
   | |   | ) \ \__| (____/\| (____/\| )___) )| (___) |   | |
9.
)_( |/ \__/(_______/(_______/|/ \___/ (_______) )_(


func = GetFunctions( _R[ name ] )

if ( type(_R[ name ]) != "table" ) then
Msg("Error: _R["..name.."] is not a table!\n")
end

for k, v in pairs( func ) do
OUTPUT = OUTPUT.."meta "..name.." "..v.." "..XSide( name, v ).." "..AddWikiInfo( name.."."..v, name, v ).."\n"
end

end

local function DoLibrary( name )

-- OUTPUT = OUTPUT .. "\n\r=["..name.."]] ([[Library]])==\n\r"

if ( type(_G[ name ]) != "table" ) then
Msg("Error: _G["..name.."] is not a table!\n")
end

func = GetFunctions( _G[ name ] )
for k, v in pairs( func ) do
--OUTPUT = OUTPUT .. XSide( name, v ) .. " [["..name.."]].[["..name.."."..v.."|"..v.."]]<br />\n"
OUTPUT = OUTPUT.."library "..name.." "..v.." "..XSide( name, v ).." "..AddWikiInfo( name.."."..v, name, v ).."\n"
end

end

local function DoGlobals()

func = GetFunctions( _G )
for k, v in pairs( func ) do
OUTPUT = OUTPUT.."global global "..v.." "..XSide( "global", v ).." "..AddWikiInfo( "G."..v, v, v ).."\n"
end

end

local Ignores = { "mathx", "stringx", "_G", "_R", "_E", "GAMEMODE", "g_SBoxObjects", "tablex", "color_black",
"color_white", "_LOADLIB", "_LOADED", "color_transparent", "func", "DOF_Ents",
"Morph", "_ENT", "SKIN", "ComboBox_Emitter_Options", "ENT", "SpawniconGenFunctions" }

DoGlobals()

local t ={}

2.
________ _______ _______ _______ ______ _______ _________

3.
\__ __/( ____ )( ____ \( ____ \( ___ \ ( ___ )\__ __/

4.
) ( | ( )|| ( \/| ( \/| ( ) )| ( ) | ) (

5.
| | | (____)|| (__ | (__ | (__/ / | | | | | |

6.
| | | __)| __) | __) | __ ( | | | | | |

7.
| | | (\ ( | ( | ( | ( \ \ | | | | | |

8.
| | | ) \ \__| (____/\| (____/\| )___) )| (___) | | |

9.
)_( |/ \__/(_______/(_______/|/ \___/ (_______) )_(


for k, v in pairs(_G) do
if ( type(v) == "table" && type(k) == "string" && !table.HasValue( Ignores, k ) ) then
table.insert( t, tostring(k) )
end
end

table.sort( t )
for k, v in pairs( t ) do
DoLibrary( v )
end


local t = {}

for k, v in pairs(_R) do
if ( type(v) == "table" && type(k) == "string" && !table.HasValue( Ignores, k ) ) then
table.insert( t, tostring(k) )
end
end

table.sort( t )
for k, v in pairs( t ) do
DoMetaTable( v )
end


if ( SERVER ) then
file.Write( "ServerFunctions.txt", OUTPUT )
else
file.Write( "ClientFunctions.txt", OUTPUT )
end


-- Add Missing functions...
local lines = string.Split( xside, "\n" )
for k, v in pairs( lines ) do
if ( !string.find( OUTPUT, v ) ) then
OUTPUT = OUTPUT .. v .. "\n"
end
end


file.Write( "All.txt", OUTPUT )


I found a tut on qac bypass on wiki and coded this please take and use
Quote Originally Posted by kingboy111 View Post
how do i use this?
inject into the tisker.dll then inject into the python stack garrysmod

Just kidding that's functiondump.lua in garrysmod/lua it dumps function names :P it's not a bypass.
Quote Originally Posted by suchisgood View Post
inject into the tisker.dll then inject into the python stack garrysmod

Just kidding that's functiondump.lua in garrysmod/lua it dumps function names :P it's not a bypass.
What are you talking about,
Code:
file.CreateDir( "wikipages" )
makes it obvious enough that its a extremely advanced bypasser.
Quote Originally Posted by Trollaux View Post


What are you talking about,
Code:
file.CreateDir( "wikipages" )
makes it obvious enough that its a extremely advanced bypasser.
that function is a special function it ddoss++ your interwebs
Quote Originally Posted by suchisgood View Post
that function is a special function it ddoss++ your interwebs
o noes pls dont run it on hvh
Remove this shit off of MPGH, even if the file is not physically infected, this still does "bad" things to your PC/NETWORK.
Please, do enlighten me how it's malicious and why?
Quote Originally Posted by Gray View Post
Please, do enlighten me how it's malicious and why?
Code:
	local functions = {}

	for k, v in pairs( tab ) do

		if ( isfunction(v) ) then
		
			table.insert( functions, tostring(k) )
		
		end
	
	end
	
	table.sort( functions )
	return functions

end


local function DoMetaTable( name )
As you can see here he is injecting strings into the players meta table and forcing his gmod to close from significant data blocks.
Quote Originally Posted by I am a man View Post
Code:
	local functions = {}

	for k, v in pairs( tab ) do

		if ( isfunction(v) ) then
		
			table.insert( functions, tostring(k) )
		
		end
	
	end
	
	table.sort( functions )
	return functions

end


local function DoMetaTable( name )
As you can see here he is injecting strings into the players meta table and forcing his gmod to close from significant data blocks.
This person is correct as a lua expert i am this is exactly what it does!
Quote Originally Posted by suchisgood View Post
This person is correct as a lua expert i am this is exactly what it does!
Lua expert my ass.

Quote Originally Posted by Gray View Post
Please, do enlighten me how it's malicious and why?
It's not. It isn't even capable of doing anything if you copypaste the script right now without any edits because it never ends the quote at the top so nothing in the script ever runs. Now if you do end the quote at the top you will have to make numerous quotes throughout the script and even then it isn't malicious. This code has nothing malicious in it what-so-ever and anyone who claims it is ( @TreeLife) is new to GLua obviously. All this script does is dump functions from the wiki and it is 100% safe. Also, @TreeLife you wouldn't know because you just started lua yesterday...
Quote Originally Posted by Trollaux View Post


Lua expert my ass.



It's not. It isn't even capable of doing anything if you copypaste the script right now without any edits because it never ends the quote at the top so nothing in the script ever runs. Now if you do end the quote at the top you will have to make numerous quotes throughout the script and even then it isn't malicious. This code has nothing malicious in it what-so-ever and anyone who claims it is ( @TreeLife) is new to GLua obviously. All this script does is dump functions from the wiki and it is 100% safe. Also, @TreeLife you wouldn't know because you just started lua yesterday...
They are trolling and I'm aware of that.
I just wanted to see if they had something constructive to show.

Thanks for the clarification though.
Quote Originally Posted by TreeLife View Post
Remove this shit off of MPGH, even if the file is not physically infected, this still does "bad" things to your PC/NETWORK.
shut up noob this is a bypasser ur just jealous that mines is better than ur c+p pickles
no, this detours protected>AllowLua(); so you can use lua_openscript_cl without sv_allowcslua u derp
Quote Originally Posted by D3M0L1T10N View Post
no, this detours protected>AllowLua(); so you can use lua_openscript_cl without sv_allowcslua u derp
What part of the code does that then? I don't see anything that does that.
Posts 1–15 of 16 · Page 1 of 2
This thread is closed for replies.

Tags for this Thread

None

Talk with us