tr_constraint_set_get_match_strings
[trust_router.git] / tid / tidc.c
index e7ab977..7f675d3 100644 (file)
  */
 
 #include <stdio.h>
-#include <stdlib.h>
 #include <jansson.h>
 
-#include <gsscon.h>
-#include <tr_dh.h>
-#include <tpq.h>
+#include <trust_router/tr_dh.h>
+#include <trust_router/tid.h>
 #include <tr_msg.h>
-
-/* char tmp_key[32] = 
-  {0x00, 0x01, 0x02, 0x03, 0x04, 0x05, 0x06, 0x07, 
-   0x08, 0x09, 0x0A, 0x0B, 0x0C, 0x0D, 0x0E, 0x0F,
-   0x10, 0x11, 0x12, 0x13, 0x14, 0x15, 0x16, 0x17,
-   0x19, 0x19, 0x1A, 0x1B, 0x1C, 0x1D, 0x1E, 0x1F};
-*/
+#include <gsscon.h>
 
 int tmp_len = 32;
 
-TPQC_INSTANCE *tpqc_create ()
+TIDC_INSTANCE *tidc_create ()
 {
-  TPQC_INSTANCE *tpqc = NULL;
+  TIDC_INSTANCE *tidc = NULL;
 
-  if (tpqc = malloc(sizeof(TPQC_INSTANCE))) 
-    memset(tpqc, 0, sizeof(TPQC_INSTANCE));
+  if (tidc = malloc(sizeof(TIDC_INSTANCE))) 
+    memset(tidc, 0, sizeof(TIDC_INSTANCE));
   else
     return NULL;
 
-  if (NULL == (tpqc->priv_dh = tr_create_dh_params(NULL, 0))) {
-    free (tpqc);
-    return NULL;
-  }
-
-  fprintf(stderr, "TPQC DH Parameters:\n");
-  DHparams_print_fp(stdout, tpqc->priv_dh);
-  fprintf(stderr, "\n");
-
-  return tpqc;
+  return tidc;
 }
 
-void tpqc_destroy (TPQC_INSTANCE *tpqc)
+void tidc_destroy (TIDC_INSTANCE *tidc)
 {
-  if (tpqc)
-    free(tpqc);
+  if (tidc)
+    free(tidc);
 }
 
