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/libradsec.h>
  10
  11 #define SECRET "sikrit"
  12 #define USER_NAME "bob"
  13 #define USER_PW "hemligt"
  14
  15 struct rs_error *
  16 rsx_client (const char *srvname, int srvport)
  17 {
  18   struct rs_handle *h;
  19   struct rs_connection *conn;
  20   struct rs_peer *server;
  21   struct rs_packet *req, *resp;
  22   RADIUS_PACKET *fr_pkt;
  23   VALUE_PAIR *fr_vp;
  24
  25   if (rs_context_create (&h, "/usr/share/freeradius/dictionary"))
  26     return NULL;
  27
  28   if (rs_conn_create (h, &conn))
  29     return rs_conn_err_pop (conn);
  30   if (rs_conn_add_server (conn, &server, RS_CONN_TYPE_UDP, srvname, srvport))
  31     return rs_conn_err_pop (conn);
  32   rs_server_set_timeout (server, 10);
  33   rs_server_set_tries (server, 3);
  34   rs_server_set_secret (server, SECRET);
  35
  36   if (rs_packet_create_acc_request (conn, &req, USER_NAME, USER_PW))
  37     return rs_conn_err_pop (conn);
  38
  39   if (rs_packet_send (req, NULL))
  40     return rs_conn_err_pop (conn);
  41   req = NULL;
  42
  43 #if 0
  44   if (rs_packet_create_acc_request (conn, &req, USER_NAME, USER_PW))
  45     return rs_conn_err_pop (conn);
  46
  47   if (rs_packet_send (conn, req, NULL))
  48     return rs_conn_err_pop (conn);
  49   req = NULL;
  50 #endif
  51
  52   if (rs_conn_receive_packet (conn, &resp))
  53     return rs_conn_err_pop (conn);
  54   fr_pkt = rs_packet_frpkt (resp);
  55   fr_vp = fr_pkt->vps;          /* FIXME: Is there an accessor?  */
  56   vp_printlist(stdout, fr_vp);
  57   rs_packet_destroy (resp);
  58
  59   rs_conn_destroy (conn);
  60   rs_context_destroy (h);
  61   return NULL;
  62 }
  63
  64 int
  65 main (int argc, char *argv[])
  66 {
  67   struct rs_error *err;
  68   char *host;
  69   int port;
  70
  71   host = strsep (argv + 1, ":");
  72   port = atoi (argv[1]);
  73   err = rsx_client (host, port);
  74   if (err)
  75     {
  76       fprintf (stderr, "%s\n", rs_err_msg (err, 0));
  77       return rs_err_code (err, 1);
  78     }
  79   return 0;
  80 }