Commit fc787ae1dc6f3e25ba88d3eb5586e53436b406a7
1 parent
03f67901
New :
- File 'web/CXM_web_dump.anubis' : contains all functions for dumping datas for web as Web_arg, HTTP_header, HTTP_Info. Modifications : - Move : function 'dump_web_arg_values' is now located in 'web/CXM_web_dump.anubis'.
Showing
2 changed files
with
69 additions
and
14 deletions
Show diff stats
calexium_lib/web/CXM_common.anubis
| ... | ... | @@ -197,17 +197,3 @@ public define List(String) |
| 197 | 197 | } |
| 198 | 198 | . |
| 199 | 199 | |
| 200 | -public define String | |
| 201 | - dump_web_arg_values | |
| 202 | - ( | |
| 203 | - List(Web_arg) l, | |
| 204 | - ) = | |
| 205 | - if l is | |
| 206 | - { | |
| 207 | - [ ] then "\n", | |
| 208 | - [h . t] then if h is | |
| 209 | - { | |
| 210 | - web_arg(n,v) then "\n["+n+"] = '"+v+"'" + dump_web_arg_values(t), | |
| 211 | - upload(n,v,tfn) then "\n["+n+"] = '"+v+"'" + dump_web_arg_values(t) | |
| 212 | - } | |
| 213 | - }. | ... | ... |
| 1 | +/* | |
| 2 | + * Created by PyramIDE. | |
| 3 | + * User: Jeremy | |
| 4 | + * Date: 09/08/2012 | |
| 5 | + * Time: 16:14 | |
| 6 | + * | |
| 7 | + * To change this template use Tools | Options | Coding | Edit Standard Headers. | |
| 8 | + */ | |
| 9 | + | |
| 10 | +read tools/basis.anubis | |
| 11 | +read system/string.anubis | |
| 12 | +read system/convert.anubis | |
| 13 | +read calexium_lib/web/CXM_common.anubis | |
| 14 | +read calexium_lib/web/CXM_multihost_http_server.anubis | |
| 15 | + | |
| 16 | +/* Provides a dump of Web_arg List */ | |
| 17 | +public define String | |
| 18 | + dump_web_arg_values | |
| 19 | + ( | |
| 20 | + List(Web_arg) l, | |
| 21 | + ) | |
| 22 | + = | |
| 23 | + if l is | |
| 24 | + { | |
| 25 | + [ ] then "\n", | |
| 26 | + [h . t] then if h is | |
| 27 | + { | |
| 28 | + web_arg(n,v) then "\n["+n+"] = '"+v+"'" + dump_web_arg_values(t), | |
| 29 | + upload(n,v,tfn) then "\n["+n+"] = '"+v+"'" + dump_web_arg_values(t) | |
| 30 | + } | |
| 31 | + } | |
| 32 | + . | |
| 33 | + | |
| 34 | +/* Provides a dump of HTTP_Header List */ | |
| 35 | +public define String | |
| 36 | + dump_http_headers | |
| 37 | + ( | |
| 38 | + List(HTTP_header) l, | |
| 39 | + ) | |
| 40 | + = | |
| 41 | + if l is | |
| 42 | + { | |
| 43 | + [ ] then "", // no need to add \n => previous call has made it | |
| 44 | + [h . t] then "`\t" + h.name + " : " + h.value + "\n" + dump_http_headers(t) | |
| 45 | + } | |
| 46 | + . | |
| 47 | + | |
| 48 | +/* Provides a dump of a HTTP_Info */ | |
| 49 | +public define String | |
| 50 | + dump_http_info | |
| 51 | + ( | |
| 52 | + HTTP_Info http_info, | |
| 53 | + ) | |
| 54 | + = | |
| 55 | + /* | |
| 56 | + * Word32 ip_address, // IP address of the client | |
| 57 | + String hostname, // hostname requested by the client | |
| 58 | + String uri, // URI requested by the client | |
| 59 | + List(HTTP_header) http_headers, // HTTP headers sent by the client | |
| 60 | + Bool is_https, | |
| 61 | + One -> String generate_trust_ticket // may be used against denial of | |
| 62 | + */ | |
| 63 | + "IP Address : " + http_info.ip_address + "\n" | |
| 64 | + + "Hostname : " + http_info.hostname + "\n" | |
| 65 | + + "URI : " + http_info.uri + "\n" | |
| 66 | + + "HTTP Headers : " + dump_http_headers(http_info.http_headers) // no need to add \n => dump_http_headers does it | |
| 67 | + + "Is HTTPS : " + to_String(http_info.is_https) + "\n" | |
| 68 | + . | |
| 69 | + | ... | ... |