mirror of
https://github.com/danieleteti/delphimvcframework.git
synced 2024-11-18 01:05:54 +01:00
36 lines
1.2 KiB
Lua
36 lines
1.2 KiB
Lua
|
-------------------------------------------------------------------------------
|
||
|
-- Sends the logging information through a socket using luasocket
|
||
|
--
|
||
|
-- @author Thiago Costa Ponte (thiago@ideais.com.br)
|
||
|
--
|
||
|
-- @copyright 2004-2011 Kepler Project
|
||
|
--
|
||
|
-------------------------------------------------------------------------------
|
||
|
|
||
|
require"logging"
|
||
|
local socket = require"socket"
|
||
|
|
||
|
function logging.socket(address, port, logPattern)
|
||
|
|
||
|
return logging.new( function(self, level, message)
|
||
|
local s = logging.prepareLogMsg(logPattern, os.date(), level, message)
|
||
|
|
||
|
local socket, err = socket.connect(address, port)
|
||
|
if not socket then
|
||
|
return nil, err
|
||
|
end
|
||
|
|
||
|
local cond, err = socket:send(s)
|
||
|
if not cond then
|
||
|
return nil, err
|
||
|
end
|
||
|
socket:close()
|
||
|
|
||
|
return true
|
||
|
end
|
||
|
)
|
||
|
end
|
||
|
|
||
|
return logging.socket
|
||
|
|