qemu/hw/bt/core.c

   1 /*
   2  * Convenience functions for bluetooth.
   3  *
   4  * Copyright (C) 2008 Andrzej Zaborowski  <balrog@zabor.org>
   5  *
   6  * This program is free software; you can redistribute it and/or
   7  * modify it under the terms of the GNU General Public License as
   8  * published by the Free Software Foundation; either version 2 or
   9  * (at your option) version 3 of the License.
  10  *
  11  * This program is distributed in the hope that it will be useful,
  12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14  * GNU General Public License for more details.
  15  *
  16  * You should have received a copy of the GNU General Public License along
  17  * with this program; if not, see <http://www.gnu.org/licenses/>.
  18  */
  19
  20 #include "qemu/osdep.h"
  21 #include "qemu-common.h"
  22 #include "sysemu/bt.h"
  23 #include "hw/bt.h"
  24
  25 /* Slave implementations can ignore this */
  26 static void bt_dummy_lmp_mode_change(struct bt_link_s *link)
  27 {
  28 }
  29
  30 /* Slaves should never receive these PDUs */
  31 static void bt_dummy_lmp_connection_complete(struct bt_link_s *link)
  32 {
  33     if (link->slave->reject_reason)
  34         fprintf(stderr, "%s: stray LMP_not_accepted received, fixme\n",
  35                         __FUNCTION__);
  36     else
  37         fprintf(stderr, "%s: stray LMP_accepted received, fixme\n",
  38                         __FUNCTION__);
  39     exit(-1);
  40 }
  41
  42 static void bt_dummy_lmp_disconnect_master(struct bt_link_s *link)
  43 {
  44     fprintf(stderr, "%s: stray LMP_detach received, fixme\n", __FUNCTION__);
  45     exit(-1);
  46 }
  47
  48 static void bt_dummy_lmp_acl_resp(struct bt_link_s *link,
  49                 const uint8_t *data, int start, int len)
  50 {
  51     fprintf(stderr, "%s: stray ACL response PDU, fixme\n", __FUNCTION__);
  52     exit(-1);
  53 }
  54
  55 /* Slaves that don't hold any additional per link state can use these */
  56 static void bt_dummy_lmp_connection_request(struct bt_link_s *req)
  57 {
  58     struct bt_link_s *link = g_malloc0(sizeof(struct bt_link_s));
  59
  60     link->slave = req->slave;
  61     link->host = req->host;
  62
  63     req->host->reject_reason = 0;
  64     req->host->lmp_connection_complete(link);
  65 }
  66
  67 static void bt_dummy_lmp_disconnect_slave(struct bt_link_s *link)
  68 {
  69     g_free(link);
  70 }
  71
  72 static void bt_dummy_destroy(struct bt_device_s *device)
  73 {
  74     bt_device_done(device);
  75     g_free(device);
  76 }
  77
  78 static int bt_dev_idx = 0;
  79
  80 void bt_device_init(struct bt_device_s *dev, struct bt_scatternet_s *net)
  81 {
  82     memset(dev, 0, sizeof(*dev));
  83     dev->inquiry_scan = 1;
  84     dev->page_scan = 1;
  85
  86     dev->bd_addr.b[0] = bt_dev_idx & 0xff;
  87     dev->bd_addr.b[1] = bt_dev_idx >> 8;
  88     dev->bd_addr.b[2] = 0xd0;
  89     dev->bd_addr.b[3] = 0xba;
  90     dev->bd_addr.b[4] = 0xbe;
  91     dev->bd_addr.b[5] = 0xba;
  92     bt_dev_idx ++;
  93
  94     /* Simple slave-only devices need to implement only .lmp_acl_data */
  95     dev->lmp_connection_complete = bt_dummy_lmp_connection_complete;
  96     dev->lmp_disconnect_master = bt_dummy_lmp_disconnect_master;
  97     dev->lmp_acl_resp = bt_dummy_lmp_acl_resp;
  98     dev->lmp_mode_change = bt_dummy_lmp_mode_change;
  99     dev->lmp_connection_request = bt_dummy_lmp_connection_request;
 100     dev->lmp_disconnect_slave = bt_dummy_lmp_disconnect_slave;
 101
 102     dev->handle_destroy = bt_dummy_destroy;
 103
 104     dev->net = net;
 105     dev->next = net->slave;
 106     net->slave = dev;
 107 }
 108
 109 void bt_device_done(struct bt_device_s *dev)
 110 {
 111     struct bt_device_s **p = &dev->net->slave;
 112
 113     while (*p && *p != dev)
 114         p = &(*p)->next;
 115     if (*p != dev) {
 116         fprintf(stderr, "%s: bad bt device \"%s\"\n", __FUNCTION__,
 117                         dev->lmp_name ?: "(null)");
 118         exit(-1);
 119     }
 120
 121     *p = dev->next;
 122 }
 123
 124 static struct bt_vlan_s {
 125     struct bt_scatternet_s net;
 126     int id;
 127     struct bt_vlan_s *next;
 128 } *first_bt_vlan;
 129
 130 /* find or alloc a new bluetooth "VLAN" */
 131 struct bt_scatternet_s *qemu_find_bt_vlan(int id)
 132 {
 133     struct bt_vlan_s **pvlan, *vlan;
 134     for (vlan = first_bt_vlan; vlan != NULL; vlan = vlan->next) {
 135         if (vlan->id == id)
 136             return &vlan->net;
 137     }
 138     vlan = g_malloc0(sizeof(struct bt_vlan_s));
 139     vlan->id = id;
 140     pvlan = &first_bt_vlan;
 141     while (*pvlan != NULL)
 142         pvlan = &(*pvlan)->next;
 143     *pvlan = vlan;
 144     return &vlan->net;
 145 }