291 lines
7.0 KiB
C
291 lines
7.0 KiB
C
/* (C) 2016 by Harald Welte <laforge@gnumonks.org>
|
|
*
|
|
* All Rights Reserved
|
|
*
|
|
* This program is free software; you can redistribute it and/or modify
|
|
* it under the terms of the GNU Affero General Public License as published by
|
|
* the Free Software Foundation; either version 3 of the License, or
|
|
* (at your option) any later version.
|
|
*
|
|
* 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 Affero General Public License for more details.
|
|
*
|
|
* You should have received a copy of the GNU Affero General Public License
|
|
* along with this program. If not, see <http://www.gnu.org/licenses/>.
|
|
*
|
|
*/
|
|
|
|
#include <errno.h>
|
|
|
|
#include <osmocom/core/msgb.h>
|
|
#include <osmocom/core/logging.h>
|
|
#include <osmocom/core/linuxlist.h>
|
|
#include <osmocom/abis/ipa.h>
|
|
#include <osmocom/abis/ipaccess.h>
|
|
|
|
#include "logging.h"
|
|
#include "gsup_server.h"
|
|
|
|
static void osmo_gsup_server_send(struct osmo_gsup_conn *conn,
|
|
int proto_ext, struct msgb *msg_tx)
|
|
{
|
|
ipa_prepend_header_ext(msg_tx, proto_ext);
|
|
ipa_msg_push_header(msg_tx, IPAC_PROTO_OSMO);
|
|
ipa_server_conn_send(conn->conn, msg_tx);
|
|
}
|
|
|
|
int osmo_gsup_conn_send(struct osmo_gsup_conn *conn, struct msgb *msg)
|
|
{
|
|
if (!conn) {
|
|
msgb_free(msg);
|
|
return -ENOTCONN;
|
|
}
|
|
|
|
osmo_gsup_server_send(conn, IPAC_PROTO_EXT_GSUP, msg);
|
|
|
|
return 0;
|
|
}
|
|
|
|
static int osmo_gsup_conn_oap_handle(struct osmo_gsup_conn *conn,
|
|
struct msgb *msg_rx)
|
|
{
|
|
int rc;
|
|
struct msgb *msg_tx;
|
|
#if 0
|
|
rc = oap_handle(&conn->oap_state, msg_rx, &msg_tx);
|
|
msgb_free(msg_rx);
|
|
if (rc < 0)
|
|
return rc;
|
|
|
|
if (msg_tx)
|
|
osmo_gsup_conn_send(conn, IPAC_PROTO_EXT_OAP, msg_tx);
|
|
#endif
|
|
return 0;
|
|
}
|
|
|
|
/* Data from a given client has arrived over the socket */
|
|
static int osmo_gsup_server_read_cb(struct ipa_server_conn *conn,
|
|
struct msgb *msg)
|
|
{
|
|
struct ipaccess_head *hh = (struct ipaccess_head *) msg->data;
|
|
struct ipaccess_head_ext *he = (struct ipaccess_head_ext *) msgb_l2(msg);
|
|
struct osmo_gsup_conn *clnt = (struct osmo_gsup_conn *)conn->data;
|
|
int rc;
|
|
|
|
msg->l2h = &hh->data[0];
|
|
|
|
if (hh->proto == IPAC_PROTO_IPACCESS) {
|
|
rc = ipa_server_conn_ccm(conn, msg);
|
|
if (rc < 0) {
|
|
/* conn is already invalid here! */
|
|
return -1;
|
|
}
|
|
msgb_free(msg);
|
|
return 0;
|
|
}
|
|
|
|
if (hh->proto != IPAC_PROTO_OSMO) {
|
|
LOGP(DGSUP, LOGL_NOTICE, "Unsupported IPA stream ID 0x%02x\n",
|
|
hh->proto);
|
|
goto invalid;
|
|
}
|
|
|
|
if (!he || msgb_l2len(msg) < sizeof(*he)) {
|
|
LOGP(DGSUP, LOGL_NOTICE, "short IPA message\n");
|
|
goto invalid;
|
|
}
|
|
|
|
msg->l2h = &he->data[0];
|
|
|
|
if (he->proto == IPAC_PROTO_EXT_GSUP) {
|
|
OSMO_ASSERT(clnt->server->read_cb != NULL);
|
|
clnt->server->read_cb(clnt, msg);
|
|
/* expecting read_cb() to free msg */
|
|
} else if (he->proto == IPAC_PROTO_EXT_OAP) {
|
|
return osmo_gsup_conn_oap_handle(clnt, msg);
|
|
/* osmo_gsup_client_oap_handle frees msg */
|
|
} else {
|
|
LOGP(DGSUP, LOGL_NOTICE, "Unsupported IPA Osmo Proto 0x%02x\n",
|
|
hh->proto);
|
|
goto invalid;
|
|
}
|
|
|
|
return 0;
|
|
|
|
invalid:
|
|
LOGP(DGSUP, LOGL_NOTICE,
|
|
"GSUP received an invalid IPA message from %s:%d: %s\n",
|
|
conn->addr, conn->port, osmo_hexdump(msgb_l2(msg), msgb_l2len(msg)));
|
|
msgb_free(msg);
|
|
return -1;
|
|
|
|
}
|
|
|
|
static void osmo_tlvp_dump(const struct tlv_parsed *tlvp,
|
|
int subsys, int level)
|
|
{
|
|
unsigned int i;
|
|
|
|
for (i = 0; i < ARRAY_SIZE(tlvp->lv); i++) {
|
|
if (!TLVP_PRESENT(tlvp, i))
|
|
continue;
|
|
|
|
LOGP(subsys, level, "%u: %s\n", i,
|
|
TLVP_VAL(tlvp, i));
|
|
LOGP(subsys, level, "%u: %s\n", i,
|
|
osmo_hexdump(TLVP_VAL(tlvp, i),
|
|
TLVP_LEN(tlvp, i)));
|
|
}
|
|
}
|
|
|
|
/* FIXME: should this be parrt of ipas_server handling, not GSUP? */
|
|
static void tlvp_copy(void *ctx, struct tlv_parsed *out, const struct tlv_parsed *in)
|
|
{
|
|
unsigned int i;
|
|
|
|
for (i = 0; i < ARRAY_SIZE(out->lv); i++) {
|
|
if (!TLVP_PRESENT(in, i)) {
|
|
if (TLVP_PRESENT(out, i)) {
|
|
talloc_free((void *) out->lv[i].val);
|
|
out->lv[i].val = NULL;
|
|
out->lv[i].len = 0;
|
|
}
|
|
continue;
|
|
}
|
|
out->lv[i].val = talloc_memdup(ctx, in->lv[i].val, in->lv[i].len);
|
|
out->lv[i].len = in->lv[i].len;
|
|
}
|
|
}
|
|
|
|
int osmo_gsup_conn_ccm_get(const struct osmo_gsup_conn *clnt, uint8_t **addr,
|
|
uint8_t tag)
|
|
{
|
|
if (!TLVP_PRESENT(&clnt->ccm, tag))
|
|
return -ENODEV;
|
|
*addr = (uint8_t *) TLVP_VAL(&clnt->ccm, tag);
|
|
|
|
return TLVP_LEN(&clnt->ccm, tag);
|
|
}
|
|
|
|
static int osmo_gsup_server_ccm_cb(struct ipa_server_conn *conn,
|
|
struct msgb *msg, struct tlv_parsed *tlvp,
|
|
struct ipaccess_unit *unit)
|
|
{
|
|
struct osmo_gsup_conn *clnt = (struct osmo_gsup_conn *)conn->data;
|
|
uint8_t *addr;
|
|
size_t addr_len;
|
|
|
|
LOGP(DGSUP, LOGL_INFO, "CCM Callback\n");
|
|
|
|
/* FIXME: should this be parrt of ipas_server handling, not
|
|
* GSUP? */
|
|
tlvp_copy(clnt, &clnt->ccm, tlvp);
|
|
osmo_tlvp_dump(tlvp, DGSUP, LOGL_INFO);
|
|
|
|
addr_len = osmo_gsup_conn_ccm_get(clnt, &addr, IPAC_IDTAG_SERNR);
|
|
if (addr_len)
|
|
gsup_route_add(clnt, addr, addr_len);
|
|
|
|
return 0;
|
|
}
|
|
|
|
static int osmo_gsup_server_closed_cb(struct ipa_server_conn *conn)
|
|
{
|
|
struct osmo_gsup_conn *clnt = (struct osmo_gsup_conn *)conn->data;
|
|
|
|
LOGP(DGSUP, LOGL_INFO, "Lost GSUP client %s:%d\n",
|
|
conn->addr, conn->port);
|
|
|
|
gsup_route_del_conn(clnt);
|
|
llist_del(&clnt->list);
|
|
talloc_free(clnt);
|
|
|
|
return 0;
|
|
}
|
|
|
|
/* a client has connected to the server socket and we have accept()ed it */
|
|
static int osmo_gsup_server_accept_cb(struct ipa_server_link *link, int fd)
|
|
{
|
|
struct osmo_gsup_conn *conn;
|
|
struct osmo_gsup_server *gsups =
|
|
(struct osmo_gsup_server *) link->data;
|
|
int rc;
|
|
|
|
conn = talloc_zero(gsups, struct osmo_gsup_conn);
|
|
OSMO_ASSERT(conn);
|
|
|
|
conn->conn = ipa_server_conn_create(gsups, link, fd,
|
|
osmo_gsup_server_read_cb,
|
|
osmo_gsup_server_closed_cb, conn);
|
|
conn->conn->ccm_cb = osmo_gsup_server_ccm_cb;
|
|
OSMO_ASSERT(conn->conn);
|
|
|
|
/* link data structure with server structure */
|
|
conn->server = gsups;
|
|
llist_add_tail(&conn->list, &gsups->clients);
|
|
|
|
LOGP(DGSUP, LOGL_INFO, "New GSUP client %s:%d\n",
|
|
conn->conn->addr, conn->conn->port);
|
|
|
|
/* request the identity of the client */
|
|
rc = ipa_ccm_send_id_req(fd);
|
|
if (rc < 0)
|
|
goto failed;
|
|
#if 0
|
|
rc = oap_init(&gsups->oap_config, &conn->oap_state);
|
|
if (rc != 0)
|
|
goto failed;
|
|
#endif
|
|
return 0;
|
|
failed:
|
|
ipa_server_conn_destroy(conn->conn);
|
|
return -1;
|
|
}
|
|
|
|
struct osmo_gsup_server *
|
|
osmo_gsup_server_create(void *ctx, const char *ip_addr,
|
|
uint16_t tcp_port,
|
|
osmo_gsup_read_cb_t read_cb)
|
|
{
|
|
struct osmo_gsup_server *gsups;
|
|
int rc;
|
|
|
|
gsups = talloc_zero(ctx, struct osmo_gsup_server);
|
|
OSMO_ASSERT(gsups);
|
|
|
|
INIT_LLIST_HEAD(&gsups->clients);
|
|
INIT_LLIST_HEAD(&gsups->routes);
|
|
|
|
gsups->link = ipa_server_link_create(gsups,
|
|
/* no e1inp */ NULL,
|
|
ip_addr, tcp_port,
|
|
osmo_gsup_server_accept_cb,
|
|
gsups);
|
|
if (!gsups->link)
|
|
goto failed;
|
|
|
|
gsups->read_cb = read_cb;
|
|
|
|
rc = ipa_server_link_open(gsups->link);
|
|
if (rc < 0)
|
|
goto failed;
|
|
|
|
return gsups;
|
|
|
|
failed:
|
|
osmo_gsup_server_destroy(gsups);
|
|
return NULL;
|
|
}
|
|
|
|
void osmo_gsup_server_destroy(struct osmo_gsup_server *gsups)
|
|
{
|
|
if (gsups->link) {
|
|
ipa_server_link_close(gsups->link);
|
|
ipa_server_link_destroy(gsups->link);
|
|
gsups->link = NULL;
|
|
}
|
|
talloc_free(gsups);
|
|
}
|