goodot 0.0.2

data/lib/goodot.rb

@@ -0,0 +1,7 @@
+# encoding: UTF-8
+#
+# Copyright (c) 2010-2016 GoodData Corporation. All rights reserved.
+# This source code is licensed under the BSD-style license found in the
+# LICENSE file in the root directory of this source tree.
+
+$LOAD_PATH.unshift File.dirname(__FILE__)

data/lib/goodot/cli/app.rb

@@ -0,0 +1,33 @@
+# encoding: UTF-8
+#
+# Copyright (c) 2010-2016 GoodData Corporation. All rights reserved.
+# This source code is licensed under the BSD-style license found in the
+# LICENSE file in the root directory of this source tree.
+
+require 'gli'
+require 'pathname'
+require 'pp'
+
+require_relative 'shared'
+require_relative '../version'
+
+module GoodData
+  module GoodotCLI
+    include GLI::App
+    extend self
+
+    def self.launch(args)
+      exit run args
+    end
+
+    subcommand_option_handling :normal
+    program_desc 'Toolset for helping with lifecycle management of the project'
+  end
+end
+
+cmds = File.absolute_path(File.join(File.dirname(__FILE__), 'cmd'))
+Dir.glob(cmds + '/*.rb').each do |file|
+  require file
+end
+
+GoodData::GoodotCLI.launch(ARGV)

data/lib/goodot/cli/cli.rb

@@ -0,0 +1,7 @@
+# encoding: UTF-8
+#
+# Copyright (c) 2010-2016 GoodData Corporation. All rights reserved.
+# This source code is licensed under the BSD-style license found in the
+# LICENSE file in the root directory of this source tree.
+
+require_relative 'app'

data/lib/goodot/cli/cmd/app_cmd.rb

