linse/sics
0
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

- add MskeSICSFunc

Browse Source 
- changed return value of AddSICSHdbPar et al.
This commit is contained in:
zolliker
2008-05-15 07:43:05 +00:00
parent 2b558550fb
commit b03ddddd8f
7 changed files with 68 additions and 92 deletions
Download Patch File Download Diff File Expand all files Collapse all files

65
scriptcontext.c
View File

@@ -687,61 +687,28 @@ static int SctMakeController(SConnection *con, SicsInterp *sics,
controller->devser = DevMake(con, argc - 2, argv + 2);
if (!controller->devser) return 0;
cmd = MakeSICSHdbPar("poll", usMugger,
MakeHdbFunc((voidFunc*)SctPollCmd));
assert(cmd);
AddHipadabaChild(controller->node, cmd, con);
par = MakeSICSHdbPar("node", usMugger, MakeHdbText(""));
assert(par);
AddHipadabaChild(cmd, par, con);
cmd = AddSICSHdbPar(controller->node,
"poll", usMugger, MakeSICSFunc(SctPollCmd));
AddSICSHdbPar(cmd, "node", usMugger, MakeHdbText(""));
AddSICSHdbPar(cmd, "interval", usMugger, MakeHdbFloat(5.0));
AddSICSHdbPar(cmd, "prio", usMugger, MakeHdbText("read"));
AddSICSHdbPar(cmd, "action", usMugger, MakeHdbText("read"));
par = MakeSICSHdbPar("interval", usMugger, MakeHdbFloat(5.0));
assert(par);
AddHipadabaChild(cmd, par, con);
par = MakeSICSHdbPar("prio", usMugger, MakeHdbText("read"));
assert(par);
AddHipadabaChild(cmd, par, con);
par = MakeSICSHdbPar("action", usMugger, MakeHdbText("read"));
assert(par);
AddHipadabaChild(cmd, par, con);
cmd = MakeSICSHdbPar("write", usMugger,
MakeHdbFunc((voidFunc*)SctWriteCmd));
assert(cmd);
AddHipadabaChild(controller->node, cmd, con);
par = MakeSICSHdbPar("node", usMugger, MakeHdbText(""));
assert(par);
AddHipadabaChild(cmd, par, con);
cmd = AddSICSHdbPar(controller->node,
"write", usMugger, MakeSICSFunc(SctWriteCmd));
AddSICSHdbPar(cmd, "node", usMugger, MakeHdbText(""));
cmd = MakeSICSHdbPar("queue", usMugger,
MakeHdbFunc((voidFunc*)SctQueueCmd));
assert(cmd);
AddHipadabaChild(controller->node, cmd, con);
cmd = AddSICSHdbPar(controller->node,
"queue", usMugger, MakeSICSFunc(SctQueueCmd));
AddSICSHdbPar(cmd, "node", usMugger, MakeHdbText(""));
AddSICSHdbPar(cmd, "prio", usMugger, MakeHdbText("write"));
AddSICSHdbPar(cmd, "action", usMugger, MakeHdbText("write"));
par = MakeSICSHdbPar("node", usMugger, MakeHdbText(""));
assert(par);
AddHipadabaChild(cmd, par, con);
par = MakeSICSHdbPar("prio", usMugger, MakeHdbText("write"));
assert(par);
AddHipadabaChild(cmd, par, con);
par = MakeSICSHdbPar("action", usMugger, MakeHdbText("write"));
assert(par);
AddHipadabaChild(cmd, par, con);
par = MakeSICSHdbPar("debug", usUser, MakeHdbInt(0));
assert(par);
AddHipadabaChild(controller->node, par, con);
par = AddSICSHdbPar(controller->node, "debug", usUser, MakeHdbInt(0));
cb = MakeHipadabaCallback(SctDebugCallback, controller, NULL);
assert(cb);
AppendHipadabaCallback(par, cb);
if (cb) AppendHipadabaCallback(par, cb);
if (stack == NULL) {
cctx->node = controller->node;