Mercurial > hg > nginx-tests

comparison js_ngx.t @ 1611:dbeb4c896f7e

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Tests: added js tests for ngx object.
author Dmitry Volyntsev <xeioex@nginx.com>
date Tue, 17 Nov 2020 13:33:48 +0000
parents
children 4eb2a82dd9b5
comparison
equal deleted inserted replaced
1610:bad6aa24ec10 1611:dbeb4c896f7e
1 #!/usr/bin/perl
2
3 # (C) Dmitry Volyntsev
4 # (C) Nginx, Inc.
5
6 # Tests for http njs module, ngx object.
7
8 ###############################################################################
9
10 use warnings;
11 use strict;
12
13 use Test::More;
14
15 BEGIN { use FindBin; chdir($FindBin::Bin); }
16
17 use lib 'lib';
18 use Test::Nginx;
19
20 ###############################################################################
21
22 select STDERR; $| = 1;
23 select STDOUT; $| = 1;
24
25 my $t = Test::Nginx->new()->has(qw/http/)
26 ->write_file_expand('nginx.conf', <<'EOF');
27
28 %%TEST_GLOBALS%%
29
30 daemon off;
31
32 events {
33 }
34
35 http {
36 %%TEST_GLOBALS_HTTP%%
37
38 js_import test.js;
39
40 server {
41 listen 127.0.0.1:8080;
42 server_name localhost;
43
44 location /log {
45 js_content test.log;
46 }
47 }
48 }
49
50 EOF
51
52 $t->write_file('test.js', <<EOF);
53 function level(r) {
54 switch (r.args.level) {
55 case 'INFO': return ngx.INFO;
56 case 'WARN': return ngx.WARN;
57 case 'ERR': return ngx.ERR;
58 default:
59 throw Error(`Unknown log level:"\${r.args.level}"`);
60 }
61 }
62
63 function log(r) {
64 ngx.log(level(r), `ngx.log:\${r.args.text}`);
65 r.return(200);
66 }
67
68 export default {log};
69
70 EOF
71
72 $t->try_run('no njs ngx')->plan(3);
73
74 ###############################################################################
75
76 http_get('/log?level=INFO&text=FOO');
77 http_get('/log?level=WARN&text=BAR');
78 http_get('/log?level=ERR&text=BAZ');
79
80 $t->stop();
81
82 like($t->read_file('error.log'), qr/\[info\].*ngx.log:FOO/, 'ngx.log info');
83 like($t->read_file('error.log'), qr/\[warn\].*ngx.log:BAR/, 'ngx.log warn');
84 like($t->read_file('error.log'), qr/\[error\].*ngx.log:BAZ/, 'ngx.log err');
85
86 ###############################################################################