MuranoCLI 2.2.4 → 3.0.0

data/lib/MrMurano/commands/show.rb

@@ -1,67 +1,105 @@
+# 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 'MrMurano/verbosing'
+require 'MrMurano/Business'
+require 'MrMurano/ReCommander'
+require 'MrMurano/Solution'
 
 command 'show' do |c|
   c.syntax = %(murano show)
   c.summary = %(Show readable information about the current configuration)
-  c.description = %(Show readable information about the current configuration)
-
-  c.action do |args, options|
+  c.description = %(
+Show readable information about the current configuration.
+  ).strip
+  c.project_not_required = true
 
-    if args.include?('help') then
+  c.action do |args, _options|
+    if args.include?('help')
       ::Commander::UI.enable_paging
       say MrMurano::SubCmdGroupHelp.new(c).get_help
     else
-      acc = MrMurano::Account.new
+      acc = MrMurano::Account.instance
+      biz = MrMurano::Business.new
 
-      selectedBusinessId = $cfg['business.id']
-      selectedBusiness = nil
-      acc.businesses.each do |row|
-        selectedBusiness = row if row[:bizid] == selectedBusinessId
+      selected_business = nil
+      selected_business_id = $cfg['business.id']
+      unless selected_business_id.to_s.empty?
+        acc.businesses.each do |sol|
+          selected_business = sol if sol.bizid == selected_business_id
+        end
       end
 
-      selectedProductId = $cfg['product.id']
-      selectedProduct = nil
-      acc.products.each do |row|
-        selectedProduct = row if row[:modelId] == selectedProductId
+      selected_application = nil
+      selected_application_id = $cfg['application.id']
+      unless selected_application_id.to_s.empty?
+        MrMurano::Verbose.whirly_start('Fetching Applications...')
+        biz.applications.each do |sol|
+          selected_application = sol if sol.apiId == selected_application_id
+        end
+        MrMurano::Verbose.whirly_stop
       end
 
-      selectedSolutionId = $cfg['solution.id']
-      selectedSolution = nil
-      acc.solutions.each do |row|
-        selectedSolution = row if row[:apiId] == selectedSolutionId
+      selected_product = nil
+      selected_product_id = $cfg['product.id']
+      unless selected_product_id.to_s.empty?
+        MrMurano::Verbose.whirly_start('Fetching Products...')
+        biz.products.each do |sol|
+          selected_product = sol if sol.apiId == selected_product_id
+        end
+        MrMurano::Verbose.whirly_stop
       end
 
