botctrl

#!/usr/bin/env bash
#
# botctrl - control LifeBot or Corrade bots from the command line
#
# Copyright (c) 2025-2026 Truth & Beauty Lab
#
# Author:  Missy Restless <missyrestless@gmail.com>
# Created: 15-Nov-2025
# License: MIT
#
# TODO: get bot details not working yet, need to generate an access token
#
# ----------------- $HOME/.botctrl Format ----------------------
# Entries in ~/.botctrl can be LB_API_KEY, LB_SECRET, or entries
# of the form LB_SECRET_BOT_NAME in order to support multiple bots
#
# Entries can specify a Slurl alias. For example:
#   export SLURL_club="http://maps.secondlife.com/secondlife/Scylla/226/32/78"
# A Slurl alias can be used with the -l command line argument, e.g. -l club
#
# Entries can also specify a UUID alias. For example:
#   export UUID_couch="xxxxxxxx-yyyy-zzzz-aaaa-bbbbbbbbbbbb"
# A UUID alias can be used with the -u command line argument, e.g. -u couch
# ---------------------------------------------------------------
#
# Command line arguments can be used to override the settings in .botctrl
# NOTE: command line arguments are stored in the shell history
#       environment variables are preferable over command line arguments
#
# Set the default Bot name
# Setting in .botctrl overrides, setting on command line with -n name overrides all
LB_BOT_NAME="Anya Ordinary"
CO_BOT_NAME="Easy Islay"
# Set the default action, can be specified with -a action
ACTION="status"
# LifeBots API endpoint
APIURL="https://api.lifebots.cloud/api"
ENDPOINT="${APIURL}/bot.html"
# Set the default login location
LOCATION="Last location"
# Default chat channel
CHANNEL=0
# Default hover height adjustment
HEIGHT="-0.05"

BOLD=$(tput bold 2> /dev/null)
NORM=$(tput sgr0 2> /dev/null)
LINE=$(tput smul 2> /dev/null)

SCRIPT_FULL_PATH="$0"
SCRIPT_NAME=$(basename "${SCRIPT_FULL_PATH}")

info() { printf "%b[info]%b %s\n" '\e[0;32m\033[1m' '\e[0m' "$*" >&2; }
warn() { printf "%b[warn]%b %s\n" '\e[0;33m\033[1m' '\e[0m' "$*" >&2; }
erro() { printf "%b[error]%b %s\n" '\e[0;31m\033[1m' '\e[0m' "$*" >&2; }

usage() {
  [ "${nobold}" ] && {
    BOLD=
    LINE=
    NORM=
  }
  printf "\n${BOLD}${LINE}Usage:${NORM} ${BOLD}${SCRIPT_NAME} [-deih] [-a action] [-A avatar] [-l location] [-n name] [-k apikey] [-C channel] [-c corrade]"
  printf "\n  [-D data] [-F filter] [-M message] [-N name] [-O name] [-S subject] [-s secret] [-T text] [-u uuid] [-z num]${NORM}"
  [ "$1" == "brief" ] && {
    printf "\n\n"
    exit 1
  }
  printf "\n${BOLD}${LINE}Where:${NORM}"
  printf "\n\t${BOLD}${LINE}-a action${NORM} specifies the API action (sit, teleport, login, ...)"
  printf "\n\t${BOLD}${LINE}-l location${NORM} specifies a location for login and teleport actions"
  printf "\n\t\tDefault: Last location, teleport action requires a Slurl location"
  printf "\n\t${BOLD}${LINE}-n name${NORM} specifies a Bot name, Default: Easy Islay"
  printf "\n\t${BOLD}${LINE}-k apikey${NORM} specifies an API Key, use environment instead"
  printf "\n\t${BOLD}${LINE}-A avatar${NORM} specifies an avatar UUID for use with giving money or objects"
  printf "\n\t${BOLD}${LINE}-C channel${NORM} specifies the channel for a message [default: 0]"
  printf "\n\t${BOLD}${LINE}-c corrade${NORM} specifies a Corrade bot name to act upon"
  printf "\n\t${BOLD}${LINE}-D data${NORM} specifies a Corrade Manager class member"
  printf "\n\t${BOLD}${LINE}-F filter${NORM} specifies a filter to match when listing attachments"
  printf "\n\t${BOLD}${LINE}-M message${NORM} specifies the message body for a group notice/im"
  printf "\n\t${BOLD}${LINE}-N name${NORM} specifies the name of the recipient of an IM or landmark/notecard"
  printf "\n\t${BOLD}${LINE}-O name${NORM} specifies an attachment object name or outfit name"
  printf "\n\t${BOLD}${LINE}-S subject${NORM} specifies the subject for a group notice"
  printf "\n\t${BOLD}${LINE}-s secret${NORM} specifies a Bot secret, use environment instead"
  printf "\n\t${BOLD}${LINE}-T text${NORM} specifies the notecard text or dialog button text for reply to menus"
  printf "\n\t${BOLD}${LINE}-u uuid${NORM} specifies a UUID for use with actions that require one (e.g. sit)"
  printf "\n\t${BOLD}${LINE}-z num${NORM} specifies a hover height adjustment size [default: -0.05]"
  printf "\n\t\tcan also be used to specify a payment amount"
  printf "\n\t${BOLD}${LINE}-d${NORM} indicates dryrun mode - tell me what you would do without doing anything"
  printf "\n\t${BOLD}${LINE}-e${NORM} displays a list of supported commands and examples then exits"
  printf "\n\t${BOLD}${LINE}-i${NORM} retrieves Bot details"
  printf "\n\t${BOLD}${LINE}-h${NORM} displays this usage message and exits"
  printf "\n\n${BOLD}${LINE}Environment:${NORM}"
  printf "\n  Entries in ~/.botctrl can be LB_API_KEY, LB_SECRET, or entries"
  printf "\n  of the form LB_SECRET_BOT_NAME in order to support multiple bots"
  printf "\n  Entries can specify a Slurl alias. For example:"
  printf "\n    export SLURL_club='http://maps.secondlife.com/secondlife/Scylla/226/32/78'"
  printf "\n  A Slurl alias can be used with the -l command line argument, e.g. -l club"
  printf "\n  Entries can also specify a UUID alias. For example:"
  printf "\n    export UUID_Mover='xxxxxxxx-yyyy-zzzz-aaaa-bbbbbbbbbbbb'"
  printf "\n  A UUID alias can be used with the -u command line argument, e.g. -u Mover"
  printf "\n\n${BOLD}${LINE}Examples:${NORM}"
  printf "\n  ${SCRIPT_NAME}  # Displays the status of the default Bot"
  printf "\n  ${SCRIPT_NAME} -a login -l Home # Default Bot login to Home location"
  printf "\n  ${SCRIPT_NAME} -a touch_prim -n 'Jane Doe' -u Mover # Jane Doe bot touch object with aliased UUID"
  printf "\n  ${SCRIPT_NAME} -a stand -n Jane -c John # Jane bot sends the stand command to Corrade bot John"
  printf "\n  ${SCRIPT_NAME} -a teleport -l club  # Uses a 'club' location alias defined in .botctrl"
  printf "\n\n${BOLD}${LINE}Supported Actions${NORM}"
  list_supported_actions
  exit 1
}

