--[[ <HCExtension>@name Test - SL@author truefriend-cz@version 1@event BeforeViewInMonitor</HCExtension> ]]function BeforeViewInMonitor() hc.call_me_for('AnswerHeaderReceived') hc.call_me_for('BeforeRequestHeaderSend')endfunction BeforeRequestHeaderSend() hc.put_msg(1, 'Test OK: 2'..var) --no show varendfunction AnswerHeaderReceived() var = re.find(hc.answer_header, [[^Content-Length:\s(.+)\r\n]], 1) -- i do not used local var for sharing variable between functions (and small bug, i do not set quality regex for show size only.. show size and other strings in header) hc.put_msg(1, 'Test OK: 1'..var)end
--[[ <HCExtension>@name Test 0.lua@author truefriend-cz@event BeforeViewInMonitor</HCExtension> ]]function BeforeViewInMonitor() hc.call_me_for('BeforeAnswerHeaderSend', 'get_info_header_size_code_num')endfunction get_info_header_size_code_num() local _,_,x = string.find(hc.answer_header, '[cC]ontent%-[lL]ength: *(%d+)') local size_code = tonumber(x) local size_code_num = (size_code)/1000 local numdecimal = '2' local mult = 10^(numdecimal or 0) local size_code_num = math.floor(size_code_num * mult) / mult hc.set_global('size_code_num', size_code_num)end
--[[ <HCExtension>@name Test 1.lua@author truefriend-cz@event RequestHeaderReceived</HCExtension> ]]function RequestHeaderReceived() local size_code_num = hc.get_global('size_code_num') hc.put_msg(1, 'Test OK: 1: '..size_code_num)end
--[[ <HCExtension>@name Test 1a@author truefriend-cz@event RequestHeaderReceived/Test</HCExtension> ]]function Test() local x = re.find(hc.answer_header, [[^Content-Length: (.+)]]) --format from documentation local size_code = tonumber(x) --with and without this line some problem hc.put_to_log ('AAA = '..size_code)end
--[[ <HCExtension>@name Test 0.lua@author truefriend-cz@event AnswerHeaderReceived/Test0</HCExtension> ]]function Test0() var_nul = 'OK transfer from 0.lua' hc.put_to_log ('Result: '..var_one)end
--[[ <HCExtension>@name Test 1.lua@author truefriend-cz@event AnswerHeaderReceived/Test1</HCExtension> ]]function Test1() hc.put_msg(1, 'Result: '..var_nul) var_nul = 'OK transfer from 1.lua'end