diff options
author | Romain Forlot <romain.forlot@iot.bzh> | 2017-12-04 23:24:46 +0100 |
---|---|---|
committer | Romain Forlot <romain.forlot@iot.bzh> | 2017-12-14 11:00:49 +0100 |
commit | c2d3a33fdb8243ecb6c973c29ea2b834a33e330f (patch) | |
tree | 1dcdffc54b0e7037392bca3d371158acdcb298d7 /conf.d/project/lua.d/init-daemon-04-oncall.lua | |
parent | 23a7237f32f09d362fa64c36575589b6e392a053 (diff) |
Rename lua scripts to comply api name.
Change-Id: I9e1e5cf7315d54531e010c352187da271b1dee5c
Signed-off-by: Romain Forlot <romain.forlot@iot.bzh>
Diffstat (limited to 'conf.d/project/lua.d/init-daemon-04-oncall.lua')
-rw-r--r-- | conf.d/project/lua.d/init-daemon-04-oncall.lua | 122 |
1 files changed, 0 insertions, 122 deletions
diff --git a/conf.d/project/lua.d/init-daemon-04-oncall.lua b/conf.d/project/lua.d/init-daemon-04-oncall.lua deleted file mode 100644 index 71df908..0000000 --- a/conf.d/project/lua.d/init-daemon-04-oncall.lua +++ /dev/null @@ -1,122 +0,0 @@ ---[[ - Copyright (C) 2016 "IoT.bzh" - Author Fulup Ar Foll <fulup@iot.bzh> - - Licensed under the Apache License, Version 2.0 (the "License"); - you may not use this file except in compliance with the License. - You may obtain a copy of the License at - - http://www.apache.org/licenses/LICENSE-2.0 - - Unless required by applicable law or agreed to in writing, software - distributed under the License is distributed on an "AS IS" BASIS, - WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. - See the License for the specific language governing permissions and - limitations under the License. - - - Provide sample LUA routines to be used with AGL control "lua_docall" API ---]] - ---global counter to keep track of calls -_count=0 - - -_interval={ - {"km/h",1}, --the "1" should never really get used but - {"mi/h",0.62137119223733}, - {"m/s",0.27777777777778}, -} - -_result = {} -_positions={} -for i=1,3 do - _positions[_interval[i][1]]=i -end - ---function _Unit_Converter(value, sourceunits, targetunits) -function _Unit_Converter(source, args, event) - local value = event["value"] - local sourceunits = args["from"] - local targetunits = args["to"] - local sourcei, targeti = _positions[sourceunits], _positions[targetunits] - assert(sourcei and targeti) - - print(event['timestamp']) - - if sourcei<targeti then - - local base=1 - for i=sourcei+1,targeti do - base=base*_interval[i][2] - end - - event["value"] = value/base - - lua2c["luaSet"](source, event) - - elseif sourcei>targeti then - - local base=1 - for i=targeti+1,sourcei do - base=base*interval[i][2] - end - - event["value"] = value/base - - lua2c["luaSet"](source, event) - - else - print("No conversion") - end -end - --- Display receive arguments and echo them to caller -function _Simple_Echo_Args (source, args, event) - _count=_count+1 - AFB:notice("LUA OnCall Echo Args count=%d args=%s event=%s", count, args, event) - - print ("--inlua-- source=", Dump_Table(source)) - print ("--inlua-- args=", Dump_Table(args)) - print ("--inlua-- event=", Dump_Table(event)) - - local response={ - ["count"]=_count, - ["args"]=args, - } - - -- fulup Embdeded table ToeDone AFB:success (request, response) - -- AFB:success (request, response) -end - -local function Test_Async_CB (request, result, context) - response={ - ["result"]=result, - ["context"]=context, - } - - AFB:notice ("Test_Async_CB result=%s context=%s", result, context) - AFB:success (request, response) -end - -function _Test_Call_Async (request, args) - local context={ - ["value1"]="abcd", - ["value2"]=1234 - } - - AFB:notice ("Test_Call_Async args=%s cb=Test_Async_CB", args) - AFB:service("monitor","ping", "Test_Async_CB", context) -end - -function _Simple_Monitor_Call (request, args) - - AFB:notice ("_Simple_Server_Call args=%s", args) - local err, result= AFB:servsync ("monitor","get", args) - if (err) then - AFB:fail ("AFB:service_call_sync fail"); - else - AFB:success (request, result["response"]) - end -end - |