examples() {
  printf "\nThe following actions and commands, along with example command"
  printf "\nline invocations, are supported by the ${SCRIPT_NAME} command.\n"

  printf "\nactivate_group : activate a group tag"
  printf "\n\tExample : activate the specified group tag for bot John Doebot"
  printf "\n\t${SCRIPT_NAME} -a activate -n \"John Doebot\" -u \"f8e95201-20af-b85f-a682-7ac25ab9fcaf\""
  printf "\n\t\tIf ~/.botctrl contains : export UUID_pay2play=\"f8e95201-20af-b85f-a682-7ac25ab9fcaf\""
  printf "\n\t\t${SCRIPT_NAME} -a activate -n \"John Doebot\" -u pay2play"
  printf "\nattachments : list bot attachments, optionally specify a filter to match"
  printf "\n\tExample : list bot named John Doebot attachments with name containing the string HUD"
  printf "\n\t${SCRIPT_NAME} -a attachments -F \"HUD\" -n \"John Doebot\""
  printf "\nbot_location : get precise bot location"
  printf "\n\tExample : get location of bot named John Doebot"
  printf "\n\t${SCRIPT_NAME} -a location -n \"John Doebot\""
  printf "\nget_balance : get your bot's L$ balance"
  printf "\n\tExample : get the L$ balance of bot John Doebot"
  printf "\n\t${SCRIPT_NAME} -a balance -n \"John Doebot\""
  printf "\nget_outfit : list currently worn bot outfit"
  printf "\n\tExample : list currently worn outfit of bot named John Doebot"
  printf "\n\t${SCRIPT_NAME} -a get_outfit -n \"John Doebot\""
  printf "\nget_outfits : list available bot outfits"
  printf "\n\tExample : list available outfits for bot named John Doebot"
  printf "\n\t${SCRIPT_NAME} -a get_outfits -n \"John Doebot\""
  printf "\ngive_money : pay another avatar L$ from your bot"
  printf "\n\tExample : pay avatar with specified avatar UUID L$300 from bot John Doebot"
  printf "\n\t${SCRIPT_NAME} -a give_money -n \"John Doebot\" -A \"3506213c-29c8-4aa1-a38f-e12f6d41b804\" -z 300"
  printf "\ngive_money_object : pay an object L$ from your bot"
  printf "\n\tExample : pay a tip jar with specified UUID L$100 from bot John Doebot"
  printf "\n\t${SCRIPT_NAME} -a give_money_object -n \"John Doebot\" -u \"47cb1fc7-8144-b538-6716-c723fb1332d6\" -z 100"
  printf "\nim : send an instant message to an avatar"
  printf "\n\tExample : send IM from John Doebot to avatar \"Jane Free\""
  printf "\n\t${SCRIPT_NAME} -a im -n \"John Doebot\" -N \"Jane Free\" -M 'Hi Jane, do you want to meetup?'"
  printf "\nkey2name : convert an avatar UUID to avatar name"
  printf "\n\tExample : use John Doebot bot to get avatar name of specified UUID"
  printf "\n\t${SCRIPT_NAME} -a key2name -n \"John Doebot\" -u \"3506213c-29c8-4aa1-a38f-e12f6d41b804\""
  printf "\nlistalias : list configured ${SCRIPT_NAME} aliases in $HOME/.botctrl"
  printf "\n\tExample : list all configured ${SCRIPT_NAME} aliases"
  printf "\n\t${SCRIPT_NAME} -a listalias"
  printf "\n\tExample : list configured ${SCRIPT_NAME} bot aliases only"
  printf "\n\t${SCRIPT_NAME} -a botalias"
  printf "\n\tExample : list configured ${SCRIPT_NAME} location aliases only"
  printf "\n\t${SCRIPT_NAME} -a slurlalias"
  printf "\n\tExample : list configured ${SCRIPT_NAME} UUID aliases only"
  printf "\n\t${SCRIPT_NAME} -a uuidalias"
  printf "\nlistinventory : list bot inventory, optionally specify an inventory folder UUID"
  printf "\n\tExample : list inventory of bot named John Doebot"
  printf "\n\t${SCRIPT_NAME} -a listinventory -n \"John Doebot\""
  printf "\nlogin : login bot"
  printf "\n\tExample : login bot named John Doebot"
  printf "\n\t${SCRIPT_NAME} -a login -n \"John Doebot\""
  printf "\nlogout : logout bot"
  printf "\n\tExample : logout bot named John Doebot"
  printf "\n\t${SCRIPT_NAME} -a logout -n \"John Doebot\""
  printf "\nname2key : convert an avatar name to avatar UUID"
  printf "\n\tExample : use John Doebot bot to get avatar UUID of Missy Restless"
  printf "\n\t${SCRIPT_NAME} -a name2key -n \"John Doebot\" -N \"Missy Restless\""
  printf "\nreply_dialog : reply to a dialog menu (requires channel, UUID, and button text)"
  printf "\n\tExample : click couch menu button \"Male\" on channel 99999"
  printf "\n\t${SCRIPT_NAME} -a reply -n \"John Doebot\" -C 99999 -B Male -u \"a811d6fe-de59-2f4e-ee19-0cc48da48981\""
  printf "\nsay_chat_channel : send a message to the specified chat channel"
  printf "\n\tExample : send a message on channel 0, visible to everyone nearby"
  printf "\n\t${SCRIPT_NAME} -a say -n \"John Doebot\" -C 0 -M \"Hi everyone, you look great\""
  printf "\nsend_group_im : send an instant message to a group"
  printf "\n\tExample : send IM to a group from bot named John Doebot"
  printf "\n\t${SCRIPT_NAME} -a send_group_im -n \"John Doebot\" -u \"f7d3c1b9-a141-9546-7e2d-dfd698c5df7c\" -M \"Meeting at Noon SLT tomorrow\""
  printf "\nsend_notice : send an official group notice to all group members"
  printf "\n\tExample : send group notice with subject and message from bot named John Doebot"
  printf "\n\t${SCRIPT_NAME} -a send_notice -n \"John Doebot\" -u \"f7d3c1b9-a141-9546-7e2d-dfd698c5df7c\" -M \"Meeting at Noon SLT tomorrow\" -S \"Meeting Tomorrow\""
  printf "\nset_hoverheight : adjust bot hover height"
  printf "\n\tExample : lower hover height of bot John Doebot by 0.05"
  printf "\n\t${SCRIPT_NAME} -a height -n \"John Doebot\" -z \"-0.05\""
  printf "\nsit : sit on a specified object UUID"
  printf "\n\tExample : sit bot named John Doebot on an object"
  printf "\n\t${SCRIPT_NAME} -a sit -n \"John Doebot\" -u \"d46e217b-fb5c-4796-bae3-ea016b280210\""
  printf "\nstand : make a bot stand up"
  printf "\n\tExample : make bot John Doebot stand up"
  printf "\n\t${SCRIPT_NAME} -a stand -n \"John Doebot\""
  printf "\nstatus : get bot status"
  printf "\n\tExample : get status of bot John Doebot (status is default action)"
  printf "\n\t${SCRIPT_NAME} -n \"John Doebot\""
  printf "\ntakeoff : remove a worn item"
  printf "\n\tExample : bot John Doebot remove the specified inventory item"
  printf "\n\t${SCRIPT_NAME} -a takeoff -n \"John Doebot\" -u \"d666e910-ba72-0c11-a66e-c3759d8af0f5\""
  printf "\nteleport : teleport bot to specified location"
  printf "\n\tExample : teleport bot John Doebot to the aliased location \"club\""
  printf "\n\tRequires an entry of the following form in $HOME/.botctrl"
  printf "\n\t\texport SLURL_club=\"http://maps.secondlife.com/secondlife/Scylla/226/32/78\""
  printf "\n\t${SCRIPT_NAME} -a teleport -n \"John Doebot\" -l club"
  printf "\ntouch_attachment : touch a specified bot attachment"
  printf "\n\tExample : bot John Doebot touch attachment named \"HUD Controller\""
  printf "\n\t${SCRIPT_NAME} -a touch_attachment -n \"John Doebot\" -O \"HUD Controller\""
  printf "\ntouch_prim : touch a specified object by UUID"
  printf "\n\tExample : bot named John Doebot touch an object"
  printf "\n\t${SCRIPT_NAME} -a touch_prim -n \"John Doebot\" -u \"f11781d0-763f-52f9-4e23-3a2b97759fa2\""
  printf "\n\t\tIf ~/.botctrl contains : export UUID_spoton=\"f11781d0-763f-52f9-4e23-3a2b97759fa2\""
  printf "\n\t\t${SCRIPT_NAME} -a touch_prim -n \"John Doebot\" -u spoton"
  printf "\nwalkto : walk bot to a location"
  printf "\n\tExample : bot named John Doebot walk to X/Y/Z coordinates 100/50/28"
  printf "\n\t${SCRIPT_NAME} -a walkto -n \"John Doebot\" -l \"100/50/28\""
  printf "\nwear : wear an inventory item (uses \"add\" rather than \"wear\")"
  printf "\n\tExample : bot John Doebot wear the specified inventory item"
  printf "\n\t${SCRIPT_NAME} -a wear -n \"John Doebot\" -u \"d666e910-ba72-0c11-a66e-c3759d8af0f5\""
  printf "\nwear_outfit : wear a specified outfit"
  printf "\n\tExample : bot named John Doebot wear the outfit named \"Business Casual\""
  printf "\n\t${SCRIPT_NAME} -a wear_outfit -n \"John Doebot\" -O \"Business Casual\""
  printf "\n\t\tIf ~/.botctrl contains : export LB_BOT_NAME='John Doebot'"
  printf "\n\t\t${SCRIPT_NAME} -a wear_outfit -O \"Business Casual\"\n"
  exit 1
}

is_valid_csv() {
  local input_string="$1"
  # Check if the string contains a comma
  if [[ "$input_string" == *","* ]]; then
    # Check if the string contains a comma at the beginning or end
    if [[ "$input_string" == ","* ]] || [[ "$input_string" == *"," ]]; then
      return 1
    else
      return 0
    fi
  else
    return 1
  fi
}

is_valid_uuid() {
  local uuid="$1"
  if [[ $uuid =~ ^\{?[A-F0-9a-f]{8}-[A-F0-9a-f]{4}-[A-F0-9a-f]{4}-[A-F0-9a-f]{4}-[A-F0-9a-f]{12}\}?$ ]]; then
    return 0 # Valid
  else
    return 1 # Invalid
  fi
}

# Regex to match the basic SLURL format
# secondlife://RegionName/X/Y/Z (X, Y, Z are optional, and can be floats)
# or
# http://maps.secondlife.com/secondlife/RegionName/X/Y/Z
is_valid_slurl() {
  local slurl="$1"
  local regex='secondlife://[-[:alnum:]\+&@#/%?=~_|!:,.;]*[-[:alnum:]\+&@#/%=~_|]'
  if [[ ${slurl} =~ ${regex} ]]; then
    return 0 # Valid SLURL
  else
    regex='(https?|http)://maps.secondlife.com/secondlife/[-[:alnum:]\+&@#/%?=~_|!:,.;]*[-[:alnum:]\+&@#/%=~_|]'
    if [[ ${slurl} =~ ${regex} ]]; then
      return 0 # Valid SLURL
    else
      return 1 # Invalid SLURL
    fi
  fi
}

