MuranoCLI 2.2.4 → 3.0.0

data/lib/MrMurano/Webservice.rb

@@ -0,0 +1,51 @@
+# Last Modified: 2017.08.16 /coding: utf-8
+# frozen_string_literal: true
+
+# Copyright © 2016-2017 Exosite LLC.
+# License: MIT. See LICENSE.txt.
+#  vim:tw=0:ts=2:sw=2:et:ai
+
+require 'uri'
+require 'MrMurano/Config'
+require 'MrMurano/http'
+require 'MrMurano/verbosing'
+require 'MrMurano/SolutionId'
+require 'MrMurano/SyncUpDown'
+
+module MrMurano
+  ## The details of talking to the Webservice service.
+  module Webservice
+    class WebserviceBase
+      include Http
+      include Verbose
+      include SolutionId
+
+      def initialize
+        @solntype = 'application.id'
+        @uriparts_sidex = 1
+        init_sid!
+        # FIXME/2017-06-05/MRMUR-XXXX: Update to new endpoint.
+        #@uriparts = [:service, @sid, :webservice]
+        @uriparts = [:solution, @sid]
+        @itemkey = :id
+        #@locationbase = $cfg['location.base']
+        @location = nil
+      end
+
+      ## Generate an endpoint in Murano
+      # Uses the uriparts and path
+      # @param path String: any additional parts for the URI
+      # @return URI: The full URI for this endpoint.
+      def endpoint(path='')
+        super
+        parts = ['https:/', $cfg['net.host'], 'api:1'] + @uriparts
+        s = parts.map(&:to_s).join('/')
+        URI(s + path.to_s)
+      end
+      # …
+
+      include SyncUpDown
+    end
+  end
+end
+

data/lib/MrMurano/commands.rb

@@ -1,33 +1,36 @@
-require 'MrMurano/commands/assign'
+# Last Modified: 2017.08.16 /coding: utf-8
+# frozen_string_literal: true
+
+# Copyright © 2016-2017 Exosite LLC.
+# License: MIT. See LICENSE.txt.
+#  vim:tw=0:ts=2:sw=2:et:ai
+
+# DEVs: If you want to generate a completion file, uncomment this.
+#   Then run, from the base of the project, e.g.,
+#     rake install:user
+#     murano completion > docs/completions/murano_completion-bash
+#require 'MrMurano/commands/completion'
+
 require 'MrMurano/commands/business'
-require 'MrMurano/commands/businessList'
 require 'MrMurano/commands/config'
 require 'MrMurano/commands/content'
 require 'MrMurano/commands/cors'
+require 'MrMurano/commands/devices'
 require 'MrMurano/commands/domain'
-require 'MrMurano/commands/init'
+require 'MrMurano/commands/globals'
 require 'MrMurano/commands/keystore'
+require 'MrMurano/commands/init'
+require 'MrMurano/commands/link'
 require 'MrMurano/commands/login'
 require 'MrMurano/commands/logs'
 require 'MrMurano/commands/mock'
 require 'MrMurano/commands/postgresql'
 require 'MrMurano/commands/password'
-require 'MrMurano/commands/product'
-require 'MrMurano/commands/productCreate'
-require 'MrMurano/commands/productDelete'
-require 'MrMurano/commands/productDevice'
-require 'MrMurano/commands/productDeviceIdCmds'
-require 'MrMurano/commands/productList'
-require 'MrMurano/commands/productWrite'
+require 'MrMurano/commands/settings'
 require 'MrMurano/commands/show'
 require 'MrMurano/commands/solution'
-require 'MrMurano/commands/solutionCreate'
-require 'MrMurano/commands/solutionDelete'
-require 'MrMurano/commands/solutionList'
 require 'MrMurano/commands/status'
 require 'MrMurano/commands/sync'
 require 'MrMurano/commands/tsdb'
 require 'MrMurano/commands/usage'
 
-require 'MrMurano/commands/completion'
-

data/lib/MrMurano/commands/business.rb

