2 * Copyright (c) 2012, JANET(UK)
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
9 * 1. Redistributions of source code must retain the above copyright
10 * notice, this list of conditions and the following disclaimer.
12 * 2. Redistributions in binary form must reproduce the above copyright
13 * notice, this list of conditions and the following disclaimer in the
14 * documentation and/or other materials provided with the distribution.
16 * 3. Neither the name of JANET(UK) nor the names of its contributors
17 * may be used to endorse or promote products derived from this software
18 * without specific prior written permission.
20 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
21 * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
22 * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS
23 * FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE
24 * COPYRIGHT HOLDER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT,
25 * INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
26 * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
27 * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
28 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
29 * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
30 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED
31 * OF THE POSSIBILITY OF SUCH DAMAGE.
40 #include <trust_router/tr_dh.h>
41 #include <trust_router/tid.h>
47 TIDC_INSTANCE *tidc_create ()
49 TIDC_INSTANCE *tidc = NULL;
51 if (tidc = malloc(sizeof(TIDC_INSTANCE)))
52 memset(tidc, 0, sizeof(TIDC_INSTANCE));
59 void tidc_destroy (TIDC_INSTANCE *tidc)
65 TID_REQ *tid_dup_req (TID_REQ *orig_req)
69 if (NULL == (new_req = malloc(sizeof(TID_REQ))))
72 /* Memcpy for flat fields, not valid until names are duped. */
73 memcpy(new_req, orig_req, sizeof(TID_REQ));
75 new_req->rp_realm = tr_dup_name(orig_req->rp_realm);
76 new_req->realm = tr_dup_name(orig_req->realm);
77 new_req->comm = tr_dup_name(orig_req->comm);
78 new_req->orig_coi = tr_dup_name(orig_req->orig_coi);
83 int tidc_open_connection (TIDC_INSTANCE *tidc,
90 err = gsscon_connect(server, TID_PORT, &conn);
93 err = gsscon_active_authenticate(conn, NULL, "trustidentity", gssctx);
101 int tidc_send_request (TIDC_INSTANCE *tidc,
107 TIDC_RESP_FUNC *resp_handler,
111 TID_REQ *tid_req = NULL;
113 /* Create and populate a TID req structure */
114 if (!(tid_req = malloc(sizeof(TID_REQ))))
117 memset(tid_req, 0, sizeof(tid_req));
119 tid_req->conn = conn;
120 tid_req->gssctx = gssctx;
122 if ((NULL == (tid_req->rp_realm = tr_new_name(rp_realm))) ||
123 (NULL == (tid_req->realm = tr_new_name(realm))) ||
124 (NULL == (tid_req->comm = tr_new_name(comm)))) {
125 fprintf (stderr, "tidc_send_request: Error duplicating names.\n");
129 tid_req->tidc_dh = tidc->client_dh;
130 tid_req->resp_func = resp_handler;
131 tid_req->cookie = cookie;
133 return (tidc_fwd_request(tidc, tid_req, resp_handler, cookie));
136 int tidc_fwd_request (TIDC_INSTANCE *tidc,
138 TIDC_RESP_FUNC *resp_handler,
142 char *req_buf = NULL;
143 char *resp_buf = NULL;
144 size_t resp_buflen = 0;
146 TR_MSG *resp_msg = NULL;
149 /* Create and populate a TID msg structure */
150 if (!(msg = malloc(sizeof(TR_MSG))))
153 msg->msg_type = TID_REQUEST;
154 msg->tid_req = tid_req;
156 /* Encode the request into a json string */
157 if (!(req_buf = tr_msg_encode(msg))) {
158 printf("Error encoding TID request.\n");
162 printf ("Sending TID request:\n");
163 printf ("%s\n", req_buf);
165 /* Send the request over the connection */
166 if (err = gsscon_write_encrypted_token (tid_req->conn, tid_req->gssctx, req_buf,
168 fprintf(stderr, "Error sending request over connection.\n");
172 /* TBD -- queue request on instance, read resps in separate thread */
174 /* Read the response from the connection */
175 /* TBD -- timeout? */
176 if (err = gsscon_read_encrypted_token(tid_req->conn, tid_req->gssctx, &resp_buf, &resp_buflen)) {
182 fprintf(stdout, "Response Received (%u bytes).\n", (unsigned) resp_buflen);
183 fprintf(stdout, "%s\n", resp_buf);
185 if (NULL == (resp_msg = tr_msg_decode(resp_buf, resp_buflen))) {
186 fprintf(stderr, "Error decoding response.\n");
190 /* TBD -- Check if this is actually a valid response */
191 if (!resp_msg->tid_resp) {
192 fprintf(stderr, "Error: No response in the response!\n");
196 /* Call the caller's response function */
197 (*tid_req->resp_func)(tidc, tid_req, resp_msg->tid_resp, cookie);
209 /* TBD -- free the decoded response */