# Validate coordinates provided with -l coords are in supported format, X,Y,Z or X/Y/Z.
is_valid_coords() {
  local coords="$1"
  if [[ "${coords}" =~ ^[[:digit:]]+,[[:digit:]]+,[[:digit:]]+$ ]]; then
    return 0 # Valid Coordinates
  else
    if [[ "${coords}" =~ ^[[:digit:]]+/[[:digit:]]+/[[:digit:]]+$ ]]; then
      return 0 # Valid Coordinates
    else
      return 1 # Invalid Coordinates
    fi
  fi
}

# TODO: get_details not yet working
get_details() {
  local access_token="${LB_SECRET}"
  [ "${LB_BOT_ID}" ] || {
    erro "No Bot ID set in .botctrl"
    usage
  }
  if [ "${dryrun}" ]; then
    echo "curl ${verb} GET ${APIURL}/v1/bots/${LB_BOT_ID} \
      -H \"Authorization: Bearer ${access_token}\" \
      -H \"Accept: application/json\" \
      -H \"Content-Type: application/json\""
  else
    curl ${verb} GET ${APIURL}/v1/bots/${LB_BOT_ID} \
      -H "Authorization: Bearer ${access_token}" \
      -H "Accept: application/json" \
      -H "Content-Type: application/json"
  fi
}

show_alias() {
  local astr="$1"
  local argl="$2"
  if env | grep ^${astr}_ >/dev/null; then
    env | grep ^${astr}_ | while read entr
    do
      [ "${entr}" ] && {
        alias=$(echo "${entr}" | awk -F '=' '{ print $1 }' | sed -e "s/${astr}_//")
        along=$(echo "${entr}" | awk -F '=' '{ print $2 }')
        alen=${#alias}
        if [ ${alen} -lt 5 ]; then
          printf "\n${BOLD}${LINE}-%s %s${NORM}\t\talias for: ${BOLD}-%s %s${NORM}" \
                 "${argl}" "${alias}" "${argl}" "${along}"
        else
          printf "\n${BOLD}${LINE}-%s %s${NORM}\talias for: ${BOLD}-%s %s${NORM}" \
                 "${argl}" "${alias}" "${argl}" "${along}"
        fi
      }
    done
  else
    warn "No ${astr} aliases defined in ${HOME}/.botctrl"
  fi
}

list_aliases() {
  local ali="$1"
  [ "${ali}" ] || ali="aliases"

  case "${ali}" in
    botalias*|aliasbot*)
      printf "\n${BOLD}${LINE}Bot Name Aliases${NORM}\n"
      show_alias BOT_NAME n
      ;;
    localias*|slurlalias*|alias*url*)
      printf "\n${BOLD}${LINE}Slurl Aliases${NORM}\n"
      show_alias SLURL l
      ;;
    uuidalias*|aliasuu*)
      printf "\n${BOLD}${LINE}UUID Aliases${NORM}\n"
      show_alias UUID u
      ;;
    *)
      printf "\n${BOLD}${LINE}Bot Name Aliases${NORM}\n"
      show_alias BOT_NAME n
      printf "\n\n${BOLD}${LINE}Slurl Aliases${NORM}\n"
      show_alias SLURL l
      printf "\n\n${BOLD}${LINE}UUID Aliases${NORM}\n"
      show_alias UUID u
      ;;
  esac
  echo ""
}

list_supported_actions() {
  printf "\nSupported actions for BotControl Configuration:"
  printf "\n  bot_alias, loc_alias, slurl_alias, uuid_alias, list_alias, alias"
  printf "\nSupported actions common to both Corrade and LifeBots:"
  printf "\n  activate_group, attachments, avatar_picks, get_balance, get_outfit, get_outfits, give_inventory,"
  printf "\n  give_object, give_money, give_money_object, im, key2name, listinventory, login, logout,"
  printf "\n  name2key, notecard_create, rebake, say_chat_channel, send_group_im, send_notice,"
  printf "\n  set_hoverheight, sit, stand, status, takeoff, teleport, touch_prim, walkto, wear, wear_outfit"
  printf "\nSupported actions for LifeBots only:"
  printf "\n  bot_location, reply_dialog, touch_attachment"
  printf "\nSupported actions for Corrade only:"
  printf "\n  attach, conference, conference_detail, conference_list, createlandmark, currentsim, detach"
  printf "\n  fly, flyto, getattachmentspath, getavatarpickdata, getgroupmemberdata, get_hoverheight,"
  printf "\n  getmembersonline, getregiontop, getselfdata, inventory cwd, key2displayname, networkmanagerdata\n"
}

get_coords() {
  local loc="$1"
  # Convert position coordinates from x/y/z to x,y,z
  echo "${loc}" | grep / >/dev/null && {
    loc=$(echo "${loc}" | awk -F '/' -v OFS=',' '{ print $(NF-2), $(NF-1), $NF }')
  }
  loc=$(echo "${loc}" | awk -F ',' -v OFS=',' '{ print $(NF-2), $(NF-1), $NF }')
  echo "${loc}"
}

set_lb_coords() {
  local loc="$1"
  # Convert position coordinates to x/y/z
  echo "${loc}" | grep , >/dev/null && {
    loc=$(echo "${loc}" | awk -F ',' -v OFS='/' '{ print $(NF-2), $(NF-1), $NF }')
  }
  echo "${loc}"
}

wasURLEscape() {
  printf %s "$1" | sed -e "s/ /+/g" \
                  -e "s%/%\%2F%g" \
                  -e "s/&/%26/g" \
                  -e "s/%/%25/g" \
                  -e "s/=/%3D/g" \
                  -e "s/|/%7C/g" \
                  -e "s/\n/%0D%0A/g"
}

fixup_Outfits_JSON() {
  # I know, it's ugly, but the JSON return output was uglier
  local type_outfit="$1"
  if [ "${type_outfit}" == "current" ]; then
    printf '\n{\n  "action": "get_outfit",\n  "outfits": [\n'
  else
    printf '\n{\n  "action": "get_outfits",\n  "outfits": [\n'
  fi

  local name=
  local uuid=
  local line
  while IFS= read -r line; do
    if [ "${line}" == "name" ]; then
      printf '    {\n      "name": '
      name=1
    else
      if [ "${line}" == "item" ]; then
        printf '      "uuid": '
        uuid=1
      else
        [ "${name}" ] && {
          printf "\"${line}\",\n"
          name=
        }
        [ "${uuid}" ] && {
          printf "\"${line}\"\n    },\n"
          uuid=
        }
      fi
    fi
  done

  printf '    {\n'
  printf '      "name": "BotControlCommandDummyPlaceholder",\n'
  printf '      "uuid": "foo-bar-spam"\n'
  printf '    }\n'
  printf '  ]\n'
  printf '}\n'
}

