X-Git-Url: https://gerrit.automotivelinux.org/gerrit/gitweb?a=blobdiff_plain;f=src%2Fsession.c;h=d08ca759b3b130833e444da26fbdb7f7b57ee768;hb=1e8edd92a04281bddc86fff3db5b407943504aed;hp=11f535b3f87a9d543f91a460a234c63cd068cda0;hpb=83ce3b29a598141f8f28afde655beb07ec78c312;p=src%2Fapp-framework-binder.git diff --git a/src/session.c b/src/session.c index 11f535b3..d08ca759 100644 --- a/src/session.c +++ b/src/session.c @@ -2,22 +2,17 @@ * Copyright (C) 2015 "IoT.bzh" * Author "Fulup Ar Foll" * - * This program is free software: you can redistribute it and/or modify - * it under the terms of the GNU General Public License as published by - * the Free Software Foundation, either version 3 of the License, or - * (at your option) any later version. + * Licensed under the Apache License, Version 2.0 (the "License"); + * you may not use this file except in compliance with the License. + * You may obtain a copy of the License at * - * This program is distributed in the hope that it will be useful, - * but WITHOUT ANY WARRANTY; without even the implied warranty of - * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the - * GNU General Public License for more details. - * - * You should have received a copy of the GNU General Public License - * along with this program. If not, see . - * - * Reference: - * http://stackoverflow.com/questions/25971505/how-to-delete-element-from-hsearch + * http://www.apache.org/licenses/LICENSE-2.0 * + * Unless required by applicable law or agreed to in writing, software + * distributed under the License is distributed on an "AS IS" BASIS, + * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. + * See the License for the specific language governing permissions and + * limitations under the License. */ #define _GNU_SOURCE @@ -28,12 +23,39 @@ #include #include #include +#include + +#include -#include "afb-apis.h" #include "session.h" +#include "verbose.h" #define NOW (time(NULL)) +struct client_value +{ + void *value; + void (*free_value)(void*); +}; + +struct afb_event_listener_list +{ + struct afb_event_listener_list *next; + struct afb_event_listener listener; + int refcount; +}; + +struct AFB_clientCtx +{ + unsigned refcount; + time_t expiration; // expiration time of the token + time_t access; + char uuid[37]; // long term authentication of remote client + char token[37]; // short term authentication of remote client + struct client_value *values; + struct afb_event_listener_list *listeners; +}; + // Session UUID are store in a simple array [for 10 sessions this should be enough] static struct { pthread_mutex_t mutex; // declare a mutex to protect hash table @@ -51,27 +73,23 @@ static void ctxUuidFreeCB (struct AFB_clientCtx *client) int idx; // If application add a handle let's free it now - assert (client->contexts != NULL); + assert (client->values != NULL); // Free client handle with a standard Free function, with app callback or ignore it - for (idx=0; idx < sessions.apicount; idx ++) { - if (client->contexts[idx] != NULL) { - afb_apis_free_context(idx, client->contexts[idx]); - client->contexts[idx] = NULL; - } - } + for (idx=0; idx < sessions.apicount; idx ++) + ctxClientValueSet(client, idx, NULL, NULL); } // Create a new store in RAM, not that is too small it will be automatically extended -void ctxStoreInit (int nbSession, int timeout, const char *initok) +void ctxStoreInit (int max_session_count, int timeout, const char *initok, int context_count) { // let's create as store as hashtable does not have any - sessions.store = calloc (1 + (unsigned)nbSession, sizeof(struct AFB_clientCtx)); - sessions.max = nbSession; + sessions.store = calloc (1 + (unsigned)max_session_count, sizeof(struct AFB_clientCtx)); + sessions.max = max_session_count; sessions.timeout = timeout; - sessions.apicount = afb_apis_count(); - if (strlen(initok) >= 37) { - fprintf(stderr, "Error: initial token '%s' too long (max length 36)", initok); + sessions.apicount = context_count; + if (strlen(initok) >= sizeof(sessions.store[0]->token)) { + ERROR("initial token '%s' too long (max length 36)", initok); exit(1); } sessions.initok = initok; @@ -109,7 +127,7 @@ static int ctxStoreDel (struct AFB_clientCtx *client) for (idx=0; idx < sessions.max; idx++) { if (sessions.store[idx] == client) { - sessions.store[idx]=NULL; + sessions.store[idx] = NULL; sessions.count--; status = 1; goto deleted; @@ -128,13 +146,11 @@ static int ctxStoreAdd (struct AFB_clientCtx *client) assert (client != NULL); - //fprintf (stderr, "ctxStoreAdd request uuid=%s count=%d\n", client->uuid, sessions.count); - pthread_mutex_lock(&sessions.mutex); for (idx=0; idx < sessions.max; idx++) { if (NULL == sessions.store[idx]) { - sessions.store[idx]= client; + sessions.store[idx] = client; sessions.count++; status = 1; goto added; @@ -168,65 +184,80 @@ static void ctxStoreCleanUp (time_t now) } // This function will return exiting client context or newly created client context -struct AFB_clientCtx *ctxClientGetForUuid (const char *uuid) +struct AFB_clientCtx *ctxClientGetSession (const char *uuid, int *created) { uuid_t newuuid; struct AFB_clientCtx *clientCtx; time_t now; - /* search for an existing one not too old */ + /* cleaning */ now = NOW; ctxStoreCleanUp (now); - clientCtx = uuid != NULL ? ctxStoreSearch (uuid) : NULL; - if (clientCtx) { - clientCtx->refcount++; - return clientCtx; - } - - /* mimic old behaviour */ - if (sessions.initok == NULL) - return NULL; - /* check the uuid if given */ - if (uuid != NULL && 1 + strlen(uuid) >= sizeof clientCtx->uuid) - return NULL; + /* search for an existing one not too old */ + if (uuid != NULL) { + if (strlen(uuid) >= sizeof clientCtx->uuid) { + errno = EINVAL; + goto error; + } + clientCtx = ctxStoreSearch(uuid); + if (clientCtx != NULL) { + *created = 0; + goto found; + } + } /* returns a new one */ - clientCtx = calloc(1, sizeof(struct AFB_clientCtx)); // init NULL clientContext - if (clientCtx != NULL) { - clientCtx->contexts = calloc ((unsigned)sessions.apicount, sizeof (void*)); - if (clientCtx->contexts != NULL) { - /* generate the uuid */ - if (uuid == NULL) { - uuid_generate(newuuid); - uuid_unparse_lower(newuuid, clientCtx->uuid); - } else { - strcpy(clientCtx->uuid, uuid); - } - strcpy(clientCtx->token, sessions.initok); - clientCtx->expiration = now + sessions.timeout; - clientCtx->refcount = 1; - if (ctxStoreAdd (clientCtx)) - return clientCtx; - free(clientCtx->contexts); - } - free(clientCtx); + clientCtx = calloc(1, sizeof(struct AFB_clientCtx) + ((unsigned)sessions.apicount * sizeof(*clientCtx->values))); + if (clientCtx == NULL) { + errno = ENOMEM; + goto error; + } + clientCtx->values = (void*)(clientCtx + 1); + + /* generate the uuid */ + if (uuid == NULL) { + uuid_generate(newuuid); + uuid_unparse_lower(newuuid, clientCtx->uuid); + } else { + strcpy(clientCtx->uuid, uuid); + } + + /* init the token */ + strcpy(clientCtx->token, sessions.initok); + clientCtx->expiration = now + sessions.timeout; + if (!ctxStoreAdd (clientCtx)) { + errno = ENOMEM; + goto error2; } + *created = 1; + +found: + clientCtx->access = now; + clientCtx->refcount++; + return clientCtx; + +error2: + free(clientCtx); +error: return NULL; } -struct AFB_clientCtx *ctxClientGet(struct AFB_clientCtx *clientCtx) +struct AFB_clientCtx *ctxClientAddRef(struct AFB_clientCtx *clientCtx) { if (clientCtx != NULL) clientCtx->refcount++; return clientCtx; } -void ctxClientPut(struct AFB_clientCtx *clientCtx) +void ctxClientUnref(struct AFB_clientCtx *clientCtx) { if (clientCtx != NULL) { assert(clientCtx->refcount != 0); --clientCtx->refcount; + if (clientCtx->refcount == 0 && clientCtx->uuid[0] == 0) { + ctxStoreDel (clientCtx); + } } } @@ -234,12 +265,8 @@ void ctxClientPut(struct AFB_clientCtx *clientCtx) void ctxClientClose (struct AFB_clientCtx *clientCtx) { assert(clientCtx != NULL); - if (clientCtx->created) { - clientCtx->created = 0; - ctxUuidFreeCB (clientCtx); - } - if (clientCtx->refcount == 0) - ctxStoreDel (clientCtx); + ctxUuidFreeCB (clientCtx); + clientCtx->uuid[0] = 0; } // Sample Generic Ping Debug API @@ -252,13 +279,10 @@ int ctxTokenCheck (struct AFB_clientCtx *clientCtx, const char *token) if (ctxStoreTooOld (clientCtx, NOW)) return 0; - if (!clientCtx->token[0] || 0 == strcmp (token, clientCtx->token)) { - clientCtx->created = 1; /* creates by default */ - return 1; - } + if (clientCtx->token[0] && strcmp (token, clientCtx->token) != 0) + return 0; - // Token is not valid let move level of assurance to zero and free attached client handle - return 0; + return 1; } // generate a new token and update client context @@ -276,3 +300,119 @@ void ctxTokenNew (struct AFB_clientCtx *clientCtx) clientCtx->expiration = NOW + sessions.timeout; } +int ctxClientEventListenerAdd(struct AFB_clientCtx *clientCtx, struct afb_event_listener listener) +{ + struct afb_event_listener_list *iter, **prv; + + prv = &clientCtx->listeners; + for (;;) { + iter = *prv; + if (iter == NULL) { + iter = calloc(1, sizeof *iter); + if (iter == NULL) { + errno = ENOMEM; + return -1; + } + iter->listener = listener; + iter->refcount = 1; + *prv = iter; + return 0; + } + if (iter->listener.itf == listener.itf && iter->listener.closure == listener.closure) { + iter->refcount++; + return 0; + } + prv = &iter->next; + } +} + +void ctxClientEventListenerRemove(struct AFB_clientCtx *clientCtx, struct afb_event_listener listener) +{ + struct afb_event_listener_list *iter, **prv; + + prv = &clientCtx->listeners; + for (;;) { + iter = *prv; + if (iter == NULL) + return; + if (iter->listener.itf == listener.itf && iter->listener.closure == listener.closure) { + if (!--iter->refcount) { + *prv = iter->next; + free(iter); + } + return; + } + prv = &iter->next; + } +} + +static int send(struct AFB_clientCtx *clientCtx, const char *event, struct json_object *object) +{ + struct afb_event_listener_list *iter; + int result; + + result = 0; + iter = clientCtx->listeners; + while (iter != NULL) { + iter->listener.itf->send(iter->listener.closure, event, json_object_get(object)); + result++; + iter = iter->next; + } + + return result; +} + +int ctxClientEventSend(struct AFB_clientCtx *clientCtx, const char *event, struct json_object *object) +{ + long idx; + time_t now; + int result; + + if (clientCtx != NULL) + result = send(clientCtx, event, object); + else { + result = 0; + now = NOW; + for (idx=0; idx < sessions.max; idx++) { + clientCtx = sessions.store[idx]; + if (clientCtx != NULL && !ctxStoreTooOld(clientCtx, now)) { + clientCtx = ctxClientAddRef(clientCtx); + result += send(clientCtx, event, object); + ctxClientUnref(clientCtx); + } + } + } + return result; +} + +const char *ctxClientGetUuid (struct AFB_clientCtx *clientCtx) +{ + assert(clientCtx != NULL); + return clientCtx->uuid; +} + +const char *ctxClientGetToken (struct AFB_clientCtx *clientCtx) +{ + assert(clientCtx != NULL); + return clientCtx->token; +} + +void *ctxClientValueGet(struct AFB_clientCtx *clientCtx, int index) +{ + assert(clientCtx != NULL); + assert(index >= 0); + assert(index < sessions.apicount); + return clientCtx->values[index].value; +} + +void ctxClientValueSet(struct AFB_clientCtx *clientCtx, int index, void *value, void (*free_value)(void*)) +{ + struct client_value prev; + assert(clientCtx != NULL); + assert(index >= 0); + assert(index < sessions.apicount); + prev = clientCtx->values[index]; + clientCtx->values[index] = (struct client_value){.value = value, .free_value = free_value}; + if (prev.value != NULL && prev.free_value != NULL) + prev.free_value(prev.value); +}