Received: by 2002:a05:6602:18e:0:0:0:0 with SMTP id m14csp5139823ioo; Tue, 31 May 2022 21:48:47 -0700 (PDT) X-Google-Smtp-Source: ABdhPJyHoIELA2E420FkfZsRUIe22Nn6HVgTc06im0aURgWVnDO8trJ+Ocxph2rK3rfQ9KfKRk22 X-Received: by 2002:a17:906:d54e:b0:6f6:3ea:8e7b with SMTP id cr14-20020a170906d54e00b006f603ea8e7bmr57550355ejc.292.1654058927236; Tue, 31 May 2022 21:48:47 -0700 (PDT) ARC-Seal: i=1; a=rsa-sha256; t=1654058927; cv=none; d=google.com; s=arc-20160816; b=xDGVxzLkGq1Oe/TUsEvccNnThqeGB2YbRT+GfUtZhO0jPX9FVfc1+MMSNsIKdtQna7 7ACwj3A3y83GRhtPl7lQqZlypLPuPEn937kuPKaAlJTlQ2Vhmrq0k7/iK9j9MemgdpvY b3cyn6guyDKa8dDP9lr7YxFX44ClmlzVlL6CyHrlQhwCgQ/+QSJndi6GOSCow7fIPDgJ 9lyfdzePDrc+6ePo69Dpg0oYoYuKYg/8ogHedLzecoMt9DQhQFc3YoFqQ9C+FRN/g532 4VnLnGsGoU+nEd27g1NaciJCYX/PiR1isZMNwbRT4aR0VhiaCRVjXWIXDyDYGa7K58Y6 3iuw== ARC-Message-Signature: i=1; a=rsa-sha256; c=relaxed/relaxed; d=google.com; s=arc-20160816; h=list-id:precedence:content-transfer-encoding:mime-version :references:in-reply-to:message-id:date:subject:to:from :dkim-signature; bh=LnDYMWSGQXQ1T7o21bVDT8cS008WT/YRhPkxArbf6AE=; b=gEP5HhSAjEhuZyL49kyDsF3pFB7l+iWUDRJU1cl35gGFdi2gjUpzldM3kwbLIlP4ai hUeSQl3vCdRXFpdLnDrtzk7uC/TMsQpDDm8yhcnivgiJGL/SlanBsuVXKfkeD/vyiH54 Sf27l9PG/wJihWunh8DSHDHmyAwZyqczPd7ZGzaOvD2LRjwRLmBO5/oQNX0yafIWLgZZ Q2ql9sQowhU9NBW566PsLtlwRH95XaIcv76qFN4UYp8kkcmRbm9dWm0OZfKH441skkUi x1YPCa9ojAfsgSbUGJl4NOgKWDk7ujXlEmXQG9UPQBmjTLBCy3r/khInMuNBJJLeWHX2 81fA== ARC-Authentication-Results: i=1; mx.google.com; dkim=pass header.i=@gmail.com header.s=20210112 header.b=moSCYNa6; spf=pass (google.com: domain of linux-bluetooth-owner@vger.kernel.org designates 2620:137:e000::1:20 as permitted sender) smtp.mailfrom=linux-bluetooth-owner@vger.kernel.org; dmarc=pass (p=NONE sp=QUARANTINE dis=NONE) header.from=gmail.com Return-Path: Received: from out1.vger.email (out1.vger.email. [2620:137:e000::1:20]) by mx.google.com with ESMTP id dt2-20020a170907728200b006febbb171a9si820274ejc.918.2022.05.31.21.48.05; Tue, 31 May 2022 21:48:47 -0700 (PDT) Received-SPF: pass (google.com: domain of linux-bluetooth-owner@vger.kernel.org designates 2620:137:e000::1:20 as permitted sender) client-ip=2620:137:e000::1:20; Authentication-Results: mx.google.com; dkim=pass header.i=@gmail.com header.s=20210112 header.b=moSCYNa6; spf=pass (google.com: domain of linux-bluetooth-owner@vger.kernel.org designates 2620:137:e000::1:20 as permitted sender) smtp.mailfrom=linux-bluetooth-owner@vger.kernel.org; dmarc=pass (p=NONE sp=QUARANTINE dis=NONE) header.from=gmail.com Received: (majordomo@vger.kernel.org) by vger.kernel.org via listexpand id S1344939AbiEaUzq (ORCPT + 99 others); Tue, 31 May 2022 16:55:46 -0400 Received: from lindbergh.monkeyblade.net ([23.128.96.19]:52382 "EHLO lindbergh.monkeyblade.net" rhost-flags-OK-OK-OK-OK) by vger.kernel.org with ESMTP id S1347809AbiEaUzc (ORCPT ); Tue, 31 May 2022 16:55:32 -0400 Received: from mail-io1-xd2e.google.com (mail-io1-xd2e.google.com [IPv6:2607:f8b0:4864:20::d2e]) by lindbergh.monkeyblade.net (Postfix) with ESMTPS id 0F90A9D062 for ; Tue, 31 May 2022 13:55:20 -0700 (PDT) Received: by mail-io1-xd2e.google.com with SMTP id n145so15440736iod.3 for ; Tue, 31 May 2022 13:55:20 -0700 (PDT) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=gmail.com; s=20210112; h=from:to:subject:date:message-id:in-reply-to:references:mime-version :content-transfer-encoding; bh=LnDYMWSGQXQ1T7o21bVDT8cS008WT/YRhPkxArbf6AE=; b=moSCYNa6+Eo6dlnyXFKk2jUWvMeRq9vmOlSAG0CyP4Uiv0/WQJPsRMoyFehg1ssSmV HBf9f7aIvqg4k3NfvuvSllTK8uJsRFxPpIekG8UMkgFqTmkMpMjFcnD4bdxkb9IG3410 6aOkqF8vDZr40EdrHO4GjxNkD49MRps+NNmrBpXg2ss1Cnycx2vbP3Ynjd0ESmv73QXA r8Gs4H+DfdrUtf3tHJAlJa8yBnesiJHs3CPYsgcSC1+dVCBx0nKibJLkcVJdzfgkl1Rg wmPYTScHfVCmr4RY+8dtelQnZsGorz5Da52x2erXslWA6anOK8LSgnZcBawDEEPZElc9 tGgg== X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=1e100.net; s=20210112; h=x-gm-message-state:from:to:subject:date:message-id:in-reply-to :references:mime-version:content-transfer-encoding; bh=LnDYMWSGQXQ1T7o21bVDT8cS008WT/YRhPkxArbf6AE=; b=ZNYnPWXmKx62igTGU8ikZwplC2ROamNS/YI07DMmysnbkDLdR4mjO+xByPTYgRLdh3 qYwWPE+gfqBRF9D6Z0kferJ0UUHJQgAr3vSRIO2p+NlqtGqr3LCBkBSJzyC1ofiQAKKS bS2P1WnER0AqClSW6Z5u3FHhn96oaHo5hcOJCoPGNlnCkI+gp7Viv/x/tPJUlxDlkNCU Z4INuue1yWAnVfObdmJ+q5gXwX1zIS5fhsIHjyfOGO5gigFVNq3/OzPOF2UmNgN0auZx mWUI6V9JEewnH4EbPshYDiHMGuIj9G1l8YJhnA8TXMsgIzkon22EXPAqCseSVmkXgOoK qMUw== X-Gm-Message-State: AOAM53204T+G5HciI6WBmdYxUBkkuSQM5AijEPangcp5DOxrwa1grCvG EIWy8TxDOh3hYVLsbcuY1hzOxd6Ygjk= X-Received: by 2002:a05:6602:3344:b0:660:d2cf:4aa4 with SMTP id c4-20020a056602334400b00660d2cf4aa4mr21531292ioz.190.1654030518668; Tue, 31 May 2022 13:55:18 -0700 (PDT) Received: from lvondent-mobl4.. (c-71-56-157-77.hsd1.or.comcast.net. [71.56.157.77]) by smtp.gmail.com with ESMTPSA id v1-20020a922e01000000b002d10dc367a1sm4808460ile.49.2022.05.31.13.55.17 for (version=TLS1_3 cipher=TLS_AES_256_GCM_SHA384 bits=256/256); Tue, 31 May 2022 13:55:18 -0700 (PDT) From: Luiz Augusto von Dentz To: linux-bluetooth@vger.kernel.org Subject: [PATCH v5 7/8] tools: Add isotest tool Date: Tue, 31 May 2022 13:55:08 -0700 Message-Id: <20220531205509.1062466-7-luiz.dentz@gmail.com> X-Mailer: git-send-email 2.35.1 In-Reply-To: <20220531205509.1062466-1-luiz.dentz@gmail.com> References: <20220531205509.1062466-1-luiz.dentz@gmail.com> MIME-Version: 1.0 Content-Transfer-Encoding: 8bit X-Spam-Status: No, score=-2.1 required=5.0 tests=BAYES_00,DKIM_SIGNED, DKIM_VALID,DKIM_VALID_AU,DKIM_VALID_EF,FREEMAIL_FROM, RCVD_IN_DNSWL_NONE,SPF_HELO_NONE,SPF_PASS,T_SCC_BODY_TEXT_LINE autolearn=ham autolearn_force=no version=3.4.6 X-Spam-Checker-Version: SpamAssassin 3.4.6 (2021-04-09) on lindbergh.monkeyblade.net Precedence: bulk List-ID: X-Mailing-List: linux-bluetooth@vger.kernel.org From: Luiz Augusto von Dentz This adds isotest tool which can be used to test ISO sockets. --- Makefile.tools | 4 +- tools/isotest.c | 1203 +++++++++++++++++++++++++++++++++++++++++++++++ 2 files changed, 1206 insertions(+), 1 deletion(-) create mode 100644 tools/isotest.c diff --git a/Makefile.tools b/Makefile.tools index f2f82062c..4e5ff73b0 100644 --- a/Makefile.tools +++ b/Makefile.tools @@ -207,7 +207,7 @@ endif if TOOLS bin_PROGRAMS += tools/rctest tools/l2test tools/l2ping tools/bluemoon \ - tools/hex2hcd tools/mpris-proxy tools/btattach + tools/hex2hcd tools/mpris-proxy tools/btattach tools/isotest noinst_PROGRAMS += tools/bdaddr tools/avinfo tools/avtest \ tools/scotest tools/amptest tools/hwdb \ @@ -319,6 +319,8 @@ tools_gatt_service_SOURCES = tools/gatt-service.c tools_gatt_service_LDADD = gdbus/libgdbus-internal.la \ src/libshared-mainloop.la $(GLIB_LIBS) $(DBUS_LIBS) +tools_isotest_LDADD = lib/libbluetooth-internal.la + profiles_iap_iapd_SOURCES = profiles/iap/main.c profiles_iap_iapd_LDADD = gdbus/libgdbus-internal.la $(GLIB_LIBS) $(DBUS_LIBS) diff --git a/tools/isotest.c b/tools/isotest.c new file mode 100644 index 000000000..a5f3bad7c --- /dev/null +++ b/tools/isotest.c @@ -0,0 +1,1203 @@ +// SPDX-License-Identifier: LGPL-2.1-or-later +/* + * + * BlueZ - Bluetooth protocol stack for Linux + * + * Copyright (C) 2022 Intel Corporation. + * + */ + +#ifdef HAVE_CONFIG_H +#include +#endif + +#define _GNU_SOURCE +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include + +#include "lib/bluetooth.h" +#include "lib/hci.h" +#include "lib/hci_lib.h" +#include "lib/mgmt.h" +#include "lib/iso.h" + +#include "src/shared/util.h" + +#define NSEC_USEC(_t) (_t / 1000L) +#define SEC_USEC(_t) (_t * 1000000L) +#define TS_USEC(_ts) (SEC_USEC((_ts)->tv_sec) + NSEC_USEC((_ts)->tv_nsec)) + +/* Test modes */ +enum { + SEND, + RECV, + RECONNECT, + MULTY, + DUMP, + CONNECT +}; + +static unsigned char *buf; + +/* Default data size */ +static long data_size = 251; + +static int mgmt_index = MGMT_INDEX_NONE; +static bdaddr_t bdaddr; +static int bdaddr_type = BDADDR_LE_PUBLIC; + +static int defer_setup; +static int sndbuf; +static struct timeval sndto; +static bool quiet; + +struct bt_iso_qos *iso_qos; +static bool inout; + +struct lookup_table { + const char *name; + int flag; +}; + +static struct lookup_table bdaddr_types[] = { + { "le_public", BDADDR_LE_PUBLIC }, + { "le_random", BDADDR_LE_RANDOM }, + { NULL, 0 }, +}; + +static int get_lookup_flag(struct lookup_table *table, char *name) +{ + int i; + + for (i = 0; table[i].name; i++) + if (!strcasecmp(table[i].name, name)) + return table[i].flag; + + return -1; +} + +static void print_lookup_values(struct lookup_table *table, char *header) +{ + int i; + + printf("%s\n", header); + + for (i = 0; table[i].name; i++) + printf("\t%s\n", table[i].name); +} + +static float tv2fl(struct timeval tv) +{ + return (float)tv.tv_sec + (float)(tv.tv_usec/1000000.0); +} + +static const uint8_t set_iso_socket_param[] = { + 0x3e, 0xe0, 0xb4, 0xfd, 0xdd, 0xd6, 0x85, 0x98, /* UUID - ISO Socket */ + 0x6a, 0x49, 0xe0, 0x05, 0x88, 0xf1, 0xba, 0x6f, + 0x01, /* Action - enable */ +}; + +static int mgmt_recv(int fd) +{ + uint8_t buf[1024]; + + return read(fd, buf, sizeof(buf)); +} + +static int mgmt_send_cmd(int fd, uint16_t op, uint16_t id, const void *data, + size_t len) +{ + struct mgmt_hdr hdr; + struct iovec iov[2]; + int ret; + + memset(&hdr, 0, sizeof(hdr)); + hdr.opcode = htobs(op); + hdr.index = htobs(id); + hdr.len = htobs(len); + + iov[0].iov_base = &hdr; + iov[0].iov_len = sizeof(hdr); + + iov[1].iov_base = (void *)data; + iov[1].iov_len = len; + + ret = writev(fd, iov, 2); + if (ret < 0) + return ret; + + /* Wait for MGMT to respond */ + ret = mgmt_recv(fd); + if (ret < 0) + return ret; + + return 0; +} + +static int mgmt_open(void) +{ + union { + struct sockaddr common; + struct sockaddr_hci hci; + } addr; + int fd, err; + + fd = socket(PF_BLUETOOTH, SOCK_RAW | SOCK_CLOEXEC | SOCK_NONBLOCK, + BTPROTO_HCI); + if (fd < 0) { + syslog(LOG_ERR, "Can't create mgmt socket: %s (%d)", + strerror(errno), errno); + return -errno; + } + + syslog(LOG_ERR, "mgmt socket: fd %d", fd); + + memset(&addr, 0, sizeof(addr)); + addr.hci.hci_family = AF_BLUETOOTH; + addr.hci.hci_dev = HCI_DEV_NONE; + addr.hci.hci_channel = HCI_CHANNEL_CONTROL; + + if (bind(fd, &addr.common, sizeof(addr.hci)) < 0) { + syslog(LOG_ERR, "Can't bind mgmt socket: %s (%d)", + strerror(errno), errno); + err = -errno; + close(fd); + return err; + } + + return fd; +} + + +static const uint8_t set_le_param[] = { + 0x01, /* Action - enable */ +}; + +static int mgmt_set_le(int fd) +{ + int err, index; + + index = mgmt_index; + if (index == MGMT_INDEX_NONE) + index = 0; + + err = mgmt_send_cmd(fd, MGMT_OP_SET_LE, index, + set_le_param, sizeof(set_le_param)); + if (err < 0) { + syslog(LOG_ERR, "Fail to write mgmt socket: %s (%d)", + strerror(errno), errno); + err = -errno; + } + + syslog(LOG_ERR, "%s: err %d", __func__, err); + + return err < 0 ? err : 0; +} + +static int mgmt_set_experimental(void) +{ + int fd, err; + + fd = mgmt_open(); + if (fd < 0) + return fd; + + err = mgmt_set_le(fd); + if (err < 0) + goto fail; + + err = mgmt_send_cmd(fd, MGMT_OP_SET_EXP_FEATURE, MGMT_INDEX_NONE, + set_iso_socket_param, sizeof(set_iso_socket_param)); + if (err < 0) { + syslog(LOG_ERR, "Fail to write mgmt socket: %s (%d)", + strerror(errno), errno); + err = -errno; + } + + syslog(LOG_ERR, "%s: err %d", __func__, err); + +fail: + close(fd); + + return err < 0 ? err : 0; +} + +static void print_qos(int sk, struct sockaddr_iso *addr) +{ + struct bt_iso_qos qos; + socklen_t len; + + /* Read Out QOS */ + memset(&qos, 0, sizeof(qos)); + len = sizeof(qos); + + if (getsockopt(sk, SOL_BLUETOOTH, BT_ISO_QOS, &qos, &len) < 0) { + syslog(LOG_ERR, "Can't get QoS socket option: %s (%d)", + strerror(errno), errno); + return; + } + + if (!bacmp(&addr->iso_bdaddr, BDADDR_ANY)) { + syslog(LOG_INFO, "QoS BIG 0x%02x BIS 0x%02x Packing 0x%02x " + "Framing 0x%02x]", qos.big, qos.bis, qos.packing, + qos.framing); + } else { + syslog(LOG_INFO, "QoS CIG 0x%02x CIS 0x%02x Packing 0x%02x " + "Framing 0x%02x]", qos.cig, qos.cis, qos.packing, + qos.framing); + syslog(LOG_INFO, "Input QoS [Interval %u us Latency %u " + "ms SDU %u PHY 0x%02x RTN %u]", qos.in.interval, + qos.in.latency, qos.in.sdu, qos.in.phy, qos.in.rtn); + } + syslog(LOG_INFO, "Output QoS [Interval %u us Latency %u " + "ms SDU %u PHY 0x%02x RTN %u]", qos.out.interval, + qos.out.latency, qos.out.sdu, qos.out.phy, qos.out.rtn); +} + +static int do_connect(char *peer) +{ + struct sockaddr_iso addr; + int sk; + + mgmt_set_experimental(); + + /* Create socket */ + sk = socket(PF_BLUETOOTH, SOCK_SEQPACKET, BTPROTO_ISO); + if (sk < 0) { + syslog(LOG_ERR, "Can't create socket: %s (%d)", + strerror(errno), errno); + return -1; + } + + /* Bind to local address */ + memset(&addr, 0, sizeof(addr)); + addr.iso_family = AF_BLUETOOTH; + bacpy(&addr.iso_bdaddr, mgmt_index != MGMT_INDEX_NONE ? + &bdaddr : BDADDR_ANY); + addr.iso_bdaddr_type = BDADDR_LE_PUBLIC; + + if (bind(sk, (struct sockaddr *) &addr, sizeof(addr)) < 0) { + syslog(LOG_ERR, "Can't bind socket: %s (%d)", + strerror(errno), errno); + goto error; + } + + /* Set QoS if available */ + if (iso_qos) { + if (!inout || !strcmp(peer, "00:00:00:00:00:00")) { + iso_qos->in.phy = 0x00; + iso_qos->in.sdu = 0; + } + + if (setsockopt(sk, SOL_BLUETOOTH, BT_ISO_QOS, iso_qos, + sizeof(*iso_qos)) < 0) { + syslog(LOG_ERR, "Can't set QoS socket option: " + "%s (%d)", strerror(errno), errno); + goto error; + } + } + + /* Enable deferred setup */ + if (defer_setup && setsockopt(sk, SOL_BLUETOOTH, BT_DEFER_SETUP, + &defer_setup, sizeof(defer_setup)) < 0) { + syslog(LOG_ERR, "Can't enable deferred setup : %s (%d)", + strerror(errno), errno); + goto error; + } + + /* Connect to remote device */ + memset(&addr, 0, sizeof(addr)); + addr.iso_family = AF_BLUETOOTH; + str2ba(peer, &addr.iso_bdaddr); + addr.iso_bdaddr_type = bdaddr_type; + + syslog(LOG_INFO, "Connecting %s ...", peer); + + if (connect(sk, (struct sockaddr *) &addr, sizeof(addr)) < 0) { + syslog(LOG_ERR, "Can't connect: %s (%d)", strerror(errno), + errno); + goto error; + } + + syslog(LOG_INFO, "Connected [%s]", peer); + + print_qos(sk, &addr); + + return sk; + +error: + close(sk); + return -1; +} + +static void do_listen(char *filename, void (*handler)(int fd, int sk), + char *peer) +{ + struct sockaddr_iso *addr = NULL; + socklen_t optlen; + int sk, nsk, fd = -1; + char ba[18]; + + if (filename) { + fd = open(filename, O_WRONLY | O_CREAT | O_APPEND, 0644); + if (fd < 0) { + syslog(LOG_ERR, "Can't open file %s: %s\n", + filename, strerror(errno)); + exit(1); + } + } + + mgmt_set_experimental(); + + /* Create socket */ + sk = socket(PF_BLUETOOTH, SOCK_SEQPACKET, BTPROTO_ISO); + if (sk < 0) { + syslog(LOG_ERR, "Can't create socket: %s (%d)", + strerror(errno), errno); + if (fd >= 0) + close(fd); + exit(1); + } + + /* Bind to local address */ + addr = malloc(sizeof(*addr) + sizeof(*addr->iso_bc)); + memset(addr, 0, sizeof(*addr) + sizeof(*addr->iso_bc)); + addr->iso_family = AF_BLUETOOTH; + bacpy(&addr->iso_bdaddr, mgmt_index != MGMT_INDEX_NONE ? + &bdaddr : BDADDR_ANY); + addr->iso_bdaddr_type = BDADDR_LE_PUBLIC; + optlen = sizeof(*addr); + + if (peer) { + str2ba(peer, &addr->iso_bc->bc_bdaddr); + addr->iso_bc->bc_bdaddr_type = bdaddr_type; + addr->iso_bc->bc_num_bis = 1; + addr->iso_bc->bc_bis[0] = 1; + optlen += sizeof(*addr->iso_bc); + } + + if (bind(sk, (struct sockaddr *) addr, optlen) < 0) { + syslog(LOG_ERR, "Can't bind socket: %s (%d)", + strerror(errno), errno); + goto error; + } + + /* Enable deferred setup */ + if (defer_setup && setsockopt(sk, SOL_BLUETOOTH, BT_DEFER_SETUP, + &defer_setup, sizeof(defer_setup)) < 0) { + syslog(LOG_ERR, "Can't enable deferred setup : %s (%d)", + strerror(errno), errno); + goto error; + } + + /* Listen for connections */ + if (listen(sk, 10)) { + syslog(LOG_ERR, "Can not listen on the socket: %s (%d)", + strerror(errno), errno); + goto error; + } + + syslog(LOG_INFO, "Waiting for connection %s...", peer ? peer : ""); + + while (1) { + memset(addr, 0, sizeof(*addr) + sizeof(*addr->iso_bc)); + optlen = sizeof(*addr); + + if (peer) + optlen += sizeof(*addr->iso_bc); + + nsk = accept(sk, (struct sockaddr *) addr, &optlen); + if (nsk < 0) { + syslog(LOG_ERR, "Accept failed: %s (%d)", + strerror(errno), errno); + goto error; + } + + if (fork()) { + /* Parent */ + close(nsk); + continue; + } + /* Child */ + close(sk); + + ba2str(&addr->iso_bdaddr, ba); + syslog(LOG_INFO, "Connected [%s]", ba); + + print_qos(nsk, addr); + + /* Handle deferred setup */ + if (defer_setup) { + syslog(LOG_INFO, "Waiting for %d seconds", + abs(defer_setup) - 1); + sleep(abs(defer_setup) - 1); + + if (defer_setup < 0) { + close(nsk); + exit(1); + } + } + + handler(fd, nsk); + + syslog(LOG_INFO, "Disconnect"); + exit(0); + } + +error: + free(addr); + + if (fd >= 0) + close(fd); + close(sk); + exit(1); +} + +static void dump_mode(int fd, int sk) +{ + int len; + + if (defer_setup) { + len = read(sk, buf, data_size); + if (len < 0) + syslog(LOG_ERR, "Initial read error: %s (%d)", + strerror(errno), errno); + else + syslog(LOG_INFO, "Initial bytes %d", len); + } + + syslog(LOG_INFO, "Receiving ..."); + while ((len = read(sk, buf, data_size)) > 0) { + if (fd >= 0) { + len = write(fd, buf, len); + if (len < 0) { + syslog(LOG_ERR, "Write failed: %s (%d)", + strerror(errno), errno); + return; + } + } else if (!quiet) + syslog(LOG_INFO, "Received %d bytes", len); + } +} + +static void recv_mode(int fd, int sk) +{ + struct timeval tv_beg, tv_end, tv_diff; + long total; + int len; + uint32_t seq; + + if (defer_setup) { + len = read(sk, buf, data_size); + if (len < 0) + syslog(LOG_ERR, "Initial read error: %s (%d)", + strerror(errno), errno); + else + syslog(LOG_INFO, "Initial bytes %d", len); + } + + syslog(LOG_INFO, "Receiving ..."); + + for (seq = 0; ; seq++) { + gettimeofday(&tv_beg, NULL); + total = 0; + while (total < data_size) { + int r; + + r = recv(sk, buf, data_size, 0); + if (r <= 0) { + if (r < 0) + syslog(LOG_ERR, "Read failed: %s (%d)", + strerror(errno), errno); + if (errno != ENOTCONN) + return; + r = 0; + } + + if (fd >= 0) { + r = write(fd, buf, r); + if (r < 0) { + syslog(LOG_ERR, "Write failed: %s (%d)", + strerror(errno), errno); + return; + } + } + + total += r; + } + gettimeofday(&tv_end, NULL); + + timersub(&tv_end, &tv_beg, &tv_diff); + + if (!quiet) + syslog(LOG_INFO, + "[seq %d] %ld bytes in %.2f sec speed %.2f " + "kb/s", seq, total, tv2fl(tv_diff), + (float)(total * 8 / tv2fl(tv_diff)) / 1024.0); + } +} + +static int open_file(const char *filename) +{ + int fd = -1; + + syslog(LOG_INFO, "Opening %s ...", filename); + + fd = open(filename, O_RDONLY); + if (fd <= 0) { + syslog(LOG_ERR, "Can't open file %s: %s\n", + filename, strerror(errno)); + } + + return fd; +} + +static void send_wait(struct timespec *t_start, uint32_t us) +{ + struct timespec t_now; + struct timespec t_diff; + int64_t delta_us; + + /* Skip sleep at start */ + if (!us) + return; + + if (clock_gettime(CLOCK_MONOTONIC, &t_now) < 0) { + perror("clock_gettime"); + exit(EXIT_FAILURE); + } + + t_diff.tv_sec = t_now.tv_sec - t_start->tv_sec; + t_diff.tv_nsec = t_now.tv_nsec - t_start->tv_nsec; + + delta_us = us - TS_USEC(&t_diff); + + if (delta_us < 0) { + syslog(LOG_INFO, "Send is behind: %zd us", delta_us); + delta_us = 1000; + } + + if (!quiet) + syslog(LOG_INFO, "Waiting (%zd us)...", delta_us); + + usleep(delta_us); + + if (clock_gettime(CLOCK_MONOTONIC, t_start) < 0) { + perror("clock_gettime"); + exit(EXIT_FAILURE); + } +} + +static int read_stream(int fd, ssize_t count) +{ + ssize_t len, ret = 0; + + while (ret < count) { + len = read(fd, buf + ret, count - ret); + if (len < 0) + return -errno; + + ret += len; + usleep(1000); + } + + return ret; +} + +static int read_file(int fd, ssize_t count, bool rewind) +{ + ssize_t len; + + if (fd == STDIN_FILENO) + return read_stream(fd, count); + + len = read(fd, buf, count); + if (len <= 0) { + if (!len) { + if (rewind) { + lseek(fd, 0, SEEK_SET); + return read_file(fd, count, rewind); + } + return len; + } + + return -errno; + } + + return len; +} + +static void do_send(int sk, int fd, struct bt_iso_qos *qos, uint32_t num, + bool repeat) +{ + uint32_t seq; + struct timespec t_start; + int len, used; + + if (clock_gettime(CLOCK_MONOTONIC, &t_start) < 0) { + perror("clock_gettime"); + exit(EXIT_FAILURE); + } + + for (seq = 0; ; seq++) { + if (fd >= 0) { + len = read_file(fd, qos->out.sdu, repeat); + if (len < 0) { + syslog(LOG_ERR, "read failed: %s (%d)", + strerror(-len), -len); + exit(1); + } + } else + len = qos->out.sdu; + + len = send(sk, buf, len, 0); + if (len <= 0) { + syslog(LOG_ERR, "send failed: %s (%d)", + strerror(errno), errno); + exit(1); + } + + ioctl(sk, TIOCOUTQ, &used); + + if (!quiet) + syslog(LOG_INFO, + "[seq %d] %d bytes buffered %d (%d bytes)", + seq, len, used / len, used); + + if (seq && !((seq + 1) % num)) + send_wait(&t_start, num * qos->out.interval); + } +} + +static void send_mode(char *filename, char *peer, int i, bool repeat) +{ + struct bt_iso_qos qos; + socklen_t len; + int sk, fd = -1; + uint32_t num; + + if (filename) { + char altername[PATH_MAX]; + struct stat st; + int err; + + snprintf(altername, PATH_MAX, "%s.%u", filename, i); + + err = stat(altername, &st); + if (!err) + fd = open_file(altername); + + if (fd <= 0) + fd = open_file(filename); + } + + sk = do_connect(peer); + if (sk < 0) { + syslog(LOG_ERR, "Can't connect to the server: %s (%d)", + strerror(errno), errno); + exit(1); + } + + if (defer_setup) { + syslog(LOG_INFO, "Waiting for %d seconds", + abs(defer_setup) - 1); + sleep(abs(defer_setup) - 1); + } + + syslog(LOG_INFO, "Sending ..."); + + /* Read QoS */ + memset(&qos, 0, sizeof(qos)); + len = sizeof(qos); + if (getsockopt(sk, SOL_BLUETOOTH, BT_ISO_QOS, &qos, &len) < 0) { + syslog(LOG_ERR, "Can't get Output QoS socket option: %s (%d)", + strerror(errno), errno); + qos.out.sdu = ISO_DEFAULT_MTU; + } + + /* num of packets = latency (ms) / interval (us) */ + num = (qos.out.latency * 1000 / qos.out.interval); + + syslog(LOG_INFO, "Number of packets: %d", num); + + if (!sndbuf) + /* Use socket buffer as a jitter buffer for the entire buffer + * latency: + * jitter buffer = 2 * (SDU * subevents) + */ + sndbuf = 2 * ((qos.out.latency * 1000 / qos.out.interval) * + qos.out.sdu); + + len = sizeof(sndbuf); + if (setsockopt(sk, SOL_SOCKET, SO_SNDBUF, &sndbuf, len) < 0) { + syslog(LOG_ERR, "Can't set socket SO_SNDBUF option: %s (%d)", + strerror(errno), errno); + } + + syslog(LOG_INFO, "Socket jitter buffer: %d buffer", sndbuf); + + if (sndto.tv_usec) { + len = sizeof(sndto); + if (setsockopt(sk, SOL_SOCKET, SO_SNDTIMEO, &sndto, len) < 0) { + syslog(LOG_ERR, "Can't set socket SO_SNDTIMEO option: " + "%s (%d)", strerror(errno), errno); + } else { + syslog(LOG_INFO, "Socket send timeout: %ld usec", + sndto.tv_usec); + } + } + + for (i = 6; i < qos.out.sdu; i++) + buf[i] = 0x7f; + + do_send(sk, fd, &qos, num, repeat); +} + +static void reconnect_mode(char *peer) +{ + while (1) { + int sk; + + sk = do_connect(peer); + if (sk < 0) { + syslog(LOG_ERR, "Can't connect to the server: %s (%d)", + strerror(errno), errno); + exit(1); + } + + close(sk); + + sleep(5); + } +} + +static void multy_connect_mode(char *peer) +{ + while (1) { + int i, sk; + + for (i = 0; i < 10; i++) { + if (fork()) + continue; + + /* Child */ + sk = do_connect(peer); + if (sk < 0) { + syslog(LOG_ERR, "Can't connect to the server: " + "%s (%d)", strerror(errno), errno); + } + close(sk); + exit(0); + } + + sleep(19); + } +} + +#define QOS_IO(_interval, _latency, _sdu, _phy, _rtn) \ +{ \ + .interval = _interval, \ + .latency = _latency, \ + .sdu = _sdu, \ + .phy = _phy, \ + .rtn = _rtn, \ +} + +#define QOS(_interval, _latency, _sdu, _phy, _rtn) \ +{ \ + .cig = BT_ISO_QOS_CIG_UNSET, \ + .cis = BT_ISO_QOS_CIS_UNSET, \ + .sca = 0x07, \ + .packing = 0x00, \ + .framing = 0x00, \ + .out = QOS_IO(_interval, _latency, _sdu, _phy, _rtn), \ +} + +#define QOS_PRESET(_name, _inout, _interval, _latency, _sdu, _phy, _rtn) \ +{ \ + .name = _name, \ + .inout = _inout, \ + .qos = QOS(_interval, _latency, _sdu, _phy, _rtn), \ +} + +static struct qos_preset { + const char *name; + bool inout; + struct bt_iso_qos qos; +} presets[] = { + /* QoS Configuration settings for low latency audio data */ + QOS_PRESET("8_1_1", true, 7500, 8, 26, 0x02, 2), + QOS_PRESET("8_2_1", true, 10000, 10, 30, 0x02, 2), + QOS_PRESET("16_1_1", true, 7500, 8, 30, 0x02, 2), + QOS_PRESET("16_2_1", true, 10000, 10, 40, 0x02, 2), + QOS_PRESET("24_1_1", true, 7500, 8, 45, 0x02, 2), + QOS_PRESET("24_2_1", true, 10000, 10, 60, 0x02, 2), + QOS_PRESET("32_1_1", true, 7500, 8, 60, 0x02, 2), + QOS_PRESET("32_2_1", true, 10000, 10, 80, 0x02, 2), + QOS_PRESET("44_1_1", false, 8163, 24, 98, 0x02, 5), + QOS_PRESET("44_2_1", false, 10884, 31, 130, 0x02, 5), + QOS_PRESET("48_1_1", false, 7500, 15, 75, 0x02, 5), + QOS_PRESET("48_2_1", false, 10000, 20, 100, 0x02, 5), + QOS_PRESET("48_3_1", false, 7500, 15, 90, 0x02, 5), + QOS_PRESET("48_4_1", false, 10000, 20, 120, 0x02, 5), + QOS_PRESET("48_5_1", false, 7500, 15, 117, 0x02, 5), + QOS_PRESET("44_6_1", false, 10000, 20, 155, 0x02, 5), + /* QoS Configuration settings for high reliability audio data */ + QOS_PRESET("8_1_2", true, 7500, 45, 26, 0x02, 41), + QOS_PRESET("8_2_2", true, 10000, 60, 30, 0x02, 53), + QOS_PRESET("16_1_2", true, 7500, 45, 30, 0x02, 41), + QOS_PRESET("16_2_2", true, 10000, 60, 40, 0x02, 47), + QOS_PRESET("24_1_2", true, 7500, 45, 45, 0x02, 35), + QOS_PRESET("24_2_2", true, 10000, 60, 60, 0x02, 41), + QOS_PRESET("32_1_2", true, 7500, 45, 60, 0x02, 29), + QOS_PRESET("32_2_1", true, 10000, 60, 80, 0x02, 35), + QOS_PRESET("44_1_2", false, 8163, 54, 98, 0x02, 23), + QOS_PRESET("44_2_2", false, 10884, 71, 130, 0x02, 23), + QOS_PRESET("48_1_2", false, 7500, 45, 75, 0x02, 23), + QOS_PRESET("48_2_2", false, 10000, 60, 100, 0x02, 23), + QOS_PRESET("48_3_2", false, 7500, 45, 90, 0x02, 23), + QOS_PRESET("48_4_2", false, 10000, 60, 120, 0x02, 23), + QOS_PRESET("48_5_2", false, 7500, 45, 117, 0x02, 23), + QOS_PRESET("44_6_2", false, 10000, 60, 155, 0x02, 23), +}; + +#define ARRAY_SIZE(arr) (sizeof(arr) / sizeof((arr)[0])) + +static void usage(void) +{ + printf("isotest - ISO testing\n" + "Usage:\n"); + printf("\tisotest [options] [bdaddr] [bdaddr1]...\n"); + printf("Modes:\n" + "\t-d, --dump [filename] dump (server)\n" + "\t-c, --reconnect reconnect (client)\n" + "\t-m, --multiple multiple connects (client)\n" + "\t-r, --receive [filename] receive (server)\n" + "\t-s, --send [filename,...] connect and send " + "(client/broadcaster)\n" + "\t-n, --silent connect and be silent (client)\n" + "Options:\n" + "\t[-b, --bytes ]\n" + "\t[-i, --device ]\n" + "\t[-j, --jitter socket/jitter buffer]\n" + "\t[-h, --help]\n" + "\t[-q, --quiet disable packet logging]\n" + "\t[-t, --timeout send timeout]\n" + "\t[-C, --continue]\n" + "\t[-W, --defer ] enable deferred setup\n" + "\t[-M, --mtu ]\n" + "\t[-S, --sca/adv-interval ]\n" + "\t[-P, --packing ]\n" + "\t[-F, --framing ]\n" + "\t[-I, --interval ]\n" + "\t[-L, --latency ]\n" + "\t[-Y, --phy ]\n" + "\t[-R, --rtn ]\n" + "\t[-B, --preset ]\n" + "\t[-G, --CIG/BIG ]\n" + "\t[-T, --CIS/BIS ]\n" + "\t[-V, --type ] address type (help for list)\n"); +} + +static const struct option main_options[] = { + { "dump", optional_argument, NULL, 'd'}, + { "reconnect", no_argument, NULL, 'c'}, + { "multiple", no_argument, NULL, 'm'}, + { "receive", optional_argument, NULL, 'r'}, + { "send", optional_argument, NULL, 's'}, + { "silent", no_argument, NULL, 'n'}, + { "bytes", required_argument, NULL, 'b'}, + { "index", required_argument, NULL, 'i'}, + { "jitter", required_argument, NULL, 'j'}, + { "help", no_argument, NULL, 'h'}, + { "quiet", no_argument, NULL, 'q'}, + { "timeout", required_argument, NULL, 't'}, + { "continue", no_argument, NULL, 'C'}, + { "defer", required_argument, NULL, 'W'}, + { "mtu", required_argument, NULL, 'M'}, + { "sca", required_argument, NULL, 'S'}, + { "packing", required_argument, NULL, 'P'}, + { "framing", required_argument, NULL, 'F'}, + { "interval", required_argument, NULL, 'I'}, + { "latency", required_argument, NULL, 'L'}, + { "phy", required_argument, NULL, 'Y'}, + { "rtn", required_argument, NULL, 'R'}, + { "preset", required_argument, NULL, 'B'}, + { "CIG/BIG", required_argument, NULL, 'G'}, + { "CIS/BIS", required_argument, NULL, 'T'}, + { "type", required_argument, NULL, 'V'}, + {} +}; + +int main(int argc, char *argv[]) +{ + struct sigaction sa; + int sk, mode = RECV; + char *filename = NULL; + bool repeat = false; + unsigned int i; + + iso_qos = malloc(sizeof(*iso_qos)); + /* Default to 16_2_1 */ + *iso_qos = presets[3].qos; + inout = true; + + while (1) { + int opt; + + opt = getopt_long(argc, argv, + "d::cmr::s::nb:i:j:hqt:CV:W:M:S:P:F:I:L:Y:R:B:G:T:", + main_options, NULL); + if (opt < 0) + break; + + switch (opt) { + case 'r': + mode = RECV; + if (optarg) + filename = strdup(optarg); + break; + + case 's': + mode = SEND; + if (optarg) + filename = strdup(optarg); + break; + + case 'd': + mode = DUMP; + if (optarg) + filename = strdup(optarg); + break; + + case 'c': + mode = RECONNECT; + break; + + case 'm': + mode = MULTY; + break; + + case 'n': + mode = CONNECT; + break; + + case 'b': + data_size = atoi(optarg); + break; + + case 'i': + if (!strncasecmp(optarg, "hci", 3)) { + mgmt_index = atoi(optarg + 3); + hci_devba(mgmt_index, &bdaddr); + } else + str2ba(optarg, &bdaddr); + break; + + case 'j': + sndbuf = atoi(optarg); + break; + + case 'q': + quiet = true; + break; + + case 't': + sndto.tv_usec = atoi(optarg); + break; + + case 'C': + repeat = true; + break; + + case 'V': + bdaddr_type = get_lookup_flag(bdaddr_types, optarg); + + if (bdaddr_type == -1) { + print_lookup_values(bdaddr_types, + "List Address types:"); + exit(1); + } + + break; + + case 'W': + defer_setup = atoi(optarg); + break; + + case 'M': + iso_qos->out.sdu = atoi(optarg); + + break; + + case 'S': + iso_qos->sca = atoi(optarg); + + break; + + + case 'P': + iso_qos->packing = atoi(optarg); + + break; + + case 'F': + iso_qos->framing = atoi(optarg); + + break; + + case 'I': + iso_qos->out.interval = atoi(optarg); + + break; + + case 'L': + iso_qos->out.latency = atoi(optarg); + + break; + + case 'Y': + iso_qos->out.phy = atoi(optarg); + + break; + + case 'R': + iso_qos->out.rtn = atoi(optarg); + + break; + + case 'B': + for (i = 0; i < ARRAY_SIZE(presets); i++) { + if (!strcmp(presets[i].name, optarg)) { + *iso_qos = presets[i].qos; + inout = presets[i].inout; + break; + } + } + + break; + + case 'G': + iso_qos->cig = atoi(optarg); + + break; + + case 'T': + iso_qos->cis = atoi(optarg); + + break; + + /* fall through */ + default: + usage(); + exit(1); + } + } + + if (inout) { + iso_qos->in = iso_qos->out; + } else { + /* Align interval and latency even if is unidirectional */ + iso_qos->in.interval = iso_qos->out.interval; + iso_qos->in.latency = iso_qos->out.latency; + } + + buf = malloc(data_size); + if (!buf) { + perror("Can't allocate data buffer"); + exit(1); + } + + memset(&sa, 0, sizeof(sa)); + sa.sa_handler = SIG_IGN; + sa.sa_flags = SA_NOCLDSTOP; + sigaction(SIGCHLD, &sa, NULL); + + openlog("isotest", LOG_PERROR | LOG_PID, LOG_LOCAL0); + + if (!(argc - optind)) { + switch (mode) { + case RECV: + do_listen(filename, recv_mode, NULL); + goto done; + + case DUMP: + do_listen(filename, dump_mode, NULL); + goto done; + default: + usage(); + exit(1); + } + } + + argc -= optind; + + for (i = 0; i < (unsigned int) argc; i++) { + pid_t pid; + + pid = fork(); + if (pid < 0) { + perror("Failed to fork new process"); + return -1; + } + + if (!pid) + continue; + + switch (mode) { + case SEND: + send_mode(filename, argv[optind + i], i, repeat); + if (strchr(filename, ',')) + filename = strchr(filename, ',') + 1; + break; + + case RECONNECT: + reconnect_mode(argv[optind + i]); + break; + + case MULTY: + multy_connect_mode(argv[optind + i]); + break; + + case CONNECT: + sk = do_connect(argv[optind + i]); + if (sk < 0) + exit(1); + dump_mode(-1, sk); + break; + + case RECV: + do_listen(filename, recv_mode, argv[optind + i]); + break; + + case DUMP: + do_listen(filename, dump_mode, argv[optind + i]); + break; + } + + break; + } + +done: + syslog(LOG_INFO, "Exit"); + + closelog(); + + return 0; +} -- 2.35.1