send_corrade_request() {
  local cmd="$1"
  [ "${cmd}" ] || {
    erro "Empty command. Exiting."
    usage
  }
  # If the Corrade configuration specifies WAS ScriptLanguage:
  # cgroup=$(wasURLEscape "${CORRADE_GROUP}")
  # cpassw=$(wasURLEscape "${CORRADE_PASSW}")
  # If the Corrade configuration specifies JSON ScriptLanguage:
  local cgroup="${CORRADE_GROUP}"
  local cpassw="${CORRADE_PASSW}"
  local cuuid=
  local POS=
  local pos=
  local rgn=
  COMMON="\"group\": \"${cgroup}\", \"password\": \"${cpassw}\""
  case "${cmd}" in
    activate|activate_group)
      COMMAND="\"command\": \"activate\", \"target\": \"${GROUP_ID}\""
      ;;
    attach|detach)
      [ "${UUID}" ] || {
        erro "The ${cmd} action requires an inventory item UUID specified with -u UUID"
        usage brief
      }
      if [ "${cmd}" == "attach" ]; then
        COMMAND="\"command\": \"attach\", \"attachments\": \"Default\", \"${UUID}\""
      else
        COMMAND="\"command\": \"detach\", \"type\": \"UUID\", \"attachments\": \"${UUID}\""
      fi
      ;;
    avatar_picks|picks)
      COMMAND="\"command\": \"getavatarpicks\", \"agent\": \"${AVATAR_UUID}\""
      ;;
    *pick*data)
      COMMAND="\"command\": \"getavatarpickdata\", \
                \"agent\": \"${AVATAR_UUID}\", \
                \"data\": \"Desc\", \
                \"item\": \"${UUID}\""
      ;;
    conference|creat*confer*|confer*creat*)
      [ "${TEXT}" ] || {
        erro "The ${cmd} action requires a comma separated list of avatar name/uuid specified with -T \"av1,av2,...\""
        usage brief
      }
      is_valid_csv "${TEXT}" || {
        erro "Not a valid comma separated list: ${TEXT}"
        usage brief
      }
      COMMAND="\"command\": \"conference\", \"action\": \"create\", \"avatars\": \"${TEXT}\""
      ;;
    say*confer*|confer*say)
      [ "${UUID}" ] || {
        erro "The ${cmd} action requires a conference session UUID specified with -u UUID"
        usage brief
      }
      COMMAND="\"command\": \"tell\", \"entity\": \"conference\", \"session\": \"${UUID}\", \"message\": \"${MESSAGE}\""
      ;;
    list*confer*|confer*list*)
      COMMAND="\"command\": \"conference\", \"action\": \"list\""
      ;;
    det*confer*|confer*det*)
      [ "${UUID}" ] || {
        erro "The ${cmd} action requires a conference session UUID specified with -u UUID"
        usage brief
      }
      COMMAND="\"command\": \"conference\", \"action\": \"detail\", \"session\": \"${UUID}\""
      ;;
    creat*landmark|creat*lm)
      [ "${SL_NAME}" ] || {
        erro "The ${cmd} action requires a Landmark Name specified with -N name"
        usage brief
      }
      COMMAND="\"command\": \"createlandmark\", \"name\": \"${SL_NAME}\""
      ;;
    creat*notecard|creat*nc|note*creat*|nc*creat*)
      COMMAND="\"command\": \"createnotecard\", \"entity\": \"text\", \"name\": \"${SL_NAME}\", \"text\": \"${TEXT}\""
      ;;
    fly|nofly)
      local action="start"
      [ "${cmd}" == "nofly" ] && action="stop"
      COMMAND="\"command\": \"fly\", \"action\": \"${action}\""
      ;;
    flyto|fly_to)
      POS=$(get_coords "${LOCATION}")
      loc=$(echo "${loc}" | awk -F ',' -v OFS=',' '{ print $(NF-2), $(NF-1), $NF }')
      pos="<${POS}>"
      COMMAND="\"command\": \"flyto\", \"fly\": \"False\", \"position\": \"${pos} + <0,0,5>\""
      ;;
    *attachments*)
      local comm="getattachments"
      echo "${cmd}" | grep attachmentspath >/dev/null && comm="getattachmentspath"
      COMMAND="\"command\": \"${comm}\""
      ;;
    get_balance|getbalance|balance)
      COMMAND="\"command\": \"getbalance\""
      ;;
    get*hover*|get*zoffset)
      COMMAND="\"command\": \"avatarzoffset\", \"action\": \"get\""
      ;;
    getcwd|cwd)
      COMMAND="\"command\": \"inventory\", \"action\": \"cwd\""
      ;;
    get_outfit*)
      local path="/My Inventory/Current Outfit"
      echo "${cmd}" | grep get_outfits >/dev/null && path="/My Inventory/My Outfits"
      COMMAND="\"command\": \"inventory\", \"path\": \"${path}\", \"follow\": \"True\", \"action\": \"ls\""
      ;;
    give|give_inv*)
      COMMAND="\"command\": \"give\", \"entity\": \"avatar\", \"agent\": \"${AVATAR_UUID}\", \"item\": \"${UUID}\""
      ;;
    give_obj*)
      COMMAND="\"command\": \"give\", \"entity\": \"object\", \"target\": \"${AVATAR_UUID}\", \"item\": \"${UUID}\""
      ;;
    im)
      COMMAND="\"command\": \"tell\", \"entity\": \"avatar\", \"agent\": \"${SL_NAME}\", \"message\": \"${MESSAGE}\""
      ;;
    key2name)
      COMMAND="\"command\": \"batchavatarkeytoname\", \"avatars\": \"${UUID}\""
      ;;
    key2displayname)
      COMMAND="\"command\": \"getavatardisplayname\", \"agent\": \"${UUID}\""
      ;;
    listinventory)
      COMMAND="\"command\": \"inventory\", \"action\": \"ls\""
      ;;
    login)
      if [ "${LOCATION}" ] && [ "${LOCATION}" != "Last location" ]; then
        POS=$(get_coords "${LOCATION}")
        pos=$(echo "${POS}" | awk -F ',' -v OFS='/' '{ print $(NF-2), $(NF-1), $NF }')
        rgn=$(echo "${LOCATION}" | awk -F '/' '{ print $(NF-3) }' | sed -e "s/%20/ /g")
        COMMAND="\"command\": \"login\", \"location\": \"${rgn}/${pos}\""
      else
        COMMAND="\"command\": \"login\", \"location\": \"last\""
      fi
      ;;
    name2key)
      COMMAND="\"command\": \"batchavatarnametokey\", \"avatars\": \"${SL_NAME}\""
      ;;
    pay|pay_avatar|give_money)
      COMMAND="\"command\": \"pay\", \"entity\": \"avatar\", \"agent\": \"${AVATAR_UUID}\", \"amount\": \"${AMOUNT}\""
      ;;
    pay_object|give_money_object)
      COMMAND="\"command\": \"pay\", \"entity\": \"object\", \"target\": \"${OBJECT_UUID}\", \"amount\": \"${AMOUNT}\""
      ;;
    send_group_im)
      COMMAND="\"command\": \"tell\", \
               \"entity\": \"group\", \
               \"target\": \"${GROUP_ID}\", \
               \"message\": \"${MESSAGE}\""
      ;;
    send_notice)
      COMMAND="\"command\": \"notice\", \
               \"action\": \"send\", \
               \"target\": \"${GROUP_ID}\", \
               \"subject\": \"${SUBJECT}\", \
               \"message\": \"${MESSAGE}\""
      ;;
    say_chat_channel)
      COMMAND="\"command\": \"tell\", \
               \"entity\": \"local\", \
               \"type\": \"normal\", \
               \"channel\": \"${CHANNEL}\", \
               \"message\": \"${MESSAGE}\""
      ;;
    set*hover*|set*zoffset)
      COMMAND="\"command\": \"avatarzoffset\", \"action\": \"set\", \"offset\": \"${HEIGHT}\""
      ;;
    sit|touch*)
      if [ "${UUID}" ]; then
        cuuid="${UUID}"
      else
        if [ "${OBJ_NAME}" ]; then
          cuuid="${OBJ_NAME}"
        else
          erro "Corrade command ${cmd} requires object uuid or name"
          usage brief
        fi
      fi
      if [ "${cmd}" == "sit" ]; then
        COMMAND="\"command\": \"sit\", \"item\": \"${cuuid}\", \"range\": \"${CORRADE_RANGE}\", \"deanimate\": \"True\""
      else
        COMMAND="\"command\": \"touch\", \"item\": \"${cuuid}\", \"range\": \"${CORRADE_RANGE}\""
      fi
      ;;
    stand)
      COMMAND="\"command\": \"stand\", \"deanimate\": \"True\""
      ;;
    getmembersonline)
      COMMAND="\"command\": \"getmembersonline\""
      ;;
    online*|status)
      COMMAND="\"command\": \"getgroupmemberdata\", \"agent\": \"${CORRADE_BOT_ID}\", \"data\": \"OnlineStatus\""
      ;;
    curr*sim|position)
      COMMAND="\"command\": \"getnetworkdata\", \"data\": \"CurrentSim\""
      ;;
    get*top|top*script*)
      COMMAND="\"command\": \"getregiontop\", \
               \"type\": \"scripts\",
               \"sift\": \"{ 'skip': '1', 'each': '5' }\""
      ;;
    *self*data)
      [ "${DATA}" ] || DATA="Health"
      COMMAND="\"command\": \"getselfdata\", \"data\": \"${DATA}\""
      ;;
    *member*data)
      [ "${DATA}" ] || {
        erro "The ${cmd} action requires a GroupMember structure member specified with -D DATA"
        usage brief
      }
      COMMAND="\"command\": \"getgroupmemberdata\", \"agent\": \"${CORRADE_BOT_ID}\", \"data\": \"${DATA}\""
      ;;
    net*manager|net*data)
      [ "${DATA}" ] || {
        erro "The ${cmd} action requires a NetworkManager member specified with -D DATA"
        usage brief
      }
      COMMAND="\"command\": \"getnetworkdata\", \"data\": \"${DATA}\""
      ;;
    teleport)
      POS=$(get_coords "${LOCATION}")
      pos="<${POS}>"
      rgn=$(echo "${LOCATION}" | awk -F '/' '{ print $(NF-3) }' | sed -e "s/%20/ /g")
      COMMAND="\"command\": \"teleport\", \"entity\": \"region\", \"region\": \"${rgn}\", \"position\": \"${pos}\""
      ;;
    unwear|remove|takeoff)
      COMMAND="\"command\": \"unwear\", \"type\": \"UUID\", \"wearables\": \"${UUID}\""
      ;;
    walk*)
      POS=$(get_coords "${LOCATION}")
      pos="<${POS}>"
      COMMAND="\"command\": \"walkto\", \"position\": \"${pos}\""
      ;;
    wear)
      COMMAND="\"command\": \"wear\", \"replace\": \"False\", \"wearables\": \"${WEARABLE}\""
      ;;
    change*|wear*)
      local outfit_folder="/My Inventory/My Outfits/${OUTFIT_NAME}"
      COMMAND="\"command\": \"changeappearance\", \"folder\": \"${outfit_folder}\""
      ;;
    *)
      # This catches commands like logout which have no additional parameters
      # but it also passes commands that do require extra params and will fail
      COMMAND="\"command\": \"${cmd}\""
      ;;
  esac
  [ "${COMMAND}" ] || {
    erro "Corrade command ${cmd} not yet supported"
    list_supported_actions
    usage brief
  }
  [ "${CORRADE_BOT_URL}" ] || {
    erro "Corrade bot URL not set!"
    usage brief
  }
  if [ "${dryrun}" ]; then
    echo "curl ${verb} -X POST ${CORRADE_BOT_URL} \
          -H \"Accept: application/json\" \
          -H \"Content-Type: application/json\" \
          -d \"{
            ${COMMON},
            ${COMMAND}
          }\""
  else
    if [ "${have_jq}" ]; then
      case "${cmd}" in
        get_outfit*)
          local outfit_type="current"
          echo "${cmd}" | grep get_outfits >/dev/null && outfit_type="outfits"
          curl ${verb} -X POST ${CORRADE_BOT_URL} \
               -H "Accept: application/json" \
               -H "Content-Type: application/json" \
               -d "{
                 ${COMMON},
                 ${COMMAND}
               }" | jq -r '.data[]' | fixup_Outfits_JSON "${outfit_type}" | \
                    jq 'del(.outfits[] | select(.name == "BotControlCommandDummyPlaceholder"))'
          ;;
        *)
          curl ${verb} -X POST ${CORRADE_BOT_URL} \
               -H "Accept: application/json" \
               -H "Content-Type: application/json" \
               -d "{
                 ${COMMON},
                 ${COMMAND}
               }" | jq -r .
          ;;
      esac
    else
      curl ${verb} -X POST ${CORRADE_BOT_URL} \
           -H "Accept: application/json" \
           -H "Content-Type: application/json" \
           -d "{
             ${COMMON},
             ${COMMAND}
           }"
    fi
  fi
}