-int tpqc_open_connection (TPQC_INSTANCE *tpqc, 
+int tidc_open_connection (TIDC_INSTANCE *tidc, 
                          char *server,
+                         unsigned int port,
                          gss_ctx_id_t *gssctx)
 {
   int err = 0;
   int conn = -1;
+  unsigned int use_port = 0;
 
-  err = gsscon_connect(server, TPQ_PORT, &conn);
+  if (0 == port)
+    use_port = TID_PORT;
+  else 
+    use_port = port;
 
-  if (!err)
-    err = gsscon_active_authenticate(conn, NULL, "trustquery", gssctx);
+  fprintf(stderr, "tidc_open_connection: Opening GSS connection to %s:%u.", server, use_port);  
+  err = gsscon_connect(server, use_port, "trustidentity", &conn, gssctx);
 
   if (!err)
     return conn;
@@ -95,92 +83,121 @@ int tpqc_open_connection (TPQC_INSTANCE *tpqc,
     return -1;
 }
 
-int tpqc_send_request (TPQC_INSTANCE *tpqc, 
+int tidc_send_request (TIDC_INSTANCE *tidc, 
                       int conn, 
                       gss_ctx_id_t gssctx,
                       char *rp_realm,
                       char *realm, 
-                      char *coi,
-                      TPQC_RESP_FUNC *resp_handler,
+                      char *comm,
+                      TIDC_RESP_FUNC *resp_handler,
                       void *cookie)
 
 {
-  json_t *jreq;
-  int err;
-  char *req_buf;
-  char *resp_buf;
-  size_t resp_buflen = 0;
-  TR_MSG *msg;
-  TPQ_REQ *tpq_req;
+  TID_REQ *tid_req = NULL;
+
+  /* Create and populate a TID req structure */
+  if (!(tid_req = malloc(sizeof(TID_REQ))))
+    return -1;
+
+  memset(tid_req, 0, sizeof(TID_REQ));
 
-  /* Create and populate a TPQ msg structure */
-  if ((!(msg = malloc(sizeof(TR_MSG)))) ||
-      (!(tpq_req = malloc(sizeof(TPQ_REQ)))))
+  tid_req->conn = conn;
+  tid_req->gssctx = gssctx;
+
+  if ((NULL == (tid_req->rp_realm = tr_new_name(rp_realm))) ||
+      (NULL == (tid_req->realm = tr_new_name(realm))) ||
+      (NULL == (tid_req->comm = tr_new_name(comm)))) {
+    fprintf (stderr, "tidc_send_request: Error duplicating names.\n");
     return -1;
+  }
 
-  memset(tpq_req, 0, sizeof(tpq_req));
+  tid_req->tidc_dh = tidc->client_dh;
+
+  return (tidc_fwd_request(tidc, tid_req, resp_handler, cookie));
+}
 
-  msg->msg_type = TPQ_REQUEST;
+int tidc_fwd_request (TIDC_INSTANCE *tidc, 
+                     TID_REQ *tid_req, 
+                     TIDC_RESP_FUNC *resp_handler,
+                     void *cookie)
 
-  msg->tpq_req = tpq_req;
+{
+  char *req_buf = NULL;
+  char *resp_buf = NULL;
+  size_t resp_buflen = 0;
+  TR_MSG *msg = NULL;
+  TR_MSG *resp_msg = NULL;
+  int err;
 
-  tpq_req->conn = conn;
+  /* Create and populate a TID msg structure */
+  if (!(msg = malloc(sizeof(TR_MSG))))
+    return -1;
 
-  /* TBD -- error handling */
-  tpq_req->rp_realm = tr_new_name(rp_realm);
-  tpq_req->realm = tr_new_name(realm);
-  tpq_req->coi = tr_new_name(coi);
+  msg->msg_type = TID_REQUEST;
+  msg->tid_req = tid_req;
 
-  tpq_req->tpqc_dh = tpqc->priv_dh;
+  /* store the response function and cookie */
+  // tid_req->resp_func = resp_handler;
+  // tid_req->cookie = cookie;
   
-  tpq_req->resp_func = resp_handler;
-  tpq_req->cookie = cookie;
 
   /* Encode the request into a json string */
   if (!(req_buf = tr_msg_encode(msg))) {
-    printf("Error encoding TPQ request.\n");
+    fprintf(stderr, "tidc_fwd_request: Error encoding TID request.\n");
     return -1;
   }
 
-  printf ("Sending TPQ request:\n");
-  printf ("%s\n", req_buf);
+  fprintf (stderr, "tidc_fwd_request: Sending TID request:\n");
+  fprintf (stderr, "%s\n", req_buf);
 
   /* Send the request over the connection */
-  if (err = gsscon_write_encrypted_token (conn, gssctx, req_buf, 
+  if (err = gsscon_write_encrypted_token (tid_req->conn, tid_req->gssctx, req_buf, 
                                          strlen(req_buf))) {
-    fprintf(stderr, "Error sending request over connection.\n");
+    fprintf(stderr, "tidc_fwd_request: Error sending request over connection.\n");
     return -1;
   }
 
-  /* TBD -- should queue request on instance, resps read in separate thread */
-  /* Read the response from the connection */
+  /* TBD -- queue request on instance, read resps in separate thread */
 
-  if (err = gsscon_read_encrypted_token(conn, gssctx, &resp_buf, &resp_buflen)) {
+  /* Read the response from the connection */
+  /* TBD -- timeout? */
+  if (err = gsscon_read_encrypted_token(tid_req->conn, tid_req->gssctx, &resp_buf, &resp_buflen)) {
     if (resp_buf)
       free(resp_buf);
     return -1;
   }
 
-  fprintf(stdout, "Response Received, %d bytes.\n", resp_buflen);
+  fprintf(stdout, "tidc_fwd_request: Response Received (%u bytes).\n", (unsigned) resp_buflen);
+  fprintf(stdout, "%s\n", resp_buf);
 
-  /* Parse response -- TBD */
+  if (NULL == (resp_msg = tr_msg_decode(resp_buf, resp_buflen))) {
+    fprintf(stderr, "tidc_fwd_request: Error decoding response.\n");
+    return -1;
+  }
 
-  /* Call the caller's response function */
-  (*resp_handler)(tpqc, NULL, cookie);
+  /* TBD -- Check if this is actually a valid response */
+  if (!resp_msg->tid_resp) {
+    fprintf(stderr, "tidc_fwd_request: Error, no response in the response!\n");
+    return -1;
+  }
+  
+  if (resp_handler)
+    /* Call the caller's response function */
+    (*resp_handler)(tidc, tid_req, resp_msg->tid_resp, cookie);
+  else
+    fprintf(stderr, "tidc_fwd_request: NULL response function.\n");
 
   if (msg)
     free(msg);
-  if (tpq_req)
-    free(tpq_req);
+  if (tid_req)
+    tid_req_free(tid_req);
   if (req_buf)
     free(req_buf);
   if (resp_buf)
     free(resp_buf);
 
+  /* TBD -- free the decoded response */
+
   return 0;
 }
 
-
-
-
-