@@ -0,0 +1,170 @@
+module GoodData
+  module GoodotCLI
+    desc 'Manage app'
+    command :app do |c|
+      c.desc 'Synchronize clients'
+      c.command :synchronize do |sync|
+        sync.desc 'Segment'
+        sync.flag [:s, :segment]
+
+        sync.action do |global_options, options, _args|
+          ok_key = 'OK'
+
+          domain = global_options[:gd_domain]
+          results = if options[:segment]
+                      segment = domain.segments(options[:segment])
+                      [segment.synchronize_clients]
+                    else
+                      domain.synchronize_clients
+                    end
+          res = results.pmapcat { |r| r.details.items }.group_by { |x| x['status'] }
+          if res.key?(ok_key) && res.keys.count == 1
+            puts HighLine.color("#{res[ok_key].count} syncs ended up in state #{ok_key}", :green)
+          else
+            res.except(ok_key).each do |k, v|
+              puts "#{v.count} syncs ended up in state #{k}."
+              puts 'Printing first 10'
+              v.each { |x| puts x['id'] }
+            end
+            fail HighLine.color("Some synchronizations ended up in different state than #{ok_key}", :red) unless res.except(ok_key).empty?
+          end
+        end
+      end
+
+      c.desc 'Export association for backup'
+      c.command :'export-association' do |export|
+        export.desc 'Without project ids'
+        export.switch [:'without-project']
+        export.default_value false
+
+        export.desc 'File for output'
+        export.flag [:f, :file]
+
+        export.action do |global_options, options, _args|
+          domain = global_options[:gd_domain]
+          results = domain.segments.pmapcat { |s| s.clients.map { |cl| [s, cl] } }
+          res = results.map do |s, cl|
+            {
+              segment: s.id,
+              id: cl.id
+            }.tap do |h|
+              h[:project] = cl.project.uri unless options['without-project']
+            end
+          end
+          file = options[:file]
+          if file
+            File.open(file, 'w') { |f| f << MultiJson.dump(res, pretty: true) }
+          else
+            puts MultiJson.dump(res, pretty: true)
+          end
+        end
+      end
+
+      c.desc 'Import association from backup'
+      c.command :'import-association' do |export|
+        export.desc 'File for output'
+        export.flag [:f, :file]
+
+        export.action do |global_options, options, _args|
+          domain = global_options[:gd_domain]
+          specification = MultiJson.load(File.read(options[:file]), symbolize_keys: true)
+          domain.update_clients(specification, delete_extra: true)
+        end
+      end
+
+      c.desc 'Spin up projects'
+      c.command :'spin-up-projects' do |spin|
+        spin.desc 'Segment'
+        spin.flag [:s, :segment]
+
+        spin.action do |global_options, _options, _args|
+          domain = global_options[:gd_domain]
+          results = domain.provision_client_projects
+          if results.to_a.empty?
+            puts HighLine.color('Everything seems to be up to date. Nothing was done!', :green)
+          else
+            puts HighLine.color("#{results.count} operations were performed", :green)
+            puts
+            results.group_by(&:status).each do |status, group|
+              puts HighLine.color("#{group.count} #{status} operations were performed", :green)
+              puts table_with_headers(group, [:id, :project_uri])
+            end
+          end
+        end
+      end
+
+      c.desc 'Add segment'
+      c.command :'create-segment' do |seg|
+        seg.desc 'Segment'
+        seg.flag [:s, :segment]
+
+        seg.desc 'Master project'
+        seg.flag [:p, :project]
+
+        seg.action do |global_options, options, _args|
+          client = global_options[:gd_client]
+          domain = global_options[:gd_domain]
+          segment_id = options[:segment]
+          project_id = options[:project]
+          fail 'Segment needs to be provided' unless segment_id
+          fail 'Project id needs to be provided' unless project_id
+          project = client.projects(project_id)
+
+          begin
+            s = domain.create_segment(segment_id: segment_id, master_project: project)
+            puts HighLine.color("Segment #{s.id} created!", :green)
+          rescue RuntimeError => e
+            raise create_api_error_message(e)
+          end
+        end
+      end
+
+      c.desc 'Add client'
+      c.command :'add-client' do |add|
+        add.desc 'Segment'
+        add.flag [:s, :segment]
+
+        add.desc 'Client ID'
+        add.flag [:c, :client]
+
+        add.action do |global_options, options, _args|
+          domain = global_options[:gd_domain]
+          segment_id = options[:segment]
+          client_id = options[:client]
+          fail 'Segment needs to be provided' unless segment_id
+          fail 'client ID needs to be provided.' unless client_id
+
+          s = domain.segments(segment_id)
+          begin
+            c = s.create_client(id: client_id)
+            puts HighLine.color("client #{c.id} created!", :green)
+          rescue RuntimeError => e
+            raise create_api_error_message(e)
+          end
+        end
+      end
+
+      c.desc 'App stats'
+      c.command :stats do |add|
+        add.action do |global_options, _options, _args|
+          client = global_options[:gd_client]
+          domain = global_options[:gd_domain]
+
+          all_projects = client.projects.to_a
+          master_projects = domain.segments.pmap(&:master_project)
+          client_projects = domain.segments.pmapcat { |s| s.clients.map(&:project).compact }
+
+          puts HighLine.color('Projects', :bold)
+          puts "This app contains #{all_projects.count} projects"
+          puts "Out of those #{master_projects.count} are linked as masters"
+          puts "Out of those #{client_projects.count} are linked as clients"
+
+          unused_projects_pids = (all_projects.map(&:pid) - master_projects.map(&:pid) - client_projects.map(&:pid))
+          puts "Additional #{unused_projects_pids.count} projects are in this account"
+          puts 'Printing first 10'
+          puts table_with_headers(unused_projects_pids.take(10).pmap { |pid| client.projects(pid) }, [:pid, :title])
+        end
+      end
+    end
+  end
+end

data/lib/goodot/cli/cmd/clients_cmd.rb