send_lifebot_request() {
  local act="$1"
  [ "${act}" ] || {
    erro "Empty action. Exiting."
    usage
  }
  COMMON="\"action\": \"${act}\", \
          \"apikey\": \"${LB_API_KEY}\", \
          \"botname\": \"${BE_BOT_NAME}\", \
          \"secret\": \"${LB_SECRET}\", \
          \"dataType\": \"json\""
  case "${act}" in
    listinventory|sit|touch_attachment|touch_prim)
      if [ "${dryrun}" ]; then
        if [ "${UUID}" ]; then
          echo "curl ${verb} -X POST ${ENDPOINT} \
            -H \"Accept: application/json\" \
            -H \"Content-Type: application/json\" \
            -d \"{
            ${COMMON},
            \"objectname\": \"${OBJ_NAME}\",
            \"uuid\": \"${UUID}\",
            \"extended\": true
          }\""
        else
          echo "curl ${verb} -X POST ${ENDPOINT} \
            -H \"Accept: application/json\" \
            -H \"Content-Type: application/json\" \
            -d \"{
            ${COMMON},
            \"objectname\": \"${OBJ_NAME}\"
          }\""
        fi
      else
        if [ "${UUID}" ]; then
          curl ${verb} -X POST ${ENDPOINT} \
            -H "Accept: application/json" \
            -H "Content-Type: application/json" \
            -d "{
            ${COMMON},
            \"objectname\": \"${OBJ_NAME}\",
            \"uuid\": \"${UUID}\",
            \"extended\": true
          }"
        else
          curl ${verb} -X POST ${ENDPOINT} \
            -H "Accept: application/json" \
            -H "Content-Type: application/json" \
            -d "{
            ${COMMON},
            \"objectname\": \"${OBJ_NAME}\"
          }"
        fi
      fi
      ;;
    login|teleport)
      if [ "${LOGIN_SITON}" ] && [ "${act}" == "login" ]; then
        if [ "${dryrun}" ]; then
          echo "curl ${verb} -X POST ${ENDPOINT} \
            -H \"Accept: application/json\" \
            -H \"Content-Type: application/json\" \
            -d \"{
            ${COMMON},
            \"siton\": \"${LOGIN_SITON}\",
            \"location\": \"${LOCATION}\"
          }\""
        else
          curl ${verb} -X POST ${ENDPOINT} \
            -H "Accept: application/json" \
            -H "Content-Type: application/json" \
            -d "{
            ${COMMON},
            \"siton\": \"${LOGIN_SITON}\",
            \"location\": \"${LOCATION}\"
          }"
        fi
      else
        if [ "${dryrun}" ]; then
          echo "curl ${verb} -X POST ${ENDPOINT} \
            -H \"Accept: application/json\" \
            -H \"Content-Type: application/json\" \
            -d \"{
            ${COMMON},
            \"location\": \"${LOCATION}\"
          }\""
        else
          curl ${verb} -X POST ${ENDPOINT} \
            -H "Accept: application/json" \
            -H "Content-Type: application/json" \
            -d "{
            ${COMMON},
            \"location\": \"${LOCATION}\"
          }"
        fi
      fi
      ;;
    key2name)
      if [ "${dryrun}" ]; then
        echo "curl ${verb} -X POST ${ENDPOINT} \
          -H \"Accept: application/json\" \
          -H \"Content-Type: application/json\" \
          -d \"{
          ${COMMON},
          \"key\": \"${UUID}\",
          \"request_case\": \"1\"
        }\""
      else
        curl ${verb} -X POST ${ENDPOINT} \
          -H "Accept: application/json" \
          -H "Content-Type: application/json" \
          -d "{
          ${COMMON},
          \"key\": \"${UUID}\",
          \"request_case\": \"1\"
        }"
      fi
      ;;
    name2key)
      if [ "${dryrun}" ]; then
        echo "curl ${verb} -X POST ${ENDPOINT} \
          -H \"Accept: application/json\" \
          -H \"Content-Type: application/json\" \
          -d \"{
          ${COMMON},
          \"name\": \"${SL_NAME}\",
          \"request_case\": \"1\"
        }\""
      else
        curl ${verb} -X POST ${ENDPOINT} \
          -H "Accept: application/json" \
          -H "Content-Type: application/json" \
          -d "{
          ${COMMON},
          \"name\": \"${SL_NAME}\",
          \"request_case\": \"1\"
        }"
      fi
      ;;
    avatar_picks)
      if [ "${dryrun}" ]; then
        echo "curl ${verb} -X POST ${ENDPOINT} \
          -H \"Accept: application/json\" \
          -H \"Content-Type: application/json\" \
          -d \"{
          ${COMMON},
          \"avatar\": \"${AVATAR_UUID}\"
        }\""
      else
        curl ${verb} -X POST ${ENDPOINT} \
          -H "Accept: application/json" \
          -H "Content-Type: application/json" \
          -d "{
          ${COMMON},
          \"avatar\": \"${AVATAR_UUID}\"
        }"
      fi
      ;;
    give_inventory)
      if [ "${dryrun}" ]; then
        echo "curl ${verb} -X POST ${ENDPOINT} \
          -H \"Accept: application/json\" \
          -H \"Content-Type: application/json\" \
          -d \"{
          ${COMMON},
          \"avatar\": \"${AVATAR_UUID}\",
          \"object\": \"${UUID}\"
        }\""
      else
        curl ${verb} -X POST ${ENDPOINT} \
          -H "Accept: application/json" \
          -H "Content-Type: application/json" \
          -d "{
          ${COMMON},
          \"avatar\": \"${AVATAR_UUID}\",
          \"object\": \"${UUID}\"
        }"
      fi
      ;;
    give_money|give_money_object)
      if [ "${dryrun}" ]; then
        echo "curl ${verb} -X POST ${ENDPOINT} \
          -H \"Accept: application/json\" \
          -H \"Content-Type: application/json\" \
          -d \"{
          ${COMMON},
          \"avatar\": \"${AVATAR_UUID}\",
          \"object_uuid\": \"${OBJECT_UUID}\",
          \"amount\": ${AMOUNT}
        }\""
      else
        curl ${verb} -X POST ${ENDPOINT} \
          -H "Accept: application/json" \
          -H "Content-Type: application/json" \
          -d "{
          ${COMMON},
          \"avatar\": \"${AVATAR_UUID}\",
          \"object_uuid\": \"${OBJECT_UUID}\",
          \"amount\": ${AMOUNT}
        }"
      fi
      ;;
    notecard_create)
      if [ "${dryrun}" ]; then
        echo "curl ${verb} -X POST ${ENDPOINT} \
          -H \"Accept: application/json\" \
          -H \"Content-Type: application/json\" \
          -d \"{
          ${COMMON},
          \"name\": \"${SL_NAME}\",
          \"text\": \"${TEXT}\"
        }\""
      else
        curl ${verb} -X POST ${ENDPOINT} \
          -H "Accept: application/json" \
          -H "Content-Type: application/json" \
          -d "{
          ${COMMON},
          \"name\": \"${SL_NAME}\",
          \"text\": \"${TEXT}\"
        }"
      fi
      ;;
    reply_dialog)
      if [ "${dryrun}" ]; then
        echo "curl ${verb} -X POST ${ENDPOINT} \
          -H \"Accept: application/json\" \
          -H \"Content-Type: application/json\" \
          -d \"{
          ${COMMON},
          \"button\": \"${TEXT}\",
          \"channel\": \"${CHANNEL}\",
          \"object\": \"${UUID}\"
        }\""
      else
        curl ${verb} -X POST ${ENDPOINT} \
          -H "Accept: application/json" \
          -H "Content-Type: application/json" \
          -d "{
          ${COMMON},
          \"button\": \"${TEXT}\",
          \"channel\": \"${CHANNEL}\",
          \"object\": \"${UUID}\"
        }"
      fi
      ;;
    activate_group|im|say_chat_channel|send_group_im|send_notice)
      msg_label="message"
      [ "${act}" == "send_notice" ] && msg_label="text"
      if [ "${dryrun}" ]; then
        echo "curl ${verb} -X POST ${ENDPOINT} \
          -H \"Accept: application/json\" \
          -H \"Content-Type: application/json\" \
          -d \"{
          ${COMMON},
          \"slname\": \"${SL_NAME}\",
          \"groupuuid\": \"${GROUP_ID}\",
          \"subject\": \"${SUBJECT}\",
          \"channel\": \"${CHANNEL}\",
          \"${msg_label}\": \"${MESSAGE}\",
          \"autodelay\": \"1\"
        }\""
      else
        curl ${verb} -X POST ${ENDPOINT} \
          -H "Accept: application/json" \
          -H "Content-Type: application/json" \
          -d "{
          ${COMMON},
          \"slname\": \"${SL_NAME}\",
          \"groupuuid\": \"${GROUP_ID}\",
          \"subject\": \"${SUBJECT}\",
          \"channel\": \"${CHANNEL}\",
          \"${msg_label}\": \"${MESSAGE}\",
          \"autodelay\": \"1\"
        }"
      fi
      ;;
    set_hoverheight)
      if [ "${dryrun}" ]; then
        echo "curl ${verb} -X POST ${ENDPOINT} \
          -H \"Accept: application/json\" \
          -H \"Content-Type: application/json\" \
          -d \"{
          ${COMMON},
          \"height\": \"${HEIGHT}\"
        }\""
      else
        curl ${verb} -X POST ${ENDPOINT} \
          -H "Accept: application/json" \
          -H "Content-Type: application/json" \
          -d "{
          ${COMMON},
          \"height\": \"${HEIGHT}\"
        }"
      fi
      ;;
    takeoff|wear)
      if [ "${dryrun}" ]; then
        echo "curl ${verb} -X POST ${ENDPOINT} \
          -H \"Accept: application/json\" \
          -H \"Content-Type: application/json\" \
          -d \"{
          ${COMMON},
          \"uuid\": \"${UUID}\",
          \"wear\": \"add\"
        }\""
      else
        curl ${verb} -X POST ${ENDPOINT} \
          -H "Accept: application/json" \
          -H "Content-Type: application/json" \
          -d "{
          ${COMMON},
          \"uuid\": \"${UUID}\",
          \"wear\": \"add\"
        }"
      fi
      ;;
    wear_outfit)
      if [ "${dryrun}" ]; then
        echo "curl ${verb} -X POST ${ENDPOINT} \
          -H \"Accept: application/json\" \
          -H \"Content-Type: application/json\" \
          -d \"{
          ${COMMON},
          \"outfitname\": \"${OUTFIT_NAME}\"
        }\""
      else
        curl ${verb} -X POST ${ENDPOINT} \
          -H "Accept: application/json" \
          -H "Content-Type: application/json" \
          -d "{
          ${COMMON},
          \"outfitname\": \"${OUTFIT_NAME}\"
        }"
      fi
      ;;
    walkto)
      # LifeBots walkto API seems to require x/y/z even though x,y,z is documented
      LOCATION=$(set_lb_coords "${LOCATION}")
      if [ "${dryrun}" ]; then
        echo "curl ${verb} -X POST ${ENDPOINT} \
          -H \"Accept: application/json\" \
          -H \"Content-Type: application/json\" \
          -d \"{
          ${COMMON},
          \"coords\": \"${LOCATION}\"
        }\""
      else
        curl ${verb} -X POST ${ENDPOINT} \
          -H "Accept: application/json" \
          -H "Content-Type: application/json" \
          -d "{
          ${COMMON},
          \"coords\": \"${LOCATION}\"
        }"
      fi
      ;;
    attachments)
      if [ "${dryrun}" ]; then
        echo "curl ${verb} -X POST ${ENDPOINT} \
          -H \"Accept: application/json\" \
          -H \"Content-Type: application/json\" \
          -d \"{
          ${COMMON},
          \"matchnames\": \"${FILTER}\"
        }\""
      else
        curl ${verb} -X POST ${ENDPOINT} \
          -H "Accept: application/json" \
          -H "Content-Type: application/json" \
          -d "{
          ${COMMON},
          \"matchnames\": \"${FILTER}\"
        }"
      fi
      ;;
    *)
      if [ "${dryrun}" ]; then
        echo "curl ${verb} -X POST ${ENDPOINT} \
          -H \"Accept: application/json\" \
          -H \"Content-Type: application/json\" \
          -d \"{
          ${COMMON}
        }\""
      else
        curl ${verb} -X POST ${ENDPOINT} \
          -H "Accept: application/json" \
          -H "Content-Type: application/json" \
          -d "{
          ${COMMON}
        }"
      fi
      ;;
  esac
}

