scripts/btmode

   1 #!/bin/sh
   2
   3 set -- `getopt lha: "$@"`
   4 if [ $? -ne 0 ]; then
   5         echo "run $0 -h for help" 1>&2
   6         exit 1
   7 fi
   8 while [ "$1" != "--" ]; do
   9 case "$1" in
  10 -l) # List adapters
  11         dbus-send --system --type=method_call --print-reply --dest=org.bluez\
  12         /org/bluez org.bluez.Manager.ListAdapters|sed -n 's/^ *string "\/org\/bluez\/\([^"]\+\)".*$/\1/p'
  13         exit 0
  14         ;;
  15 -a)     # get adapter from command line
  16         shift
  17         adapter="/org/bluez/$1"
  18         shift
  19         ;;
  20 -h)     echo "Usage $0  [ -a adapter ] [ -l ] [mode]"
  21         echo "without mode argument lists mode for specified (or default) adapter"
  22         echo "with mode argument (one of connectable discoverable off) sets"
  23         echo "with -l list available adapters"
  24         exit
  25 esac
  26 done
  27 shift
  28 if [ -z "$adapter" ];  then
  29         adapter=`dbus-send --system --type=method_call  --print-reply \
  30         --dest=org.bluez /org/bluez org.bluez.Manager.DefaultAdapter  |sed \
  31         -n 's/^ *string "\([^"]\+\)".*$/\1/p'`
  32         [ -z "$adapter" ] && exit 1
  33 fi
  34 if [ -z "$1" ]; then
  35         dbus-send --system --type=method_call  --print-reply \
  36         --dest=org.bluez $adapter org.bluez.Adapter.GetMode  |sed \
  37         -n 's/^ *string "\([^"]\+\)".*$/\1/p'
  38 else
  39         dbus-send --system --type=method_call  --print-reply \
  40         --dest=org.bluez $adapter org.bluez.Adapter.SetMode string:$1 |grep -v  "method return"
  41         #|sed \
  42         #-n 's/^ *string "\([^"]\+\)".*$/\1/p'
  43
  44 fi
  45
  46
  47
  48