332 lines
7.8 KiB
C
332 lines
7.8 KiB
C
/* Test HNB */
|
|
|
|
/* (C) 2015 by Daniel Willmann <dwillmann@sysmocom.de>
|
|
* (C) 2015 by Sysmocom s.f.m.c. GmbH
|
|
* 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 <unistd.h>
|
|
#include <stdio.h>
|
|
#include <stdlib.h>
|
|
#include <string.h>
|
|
#include <getopt.h>
|
|
#include <errno.h>
|
|
#include <signal.h>
|
|
|
|
#include <sys/types.h>
|
|
#include <sys/socket.h>
|
|
#include <netinet/in.h>
|
|
#include <netinet/sctp.h>
|
|
#include <arpa/inet.h>
|
|
|
|
#include <osmocom/core/application.h>
|
|
#include <osmocom/core/talloc.h>
|
|
#include <osmocom/core/select.h>
|
|
#include <osmocom/core/logging.h>
|
|
#include <osmocom/core/socket.h>
|
|
#include <osmocom/core/msgb.h>
|
|
#include <osmocom/core/write_queue.h>
|
|
|
|
#include <osmocom/vty/telnet_interface.h>
|
|
#include <osmocom/vty/logging.h>
|
|
|
|
#include "hnb-test.h"
|
|
#include "hnbap_common.h"
|
|
#include "hnbap_ies_defs.h"
|
|
|
|
static void *tall_hnb_ctx;
|
|
void *talloc_asn1_ctx;
|
|
|
|
struct hnb_test g_hnb_test = {
|
|
.gw_port = IUH_DEFAULT_SCTP_PORT,
|
|
};
|
|
|
|
int hnb_test_ue_register_tx(struct hnb_test *hnb_test)
|
|
{
|
|
struct msgb *msg;
|
|
int rc, imsi_len;
|
|
|
|
char imsi_buf[16];
|
|
char *imsi_str = "262019876543210";
|
|
|
|
UERegisterRequest_t request_out;
|
|
UERegisterRequestIEs_t request;
|
|
memset(&request, 0, sizeof(request));
|
|
|
|
request.uE_Identity.present = UE_Identity_PR_iMSI;
|
|
|
|
imsi_len = encode_iu_imsi(imsi_buf, sizeof(imsi_buf), imsi_str);
|
|
request.uE_Identity.choice.iMSI.buf = imsi_buf;
|
|
request.uE_Identity.choice.iMSI.size = imsi_len;
|
|
|
|
request.registration_Cause = Registration_Cause_normal;
|
|
request.uE_Capabilities.access_stratum_release_indicator = Access_stratum_release_indicator_rel_6;
|
|
request.uE_Capabilities.csg_capability = CSG_Capability_not_csg_capable;
|
|
|
|
memset(&request_out, 0, sizeof(request_out));
|
|
rc = hnbap_encode_ueregisterrequesties(&request_out, &request);
|
|
|
|
msg = hnbap_generate_initiating_message(ProcedureCode_id_UERegister,
|
|
Criticality_reject,
|
|
&asn_DEF_UERegisterRequest,
|
|
&request_out);
|
|
|
|
|
|
msgb_ppid(msg) = IUH_PPI_HNBAP;
|
|
|
|
return osmo_wqueue_enqueue(&hnb_test->wqueue, msg);
|
|
}
|
|
|
|
int hnb_test_rx_hnb_register_acc(struct hnb_test *hnb, ANY_t *in)
|
|
{
|
|
int rc;
|
|
HNBRegisterAcceptIEs_t accept;
|
|
|
|
rc = hnbap_decode_hnbregisteraccepties(&accept, in);
|
|
if (rc < 0) {
|
|
}
|
|
|
|
hnb->rnc_id = accept.rnc_id;
|
|
printf("HNB Register accept with RNC ID %u\n", hnb->rnc_id);
|
|
|
|
return hnb_test_ue_register_tx(hnb);
|
|
}
|
|
|
|
int hnb_test_hnbap_rx(struct hnb_test *hnb, struct msgb *msg)
|
|
{
|
|
HNBAP_PDU_t _pdu, *pdu = &_pdu;
|
|
asn_dec_rval_t dec_ret;
|
|
int rc;
|
|
|
|
memset(pdu, 0, sizeof(*pdu));
|
|
dec_ret = aper_decode(NULL, &asn_DEF_HNBAP_PDU, (void **) &pdu,
|
|
msg->data, msgb_length(msg), 0, 0);
|
|
if (dec_ret.code != RC_OK) {
|
|
LOGP(DMAIN, LOGL_ERROR, "Error in ASN.1 decode\n");
|
|
return rc;
|
|
}
|
|
|
|
if (pdu->present != HNBAP_PDU_PR_successfulOutcome) {
|
|
printf("Unexpected HNBAP message received\n");
|
|
}
|
|
|
|
switch (pdu->choice.successfulOutcome.procedureCode) {
|
|
case ProcedureCode_id_HNBRegister:
|
|
/* Get HNB id and send UE Register request */
|
|
rc = hnb_test_rx_hnb_register_acc(hnb, &pdu->choice.successfulOutcome.value);
|
|
break;
|
|
case ProcedureCode_id_UERegister:
|
|
break;
|
|
default:
|
|
break;
|
|
}
|
|
|
|
return rc;
|
|
}
|
|
|
|
static int hnb_read_cb(struct osmo_fd *fd)
|
|
{
|
|
struct hnb_test *hnb_test = fd->data;
|
|
struct sctp_sndrcvinfo sinfo;
|
|
struct msgb *msg = msgb_alloc(IUH_MSGB_SIZE, "Iuh rx");
|
|
int flags = 0;
|
|
int rc;
|
|
|
|
if (!msg)
|
|
return -ENOMEM;
|
|
|
|
rc = sctp_recvmsg(fd->fd, msgb_data(msg), msgb_tailroom(msg),
|
|
NULL, NULL, &sinfo, &flags);
|
|
if (rc < 0) {
|
|
LOGP(DMAIN, LOGL_ERROR, "Error during sctp_recvmsg()\n");
|
|
/* FIXME: clean up after disappeared HNB */
|
|
return rc;
|
|
} else
|
|
msgb_put(msg, rc);
|
|
|
|
if (flags & MSG_NOTIFICATION) {
|
|
LOGP(DMAIN, LOGL_INFO, "Ignoring SCTP notification\n");
|
|
msgb_free(msg);
|
|
return 0;
|
|
}
|
|
|
|
sinfo.sinfo_ppid = ntohl(sinfo.sinfo_ppid);
|
|
|
|
switch (sinfo.sinfo_ppid) {
|
|
case IUH_PPI_HNBAP:
|
|
printf("HNBAP mesage received\n");
|
|
rc = hnb_test_hnbap_rx(hnb_test, msg);
|
|
break;
|
|
case IUH_PPI_RUA:
|
|
printf("RUA mesage received\n");
|
|
// rc = hnbgw_rua_rx(hnb, msg);
|
|
break;
|
|
case IUH_PPI_SABP:
|
|
case IUH_PPI_RNA:
|
|
case IUH_PPI_PUA:
|
|
LOGP(DMAIN, LOGL_ERROR, "Unimplemented SCTP PPID=%u received\n",
|
|
sinfo.sinfo_ppid);
|
|
rc = 0;
|
|
break;
|
|
default:
|
|
LOGP(DMAIN, LOGL_ERROR, "Unknown SCTP PPID=%u received\n",
|
|
sinfo.sinfo_ppid);
|
|
rc = 0;
|
|
break;
|
|
}
|
|
|
|
msgb_free(msg);
|
|
return rc;
|
|
}
|
|
|
|
static int hnb_write_cb(struct osmo_fd *fd, struct msgb *msg)
|
|
{
|
|
struct hnb_test *ctx = fd->data;
|
|
struct sctp_sndrcvinfo sinfo = {
|
|
.sinfo_ppid = htonl(msgb_ppid(msg)),
|
|
.sinfo_stream = 0,
|
|
};
|
|
int rc;
|
|
|
|
rc = sctp_send(fd->fd, msgb_data(msg), msgb_length(msg),
|
|
&sinfo, 0);
|
|
/* we don't need to msgb_free(), write_queue does this for us */
|
|
return rc;
|
|
}
|
|
|
|
#include "pdus.h"
|
|
|
|
static void hnb_send_register_req(struct hnb_test *hnb_test)
|
|
{
|
|
HNBRegisterRequest_t request_out;
|
|
struct msgb *msg;
|
|
int rc;
|
|
uint16_t lac, sac;
|
|
uint8_t rac;
|
|
uint32_t cid;
|
|
uint8_t plmn[] = {0x09, 0xf1, 0x99};
|
|
char identity[50] = "ATestHNB@";
|
|
|
|
HNBRegisterRequestIEs_t request;
|
|
memset(&request, 0, sizeof(request));
|
|
|
|
lac = 0xc0fe;
|
|
sac = 0xabab;
|
|
rac = 0x42;
|
|
cid = 0xadceaab;
|
|
|
|
asn1_u16_to_str(&request.lac, &lac, lac);
|
|
asn1_u16_to_str(&request.sac, &sac, sac);
|
|
asn1_u8_to_str(&request.rac, &rac, rac);
|
|
asn1_u28_to_bitstring(&request.cellIdentity, &cid, cid);
|
|
|
|
request.hnB_Identity.hNB_Identity_Info.buf = identity;
|
|
request.hnB_Identity.hNB_Identity_Info.size = strlen(identity);
|
|
|
|
request.plmNidentity.buf = plmn;
|
|
request.plmNidentity.size = 3;
|
|
|
|
|
|
|
|
memset(&request_out, 0, sizeof(request_out));
|
|
rc = hnbap_encode_hnbregisterrequesties(&request_out, &request);
|
|
if (rc < 0) {
|
|
printf("Could not encode HNB register request IEs\n");
|
|
}
|
|
|
|
msg = hnbap_generate_initiating_message(ProcedureCode_id_HNBRegister,
|
|
Criticality_reject,
|
|
&asn_DEF_HNBRegisterRequest,
|
|
&request_out);
|
|
|
|
|
|
msgb_ppid(msg) = IUH_PPI_HNBAP;
|
|
|
|
osmo_wqueue_enqueue(&hnb_test->wqueue, msg);
|
|
}
|
|
|
|
|
|
static const struct log_info_cat log_cat[] = {
|
|
[DMAIN] = {
|
|
.name = "DMAIN", .loglevel = LOGL_DEBUG, .enabled = 1,
|
|
.color = "",
|
|
.description = "Main program",
|
|
},
|
|
};
|
|
|
|
static const struct log_info hnb_test_log_info = {
|
|
.cat = log_cat,
|
|
.num_cat = ARRAY_SIZE(log_cat),
|
|
};
|
|
|
|
static struct vty_app_info vty_info = {
|
|
.name = "OsmoHNB-Test",
|
|
.version = "0",
|
|
};
|
|
|
|
static int sctp_sock_init(int fd)
|
|
{
|
|
struct sctp_event_subscribe event;
|
|
int rc;
|
|
|
|
/* subscribe for all events */
|
|
memset((uint8_t *)&event, 1, sizeof(event));
|
|
rc = setsockopt(fd, IPPROTO_SCTP, SCTP_EVENTS,
|
|
&event, sizeof(event));
|
|
|
|
return rc;
|
|
}
|
|
|
|
int main(int argc, const char *argv)
|
|
{
|
|
int rc;
|
|
|
|
tall_hnb_ctx = talloc_named_const(NULL, 0, "hnb_context");
|
|
talloc_asn1_ctx = talloc_named_const(NULL, 0, "asn1_context");
|
|
|
|
rc = osmo_init_logging(&hnb_test_log_info);
|
|
if (rc < 0)
|
|
exit(1);
|
|
|
|
vty_init(&vty_info);
|
|
|
|
osmo_wqueue_init(&g_hnb_test.wqueue, 16);
|
|
g_hnb_test.wqueue.bfd.data = &g_hnb_test;
|
|
g_hnb_test.wqueue.read_cb = hnb_read_cb;
|
|
g_hnb_test.wqueue.write_cb = hnb_write_cb;
|
|
|
|
rc = osmo_sock_init_ofd(&g_hnb_test.wqueue.bfd, AF_INET, SOCK_STREAM,
|
|
IPPROTO_SCTP, "127.0.0.1",
|
|
g_hnb_test.gw_port, OSMO_SOCK_F_CONNECT);
|
|
if (rc < 0) {
|
|
perror("Error connecting to Iuh port");
|
|
exit(1);
|
|
}
|
|
sctp_sock_init(g_hnb_test.wqueue.bfd.fd);
|
|
|
|
hnb_send_register_req(&g_hnb_test);
|
|
|
|
while (1) {
|
|
rc = osmo_select_main(0);
|
|
if (rc < 0)
|
|
exit(3);
|
|
}
|
|
|
|
/* not reached */
|
|
exit(0);
|
|
}
|