send_request() {
  if [ "$1" == "-l" ]; then
    shift
    send_lifebot_request "$@"
  else
    if [ "$1" == "-c" ]; then
      shift
      send_corrade_request "$@"
    else
      if [ "${corrade}" ]; then
        send_corrade_request "$@"
      else
        send_lifebot_request "$@"
      fi
    fi
  fi
}

ACTION_STR= AMOUNT= AVATAR_UUID= BOT_NAME= DATA= FILTER= GROUP_ID=
LOGIN_SITON= MESSAGE= OBJ_NAME= OUTFIT_NAME= SL_NAME= SUBJECT= TEXT=
CORRADE_BOT_ID= CORRADE_BOT_NAME= CORRADE_BOT_URL= UUID= WEARABLE=

[ -f ${HOME}/.botctrl ] && source ${HOME}/.botctrl

# Use jq to format JSON return if it is available
have_jq=$(type -p jq)

if [ "${SCRIPT_NAME}" == "corrade" ]; then
  corrade=1
else
  corrade=
fi
get_default_status=
[ "$#" -eq 0 ] && get_default_status=1

command_line_secret= details= dryrun= nobold= verb="-s"
while getopts ":a:A:c:C:dD:ijF:l:M:N:n:O:k:S:s:T:u:vz:Heh" flag; do
  case $flag in
    a)
      ACTION_STR="${OPTARG}"
      ;;
    A)
      AVATAR_UUID="${OPTARG}"
      ;;
    C)
      CHANNEL="${OPTARG}"
      ;;
    c)
      CORRADE_BOT_NAME="${OPTARG}"
      ;;
    d)
      dryrun=1
      have_jq=
      ;;
    D)
      DATA="${OPTARG}"
      ;;
    F)
      FILTER="${OPTARG}"
      ;;
    i)
      details=1
      ;;
    j)
      have_jq=
      ;;
    l)
      LOCATION="${OPTARG}"
      ;;
    M)
      MESSAGE="${OPTARG}"
      ;;
    N)
      SL_NAME="${OPTARG}"
      ;;
    n)
      BOT_NAME="${OPTARG}"
      [ "${corrade}" ] && CORRADE_BOT_NAME="${OPTARG}"
      ;;
    O)
      OBJ_NAME="${OPTARG}"
      ;;
    k)
      LB_API_KEY="${OPTARG}"
      ;;
    S)
      SUBJECT="${OPTARG}"
      ;;
    s)
      LB_SECRET="${OPTARG}"
      command_line_secret=1
      ;;
    T)
      TEXT="${OPTARG}"
      ;;
    u)
      UUID="${OPTARG}"
      ;;
    v)
      verb=
      ;;
    z)
      HEIGHT="${OPTARG}"
      AMOUNT="${OPTARG}"
      INVUUID="${OPTARG}"
      ;;
    e)
      examples
      ;;
    H)
      nobold=1
      usage
      ;;
    h)
      usage
      ;;
    \?)
      erro "Invalid option: $flag"
      usage
      ;;
  esac
done
shift $(( OPTIND - 1 ))

# If invoked as "lifebot" only control LifeBots bots
[ "${SCRIPT_NAME}" == "lifebot" ] && {
  corrade=
  [ "${CORRADE_BOT_NAME}" ] && {
    if [ "${BOT_NAME}" ]; then
      # Both -c and -n were specified using the lifebot command, what to do?
      # I guess if they are both the same then continue, otherwise exit with usage
      [ "${CORRADE_BOT_NAME}" == "${BOT_NAME}" ] || {
        erro "Both -c name and -n name cannot be specified when invoked using the lifebot command"
        info "Use the botctrl command to specify both -c and -n names, lifebot only controls LifeBots"
        usage brief
      }
    else
      BOT_NAME="${CORRADE_BOT_NAME}"
    fi
    CORRADE_BOT_NAME=
  }
}

if [ "${SCRIPT_NAME}" == "corrade" ]; then
  BE_BOT_NAME="${CO_BOT_NAME}"
else
  BE_BOT_NAME="${LB_BOT_NAME}"
