usr.sbin/bluetooth/l2control/l2control.c

   1 /*
   2  * l2control.c
   3  *
   4  * Copyright (c) 2001-2002 Maksim Yevmenkin <m_evmenkin@yahoo.com>
   5  * All rights reserved.
   6  *
   7  * Redistribution and use in source and binary forms, with or without
   8  * modification, are permitted provided that the following conditions
   9  * are met:
  10  * 1. Redistributions of source code must retain the above copyright
  11  *    notice, this list of conditions and the following disclaimer.
  12  * 2. Redistributions in binary form must reproduce the above copyright
  13  *    notice, this list of conditions and the following disclaimer in the
  14  *    documentation and/or other materials provided with the distribution.
  15  *
  16  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
  17  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  18  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  19  * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
  20  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  21  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  22  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  23  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  24  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  25  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  26  * SUCH DAMAGE.
  27  *
  28  * $Id: l2control.c,v 1.6 2003/09/05 00:38:25 max Exp $
  29  * $FreeBSD$
  30  */
  31
  32 #include <assert.h>
  33 #include <bluetooth.h>
  34 #include <err.h>
  35 #include <errno.h>
  36 #include <stdio.h>
  37 #include <stdlib.h>
  38 #include <string.h>
  39 #include <unistd.h>
  40 #include "l2control.h"
  41
  42 /* Prototypes */
  43 static int                    do_l2cap_command    (bdaddr_p, int, char **);
  44 static struct l2cap_command * find_l2cap_command  (char const *,
  45                                                    struct l2cap_command *);
  46 static void                   print_l2cap_command (struct l2cap_command *);
  47 static void                   usage               (void);
  48
  49 /* Main */
  50
  51 int     numeric_bdaddr = 0;
  52
  53 int
  54 main(int argc, char *argv[])
  55 {
  56         int             n;
  57         bdaddr_t        bdaddr;
  58
  59         memset(&bdaddr, 0, sizeof(bdaddr));
  60
  61         /* Process command line arguments */
  62         while ((n = getopt(argc, argv, "a:nh")) != -1) {
  63                 switch (n) {
  64                 case 'a':
  65                         if (!bt_aton(optarg, &bdaddr)) {
  66                                 struct hostent  *he = NULL;
  67
  68                                 if ((he = bt_gethostbyname(optarg)) == NULL)
  69                                         errx(1, "%s: %s", optarg, hstrerror(h_errno));
  70
  71                                 memcpy(&bdaddr, he->h_addr, sizeof(bdaddr));
  72                         }
  73                         break;
  74
  75                 case 'n':
  76                         numeric_bdaddr = 1;
  77                         break;
  78
  79                 case 'h':
  80                 default:
  81                         usage();
  82                         break;
  83                 }
  84         }
  85
  86         argc -= optind;
  87         argv += optind;
  88
  89         if (*argv == NULL)
  90                 usage();
  91
  92         return (do_l2cap_command(&bdaddr, argc, argv));
  93 } /* main */
  94
  95 /* Execute commands */
  96 static int
  97 do_l2cap_command(bdaddr_p bdaddr, int argc, char **argv)
  98 {
  99         char                    *cmd = argv[0];
 100         struct l2cap_command    *c = NULL;
 101         struct sockaddr_l2cap    sa;
 102         int                      s, e, help;
 103
 104         help = 0;
 105         if (strcasecmp(cmd, "help") == 0) {
 106                 argc --;
 107                 argv ++;
 108
 109                 if (argc <= 0) {
 110                         fprintf(stdout, "Supported commands:\n");
 111                         print_l2cap_command(l2cap_commands);
 112                         fprintf(stdout, "\nFor more information use " \
 113                                 "'help command'\n");
 114
 115                         return (OK);
 116                 }
 117
 118                 help = 1;
 119                 cmd = argv[0];
 120         }
 121
 122         c = find_l2cap_command(cmd, l2cap_commands);
 123         if (c == NULL) {
 124                 fprintf(stdout, "Unknown command: \"%s\"\n", cmd);
 125                 return (ERROR);
 126         }
 127
 128         if (!help) {
 129                 if (memcmp(bdaddr, NG_HCI_BDADDR_ANY, sizeof(*bdaddr)) == 0)
 130                         usage();
 131
 132                 memset(&sa, 0, sizeof(sa));
 133                 sa.l2cap_len = sizeof(sa);
 134                 sa.l2cap_family = AF_BLUETOOTH;
 135                 memcpy(&sa.l2cap_bdaddr, bdaddr, sizeof(sa.l2cap_bdaddr));
 136
 137                 s = socket(PF_BLUETOOTH, SOCK_RAW, BLUETOOTH_PROTO_L2CAP);
 138                 if (s < 0)
 139                         err(1, "Could not create socket");
 140
 141                 if (bind(s, (struct sockaddr *) &sa, sizeof(sa)) < 0)
 142                         err(2,
 143 "Could not bind socket, bdaddr=%s", bt_ntoa(&sa.l2cap_bdaddr, NULL));
 144
 145                 e = 0x0ffff;
 146                 if (setsockopt(s, SOL_SOCKET, SO_RCVBUF, &e, sizeof(e)) < 0)
 147                         err(3, "Coult not setsockopt(RCVBUF, %d)", e);
 148
 149                 e = (c->handler)(s, -- argc, ++ argv);
 150
 151                 close(s);
 152         } else
 153                 e = USAGE;
 154
 155         switch (e) {
 156         case OK:
 157         case FAILED:
 158                 break;
 159
 160         case ERROR:
 161                 fprintf(stdout, "Could not execute command \"%s\". %s\n",
 162                         cmd, strerror(errno));
 163                 break;
 164
 165         case USAGE:
 166                 fprintf(stdout, "Usage: %s\n%s\n", c->command, c->description);
 167                 break;
 168
 169         default: assert(0); break;
 170         }
 171
 172         return (e);
 173 } /* do_l2cap_command */
 174
 175 /* Try to find command in specified category */
 176 static struct l2cap_command *
 177 find_l2cap_command(char const *command, struct l2cap_command *category)
 178 {
 179         struct l2cap_command    *c = NULL;
 180
 181         for (c = category; c->command != NULL; c++) {
 182                 char    *c_end = strchr(c->command, ' ');
 183
 184                 if (c_end != NULL) {
 185                         int     len = c_end - c->command;
 186
 187                         if (strncasecmp(command, c->command, len) == 0)
 188                                 return (c);
 189                 } else if (strcasecmp(command, c->command) == 0)
 190                                 return (c);
 191         }
 192
 193         return (NULL);
 194 } /* find_l2cap_command */
 195
 196 /* Print commands in specified category */
 197 static void
 198 print_l2cap_command(struct l2cap_command *category)
 199 {
 200         struct l2cap_command    *c = NULL;
 201
 202         for (c = category; c->command != NULL; c++)
 203                 fprintf(stdout, "\t%s\n", c->command);
 204 } /* print_l2cap_command */
 205
 206 /* Usage */
 207 static void
 208 usage(void)
 209 {
 210         fprintf(stderr, "Usage: l2control [-hn] -a local cmd [params ..]\n");
 211         fprintf(stderr, "Where:\n");
 212         fprintf(stderr, "  -a local   Specify local device to connect to\n");
 213         fprintf(stderr, "  -h         Display this message\n");
 214         fprintf(stderr, "  -n         Show addresses as numbers\n");
 215         fprintf(stderr, "  cmd        Supported command " \
 216                 "(see l2control help)\n");
 217         fprintf(stderr, "  params     Optional command parameters\n");
 218         exit(255);
 219 } /* usage */
 220