@@ -0,0 +1,89 @@
+# encoding: utf-8
+
+# Copyright (c) 2015, Tomas Korcak <korczis@gmail.com>
+#
+# Permission is hereby granted, free of charge, to any person obtaining a copy
+# of this software and associated documentation files (the "Software"), to deal
+# in the Software without restriction, including without limitation the rights
+# to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
+# copies of the Software, and to permit persons to whom the Software is
+# furnished to do so, subject to the following conditions:
+#
+# The above copyright notice and this permission notice shall be included in
+# all copies or substantial portions of the Software.
+#
+# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+# IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+# FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.  IN NO EVENT SHALL THE
+# AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
+# LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
+# OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
+# THE SOFTWARE.
+
+require_relative '../shared'
+
+module GoodData
+  module GoodotCLI
+    desc 'Manage clients in your application'
+    command :clients do |c|
+      c.desc 'List clients'
+      c.command :list do |add|
+        add.desc 'Filter on particular segment'
+        add.default_value :all
+        add.flag [:s, :segment]
+
+        add.action do |global_options, options, _args|
+          domain = global_options[:gd_domain]
+          segment_id = options[:segment]
+          table = Terminal::Table.new do |t|
+            t << ['Client Id', 'Segment URI', 'Project URI']
+            t << :separator
+            Array(domain.segments(segment_id)).pmapcat(&:clients).each { |s| t.add_row([s.client_id, s.segment_uri, s.project_uri]) }
+          end
+          puts table
+        end
+      end
+
+      c.desc 'Remove client'
+      c.command :remove do |remove|
+        remove.desc 'Client'
+        remove.flag [:c, :client]
+
+        remove.desc 'Delete the project'
+        remove.default_value false
+        remove.switch [:d, :'delete-project']
+
+        remove.action do |global_options, options, _args|
+          domain = global_options[:gd_domain]
+          client_name = options[:client]
+          fail 'Client needs to be provided' unless client_name
+          client = domain.clients(segment_name)
+          project = client.project
+          client.delete
+          project.delete if options[:d]
+        end
+      end
+
+      c.desc 'Reset client. Removes the project from the client.'
+      c.command :reset do |reset|
+        reset.desc 'Client'
+        reset.flag [:c, :client]
+
+        reset.desc 'Delete the project'
+        reset.default_value false
+        reset.switch [:d, :'delete-project']
+
+        reset.action do |global_options, options, _args|
+          domain = global_options[:gd_domain]
+          client_name = options[:client]
+          fail 'Client needs to be provided' unless client_name
+          client = domain.clients.find { |cl| cl.id == client_name }
+          project = client.project
+          client.project = nil
+          client.save
+          project.delete if options[:d]
+        end
+      end
+    end
+  end
+end

data/lib/goodot/cli/cmd/jack_in.rb

@@ -0,0 +1,17 @@
+require_relative '../shared'
+
+module GoodData
+  module GoodotCLI
+    desc 'Jacks you in to work interactively with your project.'
+    command ['jack-in', 'jack_in'] do |c|
+      c.action do |global_options, _options, _args|
+        client = global_options[:gd_client]
+        domain = global_options[:gd_domain]
+        binding.pry(quiet: true, # rubocop:disable Lint/Debugger
+                    prompt: [proc do |_target_self, _nest_level, _pry|
+                      'app_live_session: '
+                    end])
+      end
+    end
+  end
+end

data/lib/goodot/cli/cmd/masters_cmd.rb

