Fix content type header for error pages
[MonkeyD.git] / qa / __MACROS
blob5e0352fef67516efeed1827aaac12ce9c4d359de
1 # ----------------------------------------------------------------------------
2 # INIT: Common client-initialization
3 # ----------------------------------------------------------------------------
4 BLOCK INIT
5 _LOG_LEVEL $TEST_LOG_LEVEL
6 END
9 # ----------------------------------------------------------------------------
10 # FMT_DATE: Format given time in seconds to RFC 1123 format
11 # Param 1: time in seconds
12 # Param 2: where to store result (variable-name)
14 # (note: httest' STRFTIME works with msec instead of sec)
15 # ----------------------------------------------------------------------------
16 BLOCK FMT_DATE
17 _OP $1 MUL 1000 aux
18 _STRFTIME $aux "%a, %d %b %Y %H:%M:%S GMT" $2
19 END
22 # ----------------------------------------------------------------------------
23 # TESTDOC_GETSIZE: Get TEST_DOC's file size & store it in TEST_DOC_LEN variable
24 # ----------------------------------------------------------------------------
25 BLOCK TESTDOC_GETSIZE
26 _MATCH EXEC "(.*)" TEST_DOC_LEN
27 _SH #!/bin/bash
28 _SH stat -c %s $DOC_ROOT/$TEST_DOC
29 _SH END
30 END
33 # ----------------------------------------------------------------------------
34 # TESTDOC_GETEPOCH: Get TEST_DOC's Epoch time & store it in TEST_DOC_EPOCH
35 # variable
36 # ----------------------------------------------------------------------------
37 BLOCK TESTDOC_GETEPOCH
38 _MATCH EXEC "(.*)" TEST_DOC_EPOCH
39 _SH #!/bin/bash
40 _SH stat -c %Y $DOC_ROOT/$TEST_DOC
41 _SH END
42 END
45 # ----------------------------------------------------------------------------
46 # TESTDOC_GETDATE: Get TEST_DOC's date & store it in TEST_DOC_HTTPDATE variable
47 # ----------------------------------------------------------------------------
48 BLOCK TESTDOC_GETDATE
49 _CALL TESTDOC_GETEPOCH
50 _CALL FMT_DATE $TEST_DOC_EPOCH TEST_DOC_HTTPDATE
51 END