fi
# Check for Name alias in ~/.botctrl
[ "${BOT_NAME}" ] && {
  botname=$(echo "${BOT_NAME}" | sed -e "s/ /_/g")
  envname="BOT_NAME_${botname}"
  [ "${!envname}" ] && BE_BOT_NAME="${!envname}"
}

# Setup Corrade variables if Corrade bot was specified with -c bot
[ "${CORRADE_BOT_NAME}" ] && {
  botname=$(echo "${CORRADE_BOT_NAME}" | sed -e "s/ /_/g")
  envname="BOT_NAME_${botname}"
  [ "${!envname}" ] && botname="${!envname}"
  corrade=$(echo "${botname}" | sed -e "s/ /_/g")
  envid="BOT_ID_${corrade}"
  envurl="API_URL_${corrade}"
  [ "${!envurl}" ] && CORRADE_BOT_URL="${!envurl}"
  [ "${!envid}" ] && CORRADE_BOT_ID="${!envid}"
}

# Check for a bot specific secret
[ "${command_line_secret}" ] || {
  botname=$(echo "${BE_BOT_NAME}" | sed -e "s/ /_/g")
  envsecret="LB_SECRET_${botname}"
  [ "${!envsecret}" ] && LB_SECRET="${!envsecret}"
}

# Check for Bot ID alias in ~/.botctrl
[ "${LB_BOT_ID}" ] && {
  botid=$(echo "${LB_BOT_ID}" | sed -e "s/ /_/g")
  envid="LB_BOT_ID_${botid}"
  [ "${!envid}" ] && LB_BOT_ID="${!envid}"
}

# Check for location alias in ~/.botctrl
[ "${LOCATION}" ] && {
  echo "${LOCATION}" | grep maps.secondlife.com/secondlife >/dev/null || {
    botloc=$(echo "${LOCATION}" | sed -e "s/ /_/g")
    envloc="SLURL_${botloc}"
    [ "${!envloc}" ] && LOCATION="${!envloc}"
  }
}

# Check for avatar UUID alias in ~/.botctrl
[ "${AVATAR_UUID}" ] && {
  # Check if UUID is a valid Second Life avatar UUID, if not then check for alias
  is_valid_uuid "${AVATAR_UUID}" || {
    botuuid=$(echo "${AVATAR_UUID}" | sed -e "s/ /_/g")
    envuuid="UUID_${botuuid}"
    [ "${!envuuid}" ] && AVATAR_UUID="${!envuuid}"
    is_valid_uuid "${AVATAR_UUID}" || {
      [ "${have_jq}" ] && {
        # Avatar name can be provided, convert name to key
        tmp_SLNAME="${SL_NAME}"
        SL_NAME="${AVATAR_UUID}"
        if [ "${corrade}" ]; then
          AVATAR_UUID=$(send_request "name2key" | jq -r '.data[1]')
        else
          AVATAR_UUID=$(send_request "name2key" | jq -r '.key')
        fi
        SL_NAME="${tmp_SLNAME}"
      }
    }
  }
}

# Check for UUID alias in ~/.botctrl
[ "${UUID}" ] && {
  # Check if UUID is a valid Second Life UUID, if not then check for alias
  is_valid_uuid "${UUID}" || {
    botuuid=$(echo "${UUID}" | sed -e "s/ /_/g")
    envuuid="UUID_${botuuid}"
    [ "${!envuuid}" ] && UUID="${!envuuid}"
  }
}

# Set the object UUID to sit on when logging in
if [ "${UUID}" ]; then
  LOGIN_SITON="${UUID}"
else
  botuuid=$(echo "${BE_BOT_NAME}" | sed -e "s/ /_/g")
  envuuid="LOGIN_SITON_${botuuid}"
  [ "${!envuuid}" ] && LOGIN_SITON="${!envuuid}"
fi

[ "${LB_API_KEY}" ] && [ "${LB_SECRET}" ] || {
  erro "LB_API_KEY and LB_SECRET must be set in the environment. Exiting."
  exit 1
}

# Set the range limit for sit and touch objects in Corrade API if not set in ~/.botctrl
[ "${CORRADE_RANGE}" ] || CORRADE_RANGE="64"

[ "${details}" ] && {
  get_details
  exit 0
}

# If an action was specified on the command line, convert it to lowercase
# Use tr for portability
[ "${ACTION_STR}" ] && {
  ACTION=$(echo "${ACTION_STR}" | tr '[:upper:]' '[:lower:]')
}