@@ -0,0 +1,67 @@
+# # encoding: utf-8
+#
+# # Copyright (c) 2015, Tomas Korcak <korczis@gmail.com>
+# #
+# # Permission is hereby granted, free of charge, to any person obtaining a copy
+# # of this software and associated documentation files (the "Software"), to deal
+# # in the Software without restriction, including without limitation the rights
+# # to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
+# # copies of the Software, and to permit persons to whom the Software is
+# # furnished to do so, subject to the following conditions:
+# #
+# # The above copyright notice and this permission notice shall be included in
+# # all copies or substantial portions of the Software.
+# #
+# # THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+# # IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+# # FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.  IN NO EVENT SHALL THE
+# # AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
+# # LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
+# # OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
+# # THE SOFTWARE.
+
+require_relative '../shared'
+
+module GoodData
+  module GoodotCLI
+    desc 'Manage masters'
+    command :masters do |c|
+      c.desc 'List masters'
+      c.command :list do |add|
+        add.action do |global_options, _options, _args|
+          domain = global_options[:gd_domain]
+          currently_used = domain.segments.pmap { |s| [s, s.master_project] }.compact
+
+          puts table_with_headers(currently_used,
+                                  [
+                                    proc { |_, p| p && p.pid },
+                                    proc { |_, p| p && p.title },
+                                    proc { |s, _| s.id },
+                                    proc { |_, p| p && p.metadata['GD_LCM_VERSION'] }
+                                  ],
+                                  headers: ['PID', 'Title', 'Segment ID', 'Version'])
+        end
+      end
+
+      c.desc 'Clone master of particular segment'
+      c.command :clone do |add|
+        add.desc 'Segment which master will be cloned'
+        add.default_value nil
+        add.flag [:s, :segment]
+
+        add.desc 'Authorization token'
+        add.default_value nil
+        add.flag [:t, :token]
+
+        add.action do |global_options, options, _args|
+          domain = global_options[:gd_domain]
+          fail 'You have to specify segment' unless options[:segment]
+          master_project = domain.segments(options[:segment]).master_project
+          clone = GoodData::Project.clone_with_etl(master_project, auth_token: options[:token])
+          puts "Project \"#{master_project.title}\" (#{master_project.pid}) was cloned."
+          puts "\"#{clone.title}\" (#{clone.pid}) was created."
+        end
+      end
+    end
+  end
+end

data/lib/goodot/cli/cmd/segments_cmd.rb

@@ -0,0 +1,81 @@
+module GoodData
+  module GoodotCLI
+    desc 'Manage segments'
+    command :segments do |c|
+      c.desc 'List segments'
+      c.command :list do |add|
+        add.desc 'Format'
+        add.default_value :table
+        add.flag [:f, :format]
+
+        add.action do |global_options, options, _args|
+          domain = global_options[:gd_domain]
+
+          segments = domain.segments
+          case options[:format].to_sym
+          when :table
+            puts table_with_headers(segments, [:id, :master_project_id])
+          when :json
+            output = segments.map do |s|
+              {
+                name: s.id,
+                master_project_id: s.master_project_id
+              }
+            end
+            puts MultiJson.dump(output, pretty: true)
+          end
+        end
+      end
+
+      c.desc 'Remove segment'
+      c.command [:remove, :delete] do |add|
+        add.desc 'Segment'
+        add.flag [:s, :segment]
+
+        add.desc 'Delete also the clients in that particular segment'
+        add.default_value false
+        add.switch [:c, :cascade]
+
+        add.action do |global_options, options, _args|
+          domain = global_options[:gd_domain]
+          segment_name = options[:segment]
+          fail 'Segment needs to be provided' unless segment_name
+          segment = domain.segments(segment_name)
+          segment.clients.peach(&:delete) if options[:cascade]
+          segment.delete
+        end
+      end
+
+      c.desc 'Exchange master on segment.'
+      c.command :exchange do |exchange|
+        exchange.desc 'Segment'
+        exchange.flag [:s, :segment]
+
+        exchange.desc 'Master project ID'
+        exchange.flag [:p, :project]
+
+        exchange.desc 'Delete the old project'
+        exchange.default_value false
+        exchange.switch [:d, :delete]
+
+        exchange.action do |global_options, options, _args|
+          client = global_options[:gd_client]
+          domain = global_options[:gd_domain]
+
+          segment_name = options[:segment]
+          fail 'Segment needs to be provided' unless segment_name
+          segment = domain.segments(segment_name)
+
+          project_id = options[:project]
+          fail 'Project Master id needs to be provided' unless project_id
+          old_master = segment.master_project
+          new_master_project = client.projects(project_id)
+
+          segment.master_project = new_master_project
+          segment.save
+          old_master.delete if options[:delete]
+        end
+      end
+    end
+  end
+end