webmcp
annotate framework/cgi-bin/webmcp-wrapper.lua @ 179:461e5353ffb1
Limit max depth of JSON documents to 50 (until a better implementation of json.export is available)
| author | jbe |
|---|---|
| date | Sat Aug 02 00:38:25 2014 +0200 (2014-08-02) |
| parents | 9fdfb27f8e67 |
| children |
| rev | line source |
|---|---|
| jbe/bsw@0 | 1 #!/usr/bin/env lua |
| jbe/bsw@0 | 2 |
| jbe/bsw@0 | 3 local func, errmsg = loadfile('webmcp.lua') |
| jbe/bsw@0 | 4 |
| jbe/bsw@0 | 5 if func then |
| jbe/bsw@0 | 6 local result |
| jbe/bsw@0 | 7 result, errmsg = pcall(func) |
| jbe/bsw@0 | 8 if result then |
| jbe/bsw@0 | 9 errmsg = nil |
| jbe/bsw@0 | 10 end |
| jbe/bsw@0 | 11 end |
| jbe/bsw@0 | 12 |
| jbe/bsw@0 | 13 if errmsg and not (cgi and cgi.data_sent) then |
| jbe/bsw@0 | 14 print('Status: 500 Internal Server Error') |
| jbe/bsw@0 | 15 print('Content-type: text/plain') |
| jbe/bsw@0 | 16 print() |
| jbe/bsw@0 | 17 print('500 Internal Server Error') |
| jbe/bsw@0 | 18 print() |
| jbe/bsw@0 | 19 print(errmsg) |
| jbe/bsw@0 | 20 print() |
| jbe/bsw@0 | 21 print('(caught by webmcp-wrapper.lua)') |
| jbe/bsw@0 | 22 os.exit(1) |
| jbe/bsw@0 | 23 end |