@@ -1,15 +1,309 @@
-require 'MrMurano/SubCmdGroupContext'
+# Last Modified: 2017.08.17 /coding: utf-8
+# frozen_string_literal: true
+
+# Copyright © 2016-2017 Exosite LLC.
+# License: MIT. See LICENSE.txt.
+#  vim:tw=0:ts=2:sw=2:et:ai
+
+require 'MrMurano/verbosing'
+require 'MrMurano/Account'
+require 'MrMurano/Business'
+require 'MrMurano/ReCommander'
+
+MSG_BUSINESSES_NONE_FOUND = 'No businesses found' if !defined? MSG_BUSINESSES_NONE_FOUND
+
+# *** Base business command help.
+# -------------------------------
 
 command :business do |c|
-  c.syntax = %{murano business}
-  c.summary = %{About Business}
-  c.description = %{Sub-commands for working with Businesses}
+  c.syntax = %(murano business)
+  c.summary = %(About business)
+  c.description = %(
+Commands for working with businesses.
+  ).strip
+  c.project_not_required = true
 
-  c.action do |args, options|
+  c.action do |_args, _options|
     ::Commander::UI.enable_paging
     say MrMurano::SubCmdGroupHelp.new(c).get_help
   end
 end
+alias_command 'businesses', 'business'
+
+# *** Common business command options.
+# ------------------------------------
+
+def cmd_business_add_options(c)
+  # MAYBE/2017-08-15: Rename to --id-only.
+  c.option '--idonly', 'Only return the IDs'
+  c.option '--[no-]brief', 'Show fewer fields: only Business ID and name'
+  # LATER/2017-08-17: Move -o to a file with --json, etc. (make
+  #   easier to use --json/--yaml/--output any file, without
+  #   having to use obscure `-c tool.outformat=json`).
+  c.option '-o', '--output FILE', 'Download to file instead of STDOUT'
+end
+
+def cmd_options_add_id_and_name(c)
+  c.option '--id', 'Specified argument is an ID'
+  c.option '--name', 'Specified argument is a name'
+end
+
+def cmd_defaults_id_and_name(options)
+  if !options.id.nil? && !options.name.nil?
+    MrMurano::Verbose.error('Please only --id or --name but not both')
+    exit 1
+  end
+end
+
+def cmd_verify_args_and_id_or_name!(args, options)
+  if !args.any? && (options.id || options.name)
+    MrMurano::Verbose.warning(
+      'The --id and --name options only apply when specifying a business name or ID.'
+    )
+    exit 1
+  end
+end
+
+def cmd_option_business_pickers(c)
+  c.option('--business-id ID', String, %(ID of Murano Business to use))
+  c.option('--business-name NAME', String, %(Name of Murano Business to use))
+  c.option('--business BUSINESS', String, %(Name or ID of Murano Business to use))
+end
+
+def any_business_pickers?(options)
+  num_ways = 0
+  num_ways += 1 unless options.business_id.to_s.empty?
+  num_ways += 1 unless options.business_name.to_s.empty?
+  num_ways += 1 unless options.business.to_s.empty?
+  #if num_ways > 1
+  #  MrMurano::Verbose.error(
+  #    'Please specify only one of: --business, --business-id, or --business-name'
+  #  )
+  #  exit 1
+  #end
+  num_ways > 0
+end
+
+# *** Business commands: list and find.
+# -------------------------------------
+
+command 'business list' do |c|
+  c.syntax = %(murano business list [--options])
+  c.summary = %(List businesses)
+  c.description = %(
+List businesses.
+  ).strip
+  c.project_not_required = true
+
+  cmd_business_add_options(c)
+
+  c.action do |args, options|
+    c.verify_arg_count!(args)
+    cmd_business_find_and_output(args, options)
+  end
+end
+alias_command 'businesses list', 'business list'
+
+command 'business find' do |c|
+  c.syntax = %(murano business find [--options] [<name-or-ID,...>])
+  c.summary = %(Find business by name or ID)
+  c.description = %(
+Find business by name or ID.
+  ).strip
+  c.project_not_required = true
+
+  cmd_business_add_options(c)
+
+  # Add --business/-id/-name options.
+  cmd_option_business_pickers(c)
 