-      if $cfg['user.name'] then
+      if $cfg['user.name']
         puts %(user: #{$cfg['user.name']})
       else
         puts 'no user selected'
       end
 
-      if selectedBusiness then
-        puts %(business: #{selectedBusiness[:name]})
+      if selected_business
+        puts %(business: #{selected_business.name})
       else
-        puts 'no business selected'
+        #puts 'no business selected'
+        MrMurano::Verbose.error MrMurano::Business.missing_business_id_msg
       end
 
-      if selectedProduct then
-        puts %(product: #{selectedProduct[:label]})
+      id_not_in_biz = false
+
+      # E.g., {:bizid=>"ABC", :type=>"application", :apiId=>"XXX", :sid=>"XXX",
+      #        :name=>"ABC", :domain=>"ABC.apps.exosite.io" }
+      if selected_application
+        puts %(application: https://#{selected_application.domain})
+      elsif selected_application_id
+        #puts 'selected application not in business'
+        puts "application ID from config is not in business (#{selected_application_id})"
+        id_not_in_biz = true
+      elsif !selected_business
+        puts 'application ID depends on business ID'
       else
-        if selectedProductId then
-          puts 'selected product not in business'
-        else
-          puts 'no product selected'
-        end
+        #puts 'no application selected'
+        puts 'application ID not found in config'
       end
 
-      if selectedSolution then
-        puts %(solution: https://#{selectedSolution[:domain]})
+      # E.g., {:bizid=>"ABC", :type=>"product", :apiId=>"XXX", :sid=>"XXX",
+      #        :name=>"ABC", :domain=>"ABC.m2.exosite.io" }
+      if selected_product
+        puts %(product: #{selected_product.name})
+      elsif selected_product_id
+        #puts 'selected product not in business'
+        puts "product ID from config is not in business (#{selected_product_id})"
+        id_not_in_biz = true
+      elsif !selected_business
+        puts 'product ID depends on business ID'
       else
-        if selectedSolutionId then
-          puts 'selected solution not in business'
-        else
-          puts 'no solution selected'
-        end
+        #puts 'no product selected'
+        puts 'product ID not found in config'
       end
 
+      MrMurano::SolutionBase.warn_configfile_env_maybe if id_not_in_biz
     end
   end
 end
@@ -69,12 +107,15 @@ end
 command 'show location' do |c|
   c.syntax = %(murano show location)
   c.summary = %(Show readable location information)
-  c.description = %(Show readable information about the current configuration)
+  c.description = %(
+Show readable information about the current configuration.
+  ).strip
+  c.project_not_required = true
 
-  c.action do |args, options|
+  c.action do |args, _options|
+    c.verify_arg_count!(args)
     puts %(base: #{$cfg['location.base']})
     $cfg['location'].each { |key, value| puts %(#{key}: #{$cfg['location.base']}/#{value}) }
   end
 end
 
-#  vim: set ai et sw=2 ts=2 :

data/lib/MrMurano/commands/solution.rb

@@ -1,14 +1,432 @@
+# 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/ReCommander'
 require 'MrMurano/SubCmdGroupContext'
+require 'MrMurano/commands/business'
+require 'MrMurano/commands/solution_picker'
 
 command :solution do |c|
-  c.syntax = %{murano solution}
-  c.summary = %{About Solution}
-  c.description = %{Sub-commands for working with solutions}
+  c.syntax = %(murano solution)
+  c.summary = %(About solution)
+  c.description = %(
+Commands for working with Application and Product solutions.
+  ).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
 
-#  vim: set ai et sw=2 ts=2 :
+# *** Create solution.
+# --------------------
+
+command 'solution create' do |c|
+  c.syntax = %(murano solution create [--options] <solution-name>)
+  c.summary = %(Create a new solution)
+  c.description = %(
+Create a new solution in the current business.
+  ).strip
+  c.project_not_required = true
+
+  # Add flag: --type [application|product].
+  cmd_add_solntype_pickers(c, exclude_all: true)
+
+  c.option('--save', %(Save new solution ID to config))
+
+  c.action do |args, options|
+    c.verify_arg_count!(args, 1)
+    cmd_defaults_solntype_pickers(options, :application)
+
+    biz = MrMurano::Business.new
+    biz.must_business_id!
+
+    if args.count.zero?
+      sol = biz.solution_from_type!(options.type)
+      name = solution_ask_for_name(sol)
+      names = [name]
+    else
+      names = args
+    end
+
+    # MAYBE: Support making multiple solutions.
+    if names.length > 1
+      MrMurano::Verbose.error('Can only make one solution at a time')
+      exit 2
+    end
+
+    sol = biz.new_solution!(names.first, options.type)
+
+    if options.save
+      section = options.type.to_s
+      $cfg.set("#{section}.id", sol.sid)
+      $cfg.set("#{section}.name", sol.name)
+    end
+
+    biz.outf(sol.sid)
+  end
+end
+alias_command 'create application', 'solution create', '--type', 'application'
+alias_command 'create product', 'solution create', '--type', 'product'
+alias_command 'application create', 'solution create', '--type', 'application'
+alias_command 'product create', 'solution create', '--type', 'product'
+
+# *** Delete solution(s).
+# -----------------------
+
+command 'solution delete' do |c|
+  c.syntax = %(murano solution delete [--options] [<name-or-ID,...>])
+  c.summary = %(Delete a solution)
+  c.description = %(
+Delete a solution from the business.
+  ).strip
+  c.project_not_required = true
+
+  # Add flag: --type [application|product|all].
+  cmd_add_solntype_pickers(c)
+
+  # Add --id and --name options.
+  cmd_options_add_id_and_name(c)
+
+  # Add soln pickers: --application* and --product*
+  cmd_option_application_pickers(c)
+  cmd_option_product_pickers(c)
+
+  c.option('--recursive', %(If a solution is not specified, find all solutions and prompt before deleting.))
+  c.option('-y', '--[no-]yes', %(Answer "yes" to all prompts and run non-interactively))
+
+  c.action do |args, options|
+    # SKIP: c.verify_arg_count!(args)
+    cmd_defaults_solntype_pickers(options)
+    cmd_defaults_id_and_name(options)
+    # Set all: true, so that cmd_solution_del_get_names_and_ids finds 'em all.
+    options.default(all: true)
+
+    biz = MrMurano::Business.new
+    biz.must_business_id!
+
+    nmorids = cmd_solution_del_get_names_and_ids!(biz, args, options)
+
+    n_deleted = 0
+    n_faulted = 0
+
+    nmorids.each do |name_or_id|
+      next unless biz.cmd_confirm_delete!(
+        name_or_id[0], options.yes, "Skipping #{name_or_id[0]}!"
+      ) do |confirmed|
+        confirmed
+      end
+      m_deleted, m_faulted = solution_delete(
+        name_or_id[0], use_sol: name_or_id[2], type: options.type, yes: options.yes
+      )
+      n_deleted += m_deleted
+      n_faulted += m_faulted
+    end
+    # Print results if something happened and was recursive (otherwise
+    # behave like, say, /bin/rm, and just be silent on success).
+    solution_delete_report(n_deleted, n_faulted) if options.recursive
+  end
+end
+alias_command 'delete application', 'solution delete', '--type', 'application'
+alias_command 'delete product', 'solution delete', '--type', 'product'
+alias_command 'application delete', 'solution delete', '--type', 'application'
+alias_command 'product delete', 'solution delete', '--type', 'product'
+
+def cmd_solution_del_get_names_and_ids!(biz, args, options)
+  nmorids = []
+  if args.count.zero?
+    if any_solution_pickers!(options)
+      exit_cmd_not_recursive!(options)
+    elsif !options.recursive
+      MrMurano::Verbose.error(
+        'Please specify the name or ID of the solution to delete, or use --recursive.'
+      )
+      exit 1
+    end
+  else
+    exit_cmd_not_recursive!(options)
+  end
+  solz = must_fetch_solutions!(options, args, biz)
+  solz.each do |sol|
+    nmorids += [[sol.sid, "‘#{sol.name}’ <#{sol.sid}>", sol]]
+  end
+  nmorids
+end
+
+def exit_cmd_not_recursive!(options)
+  return unless options.recursive
+  MrMurano::Verbose.error(
+    'The --recursive option does not apply when specifing solution IDs or names.'
+  )
+  exit 1
+end
+
+# The `murano solutions expunge -y` command simplifies what be done
+# craftily other ways, e.g.,:
+#
+#   $ for pid in $(murano product list --idonly) ; do murano product delete $pid ; done
+command 'solutions expunge' do |c|
+  c.syntax = %(murano solution expunge)
+  c.summary = %(Delete all solutions)
+  c.description = %(
+Delete all solutions in business.
+  ).strip
+  c.project_not_required = true
+
+  c.option('--[no-]all', 'Delete all Solutions in Business, not just Project')
+  c.option('-y', '--[no-]yes', %(Answer "yes" to all prompts and run non-interactively))
+
+  c.action do |args, options|
+    c.verify_arg_count!(args)
+    name_or_id = '*'
+    n_deleted, n_faulted = solution_delete(name_or_id, yes: options.yes)
+    solution_delete_report(n_deleted, n_faulted)
+  end
+end
+
+def solution_delete(name_or_id, use_sol: nil, type: :all, yes: false)
+  biz = MrMurano::Business.new
+  biz.must_business_id!
+
+  if name_or_id == '*'
+    return unless biz.cmd_confirm_delete!(
+      'all solutions', yes, 'abort!'
+    ) do |confirmed|
+      confirmed
+    end
+    name_or_id = ''
+  end
+
+  if !use_sol.nil?
+    solz = [use_sol]
+  else
+    MrMurano::Verbose.whirly_start('Looking for solutions...')
+    solz = biz.solutions(type: type)
+    # This used to use Hash.value? to see if the name exactly matches
+    # any key's value. But we should be able to stick to using name.
+    #  (E.g., it used to call sol.meta.value?(name_or_id), but this
+    #   would return true if, say, sol.meta[:any_key] equaled name_or_id.)
+    unless name_or_id.empty?
+      solz.select! do |sol|
+        sol.sid == name_or_id || sol.name == name_or_id || sol.domain =~ /#{Regexp.escape(name_or_id)}\./i
+      end
+    end
+    MrMurano::Verbose.whirly_stop
+    if $cfg['tool.debug']
+      say 'Matches found:'
+      biz.outf(solz)
+    end
+  end
+
+  n_deleted = 0
+  n_faulted = 0
+  if solz.empty?
+    if !name_or_id.empty?
+      MrMurano::Verbose.error("No solution matching ‘#{name_or_id}’ found")
+    else
+      MrMurano::Verbose.error(MSG_SOLUTIONS_NONE_FOUND)
+    end
+    exit 1
+  else
+    # Solutions of different types can have the same name, so warning that
+    # more than one solution was found when searching by name is not valid.
+    #unless name_or_id.empty? or solz.length == 1
+    #  MrMurano::Verbose.warning(
+    #    "Unexpected number of solutions: found #{solz.length} for #{name_or_id} but expected 1"
+    #  )
+    #end
+    MrMurano::Verbose.whirly_start('Deleting solutions...')
+    solz.each do |sol|
+      ret = biz.delete_solution(sol.sid)
+      if !ret.is_a?(Hash) && !ret.empty?
+        MrMurano::Verbose.error("Delete failed: #{ret}")
+        n_faulted += 1
+      else
+        n_deleted += 1
+        # Clear the ID from the config.
+        MrMurano::Config::CFG_SOLUTION_ID_KEYS.each do |keyn|
+          $cfg.set(keyn, nil) if $cfg[keyn] == sol.sid
+        end
+      end
+    end
+    MrMurano::Verbose.whirly_stop
+  end
+
+  [n_deleted, n_faulted]
+end
+
+def solution_delete_report(n_deleted, n_faulted)
+  unless n_deleted.nil? || n_deleted.zero?
+    # FIXME: Should this use 'say' or 'outf'?
+    inflection = MrMurano::Verbose.pluralize?('solution', n_deleted)
+    say "Deleted #{n_deleted} #{inflection}"
+  end
+  return if n_faulted.nil? || n_faulted.zero?
+  inflection = MrMurano::Verbose.pluralize?('solution', n_faulted)
+  MrMurano::Verbose.error("Failed to delete #{n_faulted} #{inflection}")
+end
+
+# *** List and Find solutions.
+# ----------------------------
+
+def cmd_solution_find_add_options(c)
+  c.option '--idonly', 'Only return the ids'
+  c.option '--[no-]brief', 'Show fewer fields: only Solution ID and domain'
+  c.option '--[no-]all', 'Find all Solutions in Business, not just Project'
+  c.option '-o', '--output FILE', %(Download to file instead of STDOUT)
+end
+
+command 'solution list' do |c|
+  c.syntax = %(murano solution list [--options])
+  c.summary = %(List solutions)
+  c.description = %(
+List solutions in the current business.
+  ).strip
+  c.project_not_required = true
+
+  cmd_solution_find_add_options(c)
+
+  # Add flag: --type [application|product|all].
+  cmd_add_solntype_pickers(c)
+
+  c.action do |args, options|
+    c.verify_arg_count!(args)
+    # Set all: true, so that must_fetch_solutions! finds 'em all.
+    options.default(all: true)
+    cmd_defaults_solntype_pickers(options)
+    cmd_solution_find_and_output(args, options)
+  end
+end
+alias_command 'list application', 'solution list', '--type', 'application', '--brief'
+alias_command 'list product', 'solution list', '--type', 'product', '--brief'
+alias_command 'application list', 'solution list', '--type', 'application', '--brief'
+alias_command 'product list', 'solution list', '--type', 'product', '--brief'
+#
+alias_command 'list solutions', 'solution list'
+alias_command 'list applications', 'application list'
+alias_command 'list products', 'product list'
+alias_command 'solutions list', 'solution list'
+alias_command 'applications list', 'application list'
+alias_command 'products list', 'product list'
+
+command 'solution find' do |c|
+  c.syntax = %(murano solution find [--options] [<name-or-ID,...>])
+  c.summary = %(Find solution by name or ID)
+  c.description = %(
+Find solution by name or ID.
+  ).strip
+  c.project_not_required = true
+
+  c.example %(
+    Find any solution named "mysolution"
+  ).strip, 'murano solution find mysolution --name'
+
+  c.example %(
+    Find product with ID "abcdef123456"
+  ).strip, 'murano product find abcdef123456 --id'
+
+  c.example %(
+    Find application with name or ID matching "1234"
+  ).strip, 'murano application find 1234'
+
+  cmd_solution_find_add_options(c)
+
+  cmd_add_solntype_pickers(c)
+
+  # Add --id and --name options.
+  cmd_options_add_id_and_name(c)
+
+  # Add soln pickers: --application* and --product*
+  cmd_option_application_pickers(c)
+  cmd_option_product_pickers(c)
+
+  c.action do |args, options|
+    # SKIP: c.verify_arg_count!(args)
+    cmd_defaults_solntype_pickers(options)
+    cmd_defaults_id_and_name(options)
+    # Set all: true, so that must_fetch_solutions! finds 'em all.
+    options.default(all: true)
+    if args.none? && !any_solution_pickers!(options)
+      MrMurano::Verbose.error('What would you like to find?')
+      exit 1
+    end
+    cmd_solution_find_and_output(args, options)
+  end
+end
+alias_command 'find application', 'solution find', '--type', 'application', '--brief'
+alias_command 'find product', 'solution find', '--type', 'product', '--brief'
+alias_command 'application find', 'solution find', '--type', 'application', '--brief'
+alias_command 'product find', 'solution find', '--type', 'product', '--brief'
+
+def cmd_solution_find_and_output(args, options)
+  cmd_verify_args_and_id_or_name!(args, options)
+  biz = MrMurano::Business.new
+  biz.must_business_id!
+  solz = cmd_solution_find_solutions(biz, args, options)
+  if solz.empty? && !options.idonly
+    MrMurano::Verbose.error(MSG_SOLUTIONS_NONE_FOUND)
+    exit 0
+  end
+  cmd_solution_output_solutions(biz, solz, options)
+end
+
+def cmd_solution_find_solutions(biz, args, options)
+  must_fetch_solutions!(options, args, biz)
+end
+
+def cmd_solution_output_solutions(biz, solz, options)
+  if options.idonly
+    headers = %i[apiId]
+    solz = solz.map { |row| [row.apiId] }
+  elsif options.brief
+    #headers = %i[apiId domain]
+    #solz = solz.map { |row| [row.apiId, row.domain] }
+    headers = %i[apiId domain name]
+    solz = solz.map { |row| [row.apiId, row.domain, row.name] }
+  else
+    headers = (solz.first && solz.first.meta || {}).keys
+    headers.delete(:sid) if headers.include?(:apiId) && headers.include?(:sid)
+    headers.sort_by! do |hdr|
+      case hdr
+      when :bizid
+        0
+      when :type
+        1
+      when :apiId
+        2
+      when :domain
+        3
+      when :name
+        4
+      else
+        5
+      end
+    end
+    solz = solz.map { |row| headers.map { |hdr| row.meta[hdr] } }
+  end
+
+  io = File.open(options.output, 'w') if options.output
+  biz.outf(solz, io) do |dd, ios|
+    if options.idonly
+      ios.puts(dd.join(' '))
+    else
+      biz.tabularize(
+        {
+          headers: headers.map(&:to_s),
+          rows: dd,
+        },
+        ios,
+      )
+    end
+  end
+  io.close unless io.nil?
+end
+