Planet
navi homePPSaboutscreenshotsdownloaddevelopmentforum

source: code/branches/gamestate/data/lua/LuaStateInit.lua @ 6806

Last change on this file since 6806 was 6661, checked in by rgrieder, 15 years ago

Fixed Lua stack trace output if Debugger could not be started.

  • Property svn:eol-style set to native
File size: 3.7 KB
Line 
1-- Note: luaState is a pointer to the LuaState instance that created this lua state
2
3-- Redirect print to the C++ print function
4original_print = print
5print = function(s)
6  luaState:luaPrint(s)
7end
8
9-- Create function to log text like COUT, but always prints a line!
10logMessage = function(level, message)
11  luaState:luaLog(level, message)
12end
13cout = logMessage
14
15-- Redirect dofile in order to load with the resource manager
16original_dofile = dofile
17dofile = function(filename)
18  luaState:doFile(filename)
19  -- Required because if the file returns a table, it cannot be passed through the C++ function
20  return LuaStateReturnValue -- C-injected global variable
21end
22doFile = dofile
23
24-- Create includeFile function that preparses the file according
25-- to a function provided to the LuaState constructor (in C++)
26include = function(filename)
27  luaState:includeFile(filename)
28  -- Required because if the file returns a table, it cannot be passed through the C++ function
29  return LuaStateReturnValue -- C-injected global variable
30end
31
32-- Replace require function with almost similar behaviour
33-- The loaded modules are then stored with their names (where name has no .lua extension)
34-- Furthermore the ".lua" extension is appended to the moduleName parameter when looking for the file
35original_require = require
36_REQUIREDNAME = ""
37LuaStateReturnValue = true
38require = function(moduleName)
39  if not luaState:fileExists(moduleName .. ".lua") then
40    logMessage(2, "Warning: Lua function require() could not find file '" .. moduleName .. ".lua' ")
41    return nil
42  end
43  if not _LOADED then
44    _LOADED = {}
45  end
46  if _LOADED[moduleName] == nil then
47    -- save old value
48    local _REQUIREDNAME_OLD = _REQUIREDNAME
49    _REQUIREDNAME = moduleName
50    luaState:doFile(moduleName .. ".lua")
51    -- LuaStateReturnValue is required because if the file returns a table,
52    -- it cannot be passed through the C++ function
53    if LuaStateReturnValue == nil then -- C-injected global variable
54        LuaStateReturnValue = true
55    end
56    _LOADED[moduleName] = LuaStateReturnValue -- This entry must never be nil
57    -- restore old value
58    _REQUIREDNAME = _REQUIREDNAME_OLD
59  end
60  return _LOADED[moduleName]
61end
62
63
64-- Include command line debugger for lua 5.1
65-- Note: It doesn't work if the IOConsole was started. Then we replace pause() with a warning
66if _VERSION ~= "Lua 5.0"  and not luaState:usingIOConsole() then
67  require("Debugger")
68else
69  -- Fallback pause function
70  pause = function()
71    logMessage(2, [["Warning: debug() called in Lua, but Debugger is not active.
72Do you have the IOConsole disabled and are you using Lua version 5.1?"]])
73  end
74end
75
76-- General error handler that gets called whenever an error happens at runtime
77errorHandler = function(err)
78  -- Display the error message
79  if type(err) == "string" then
80    logMessage(1, "Lua runtime error: "..err)
81  end
82
83  -- Start debugger if possible
84  if _LOADED and _LOADED["Debugger"] ~= nil then
85    pause()
86  else
87    -- Fallback: print stack trace
88    logMessage(1, debug.traceback(2))
89  end
90  return err -- Hello Lua debugger user! Please type 'set 2' to get to the
91             -- actual position in the stack where the error occurred
92end
93
94
95-- Convenience function for console commands
96orxonox.execute = function(command)
97  orxonox.CommandExecutor:execute(command)
98end
99
100-- Convenience function for config values
101orxonox.getConfig = function(section, entry)
102  return orxonox.SettingsConfigFile:getInstance():getConfig(section, entry)
103end
104orxonox.config = function(section, entry, value)
105  return orxonox.SettingsConfigFile:getInstance():config(section, entry, value)
106end
107orxonox.tconfig = function(section, entry, value)
108  return orxonox.SettingsConfigFile:getInstance():tconfig(section, entry, value)
109end
Note: See TracBrowser for help on using the repository browser.