/*      $NetBSD: sdpquery.c,v 1.7 2011/09/16 15:39:29 joerg Exp $       */

/*-
* Copyright (c) 2006 Itronix Inc.
* All rights reserved.
*
* Written by Iain Hibbert for Itronix Inc.
*
* Redistribution and use in source and binary forms, with or without
* modification, are permitted provided that the following conditions
* are met:
* 1. Redistributions of source code must retain the above copyright
*    notice, this list of conditions and the following disclaimer.
* 2. Redistributions in binary form must reproduce the above copyright
*    notice, this list of conditions and the following disclaimer in the
*    documentation and/or other materials provided with the distribution.
* 3. The name of Itronix Inc. may not be used to endorse
*    or promote products derived from this software without specific
*    prior written permission.
*
* THIS SOFTWARE IS PROVIDED BY ITRONIX INC. ``AS IS'' AND
* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
* TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
* PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL ITRONIX INC. BE LIABLE FOR ANY
* DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
* (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
* LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
* ON ANY THEORY OF LIABILITY, WHETHER IN
* CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
* ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
* POSSIBILITY OF SUCH DAMAGE.
*/

#include <sys/cdefs.h>
__COPYRIGHT("@(#) Copyright (c) 2009 The NetBSD Foundation, Inc.\
Copyright (c) 2006 Itronix, Inc.\
All rights reserved.");
__RCSID("$NetBSD: sdpquery.c,v 1.7 2011/09/16 15:39:29 joerg Exp $");

#include <bluetooth.h>
#include <err.h>
#include <errno.h>
#include <sdp.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <unistd.h>

#include "sdpquery.h"

__dead static void usage(void);

const char *control_socket;

bdaddr_t local_addr;
bdaddr_t remote_addr;

bool Nflag;     /* numerical output */
bool Rflag;     /* uncooked output */
bool Xflag;     /* hex output */

static struct command {
       const char      *command;
       int             (*handler)(int, char const **);
       const char      *usage;
} commands[] = {
       { "Browse",     do_sdp_browse,  "[group]"               },
       { "Record",     do_sdp_record,  "handle [handle...]"    },
       { "Search",     do_sdp_search,  "uuid [uuid...]"        },
       { NULL,         NULL,           NULL                    }
};

int
main(int argc, char *argv[])
{
       struct command *cmd;
       int             ch, local;

       bdaddr_copy(&local_addr, BDADDR_ANY);
       bdaddr_copy(&remote_addr, BDADDR_ANY);
       control_socket = NULL;
       Nflag = Rflag = Xflag = false;
       local = 0;

       while ((ch = getopt(argc, argv, "a:c:d:hlNRX")) != -1) {
               switch (ch) {
               case 'a': /* remote address */
                       if (!bt_aton(optarg, &remote_addr)) {
                               struct hostent  *he = NULL;

                               if ((he = bt_gethostbyname(optarg)) == NULL)
                                       errx(EXIT_FAILURE, "%s: %s",
                                               optarg, hstrerror(h_errno));

                               bdaddr_copy(&remote_addr, (bdaddr_t *)he->h_addr);
                       }
                       break;

               case 'c':
                       control_socket = optarg;
                       break;

               case 'd': /* local device address */
                       if (!bt_devaddr(optarg, &local_addr))
                               err(EXIT_FAILURE, "%s", optarg);

                       break;

               case 'l': /* local sdpd */
                       local = 1;
                       break;

               case 'N': /* Numerical output */
                       Nflag = true;
                       break;

               case 'R': /* Raw output */
                       Rflag = true;
                       break;

               case 'X': /* Hex output */
                       Xflag = true;
                       break;

               case 'h':
               default:
                       usage();
                       /* NOT REACHED */
               }
       }

       argc -= optind;
       argv += optind;

       optind = 0;
       optreset = 1;

       if (argc < 1
           || (bdaddr_any(&remote_addr) && !local)
           || (!bdaddr_any(&remote_addr) && local))
               usage();

       for (cmd = commands ; cmd->command != NULL; cmd++) {
               if (strcasecmp(*argv, cmd->command) == 0)
                       return (*cmd->handler)(--argc, (void *)++argv);
       }

       usage();
       return EXIT_FAILURE;
}

static void
usage(void)
{
       struct command *cmd;

       fprintf(stderr,
               "Usage: %s [-NRX] [-d device] -a bdaddr <command> [parameters..]\n"
               "       %s [-NRX] [-c path] -l <command> [parameters..]\n"
               "\n", getprogname(), getprogname());

       fprintf(stderr,
               "Where:\n"
               "\t-a bdaddr    remote address\n"
               "\t-c path      path to control socket\n"
               "\t-d device    local device address\n"
               "\t-l           query local SDP server daemon\n"
               "\t-N           print numerical values\n"
               "\t-R           print raw attribute values\n"
               "\t-X           print attribute values in hex\n"
               "\n"
               "Commands:\n");

       for (cmd = commands ; cmd->command != NULL ; cmd++)
               fprintf(stderr, "\t%-13s%s\n", cmd->command, cmd->usage);

       exit(EXIT_FAILURE);
}