-#  vim: set ai et sw=2 ts=2 :
+  # Add --id and --name options.
+  cmd_options_add_id_and_name(c)
+
+  c.action do |args, options|
+    # SKIP: c.verify_arg_count!(args)
+    cmd_defaults_id_and_name(options)
+    if !args.any? && !any_business_pickers?(options)
+      MrMurano::Verbose.error('What would you like to find?')
+      exit 1
+    end
+    cmd_business_find_and_output(args, options)
+  end
+end
+
+# *** Business actions helpers.
+# -----------------------------
+
+def business_find_or_ask!(acc, options)
+  #any_business_pickers?(options)
+
+  match_bid = options.business_id
+  match_name = options.business_name
+  match_fuzzy = options.business
+
+  if !match_bid.to_s.empty? || !match_name.to_s.empty? || !match_fuzzy.to_s.empty?
+    biz = business_locate!(acc, match_bid, match_name, match_fuzzy)
+  elsif !options.find_only
+    ask_user = options.refresh
+    biz = business_from_config unless ask_user
+    biz = businesses_ask_which(acc) if biz.nil?
+  end
+
+  match_bid = $cfg.set('business.id', nil, :internal)
+  match_name = $cfg.set('business.name', nil, :internal)
+  match_fuzzy = $cfg.set('business.fuzzy', nil, :internal)
+
+  biz
+end
+
+def business_locate!(acc, match_bid, match_name, match_fuzzy)
+  biz = nil
+  bizes = acc.businesses(bid: match_bid, name: match_name, fuzzy: match_fuzzy)
+  if bizes.count == 1
+    biz = bizes.first
+    say("Found business #{biz.pretty_name_and_id}")
+    puts('')
+  elsif bizes.count > 1
+    acc.error('More than one matching business was found. Please be more specific.')
+    exit(1)
+  else
+    acc.error('No matching business was found. Please try again.')
+    #say('Please visit Exosite.com to view your account and to create a business:')
+    #say("  #{MrMurano::SIGN_UP_URL}")
+    exit(1)
+  end
+  biz
+end
+
+def business_from_config
+  # By default, creating a new Business object loads its ID from the config.
+  biz = MrMurano::Business.new
+  unless biz.bid.empty?
+    # Verify that the business exists.
+    MrMurano::Verbose.whirly_start('Verifying Business...')
+    biz.overview
+    MrMurano::Verbose.whirly_stop
+    if biz.valid?
+      say("Found Business #{biz.pretty_name_and_id}")
+    else
+      say("Could not find Business ‘#{biz.bid}’ referenced in the config")
+    end
+    puts('')
+  end
+  biz if biz.valid?
+end
+
+def businesses_ask_which(acc)
+  biz = nil
+  bizes = acc.businesses
+  if bizes.count == 1
+    biz = bizes.first
+    say("This user has one business. Using #{biz.pretty_name_and_id}")
+  elsif bizes.count.zero?
+    MrMurano::Verbose.warning('This user has not created any businesses.')
+    say('Please log on to exosite.com to create a free account. Visit:')
+    say("  #{MrMurano::SIGN_UP_URL}")
+    exit 3
+  else
+    choose do |menu|
+      menu.prompt = 'Please select the Business to use:'
+      menu.flow = :columns_across
+      bizes.sort_by(&:name).each do |choice|
+        menu.choice(choice.name) do
+          biz = choice
+        end
+      end
+    end
+  end
+  puts('')
+  biz
+end
+
+def cmd_business_find_and_output(args, options)
+  cmd_verify_args_and_id_or_name!(args, options)
+  acc = MrMurano::Account.instance
+  bizz = cmd_business_find_businesses(acc, args, options)
+  if bizz.empty? && !options.idonly
+    MrMurano::Verbose.error(MSG_BUSINESSES_NONE_FOUND)
+    exit 0
+  end
+  cmd_business_output_businesses(acc, bizz, options)
+end
+
+def cmd_business_find_businesses(acc, args, options)
+  bid = []
+  name = []
+  fuzzy = []
+
+  if args.any?
+    flattened = args.map { |cell| cell.split(',') }.flatten
+    if options.id
+      bid += flattened
+    elsif options.name
+      name += flattened
+    else
+      fuzzy += flattened
+    end
+  end
+
+  if any_business_pickers?(options)
+    if options.business_id
+      bid += [options.business_id]
+    elsif options.business_name
+      name += [options.business_name]
+    elsif options.business
+      fuzzy += [options.business]
+    end
+  end
+
+  MrMurano::Verbose.whirly_start 'Looking for businesses...'
+  bizz = acc.businesses(bid: bid, name: name, fuzzy: fuzzy)
+  MrMurano::Verbose.whirly_stop
+
+  bizz
+end
+
+def cmd_business_output_businesses(acc, bizz, options)
+  if options.idonly
+    headers = [:bizid]
+    bizz = bizz.map(&:bizid)
+  elsif options.brief
+    #headers = %i[bizid role name]
+    #bizz = bizz.map { |biz| [biz.bizid, biz.role, biz.name] }
+    headers = %i[bizid name]
+    bizz = bizz.map { |biz| [biz.bizid, biz.name] }
+  else
+    # 2017-08-16: There are only 3 keys: bizid, role, and name.
+    headers = bizz[0].meta.keys
+    headers.sort_by! do |hdr|
+      case hdr
+      when :bizid
+        0
+      when :role
+        1
+      when :name
+        2
+      else
+        3
+      end
+    end
+    bizz = bizz.map { |biz| headers.map { |key| biz.meta[key] } }
+  end
+
+  io = File.open(options.output, 'w') if options.output
+  acc.outf(bizz, io) do |dd, ios|
+    if options.idonly
+      ios.puts dd.join(' ')
+    else
+      acc.tabularize(
+        {
+          headers: headers.map(&:to_s),
+          rows: dd,
+        },
+        ios,
+      )
+    end
+  end
+  io.close unless io.nil?
+end
 

