{"name": "pushresult", "code": "__int64 __fastcall pushresult ( __int64 @@a1@@ , int @@a2@@ , const char * @@a3@@ ) { __int64 result ; char * v4 ; int @@errnum@@ ; @@errnum@@ = * _errno_location ( ) ; if ( @@a2@@ ) { lua_pushboolean ( @@a1@@ , Number L ) ; result = Number L ; } else { lua_pushnil ( @@a1@@ ) ; v4 = strerror ( @@errnum@@ ) ; if ( @@a3@@ ) lua_pushfstring ( @@a1@@ , String , @@a3@@ , v4 ) ; else lua_pushfstring ( @@a1@@ , String , v4 ) ; lua_pushinteger ( @@a1@@ , @@errnum@@ ) ; result = Number L ; } return result ; }", "source": [{"n": "a3", "t": {"T": 3, "t": "const char"}, "location": "r16"}, {"n": "a1", "t": {"T": 1, "n": "__int64", "s": 8}, "location": "r56"}, {"n": "a2", "t": {"T": 1, "n": "int", "s": 4}, "location": "r64"}, {"n": "errnum", "t": {"T": 1, "n": "int", "s": 4}, "location": "s4"}]}
{"name": "io_pclose", "code": "__int64 __fastcall io_pclose ( __int64 @@a1@@ ) { * ( _QWORD * ) luaL_checkudata ( @@a1@@ , Number L , String ) = Number L ; return pushresult ( @@a1@@ , Number , Number L ) ; }", "source": [{"n": "a1", "t": {"T": 1, "n": "__int64", "s": 8}, "location": "r56"}]} {"name": "io_fclose", "code": "__int64 __fastcall io_fclose ( __int64 @@a1@@ ) { int @@v1@@ ; FILE * * @@v3@@ ; @@v3@@ = ( FILE * * ) luaL_checkudata ( @@a1@@ , Number L , String ) ; @@v1@@ = fclose ( * @@v3@@ ) ; * @@v3@@ = Number L ; return pushresult ( @@a1@@ , @@v1@@ == Number , Number L ) ; }", "source": [{"n": "a1", "t": {"T": 1, "n": "__int64", "s": 8}, "location": "r56"}, {"n": "v1", "t": {"T": 1, "n": "int", "s": 4}, "location": "r8"}, {"n": "v3", "t": {"T": 3, "t": "FILE *"}, "location": "s8"}]} {"name": "io_open", "code": "__int64 __fastcall io_open ( __int64 @@a1@@ ) { __int64 @@result@@ ; _QWORD * @@v2@@ ; char * @@modes@@ ; char * @@filename@@ ; @@filename@@ = ( char * ) luaL_checklstring ( @@a1@@ , Number L , Number L ) ; @@modes@@ = ( char * ) luaL_optlstring ( @@a1@@ , Number L , String , Number L ) ; @@v2@@ = newfile ( @@a1@@ ) ; * @@v2@@ = fopen ( @@filename@@ , @@modes@@ ) ; if ( * @@v2@@ ) @@result@@ = Number L ; else @@result@@ = pushresult ( @@a1@@ , Number , @@filename@@ ) ; return @@result@@ ; }", "source": [{"n": "a1", "t": {"T": 1, "n": "__int64", "s": 8}, "location": "r56"}, {"n": "result", "t": {"T": 1, "n": "__int64", "s": 8}, "location": "r8"}, {"n": "modes", "t": {"T": 3, "t": "char"}, "location": "s16"}, {"n": "v2", "t": {"T": 3, "t": "_QWORD"}, "location": "s24"}, {"n": "filename", "t": {"T": 3, "t": "char"}, "location": "s8"}]} {"name": "io_popen", "code": "__int64 __fastcall io_popen ( __int64 @@a1@@ ) { __int64 @@result@@ ; _QWORD * @@v2@@ ; const char * @@v3@@ ; @@v3@@ = ( const char * ) luaL_checklstring ( @@a1@@ , Number L , Number L ) ; luaL_optlstring ( @@a1@@ , Number L , String , Number L ) ; @@v2@@ = newfile ( @@a1@@ ) ; luaL_error ( @@a1@@ , String ) ; * @@v2@@ = Number L ; if ( * @@v2@@ ) @@result@@ = Number L ; else @@result@@ = pushresult ( @@a1@@ , Number , @@v3@@ ) ; return @@result@@ ; }", "source": [{"n": "a1", "t": {"T": 1, "n": "__int64", "s": 8}, "location": "r56"}, {"n": "result", "t": {"T": 1, "n": "__int64", "s": 8}, "location": "r8"}, {"n": "v2", "t": {"T": 3, "t": "_QWORD"}, "location": "s24"}, {"n": "v3", "t": {"T": 3, "t": "const char"}, "location": "s8"}]} {"name": "io_tmpfile", "code": "__int64 __fastcall io_tmpfile ( __int64 @@a1@@ ) { __int64 @@result@@ ; _QWORD * @@v2@@ ; @@v2@@ = newfile ( @@a1@@ ) ; * @@v2@@ = tmpfile ( ) ; if ( * @@v2@@ ) @@result@@ = Number L ; else @@result@@ = pushresult ( @@a1@@ , Number , Number L ) ; return @@result@@ ; }", "source": [{"n": "a1", "t": {"T": 1, "n": "__int64", "s": 8}, "location": "r56"}, {"n": "result", "t": {"T": 1, "n": "__int64", "s": 8}, "location": "r8"}, {"n": "v2", "t": {"T": 3, "t": "_QWORD"}, "location": "s8"}]} {"name": "read_line", "code": "_BOOL8 __fastcall read_line ( __int64 @@a1@@ , FILE * @@a2@@ ) { __int64 @@v3@@ [ Number ] ; size_t @@v4@@ ; char * @@s@@ ; luaL_buffinit ( @@a1@@ , @@v3@@ ) ; while ( Number ) { @@s@@ = ( char * ) luaL_prepbuffer ( @@v3@@ ) ; if ( ! fgets ( @@s@@ , Number , @@a2@@ ) ) { luaL_pushresult ( @@v3@@ ) ; return lua_objlen ( @@a1@@ , Number ) != Number ; } @@v4@@ = strlen ( @@s@@ ) ; if ( @@v4@@ ) { if ( @@s@@ [ @@v4@@ - Number ] == Number ) break ; } @@v3@@ [ Number ] += @@v4@@ ; } @@v3@@ [ Number ] += @@v4@@ - Number ; luaL_pushresult ( @@v3@@ ) ; return Number L ; }", "source": [{"n": "a1", "t": {"T": 1, "n": "__int64", "s": 8}, "location": "r56"}, {"n": "a2", "t": {"T": 3, "t": "FILE"}, "location": "r64"}, {"n": "v4", "t": {"T": 1, "n": "size_t", "s": 8}, "location": "s16"}, {"n": "s", "t": {"T": 3, "t": "char"}, "location": "s8"}, {"n": "v3", "t": {"T": 2, "n": 1028, "s": 8, "t": "__int64"}, "location": "s8240"}]} {"name": "read_chars", "code": "_BOOL8 __fastcall read_chars ( __int64 @@a1@@ , FILE * @@a2@@ , size_t @@a3@@ ) { __int64 @@v5@@ [ Number ] ; size_t @@v6@@ ; void * @@ptr@@ ; size_t @@n@@ ; luaL_buffinit ( @@a1@@ , @@v5@@ ) ; @@n@@ = Number ; do { @@ptr@@ = ( void * ) luaL_prepbuffer ( @@v5@@ ) ; if ( @@n@@ > @@a3@@ ) @@n@@ = @@a3@@ ; @@v6@@ = fread ( @@ptr@@ , Number , @@n@@ , @@a2@@ ) ; @@v5@@ [ Number ] += @@v6@@ ; @@a3@@ -= @@v6@@ ; } while ( @@a3@@ && @@v6@@ == @@n@@ ) ; luaL_pushresult ( @@v5@@ ) ; return ! @@a3@@ || lua_objlen ( @@a1@@ , Number ) ; }", "source": [{"n": "a3", "t": {"T": 1, "n": "size_t", "s": 8}, "location": "r16"}, {"n": "a1", "t": {"T": 1, "n": "__int64", "s": 8}, "location": "r56"}, {"n": "a2", "t": {"T": 3, "t": "FILE"}, "location": "r64"}, {"n": "ptr", "t": {"T": 3, "t": "void"}, "location": "s16"}, {"n": "v6", "t": {"T": 1, "n": "size_t", "s": 8}, "location": "s24"}, {"n": "n", "t": {"T": 1, "n": "size_t", "s": 8}, "location": "s8"}, {"n": "v5", "t": {"T": 2, "n": 1027, "s": 8, "t": "__int64"}, "location": "s8240"}]} {"name": "g_read", "code": "__int64 __fastcall g_read ( __int64 @@a1@@ , FILE * @@a2@@ , unsigned int @@a3@@ ) { _BOOL4 v3 ; int v4 ; int v6 ; size_t @@v8@@ ; _BYTE * @@v9@@ ; unsigned int @@i@@ ; int @@v11@@ ; int @@v12@@ ; @@v12@@ = lua_gettop ( @@a1@@ ) - Number ; clearerr ( @@a2@@ ) ; if ( @@v12@@ ) { luaL_checkstack ( @@a1@@ , ( unsigned int ) ( @@v12@@ + Number ) , String ) ; @@v11@@ = Number ; for ( @@i@@ = @@a3@@ ; ; ++ @@i@@ ) { v6 = @@v12@@ -- ; if ( ! v6 || ! @@v11@@ ) break ; if ( ( unsigned int ) lua_type ( @@a1@@ , @@i@@ ) == Number ) { @@v8@@ = lua_tointeger ( @@a1@@ , @@i@@ ) ; if ( @@v8@@ ) v3 = read_chars ( @@a1@@ , @@a2@@ , @@v8@@ ) ; else v3 = test_eof ( @@a1@@ , @@a2@@ ) ; @@v11@@ = v3 ; } else { @@v9@@ = ( _BYTE * ) lua_tolstring ( @@a1@@ , @@i@@ , Number L ) ; if ( ! @@v9@@ || * @@v9@@ != Number ) luaL_argerror ( @@a1@@ , @@i@@ , String ) ; v4 = ( char ) @@v9@@ [ Number ] ; if ( v4 == Number ) { @@v11@@ = read_number ( @@a1@@ , ( __int64 ) @@a2@@ ) ; } else { if ( v4 > Number ) return luaL_argerror ( @@a1@@ , @@i@@ , String ) ; if ( v4 == Number ) { read_chars ( @@a1@@ , @@a2@@ , Number ) ; @@v11@@ = Number ; } else { if ( v4 != Number ) return luaL_argerror ( @@a1@@ , @@i@@ , String ) ; @@v11@@ = read_line ( @@a1@@ , @@a2@@ ) ; } } } } } else { @@v11@@ = read_line ( @@a1@@ , @@a2@@ ) ; @@i@@ = @@a3@@ + Number ; } if ( ferror ( @@a2@@ ) ) return pushresult ( @@a1@@ , Number , Number L ) ; if ( ! @@v11@@ ) { lua_settop ( @@a1@@ , Number L ) ; lua_pushnil ( @@a1@@ ) ; } return @@i@@ - @@a3@@ ; }", "source": [{"n": "a3", "t": {"T": 1, "n": "unsigned int", "s": 4}, "location": "r16"}, {"n": "a1", "t": {"T": 1, "n": "__int64", "s": 8}, "location": "r56"}, {"n": "a2", "t": {"T": 3, "t": "FILE"}, "location": "r64"}, {"n": "i", "t": {"T": 1, "n": "unsigned int", "s": 4}, "location": "s12"}, {"n": "v9", "t": {"T": 3, "t": "_BYTE"}, "location": "s24"}, {"n": "v8", "t": {"T": 1, "n": "size_t", "s": 8}, "location": "s32"}, {"n": "v12", "t": {"T": 1, "n": "int", "s": 4}, "location": "s4"}, {"n": "v11", "t": {"T": 1, "n": "int", "s": 4}, "location": "s8"}]} {"name": "g_write", "code": "__int64 __fastcall g_write ( __int64 @@a1@@ , FILE * @@a2@@ , unsigned int @@a3@@ , double @@a4@@ ) { _BOOL4 v4 ; size_t v5 ; _BOOL4 v6 ; size_t @@n@@ ; void * @@ptr@@ ; int @@v12@@ ; int @@v13@@ ; @@v13@@ = lua_gettop ( @@a1@@ ) - Number ; @@v12@@ = Number ; while ( @@v13@@ -- ) { if ( ( unsigned int ) lua_type ( @@a1@@ , @@a3@@ ) == Number ) { v4 = Number ; if ( @@v12@@ ) { lua_tonumber ( @@a1@@ , @@a3@@ ) ; if ( fprintf ( @@a2@@ , String , @@a4@@ ) > Number ) v4 = Number ; } @@v12@@ = v4 ; } else { @@ptr@@ = ( void * ) luaL_checklstring ( @@a1@@ , @@a3@@ , & @@n@@ ) ; v6 = Number ; if ( @@v12@@ ) { v5 = fwrite ( @@ptr@@ , Number , @@n@@ , @@a2@@ ) ; if ( v5 == @@n@@ ) v6 = Number ; } @@v12@@ = v6 ; } ++ @@a3@@ ; } return pushresult ( @@a1@@ , @@v12@@ , Number L ) ; }", "source": [{"n": "a3", "t": {"T": 1, "n": "unsigned int", "s": 4}, "location": "r16"}, {"n": "a4", "t": {"T": 1, "n": "double", "s": 8}, "location": "r496"}, {"n": "a1", "t": {"T": 1, "n": "__int64", "s": 8}, "location": "r56"}, {"n": "a2", "t": {"T": 3, "t": "FILE"}, "location": "r64"}, {"n": "ptr", "t": {"T": 3, "t": "void"}, "location": "s16"}, {"n": "n", "t": {"T": 1, "n": "size_t", "s": 8}, "location": "s24"}, {"n": "v13", "t": {"T": 1, "n": "int", "s": 4}, "location": "s4"}, {"n": "v12", "t": {"T": 1, "n": "int", "s": 4}, "location": "s8"}]} {"name": "f_seek", "code": "__int64 __fastcall f_seek ( __int64 @@a1@@ ) { __int64 @@v2@@ ; __int64 @@off@@ ; int @@v4@@ ; FILE * @@stream@@ ; @@stream@@ = ( FILE * ) tofile ( @@a1@@ ) ; @@v4@@ = luaL_checkoption ( @@a1@@ , Number L , String , modenames_3632 ) ; @@off@@ = luaL_optinteger ( @@a1@@ , Number L , Number L ) ; if ( fseek ( @@stream@@ , @@off@@ , mode_3631 [ @@v4@@ ] ) ) return pushresult ( @@a1@@ , Number , Number L ) ; @@v2@@ = ftell ( @@stream@@ ) ; lua_pushinteger ( @@a1@@ , @@v2@@ ) ; return Number L ; }", "source": [{"n": "a1", "t": {"T": 1, "n": "__int64", "s": 8}, "location": "r56"}, {"n": "v2", "t": {"T": 1, "n": "__int64", "s": 8}, "location": "r8"}, {"n": "v4", "t": {"T": 1, "n": "int", "s": 4}, "location": "s12"}, {"n": "off", "t": {"T": 1, "n": "__int64", "s": 8}, "location": "s24"}, {"n": "stream", "t": {"T": 3, "t": "FILE"}, "location": "s8"}]} {"name": "f_setvbuf", "code": "__int64 __fastcall f_setvbuf ( __int64 @@a1@@ ) { int @@v2@@ ; __int64 @@n@@ ; int @@v4@@ ; FILE * @@stream@@ ; @@stream@@ = ( FILE * ) tofile ( @@a1@@ ) ; @@v4@@ = luaL_checkoption ( @@a1@@ , Number L , Number L , & modenames_3640 ) ; @@n@@ = luaL_optinteger ( @@a1@@ , Number L , Number ) ; @@v2@@ = setvbuf ( @@stream@@ , Number L , * ( & mode_3639 + @@v4@@ ) , @@n@@ ) ; return pushresult ( @@a1@@ , @@v2@@ == Number , Number L ) ; }", "source": [{"n": "a1", "t": {"T": 1, "n": "__int64", "s": 8}, "location": "r56"}, {"n": "v4", "t": {"T": 1, "n": "int", "s": 4}, "location": "s12"}, {"n": "n", "t": {"T": 1, "n": "__int64", "s": 8}, "location": "s24"}, {"n": "v2", "t": {"T": 1, "n": "int", "s": 4}, "location": "s28"}, {"n": "stream", "t": {"T": 3, "t": "FILE"}, "location": "s8"}]} {"name": "io_flush", "code": "__int64 __fastcall io_flush ( __int64 @@a1@@ ) { FILE * v1 ; int v2 ; v1 = ( FILE * ) getiofile ( @@a1@@ , Number ) ; v2 = fflush ( v1 ) ; return pushresult ( @@a1@@ , v2 == Number , Number L ) ; }", "source": [{"n": "a1", "t": {"T": 1, "n": "__int64", "s": 8}, "location": "r56"}]} {"name": "f_flush", "code": "__int64 __fastcall f_flush ( __int64 @@a1@@ ) { FILE * v1 ; int v2 ; v1 = ( FILE * ) tofile ( @@a1@@ ) ; v2 = fflush ( v1 ) ; return pushresult ( @@a1@@ , v2 == Number , Number L ) ; }", "source": [{"n": "a1", "t": {"T": 1, "n": "__int64", "s": 8}, "location": "r56"}]}