rhc 0.68.5

data/LICENSE

@@ -0,0 +1,21 @@
+# Copyright 2011 Red Hat, Inc.
+#
+# 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.

data/README

@@ -0,0 +1,41 @@
+Openshift Express (RHC)
+========
+
+Please stop by #openshift on irc.freenode.net if you have any questions or
+comments.  Another good resource are the blogs and forums at
+http://openshift.redhat.com
+
+
+Quickstart
+========
+
+DEPENDENCIES: git
+              openssh-clients
+              ruby (1.8.7 or later)
+              rubygems
+              json gem
+              parseconfig gem
+
+Step 1:  Create an rhc domain:
+
+$ ./rhc-create-domain -n desirednamespace -l rhlogin
+
+Step 2: Create an rhc application:
+
+$ ./rhc-create-app -l rhlogin -a appname -r /path/to/new/git/repo -t <framework Ex: php-5.3.2>
+
+Once that's complete, follow the directions printed at the end of running
+rhc-create-app
+
+
+Updating your site
+========
+
+Once your site is created, updating it is as simple as making changes to your
+git repo.  Commit them, then push.  For example:
+
+$ edit index.php
+$ git commit -a -m "what I did"
+$ git push
+
+Then just reload your web page to see the changes

data/Rakefile

@@ -0,0 +1,32 @@
+#!/usr/bin/ruby
+
+require 'rubygems'
+require 'rake'
+require 'rake/clean'
+require 'rake/gempackagetask'
+
+task :default => [:package]
+
+# Create the gem specification for packaging
+spec = Gem::Specification.new do |s|
+    s.name = %q{rhc}
+    s.version = /(Version: )(.*)/.match(File.read("../build/specs/rhc.spec"))[2]
+    s.author = "Red Hat"
+    s.email = %q{openshift@redhat.com}
+    s.summary = %q{OpenShift Express Client Tools}
+    s.homepage = %q{https://openshift.redhat.com/app/express}
+    s.description = %q{OpenShift Express Client Tools}
+    s.files = FileList['lib/**/*.rb', 'bin/*', 'conf/*'].to_a
+    s.files += %w(LICENSE README Rakefile)
+    s.executables = ['rhc-create-app', 'rhc-create-domain', 'rhc-ctl-app', 'rhc-snapshot', 'rhc-user-info']
+    s.add_dependency('json')
+    s.add_dependency('parseconfig')
+end
+
+# Define a :package task that bundles the gem
+Rake::GemPackageTask.new(spec) do |pkg|
+  pkg.need_tar = false
+end
+
+# Add the 'pkg' directory to the clean task
+CLEAN.include("pkg")

data/bin/rhc-create-app

@@ -0,0 +1,389 @@
+#!/usr/bin/env ruby
+# Copyright 2011 Red Hat, Inc.
+#
+# 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 'rhc-common'
+
+def p_usage
+    rhlogin = get_var('default_rhlogin') ? "Default: #{get_var('default_rhlogin')}" : "(required)"
+    type_keys = RHC::get_cartridge_types(', ')
+    puts <<USAGE
+
+Usage: #{$0}
+Create a new app Openshift Express project.
+
+  -a|--app   application     Application name  (alphanumeric - max #{RHC::Maxdlen} chars) (required)
+  -t|--type  type            Type of app to create (#{type_keys}) (required)
+  -l|--rhlogin  rhlogin      RHCloud rhlogin (#{rhlogin})
+  -p|--password  password    RHLogin password  (optional, will prompt)
+  -r|--repo  path            Git Repo path (defaults to ./$app_name)
+  -n|--nogit                 Only create remote space, don't pull it locally
+  -d|--debug                 Print Debug info
+  -h|--help                  Show Usage info
+
+USAGE
+exit 255
+end
+
+begin
+    opts = GetoptLong.new(
+        ["--debug", "-d", GetoptLong::NO_ARGUMENT],
+        ["--help",  "-h", GetoptLong::NO_ARGUMENT],
+        ["--nogit", "-n", GetoptLong::NO_ARGUMENT],
+        ["--rhlogin",  "-l", GetoptLong::OPTIONAL_ARGUMENT],
+        ["--password",  "-p", GetoptLong::OPTIONAL_ARGUMENT],
+        ["--app",   "-a", GetoptLong::REQUIRED_ARGUMENT],
+        ["--repo",  "-r", GetoptLong::OPTIONAL_ARGUMENT],
+        ["--type",  "-t", GetoptLong::REQUIRED_ARGUMENT]
+    )
+    opt = {}
+    opts.each do |o, a|
+        opt[o[2..-1]] = a.to_s
+    end
+rescue Exception => e
+  #puts e.message
+    p_usage
+end
+
+# Pull in configs from files
+libra_domain = get_var('libra_domain')
+libra_server = get_var('libra_server')
+debug = get_var('debug') == 'false' ? nil : get_var('debug')
+
+ssh_config = "#{ENV['HOME']}/.ssh/config"
+ssh_config_d = "#{ENV['HOME']}/.ssh/"
+
+if opt["help"]
+    p_usage
+end
+
+if opt["debug"]
+    debug = true
+end
+
+opt["rhlogin"] = get_var('default_rhlogin') unless opt["rhlogin"]
+
+if !RHC::check_rhlogin(opt['rhlogin'])
+    p_usage
+end
+
+if !RHC::check_app(opt['app'])
+    p_usage
+end
+
+type = RHC::get_cartridge(opt['type'])
+if !type
+    p_usage
+end
+
+if !opt["rhlogin"] || !opt["app"] || !opt["type"]
+    p_usage
+end
+
+password = opt['password']
+if !password
+  password = RHC::get_password
+end
+
+#
+# Get UUID from file
+#
+
+uuid = get_var(opt["rhlogin"])
+unless uuid
+    puts "Could not find UUID for #{opt["rhlogin"]}"
+    exit 99
+end
+
+opt["repo"] = opt["app"] unless opt["repo"]
+
+puts ""
+puts "Please support the developer preview - let #openshift on freenode know of any"
+puts "bugs you find"
+puts ""
+
+#
+# Confirm local git repo exists
+#
+unless opt['nogit']
+    if File.exists?(opt['repo'])
+        puts "We will not overwrite an existing git repo. Please remove:"
+        puts "  #{File.expand_path(opt['repo'])}"
+        puts "Then try again."
+        puts
+        exit 210
+    else
+        begin
+            # Create the parent directory for the git repo
+            @git_parent = File.expand_path(opt['repo'] + "/../")
+            FileUtils.mkdir_p(@git_parent)
+        rescue Errno::EACCES
+            puts "Could not write to #{@git_parent}"
+            puts "Reason: " + $!
+            puts
+            puts "Please re-run from a directory you have write access to or specify -r with a"
+            puts "path you have write access to"
+            puts
+            exit 211
+        end
+    end
+end
+
+#
+# Confirm libra_id_rsa exists
+#
+unless File.exists?("#{ssh_config_d}/libra_id_rsa")
+    puts
+    puts "Could not find #{ssh_config_d}/libra_id_rsa, cannot continue"
+    puts "This file was created by rhc-create-domain.  If it does not exist you may need to create"
+    puts "a new one."
+    puts
+    exit 212
+end
+
+#
+# Create remote application space
+#
+
+puts "Creating remote application space: " + opt['app']
+
+data = {:cartridge => opt['type'],
+                :action => 'configure',
+                :app_name => opt['app'],
+                :rhlogin => opt['rhlogin']
+                }
+if debug
+  data['debug'] = "true"
+end
+json_data = JSON.generate(data)
+
+puts "Contacting https://#{libra_server}"
+
+url = URI.parse("https://#{libra_server}/app/broker/cartridge")
+response = RHC::http_post(@http, url, json_data, password)
+
+if response.code == '200'
+    RHC::print_response_success(response, debug, true)
+else
+    RHC::print_response_err(response, debug)
+end
+
+#
+# At this point, we need to register a handler to guarantee app
+# cleanup on any exceptions or calls to exit
+#
+at_exit do
+    unless $!.nil? || $!.is_a?(SystemExit) && $!.success?
+        json_data = JSON.generate(
+                   {:cartridge => opt['type'],
+                    :action => 'deconfigure',
+                    :app_name => opt['app'],
+                    :rhlogin => opt['rhlogin'],
+                    :password => password
+                    })
+        puts "Cleaning up application"
+        url = URI.parse("https://#{libra_server}/app/broker/cartridge")
+        RHC::http_post(@http, url, json_data, password)
+    end
+end
+
+#
+# Check / add new host to ~/.ssh/config
+#
+
+puts "Checking ~/.ssh/config"
+
+user_info = RHC::get_user_info(libra_server, opt['rhlogin'], password, @http, debug, false)
+
+my_url = "#{opt['app']}-#{user_info['user_info']['namespace']}.#{libra_domain}"
+
+found = false
+
+begin
+    File.open(ssh_config, "r") do |sline|
+        while(line = sline.gets)
+            if line.to_s.start_with? "Host *.#{libra_domain}"
+                found = true
+                break
+            end
+        end
+    end
+rescue Errno::EACCES
+    puts "Could not read from #{ssh_config}"
+    puts "Reason: " + $!
+    puts
+    puts "Please correct this first.  Then run rerun."
+    puts
+    exit 213
+rescue Errno::ENOENT
+    puts "Could not find #{ssh_config}.  This is ok, continuing"
+end
+if found
+    puts "Found #{libra_domain} in ~/.ssh/config... No need to adjust"
+else
+    puts "    Adding #{libra_domain} to ~/.ssh/config"
+    begin
+        f = File.open(ssh_config, "a")
+        f.puts <<SSH
+
+# Added by rhc-create-app app on #{`date`}
+Host *.#{libra_domain}
+    IdentityFile ~/.ssh/libra_id_rsa
+    VerifyHostKeyDNS yes
+    StrictHostKeyChecking no
+    PasswordAuthentication no
+    UserKnownHostsFile ~/.ssh/libra_known_hosts
+
+SSH
+        f.close
+     rescue Errno::EACCES
+        puts "Could not write to #{ssh_config}"
+        puts "Reason: " + $!
+        puts
+        puts "Please correct this first.  Then run rerun."
+        puts
+        exit 214
+    rescue Errno::ENOENT
+        # Make directory and config if they do not exist
+        puts "Could not find directory: " + $!
+        puts "creating"
+        FileUtils.mkdir_p ssh_config_d
+        file = File.open(ssh_config, 'w')
+        file.close
+        retry
+    end
+end
+
+File.chmod(0700, ssh_config_d)
+File.chmod(0600, ssh_config)
+
+#
+# Confirm that the host exists in DNS
+#
+puts "Now your new domain name is being populated worldwide (this might take a minute)..."
+
+# Allow DNS to propogate
+sleep 15
+
+# Now start checking for DNS
+loop = 0
+sleep_time = 2
+while loop < RHC::Maxretries && !RHC::hostexist?(my_url)
+    sleep sleep_time
+    loop+=1
+    puts "  retry # #{loop} - Waiting for DNS: #{my_url}"
+    sleep_time = RHC::delay(sleep_time)
+end
+
+if loop >= RHC::Maxretries
+    puts "Host could not be created and/or found..."
+    exit 215
+end
+
+sleep_time = 2
+attempt = 0
+#
+# Pull new repo locally
+#
+
+git_url = "ssh://#{uuid}@#{opt['app']}-#{user_info['user_info']['namespace']}.#{libra_domain}/~/git/#{opt['app']}.git/"
+
+unless opt['nogit']
+    puts "Pulling new repo down"
+
+    puts "git clone #{git_url} #{opt['repo']}" if debug
+    git_pull = `git clone #{git_url} #{opt['repo']}`
+    if $?.exitstatus != 0
+        puts "Error in git pull"
+        puts git_pull
+        exit 216
+    end
+else
+    puts <<IMPORTANT
+
+!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
+IMPORTANT: Since the -n flag was specified, no local repo has been created.
+This means you can't make changes to your published application until after
+you clone the repo yourself.  See the git url below for more information.
+!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
+
+IMPORTANT
+end
+
+#
+# At this point, we need to register a handler to guarantee git
+# repo cleanup on any exceptions or calls to exit
+#
+at_exit do
+    unless $!.nil? || $!.is_a?(SystemExit) && $!.success?
+        puts "Cleaning up git repo"
+        FileUtils.rm_rf opt['repo']
+    end
+end
+
+#
+# Test several times, doubling sleep time between attempts.
+#
+sleep_time = 2
+attempt = 0
+puts "Confirming application #{opt['app']} is available"
+while attempt < RHC::Maxretries
+    attempt+=1
+    puts "  Attempt # #{attempt}"
+    page = 'health'
+    if (type == :php)
+      page = 'health_check.php'
+    end
+    url = URI.parse("http://#{my_url}/#{page}")
+    begin
+      response = @http.get_response(url)
+    rescue Exception => e
+      response = nil
+    end
+    if !response.nil? && response.code == "200" && response.body[0,1] == "1"
+        puts <<LOOKSGOOD
+
+Success!  Your application is now published here:
+
+      http://#{my_url}/
+
+The remote repository is located here:
+
+    #{git_url}
+
+To make changes to your application, commit to #{opt['repo']}/.
+Then run 'git push' to update your Openshift Express space
+
+LOOKSGOOD
+        exit 0
+    end
+    if !response.nil? && debug
+      puts "Server responded with #{response.code}"
+      puts response.body unless response.code == '503'
+    end
+    puts
+    puts "    sleeping #{sleep_time} seconds"
+    sleep sleep_time
+    sleep_time = RHC::delay(sleep_time)
+end
+puts "Unable to find or access the site... problems"
+exit 254