1 --[[--

2 request.set_allowed_json_request_slots(

3 slot_idents -- list of names of slots which can be requested in JSON format

4 )

5

6 This function enables JSON requests. The given list of names of slots selects, which slots may be requestd in JSON format (without layout).

7

8 --]]--

9

10 function request.set_allowed_json_request_slots(slot_idents)

11 if cgi then -- do nothing, when being in interactive mode

12 local hash = {}

13 for idx, slot_ident in ipairs(slot_idents) do

14 hash[slot_ident] = true

15 end

16 if cgi.params["_webmcp_json_slots[]"] then

17 for idx, slot_ident in ipairs(cgi.params["_webmcp_json_slots[]"]) do

18 if not hash[slot_ident] then

19 error('Requesting slot "' .. slot_ident .. '" is forbidden.')

20 end

21 end

22 end

23 request._json_requests_allowed = true

24 end

25 end