"Thou shalt not follow the NULL pointer, for chaos and madness await
[libradsec.git] / lib / examples / client-blocking.c
1 /* RADIUS client doing blocking i/o.  */
2
3 #include <stdio.h>
4 #include <string.h>
5 #include <unistd.h>
6 #include <stdlib.h>
7 #include <event2/event.h>
8 #include <freeradius/libradius.h>
9 #include <radsec/radsec.h>
10 #if defined(USE_REQUEST_OBJECT)
11 #include <radsec/request.h>
12 #endif
13
14 #define SECRET "sikrit"
15 #define USER_NAME "bob"
16 #define USER_PW "hemligt"
17
18 struct rs_error *
19 blocking_client (const char *av1, const char *av2)
20 {
21   struct rs_context *h;
22   struct rs_connection *conn;
23   struct rs_packet *req, *resp;
24
25   if (rs_context_create (&h, "/usr/share/freeradius/dictionary"))
26     return NULL;
27
28 #if !defined (USE_CONFIG_FILE)
29   {
30     struct rs_peer *server;
31
32     if (rs_conn_create (h, &conn, NULL))
33       return rs_err_conn_pop (conn);
34     rs_conn_set_type (conn, RS_CONN_TYPE_UDP);
35     if (rs_server_create (conn, &server))
36       return rs_err_conn_pop (conn);
37     if (rs_server_set_address (server, av1, av2))
38       return rs_err_conn_pop (conn);
39     rs_server_set_timeout (server, 1);
40     rs_server_set_tries (server, 3);
41     if (rs_server_set_secret (server, SECRET))
42       return rs_err_conn_pop (conn);
43   }
44 #else
45   if (rs_context_read_config (h, av1))
46     return rs_err_ctx_pop (h);
47   if (rs_conn_create (h, &conn, av2))
48     return rs_err_conn_pop (conn);
49 #endif  /* USE_CONFIG_FILE */
50
51   if (rs_packet_create_acc_request (conn, &req, USER_NAME, USER_PW))
52     return rs_err_conn_pop (conn);
53
54 #if !defined(USE_REQUEST_OBJECT)
55   if (rs_packet_send (req, NULL))
56     {
57       rs_packet_destroy (req);
58       return rs_err_conn_pop (conn);
59     }
60   if (rs_conn_receive_packet (conn, req, &resp))
61     {
62       rs_packet_destroy (req);
63       return rs_err_conn_pop (conn);
64     }
65   rs_packet_destroy (req);
66 #else
67   {
68     struct rs_request *request;
69
70     if (rs_request_create (conn, &request))
71       return rs_err_conn_pop (conn);
72     if (rs_request_send (request, req, &resp))
73       return rs_err_conn_pop (conn);
74     rs_request_destroy (request);
75   }
76 #endif /* !defined(USE_REQUEST_OBJECT) */
77
78   if (resp)
79     {
80       RADIUS_PACKET *fr_pkt;
81       VALUE_PAIR *fr_vp;
82
83       fr_pkt = rs_packet_frpkt (resp);
84       fr_vp = fr_pkt->vps;              /* FIXME: Is there an accessor?  */
85       vp_printlist(stdout, fr_vp);
86       rs_packet_destroy (resp);
87     }
88
89   rs_conn_destroy (conn);
90   rs_context_destroy (h);
91   return NULL;
92 }
93
94 int
95 main (int argc, char *argv[])
96 {
97   struct rs_error *err;
98
99   err = blocking_client (argv[1], argv[2]);
100   if (err)
101     {
102       fprintf (stderr, "%s\n", rs_err_msg (err, 0));
103       return rs_err_code (err, 1);
104     }
105   return 0;
106 }