case "${ACTION}" in
  walk*)
    [ "${LOCATION}" ] || {
      erro "The ${ACTION} action requires coordinates specified with -l coords"
      usage brief
    }
    [ "${LOCATION}" == "Last location" ] && {
      erro "The ${ACTION} action requires coordinates specified with -l coords"
      usage brief
    }
    # Strip all but last 3 fields from the location variable to get just the coordinates
    LOCATION=$(get_coords "${LOCATION}")
    if is_valid_coords "${LOCATION}"; then
      send_request "stand" >/dev/null 2>&1
      sleep 2
      if [ "${have_jq}" ]; then
        send_request "walkto" | jq -r .
      else
        send_request "walkto"
      fi
    else
      warn "${LOCATION} is NOT valid Coordinates."
    fi
    ;;
  sendnoti*|send_noti*)
    show_usage=
    if [ "${UUID}" ]; then
      GROUP_ID="${UUID}"
    else
      erro "The ${ACTION} action requires a Group UUID specified with -u uuid"
      show_usage=1
    fi
    [ "${SUBJECT}" ] || {
      erro "The ${ACTION} action requires a Subject specified with -S subject"
      show_usage=1
    }
    [ "${MESSAGE}" ] || {
      erro "The ${ACTION} action requires a Message body specified with -M message"
      show_usage=1
    }
    [ "${show_usage}" ] && usage brief
    if [ "${have_jq}" ]; then
      send_request "send_notice" | jq -r .
    else
      send_request "send_notice"
    fi
    ;;
  get_balance|balance)
    if [ "${have_jq}" ]; then
      send_request "get_balance" | jq -r .
    else
      send_request "get_balance"
    fi
    ;;
  give|give_inv*|give_obj*)
    show_usage=
    [ "${AVATAR_UUID}" ] || {
      erro "The ${ACTION} action requires an Avatar UUID specified with -A avatar-uuid"
      show_usage=1
    }
    [ "${UUID}" ] || {
      erro "The ${ACTION} action requires an inventory object UUID specified with -u uuid"
      show_usage=1
    }
    [ "${show_usage}" ] && usage brief

    if [ "${have_jq}" ]; then
      send_request "give_inventory" | jq -r .
    else
      send_request "give_inventory"
    fi
    ;;
  note*creat*|creat*note*|nc*creat*|creat*nc*)
    [ "${SL_NAME}" ] || {
      erro "The ${ACTION} action requires a Notecard Name specified with -N name"
      usage brief
    }
    [ "${TEXT}" ] || {
      erro "The ${ACTION} action requires a Notecard text specified with -T text"
      usage brief
    }
    if [ "${have_jq}" ]; then
      send_request "notecard_create" | jq -r .
    else
      send_request "notecard_create"
    fi
    ;;
  pay_avatar|give_money)
    show_usage=
    [ "${AVATAR_UUID}" ] || {
      erro "The ${ACTION} action requires an Avatar UUID specified with -A avatar-uuid"
      show_usage=1
    }
    [ "${AMOUNT}" ] || {
      erro "The ${ACTION} action requires an amount to pay in L\$ specified with -z num"
      show_usage=1
    }
    [ "${show_usage}" ] && usage brief

    if [[ "${AMOUNT}" =~ ^[0-9]+$ ]]; then
      if [ "${have_jq}" ]; then
        send_request "give_money" | jq -r .
      else
        send_request "give_money"
      fi
    else
      erro "Amount specified to pay must be a positive integer."
      usage brief
    fi
    ;;
  pay_object|give_money_object)
    show_usage=
    [ "${UUID}" ] || {
      erro "The ${ACTION} action requires an Object UUID specified with -u uuid"
      show_usage=1
    }
    [ "${AMOUNT}" ] || {
      erro "The ${ACTION} action requires an amount to pay in L\$ specified with -z num"
      show_usage=1
    }
    [ "${show_usage}" ] && usage brief

    if [[ "${AMOUNT}" =~ ^[0-9]+$ ]]; then
      OBJECT_UUID="${UUID}"
      if [ "${have_jq}" ]; then
        send_request "give_money_object" | jq -r .
      else
        send_request "give_money_object"
      fi
    else
      erro "Amount specified to pay must be a positive integer."
      usage brief
    fi
    ;;
  rebake*)
    if [ "${have_jq}" ]; then
      send_request "rebake" | jq -r .
    else
      send_request "rebake"
    fi
    ;;
  reply*)
    show_usage=
    [ "${UUID}" ] || {
      erro "The ${ACTION} action requires an Object UUID specified with -u uuid"
      show_usage=1
    }
    [ "${TEXT}" ] || {
      erro "The ${ACTION} action requires a button text specified with -T text"
      show_usage=1
    }
    [ ${CHANNEL} -eq 0 ] && {
      erro "The ${ACTION} action requires a non-zero channel specified with -C channel"
      show_usage=1
    }
    [ "${show_usage}" ] && usage brief
    if [ "${have_jq}" ]; then
      send_request "reply_dialog" | jq -r .
    else
      send_request "reply_dialog"
    fi
    ;;
  activate*)
    if [ "${UUID}" ]; then
      GROUP_ID="${UUID}"
    else
      erro "The ${ACTION} action requires a Group UUID specified with -u uuid"
      usage brief
    fi
    if [ "${have_jq}" ]; then
      send_request "activate_group" | jq -r .
    else
      send_request "activate_group"
    fi
    ;;
  sendgroupi*|send_group_i*)
    show_usage=
    if [ "${UUID}" ]; then
      GROUP_ID="${UUID}"
    else
      erro "The ${ACTION} action requires a Group UUID specified with -u uuid"
      show_usage=1
    fi
    [ "${MESSAGE}" ] || {
      erro "The ${ACTION} action requires a Message body specified with -M message"
      show_usage=1
    }
    [ "${show_usage}" ] && usage brief
    if [ "${have_jq}" ]; then
      send_request "send_group_im" | jq -r .
    else
      send_request "send_group_im"
    fi
    ;;
  key*d*name)
    [ "${UUID}" ] || {
      erro "The ${ACTION} action requires an avatar UUID specified with -u uuid"
      usage brief
    }
    if [ "${have_jq}" ]; then
      send_request "key2displayname" | jq -r .
    else
      send_request "key2displayname"
    fi
    ;;
  key*name)
    [ "${UUID}" ] || {
      erro "The ${ACTION} action requires an avatar UUID specified with -u uuid"
      usage brief
    }
    if [ "${have_jq}" ]; then
      send_request "key2name" | jq -r .
    else
      send_request "key2name"
    fi
    ;;
  name*key)
    [ "${SL_NAME}" ] || {
      erro "The ${ACTION} action requires an SL Name specified with -N name"
      usage brief
    }
    if [ "${have_jq}" ]; then
      send_request "name2key" | jq -r .
    else
      send_request "name2key"
    fi
    ;;
  im|instantm*)
    show_usage=
    # If recipient SL name was not specified on command line then use UUID
    [ "${SL_NAME}" ] || {
      if [ "${UUID}" ]; then
        SL_NAME="${UUID}"
      else
        erro "The ${ACTION} action requires an SL Name or UUID specified with -N name or -u uuid"
        show_usage=1
      fi
    }
    [ "${MESSAGE}" ] || {
      erro "The ${ACTION} action requires a Message body specified with -M message"
      show_usage=1
    }
    [ "${show_usage}" ] && usage brief
    if [ "${have_jq}" ]; then
      send_request "im" | jq -r .
    else
      send_request "im"
    fi
    ;;
  say*confer*|confer*say)
    [ "${MESSAGE}" ] || {
      erro "The ${ACTION} action requires a Message body specified with -M message"
      usage brief
    }
    if [ "${have_jq}" ]; then
      send_request "sayconference" | jq -r .
    else
      send_request "sayconference"
    fi
    ;;
  say*|say_*)
    [ "${MESSAGE}" ] || {
      erro "The ${ACTION} action requires a Message body specified with -M message"
      usage brief
    }
    if [ "${have_jq}" ]; then
      send_request "say_chat_channel" | jq -r .
    else
      send_request "say_chat_channel"
    fi
    ;;
  get*height*|get*hover*)
    if [ "${have_jq}" ]; then
      send_request "get_hoverheight" | jq -r .
    else
      send_request "get_hoverheight"
    fi
    ;;
  set*height*|set*hover*)
    [ "${HEIGHT}" ] || {
      erro "The ${ACTION} action requires a hover height adjustment specified with -z num"
      usage brief
    }
    if [ "${have_jq}" ]; then
      send_request "set_hoverheight" | jq -r .
    else
      send_request "set_hoverheight"
    fi
    ;;
  takeoff|remove)
    [ "${UUID}" ] || {
      erro "The ${ACTION} action requires an item UUID to remove specified with -u uuid"
      usage brief
    }
    if [ "${have_jq}" ]; then
      send_request "takeoff" | jq -r .
    else
      send_request "takeoff"
    fi
    ;;
  wear)
    if [ "${corrade}" ]; then
      [ "${OBJ_NAME}" ] && WEARABLE="${OBJ_NAME}"
      [ "${WEARABLE}" ] || {
        erro "The ${ACTION} action requires a path to an item to wear specified with -O '/path/to/item'"
        usage brief
      }
    else
      [ "${UUID}" ] || {
        erro "The ${ACTION} action requires an item UUID to wear specified with -u uuid"
        usage brief
      }
    fi
    if [ "${have_jq}" ]; then
      send_request "wear" | jq -r .
    else
      send_request "wear"
    fi
    ;;
  wear*|replace*outfit)
    [ "${OBJ_NAME}" ] && OUTFIT_NAME="${OBJ_NAME}"
    [ "${OUTFIT_NAME}" ] || {
      erro "The ${ACTION} action requires an outfit name specified with -O name"
      usage brief
    }
    if [ "${have_jq}" ]; then
      send_request "wear_outfit" | jq -r .
    else
      send_request "wear_outfit"
    fi
    ;;
  touch*attach*)
    [ "${OBJ_NAME}" ] || {
      erro "The ${ACTION} action requires an attachment object name specified with -O name"
      usage brief
    }
    if [ "${have_jq}" ]; then
      send_request "touch_attachment" | jq -r .
    else
      send_request "touch_attachment"
    fi
    ;;
  touch*)
    [ "${UUID}" ] || {
      erro "The ${ACTION} action requires a UUID specified with -u uuid"
      usage brief
    }
    if [ "${have_jq}" ]; then
      send_request "touch_prim" | jq -r .
    else
      send_request "touch_prim"
    fi
    ;;
  teleport|tp)
    [ "${LOCATION}" ] || {
      erro "The teleport action requires a location specified with -l location"
      usage brief
    }
    [ "${LOCATION}" == "Last location" ] && {
      erro "The teleport action requires a location specified with -l location"
      usage brief
    }
    if is_valid_slurl "${LOCATION}"; then
      send_request "stand" >/dev/null 2>&1
      sleep 2
      if [ "${have_jq}" ]; then
        send_request "teleport" | jq -r .
      else
        send_request "teleport"
      fi
    else
      erro "${LOCATION} is NOT a valid SLURL."
    fi
    ;;
  sit)
    [ "${UUID}" ] || {
      erro "The sit action requires a UUID specified with -u uuid"
      usage brief
    }
    send_request "stand" >/dev/null 2>&1
    sleep 2
    if [ "${have_jq}" ]; then
      send_request "sit" | jq -r .
    else
      send_request "sit"
    fi
    ;;
  avatar_picks|picks)
    if [ "${have_jq}" ]; then
      UUID="${AVATAR_UUID}"
      if [ "${corrade}" ]; then
        AVATAR_NAME=$(send_request "key2name" | jq -r '.data[1]')
      else
        AVATAR_NAME=$(send_request "key2name" | jq -r '.name')
      fi
      send_request "avatar_picks"
    else
      send_request "avatar_picks"
    fi
    ;;
  stand)
    if [ "${have_jq}" ]; then
      send_request "stand" | jq -r .
    else
      send_request "stand"
    fi
    ;;
  status)
    if [ "${get_default_status}" ]; then
      corrade -a status -n "${CO_BOT_NAME}"
      lifebot -a status -n "${LB_BOT_NAME}"
    else
      if [ "${have_jq}" ]; then
        send_request "status" | jq -r .
      else
        send_request "status"
      fi
    fi
    ;;
  listgroups|groups)
    if [ "${have_jq}" ]; then
      send_request "listgroups" | jq -r .
    else
      send_request "listgroups"
    fi
    ;;
  listinventory|inventory)
    if [ "${have_jq}" ]; then
      send_request "listinventory" | jq -r .
    else
      send_request "listinventory"
    fi
    ;;
  bot*alias*|loc*alias*|slurl*alias*|uuid*alias*|list*alias*|alias*)
    list_aliases "${ACTION}"
    ;;
  login)
    if [ "${have_jq}" ]; then
      send_request "login" | jq -r .
    else
      send_request "login"
    fi
    ;;
  logout)
    if [ "${have_jq}" ]; then
      send_request "logout" | jq -r .
    else
      send_request "logout"
    fi
    ;;
  location|loc|bot*loc*)
    if [ "${have_jq}" ]; then
      send_request "bot_location" | jq -r .
    else
      send_request "bot_location"
    fi
    ;;
  get_outfit*|getoutfit*|list_outfit*|listoutfit*)
    if echo "${ACTION}" | grep -i outfits >/dev/null; then
      if [ "${have_jq}" ]; then
        send_request "get_outfits" | jq -r .
      else
        send_request "get_outfits"
      fi
    else
      if [ "${have_jq}" ]; then
        send_request "get_outfit" | jq -r .
      else
        send_request "get_outfit"
      fi
    fi
    ;;
  attach*|list*attach*)
    if [ "${have_jq}" ]; then
      send_request "attachments" | jq -r .
    else
      send_request "attachments"
    fi
    ;;
  *)
    if [ "${corrade}" ]; then
      send_request "${ACTION}"
    else
      erro "Action '${ACTION}' not yet supported"
      list_supported_actions
    fi
    ;;
esac