data/lib/MrMurano/commands/completion-bash.erb

@@ -0,0 +1,166 @@
+#!/bin/bash
+# Bash completion (compspec) for <%= program :name %>.
+#  vim: set ai et sw=2 ts=2 ft=bash
+#  #ft=eruby
+
+#__<%= program :name %>_common_options=(
+__app_switches=(
+<% for option in @options -%>
+  <%- if flatswitches(option).count > 1 -%>
+    <%= flatswitches(option)[1] %>
+  <%- else -%>
+    <%= flatswitches(option).first %>
+  <%- end -%>
+<%- end -%>
+)
+
+# Util. fcn.
+function contains_element () {
+  local e
+  for e in "${@:2}"; do [[ "$e" == "$1" ]] && return 0; done
+  return 1
+}
+
+# Completion "main".
+function _<%= program :name %> () {
+    #local cmd0="${1##*/}"
+    local cmd0=""
+    local cmd1=""
+    local cmd2=""
+    #local -a cmdn
+    local last="${COMP_WORDS[COMP_CWORD]}"
+    local line="${COMP_LINE}"
+    local -a used_switches
+
+    local len=$(($COMP_CWORD - 1))
+    local idx
+    for ((idx=1; idx<=len; idx++)); do
+        local cur="${COMP_WORDS[$idx]}"
+        # If positional argument is not a flag, it's the command or subcommand.
+        if [[ $cur != -* ]]; then
+          if [[ -z $cmd0 ]]; then
+            cmd0="$cur"
+          elif [[ -z $cmd1 ]]; then
+            cmd1="$cur"
+          elif [[ -z $cmd2 ]]; then
+            cmd2="$cur"
+          #else
+          #  cmdn+=("$cur")
+          fi
+        else
+          used_switches+=("$cur")
+        fi
+    done
+    #>&2 echo -e "\ncmd0=$cmd0 / cmd1=$cmd1 / cmd2=$cmd2 / len=$len"
+
+    if [[ -z $cmd0 ]]; then
+      local -a comp_list
+      comp_list=(
+      <%- for name, subs in cmdTree -%>
+        <%= name %>
+      <%-end-%>
+      )
+      
+      for ((idx = 0; idx < ${#__app_switches[@]}; idx++)); do
+        local switch=${__app_switches[$idx]}
+        if ! contains_element "$switch" "${used_switches[@]}"; then
+          comp_list+=("$switch")
+        fi
+      done
+      COMPREPLY=($(compgen -W '${comp_list[@]}' -- "$last"))
+    else
+      case $cmd0 in
+      <%- for name, subs in cmdTree -%>
+        (<%= name %>)
+          __<%=program :name%>-<%= name %> "$cmd1" "$cmd2" "${used_switches[@]}"
+        ;;
+      <%-end-%>
+      esac
+    fi
+}
+
+<%- for name, subs in cmdTree -%>
+  <%- command = subs["\0cmd"]; subs = subs.reject{|k,_| k == "\0cmd"} -%>
+# Completion for subcommand: "<%= name %>".
+function __<%=program :name%>-<%= name %> () {
+  local subcmd1="$1"
+  local subcmd2="$2"
+  #local subcmdn="$3"
+  local used_switches="${@:3}"
+  local last="${COMP_WORDS[COMP_CWORD]}"
+  local len=$(($COMP_CWORD - 1))
+
+  local -a more_switches
+
+  local -a comp_list
+
+  #>&2 echo -e "\nsubcmd1=$subcmd1 / subcmd2=$subcmd2 / last=$last / len=$len"
+  #>&2 echo "used_switches=$used_switches"
+  #>&2 echo "more_switches=$more_switches"
+
+  # NOTE: Not doing anything special for ${subcmd2}.
+  #       Are there sub-sub-commands we shoud list?
+  <%- unless subs.empty? -%>
+  if [[ -z ${subcmd1} || ${len} -eq 1 ]]; then
+    comp_list=(
+    <%- for sname, ssubs in subs -%>
+      <%=sname%>
+    <%-end-%>
+    )
+  else
+    case $subcmd1 in
+    <%- for sname, ssubs in subs -%>
+      <%- command = ssubs["\0cmd"]; subs = ssubs.reject{|k,_| k == "\0cmd"} -%>
+      (<%=sname%>)
+      more_switches=(
+    <%- unless command.nil? or command.options.empty? then -%>
+      <%- if flatswitches(option).count > 1 -%>
+        {<%= flatswitches(option)[1] %>}
+      <%- else -%>
+        <%= flatswitches(option).first %>
+      <%- end -%>
+    <%- end -%>
+      )
+      ;;
+    <%-end-%>
+    esac
+  fi
+  <%-end-%>
+
+  # Add unused application-wide flags.
+  local idx
+  for ((idx = 0; idx < ${#__app_switches[@]}; idx++)); do
+    local switch=${__app_switches[$idx]}
+    if ! contains_element "$switch" "${used_switches[@]}"; then
+      comp_list+=("$switch")
+    fi
+  done
+  # Add unused subcommand flags.
+  for ((idx = 0; idx < ${#more_switches[@]}; idx++)); do
+    local switch=${more_switches[$idx]}
+    comp_list+=("$switch")
+  done
+
+  # If there are only --flags, <TAB> will put the common prefix,
+  # "--", but maybe the user doesn't want to add a flag after all.
+  if [[ -z ${last} ]]; then
+    local flags_only=true
+    for ((idx = 0; idx < ${#comp_list[@]}; idx++)); do
+      local switch=${comp_list[$idx]}
+      if [[ ${switch} != --* ]]; then
+        flags_only=false
+        break
+      fi
+    done
+    if ${flags_only}; then
+      # Use two Unicode en spaces to prevent compgen from prefixing "--".
+      comp_list+=("	 ")
+    fi
+  fi
+
+  COMPREPLY=($(compgen -W '${comp_list[@]}' -- "${last}"))
+}
+
+<%- end -%>
+complete -F _murano murano
+