-
Notifications
You must be signed in to change notification settings - Fork 2
/
ewok.hrl
67 lines (53 loc) · 1.94 KB
/
ewok.hrl
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
%% File: ewok.hrl
%% Version: 1.0.0 beta
%% Author: Steve Davis <steve@simulacity.com>
%% Updated: January 24, 2010
%% Description: Definitions and records that may be used in applications
-define(CONFIG_FILE_EXT, <<".config">>). % unused...
-define(ARCHIVE_FILE_EXT, <<".ez">>).
-define(ESP_FILE_EXT, <<".esp">>).
-define(LOG_FILE_EXT, <<".log">>).
-define(LOG_ARCHIVE_EXT, <<".tar.gz">>).
%% Debugging use only. Remove all usage instances at release.
%% Do not use io:format directly in the source code as this macro
%% will make finding and removing spurious io: messages harder.
%% Commenting out this macro will allow us to find
%% all development console messages in the code very easily.
-define(DEBUG, true).
-ifdef(DEBUG).
-define(TTY(Term), io:format(user, "[DEBUG] ~p~n", [Term])).
-else.
-define(TTY(Term), ok).
-endif.
%% TODO: Remove. Only semi-valid. There just *has* to be a better way :(
% Currently used in: ewok_file, ewok_logging_srv, ewok_text, ewok_xml, esp, esp_html
-define(is_string(S), (is_list(S) andalso S =/= [] andalso is_integer(hd(S)))).
%% "API record" used in deployment srv
-record(mimetype, {ext, media}).
%% "API record" used in deployment srv
-record(route, {path, handler, realm, roles = []}).
%% http request record
-record(http_request, {
ip,
method,
version,
path,
headers,
cookies,
realm,
params,
content
}).
%%
-record(http_response, {status, headers=[], content=[], close=false}).
%% Ewok Session Management
-record(http_session, {key, ip, user, data = [], started, expires, ttl, notify}).
%%
-record(wsdl, {id, path, ops=any}).
%%
-record(task, {function, start=now, repeat=once, terminate=infinity}).
%% This record is not (currently) used; It is more a statement of intent and a
%% possible semantic approach to "strings" that more closely observes genuine
%% engineering principles and standards. You can safely ignore this record for now.
-record(text, {bin, charset = utf8, lang = 'us-en'}).
%% end %%