526 lines
15 KiB
C
526 lines
15 KiB
C
#include <string.h>
|
|
#include <stdlib.h>
|
|
#include <errno.h>
|
|
#include <pthread.h>
|
|
|
|
#include <jansson.h>
|
|
#include <ulfius.h>
|
|
#include <orcania.h>
|
|
|
|
#include <osmocom/core/utils.h>
|
|
#include <osmocom/core/linuxlist.h>
|
|
|
|
#define PREFIX "/api/backend/v1"
|
|
|
|
#include "debug.h"
|
|
#include "rest_api.h"
|
|
#include "slotmap.h"
|
|
#include "rspro_server.h"
|
|
|
|
static json_t *comp_id2json(const struct app_comp_id *comp_id)
|
|
{
|
|
json_t *ret = json_object();
|
|
|
|
static const char *type_names[] = {
|
|
[ComponentType_remsimClient] = "remsimClient",
|
|
[ComponentType_remsimServer] = "remsimServer",
|
|
[ComponentType_remsimBankd] = "remsimBankd"
|
|
};
|
|
|
|
json_object_set_new(ret, "type_", json_string(type_names[comp_id->type]));
|
|
json_object_set_new(ret, "name", json_string(comp_id->name));
|
|
json_object_set_new(ret, "software", json_string(comp_id->software));
|
|
json_object_set_new(ret, "swVersion", json_string(comp_id->sw_version));
|
|
if (strlen(comp_id->hw_manufacturer))
|
|
json_object_set_new(ret, "hwManufacturer", json_string(comp_id->hw_manufacturer));
|
|
if (strlen(comp_id->hw_model))
|
|
json_object_set_new(ret, "hwModel", json_string(comp_id->hw_model));
|
|
if (strlen(comp_id->hw_serial_nr))
|
|
json_object_set_new(ret, "hwSerialNr", json_string(comp_id->hw_serial_nr));
|
|
if (strlen(comp_id->hw_version))
|
|
json_object_set_new(ret, "hwVersion", json_string(comp_id->hw_version));
|
|
if (strlen(comp_id->fw_version))
|
|
json_object_set_new(ret, "fwVersion", json_string(comp_id->fw_version));
|
|
|
|
return ret;
|
|
}
|
|
|
|
static json_t *client2json(const struct rspro_client_conn *conn)
|
|
{
|
|
json_t *ret = json_object();
|
|
|
|
json_object_set_new(ret, "peer", json_string(conn->fi->id));
|
|
json_object_set_new(ret, "state", json_string(osmo_fsm_inst_state_name(conn->fi)));
|
|
/* FIXME: only in the right state */
|
|
json_object_set_new(ret, "component_id", comp_id2json(&conn->comp_id));
|
|
|
|
return ret;
|
|
}
|
|
|
|
static json_t *bank2json(const struct rspro_client_conn *conn)
|
|
{
|
|
json_t *ret = client2json(conn);
|
|
json_object_set_new(ret, "bankId", json_integer(conn->bank.bank_id));
|
|
json_object_set_new(ret, "numberOfSlots", json_integer(conn->bank.num_slots));
|
|
return ret;
|
|
}
|
|
|
|
static json_t *bank_slot2json(const struct bank_slot *bslot)
|
|
{
|
|
json_t *ret = json_object();
|
|
json_object_set_new(ret, "bankId", json_integer(bslot->bank_id));
|
|
json_object_set_new(ret, "slotNr", json_integer(bslot->slot_nr));
|
|
return ret;
|
|
}
|
|
static int json2bank_slot(struct bank_slot *bslot, json_t *in)
|
|
{
|
|
json_t *jbank_id, *jslot_nr;
|
|
|
|
if (!json_is_object(in))
|
|
return -EINVAL;
|
|
jbank_id = json_object_get(in, "bankId");
|
|
if (!jbank_id || !json_is_integer(jbank_id))
|
|
return -EINVAL;
|
|
jslot_nr = json_object_get(in, "slotNr");
|
|
if (!jslot_nr || !json_is_integer(jslot_nr))
|
|
return -EINVAL;
|
|
bslot->bank_id = json_integer_value(jbank_id);
|
|
bslot->slot_nr = json_integer_value(jslot_nr);
|
|
if (bslot->bank_id > 1023 || bslot->slot_nr > 1023)
|
|
return -EINVAL;
|
|
return 0;
|
|
}
|
|
|
|
static json_t *client_slot2json(const struct client_slot *bslot)
|
|
{
|
|
json_t *ret = json_object();
|
|
json_object_set_new(ret, "clientId", json_integer(bslot->client_id));
|
|
json_object_set_new(ret, "slotNr", json_integer(bslot->slot_nr));
|
|
return ret;
|
|
}
|
|
static int json2client_slot(struct client_slot *cslot, json_t *in)
|
|
{
|
|
json_t *jclient_id, *jslot_nr;
|
|
|
|
if (!json_is_object(in))
|
|
return -EINVAL;
|
|
jclient_id = json_object_get(in, "clientId");
|
|
if (!jclient_id || !json_is_integer(jclient_id))
|
|
return -EINVAL;
|
|
jslot_nr = json_object_get(in, "slotNr");
|
|
if (!jslot_nr || !json_is_integer(jslot_nr))
|
|
return -EINVAL;
|
|
cslot->client_id = json_integer_value(jclient_id);
|
|
cslot->slot_nr = json_integer_value(jslot_nr);
|
|
if (cslot->client_id > 1023 || cslot->slot_nr > 1023)
|
|
return -EINVAL;
|
|
return 0;
|
|
}
|
|
|
|
static json_t *slotmap2json(const struct slot_mapping *slotmap)
|
|
{
|
|
json_t *ret = json_object();
|
|
json_object_set_new(ret, "bank", bank_slot2json(&slotmap->bank));
|
|
json_object_set_new(ret, "client", client_slot2json(&slotmap->client));
|
|
json_object_set_new(ret, "state", json_string(slotmap_state_name(slotmap->state)));
|
|
return ret;
|
|
}
|
|
static int json2slotmap(struct slot_mapping *out, json_t *in)
|
|
{
|
|
json_t *jbank, *jclient;
|
|
int rc;
|
|
|
|
if (!json_is_object(in))
|
|
return -EINVAL;
|
|
jbank = json_object_get(in, "bank");
|
|
if (!jbank || !json_is_object(jbank))
|
|
return -EINVAL;
|
|
jclient = json_object_get(in, "client");
|
|
if (!jclient || !json_is_object(jclient))
|
|
return -EINVAL;
|
|
|
|
rc = json2bank_slot(&out->bank, jbank);
|
|
if (rc < 0)
|
|
return rc;
|
|
return json2client_slot(&out->client, jclient);
|
|
}
|
|
|
|
|
|
extern struct rspro_server *g_rps;
|
|
|
|
static int api_cb_rest_ctr_get(const struct _u_request *req, struct _u_response *resp, void *user_data)
|
|
{
|
|
return U_CALLBACK_CONTINUE;
|
|
}
|
|
|
|
static int api_cb_banks_get(const struct _u_request *req, struct _u_response *resp, void *user_data)
|
|
{
|
|
struct rspro_client_conn *conn;
|
|
json_t *json_body = json_object();
|
|
json_t *json_banks = json_array();
|
|
|
|
pthread_rwlock_rdlock(&g_rps->rwlock);
|
|
llist_for_each_entry(conn, &g_rps->banks, list) {
|
|
json_array_append_new(json_banks, bank2json(conn));
|
|
}
|
|
pthread_rwlock_unlock(&g_rps->rwlock);
|
|
|
|
json_object_set_new(json_body, "banks", json_banks);
|
|
ulfius_set_json_body_response(resp, 200, json_body);
|
|
json_decref(json_body);
|
|
|
|
return U_CALLBACK_COMPLETE;
|
|
}
|
|
|
|
static int api_cb_bank_get(const struct _u_request *req, struct _u_response *resp, void *user_data)
|
|
{
|
|
const char *bank_id_str = u_map_get(req->map_url, "bank_id");
|
|
struct rspro_client_conn *conn;
|
|
json_t *json_body = NULL;
|
|
unsigned long bank_id;
|
|
int status;
|
|
|
|
if (!bank_id_str) {
|
|
status = 400;
|
|
goto out_err;
|
|
}
|
|
|
|
bank_id = strtoul(bank_id_str, NULL, 10);
|
|
if (bank_id > 0xffff) {
|
|
status = 400;
|
|
goto out_err;
|
|
}
|
|
|
|
pthread_rwlock_rdlock(&g_rps->rwlock);
|
|
llist_for_each_entry(conn, &g_rps->banks, list) {
|
|
if (conn->bank.bank_id == bank_id) {
|
|
json_body = bank2json(conn);
|
|
break;
|
|
}
|
|
}
|
|
pthread_rwlock_unlock(&g_rps->rwlock);
|
|
|
|
if (json_body) {
|
|
ulfius_set_json_body_response(resp, 200, json_body);
|
|
json_decref(json_body);
|
|
} else {
|
|
ulfius_set_json_body_response(resp, 404, json_body);
|
|
}
|
|
|
|
return U_CALLBACK_COMPLETE;
|
|
|
|
out_err:
|
|
ulfius_set_empty_body_response(resp, status);
|
|
return U_CALLBACK_COMPLETE;
|
|
}
|
|
|
|
|
|
static int api_cb_clients_get(const struct _u_request *req, struct _u_response *resp, void *user_data)
|
|
{
|
|
struct rspro_client_conn *conn;
|
|
json_t *json_body = json_object();
|
|
json_t *json_clients = json_array();
|
|
|
|
pthread_rwlock_rdlock(&g_rps->rwlock);
|
|
llist_for_each_entry(conn, &g_rps->clients, list) {
|
|
json_array_append_new(json_clients, client2json(conn));
|
|
}
|
|
pthread_rwlock_unlock(&g_rps->rwlock);
|
|
|
|
json_object_set_new(json_body, "clients", json_clients);
|
|
ulfius_set_json_body_response(resp, 200, json_body);
|
|
json_decref(json_body);
|
|
|
|
return U_CALLBACK_COMPLETE;
|
|
}
|
|
|
|
static int api_cb_client_get(const struct _u_request *req, struct _u_response *resp, void *user_data)
|
|
{
|
|
const char *client_id_str = u_map_get(req->map_url, "client_id");
|
|
struct rspro_client_conn *conn;
|
|
json_t *json_body = NULL;
|
|
unsigned long client_id;
|
|
int status;
|
|
|
|
if (!client_id_str) {
|
|
status = 400;
|
|
goto out_err;
|
|
}
|
|
|
|
client_id = strtoul(client_id_str, NULL, 10);
|
|
if (client_id > 0xffff) {
|
|
status = 400;
|
|
goto out_err;
|
|
}
|
|
|
|
pthread_rwlock_rdlock(&g_rps->rwlock);
|
|
llist_for_each_entry(conn, &g_rps->clients, list) {
|
|
if (conn->bank.bank_id == client_id) { /* FIXME */
|
|
json_body = client2json(conn);
|
|
break;
|
|
}
|
|
}
|
|
pthread_rwlock_unlock(&g_rps->rwlock);
|
|
|
|
if (json_body) {
|
|
ulfius_set_json_body_response(resp, 200, json_body);
|
|
json_decref(json_body);
|
|
} else {
|
|
ulfius_set_json_body_response(resp, 404, json_body);
|
|
}
|
|
|
|
return U_CALLBACK_COMPLETE;
|
|
|
|
out_err:
|
|
ulfius_set_empty_body_response(resp, status);
|
|
return U_CALLBACK_COMPLETE;
|
|
}
|
|
|
|
static int api_cb_slotmaps_get(const struct _u_request *req, struct _u_response *resp, void *user_data)
|
|
{
|
|
struct slot_mapping *map;
|
|
json_t *json_body = json_object();
|
|
json_t *json_maps = json_array();
|
|
|
|
slotmaps_rdlock(g_rps->slotmaps);
|
|
llist_for_each_entry(map, &g_rps->slotmaps->mappings, list) {
|
|
json_array_append_new(json_maps, slotmap2json(map));
|
|
}
|
|
slotmaps_unlock(g_rps->slotmaps);
|
|
|
|
json_object_set_new(json_body, "slotmaps", json_maps);
|
|
ulfius_set_json_body_response(resp, 200, json_body);
|
|
json_decref(json_body);
|
|
|
|
return U_CALLBACK_COMPLETE;
|
|
}
|
|
|
|
extern struct osmo_fd g_event_ofd;
|
|
/* trigger our main thread select() loop */
|
|
static void trigger_main_thread_via_eventfd(void)
|
|
{
|
|
uint64_t one = 1;
|
|
int rc;
|
|
|
|
rc = write(g_event_ofd.fd, &one, sizeof(one));
|
|
if (rc < 8)
|
|
LOGP(DREST, LOGL_ERROR, "Error writing to eventfd(): %d\n", rc);
|
|
}
|
|
|
|
static int api_cb_slotmaps_post(const struct _u_request *req, struct _u_response *resp, void *user_data)
|
|
{
|
|
struct rspro_server *srv = g_rps;
|
|
struct slot_mapping slotmap, *map;
|
|
struct rspro_client_conn *conn;
|
|
json_error_t json_err;
|
|
json_t *json_req = NULL;
|
|
int rc;
|
|
|
|
json_req = ulfius_get_json_body_request(req, &json_err);
|
|
if (!json_req) {
|
|
LOGP(DREST, LOGL_NOTICE, "REST: No JSON Body\n");
|
|
goto err;
|
|
}
|
|
|
|
rc = json2slotmap(&slotmap, json_req);
|
|
if (rc < 0)
|
|
goto err;
|
|
map = slotmap_add(g_rps->slotmaps, &slotmap.bank, &slotmap.client);
|
|
if (!map) {
|
|
LOGP(DREST, LOGL_NOTICE, "REST: Cannot add slotmap\n");
|
|
goto err;
|
|
}
|
|
slotmap_state_change(map, SLMAP_S_NEW, NULL);
|
|
|
|
/* check if any already-connected bankd matches this new map. If yes, associate it */
|
|
pthread_rwlock_rdlock(&srv->rwlock);
|
|
llist_for_each_entry(conn, &srv->banks, list) {
|
|
if (conn->bank.bank_id == slotmap.bank.bank_id) {
|
|
slotmap_state_change(map, SLMAP_S_NEW, &conn->bank.maps_new);
|
|
/* Notify the conn FSM about some new maps being available */
|
|
trigger_main_thread_via_eventfd();
|
|
break;
|
|
}
|
|
}
|
|
pthread_rwlock_unlock(&srv->rwlock);
|
|
|
|
|
|
json_decref(json_req);
|
|
ulfius_set_empty_body_response(resp, 201);
|
|
|
|
return U_CALLBACK_COMPLETE;
|
|
err:
|
|
json_decref(json_req);
|
|
ulfius_set_empty_body_response(resp, 400);
|
|
return U_CALLBACK_COMPLETE;
|
|
}
|
|
|
|
/* caller is holding a write lock on slotmaps->rwlock */
|
|
static void _slotmap_mark_deleted(struct slot_mapping *map)
|
|
{
|
|
struct rspro_client_conn *conn = bankd_conn_by_id(g_rps, map->bank.bank_id);
|
|
|
|
/* delete map from global list to ensure it's not found by further lookups,
|
|
* particularly in case somebody wants to create a new map for the same bank/slot */
|
|
llist_del(&map->list);
|
|
/* safely initialize list head to avoid trouble when del_slotmap() does another llist_del() */
|
|
INIT_LLIST_HEAD(&map->list);
|
|
|
|
switch (map->state) {
|
|
case SLMAP_S_NEW:
|
|
/* new map, not yet sent to bank: we can remove it immediately */
|
|
/* delete from bank list (if any) */
|
|
llist_del(&map->bank_list);
|
|
/* safely initialize list head to avoid trouble when del_slotmap() does another llist_del() */
|
|
INIT_LLIST_HEAD(&map->bank_list);
|
|
_slotmap_del(map->maps, map);
|
|
break;
|
|
case SLMAP_S_UNACKNOWLEDGED:
|
|
/* map has been sent to bank already, but wasn't acknowledged yet */
|
|
/* FIXME: what to do now? If we keep it unchanged, it will not be deleted. If we
|
|
* move it to DELETE_REQ, */
|
|
break;
|
|
case SLMAP_S_ACTIVE:
|
|
/* map is fully active. Need to move it to DELETE_REQ state + trigger rspro thread,
|
|
* so the deletion can propagate to the bankd */
|
|
_slotmap_state_change(map, SLMAP_S_DELETE_REQ, &conn->bank.maps_delreq);
|
|
trigger_main_thread_via_eventfd();
|
|
break;
|
|
case SLMAP_S_DELETE_REQ:
|
|
/* REST had already requested deletion, but RSPRO thread hasn't issued the delete
|
|
* command to the bankd yet: Do nothing */
|
|
break;
|
|
case SLMAP_S_DELETING:
|
|
/* we had already requested deletion of this map previously: Do nothing */
|
|
break;
|
|
default:
|
|
OSMO_ASSERT(0);
|
|
}
|
|
}
|
|
|
|
static int api_cb_slotmaps_del(const struct _u_request *req, struct _u_response *resp, void *user_data)
|
|
{
|
|
const char *slotmap_id_str = u_map_get(req->map_url, "slotmap_id");
|
|
struct slot_mapping *map;
|
|
int status = 404;
|
|
unsigned long map_id;
|
|
|
|
if (!slotmap_id_str) {
|
|
status = 400;
|
|
goto err;
|
|
}
|
|
map_id = strtoul(slotmap_id_str, NULL, 10);
|
|
if (map_id < 0) {
|
|
status = 400;
|
|
goto err;
|
|
}
|
|
|
|
slotmaps_wrlock(g_rps->slotmaps);
|
|
llist_for_each_entry(map, &g_rps->slotmaps->mappings, list) {
|
|
if (slotmap_get_id(map) == map_id) {
|
|
_slotmap_mark_deleted(map);
|
|
status = 200;
|
|
break;
|
|
}
|
|
}
|
|
slotmaps_unlock(g_rps->slotmaps);
|
|
trigger_main_thread_via_eventfd();
|
|
|
|
|
|
ulfius_set_empty_body_response(resp, status);
|
|
return U_CALLBACK_COMPLETE;
|
|
err:
|
|
ulfius_set_empty_body_response(resp, status);
|
|
return U_CALLBACK_COMPLETE;
|
|
}
|
|
|
|
static int api_cb_global_reset_post(const struct _u_request *req, struct _u_response *resp, void *user_data)
|
|
{
|
|
struct slot_mapping *map, *map2;
|
|
|
|
LOGP(DMAIN, LOGL_NOTICE, "Global RESET from REST API\n");
|
|
|
|
/* mark all slot mappings as deleted */
|
|
slotmaps_wrlock(g_rps->slotmaps);
|
|
llist_for_each_entry_safe(map, map2, &g_rps->slotmaps->mappings, list) {
|
|
_slotmap_mark_deleted(map);
|
|
}
|
|
slotmaps_unlock(g_rps->slotmaps);
|
|
trigger_main_thread_via_eventfd();
|
|
|
|
ulfius_set_empty_body_response(resp, 200);
|
|
return U_CALLBACK_COMPLETE;
|
|
}
|
|
|
|
static const struct _u_endpoint api_endpoints[] = {
|
|
/* get the current restart counter */
|
|
{ "GET", PREFIX, "/restart-counter", 0, &api_cb_rest_ctr_get, NULL },
|
|
/* get a list of SIM banks */
|
|
{ "GET", PREFIX, "/banks", 0, &api_cb_banks_get, NULL },
|
|
{ "GET", PREFIX, "/banks/:bank_id", 0, &api_cb_bank_get, NULL },
|
|
/* get a list of SIM clients */
|
|
{ "GET", PREFIX, "/clients", 0, &api_cb_clients_get, NULL },
|
|
{ "GET", PREFIX, "/clients/:client_id", 0, &api_cb_client_get, NULL },
|
|
/* get a list of mappings */
|
|
{ "GET", PREFIX, "/slotmaps", 0, &api_cb_slotmaps_get, NULL },
|
|
{ "POST", PREFIX, "/slotmaps", 0, &api_cb_slotmaps_post, NULL },
|
|
{ "DELETE", PREFIX, "/slotmaps/:slotmap_id", 0, &api_cb_slotmaps_del, NULL },
|
|
{ "POST", PREFIX, "/global-reset", 0, &api_cb_global_reset_post, NULL },
|
|
};
|
|
|
|
static struct _u_instance g_instance;
|
|
static pthread_mutex_t g_tall_lock = PTHREAD_MUTEX_INITIALIZER;
|
|
static void *g_tall_rest;
|
|
|
|
static void *my_o_malloc(size_t sz)
|
|
{
|
|
void *obj;
|
|
pthread_mutex_lock(&g_tall_lock);
|
|
obj = talloc_size(g_tall_rest, sz);
|
|
pthread_mutex_unlock(&g_tall_lock);
|
|
return obj;
|
|
}
|
|
|
|
static void *my_o_realloc(void *obj, size_t sz)
|
|
{
|
|
pthread_mutex_lock(&g_tall_lock);
|
|
obj = talloc_realloc_size(g_tall_rest, obj, sz);
|
|
pthread_mutex_unlock(&g_tall_lock);
|
|
return obj;
|
|
}
|
|
|
|
static void my_o_free(void *obj)
|
|
{
|
|
pthread_mutex_lock(&g_tall_lock);
|
|
talloc_free(obj);
|
|
pthread_mutex_unlock(&g_tall_lock);
|
|
}
|
|
|
|
int rest_api_init(void *ctx, uint16_t port)
|
|
{
|
|
int i;
|
|
|
|
g_tall_rest = ctx;
|
|
o_set_alloc_funcs(my_o_malloc, my_o_realloc, my_o_free);
|
|
|
|
if (ulfius_init_instance(&g_instance, port, NULL, NULL) != U_OK)
|
|
return -1;
|
|
g_instance.mhd_response_copy_data = 1;
|
|
|
|
for (i = 0; i < ARRAY_SIZE(api_endpoints); i++)
|
|
ulfius_add_endpoint(&g_instance, &api_endpoints[i]);
|
|
|
|
if (ulfius_start_framework(&g_instance) != U_OK) {
|
|
LOGP(DREST, LOGL_FATAL, "Cannot start REST API on port %u\n", port);
|
|
ulfius_clean_instance(&g_instance);
|
|
return -1;
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
void rest_api_fini(void)
|
|
{
|
|
ulfius_stop_framework(&g_instance);
|
|
ulfius_clean_instance(&g_instance);
|
|
}
|