f264a51b382f19766c4081557a5869ac08673247
[radsecproxy.git] / lib / tests / test-udp.c
1 #include <stdlib.h>
2 #include <cgreen/cgreen.h>
3 #include <freeradius/libradius.h>
4 #include "radsec/radsec.h"
5 #include "radsec/request.h"
6 #include "udp.h"
7
8 #define true 1                  /* FIXME: Bug report cgreen.  */
9 #define false 0
10
11 #define FREERADIUS_DICT "/usr/share/freeradius/dictionary"
12
13 static void
14 authenticate (struct rs_connection *conn, const char *user, const char *pw)
15 {
16   struct rs_request *req;
17   struct rs_packet *msg, *resp;
18
19   assert_true (rs_request_create (conn, &req) == 0);
20   assert_true (rs_packet_create_authn_request (conn, &msg, user, pw) == 0);
21   rs_request_add_reqpkt (req, msg);
22   assert_true (rs_request_send (req, &resp) == 0);
23   //printf ("%s\n", rs_err_msg (rs_err_conn_pop (conn), 1));
24   assert_true (rs_packet_frpkt (resp)->code == PW_AUTHENTICATION_ACK);
25
26   rs_request_destroy (req);
27 }
28
29 static void
30 send_more_than_one_msg_in_one_packet (struct rs_connection *conn)
31 {
32   struct rs_packet *msg0, *msg1;
33
34   assert_true (rs_packet_create_authn_request (conn, &msg0, NULL, NULL) == 0);
35   assert_true (rs_packet_create_authn_request (conn, &msg1, NULL, NULL) == 0);
36   assert_true (rs_packet_send (msg0, NULL) == 0);
37   assert_true (rs_packet_send (msg1, NULL) == 0);
38 }
39
40 static void
41 send_large_packet (struct rs_connection *conn)
42 {
43   struct rs_packet *msg0;
44   struct rs_attr *attr_x;
45   char *buf;
46   int f;
47
48   buf = malloc (4096);
49   assert_true (buf != NULL);
50   memset (buf, 0, 4096);
51
52   assert_true (rs_packet_create (conn, &msg0) == 0);
53   /* 16 chunks --> heap corruption in evbuffer_drain detected by free() */
54   for (f = 0; f < 15; f++)
55     {
56       memset (buf, 'a' + f, 252);
57       rs_attr_create (conn, &attr_x, "EAP-Message", buf);
58       rs_packet_add_attr (msg0, attr_x);
59     }
60   assert_true (rs_packet_send (msg0, NULL) == 0);
61 }
62
63 /* ************************************************************ */
64 static struct setup {
65   char *config_file;
66   char *config_name;
67   char *username;
68   char *pw;
69 } setup;
70
71 static void
72 test_auth ()
73 {
74   struct rs_context *ctx;
75   struct rs_connection *conn;
76
77   setup.config_file = "test.conf";
78   setup.config_name = "test-udp-auth";
79   setup.username = "molgan";
80   setup.pw = "password";
81
82   assert_true (rs_context_create (&ctx, FREERADIUS_DICT) == 0);
83   assert_true (rs_context_read_config (ctx, setup.config_file) == 0);
84   assert_true (rs_conn_create (ctx, &conn, setup.config_name) == 0);
85
86   authenticate (conn, setup.username, setup.pw);
87
88   rs_conn_destroy (conn);
89   rs_context_destroy (ctx);
90 }
91
92 static ssize_t
93 test_buffering_cb (const uint8_t *buf, ssize_t len)
94 {
95   /* "Exactly one RADIUS packet is encapsulated in the UDP Data field"
96      [RFC 2865]*/
97 #if 0
98   hd (buf, len);
99 #endif
100   assert_true (len >= 20);
101   assert_true (len <= 4096);
102   assert_true ((buf[2] << 8) +  buf[3] == len);
103   return len;
104 }
105
106 static void
107 test_buffering ()
108 {
109   struct rs_context *ctx;
110   struct rs_connection *conn;
111   struct timeval timeout;
112   struct polldata *polldata;
113
114   assert_true (rs_context_create (&ctx, FREERADIUS_DICT) == 0);
115   assert_true (rs_context_read_config (ctx, "test.conf") == 0);
116   assert_true (rs_conn_create (ctx, &conn, "test-udp-buffering") == 0);
117
118   timeout.tv_sec = 0;
119   timeout.tv_usec = 150000;
120   polldata = udp_server ("11820", &timeout, test_buffering_cb);
121   assert_true (polldata != NULL);
122
123   send_more_than_one_msg_in_one_packet (conn);
124   assert_true (udp_poll (polldata) > 0);
125   assert_true (udp_poll (polldata) > 0);
126
127   send_large_packet (conn);
128   assert_true (udp_poll (polldata) > 0);
129
130   udp_free_polldata (polldata);
131   rs_conn_destroy (conn);
132   rs_context_destroy (ctx);
133 }
134
135 /* ************************************************************ */
136 static void
137 setup_auth (TestSuite *ts)
138 {
139   add_test (ts, test_auth);
140 }
141
142 static void
143 setup_buffering (TestSuite *ts)
144 {
145   add_test (ts, test_buffering);
146 }
147
148 int
149 main (int argc, char *argv[])
150 {
151   TestSuite *ts = create_test_suite ();
152
153   setup_auth (ts);
154   setup_buffering (ts);
155
156   if (argc > 1)
157     return run_single_test (ts, argv[1], create_text_reporter ());
158   else
159     return run_test_suite (ts, create_text_reporter ());
160 }