openshift 0.60.3

data/bin/os-start-application

@@ -0,0 +1,147 @@
+#!/usr/bin/env ruby
+# Copyright 2010 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 'openshift'
+
+def usage
+    puts <<USAGE
+== Synopsis
+
+os-start-application: Restart an application.
+
+== Usage
+
+os start-application [options] [APP]
+
+-u|--username USERNAME:
+   Redhat Login (RHN or OpenShift login).
+
+-p|--password PASSWORD:
+   Redhat Password.
+
+-t|--target flex|express
+   Choose the cloud platform to clone the application from.
+
+-e|--environment ID:
+   The ID of the environment that is hosting the application. This is an optional 
+   argument to disambiguate the application name. This argument only applies 
+   to Openshift Flex environments
+
+-h|--help:
+   Prints this message
+
+APP: The application name or application GUID
+USAGE
+end
+
+begin
+    opts = GetoptLong.new(
+        ["--username",         "-u", GetoptLong::REQUIRED_ARGUMENT],
+        ["--password",         "-p", GetoptLong::REQUIRED_ARGUMENT],
+        ["--environment",      "-e", GetoptLong::REQUIRED_ARGUMENT],
+        ["--help",             "-h", GetoptLong::NO_ARGUMENT],        
+        ["--debug",                  GetoptLong::NO_ARGUMENT],                
+        ["--sso",                    GetoptLong::REQUIRED_ARGUMENT]        
+    )
+rescue Exception => e
+    puts e.message
+end
+
+args = {}
+begin
+    opts.each{ |k,v| args[k]=v }
+rescue GetoptLong::Error => e
+    usage
+    exit -100
+end
+
+app_name = ARGV.shift
+@debug = true if args['--debug']
+
+if args['--help'] or app_name.nil? or app_name == ""
+    usage
+    exit -101
+end
+
+args['--target'] = conf('default_target') || 'flex' if args['--target'].nil? or args['--target']==""
+debug args['--target']
+
+if args['--target'] == 'flex'
+    flex_server = conf('flex_server')
+    environment_id = args['--environment']
+    cookie = args['--sso']
+    
+    if !cookie
+        username = args['--username'] || conf("username") || Openshift::IO.prompt("Redhat username",[],Openshift::Validation.method(:check_login))
+        password = args['--password'] || Openshift::IO.prompt("Redhat password",nil,nil,true,false)
+        csay("Logging into Openshift Flex as #{username}\n",:message)
+        cookie=Openshift.login(@http,username,password)
+    end
+
+    candidates=nil
+    begin
+        environment_info = "--environment #{environment_id}" if environment_id
+        csay("Loading application state... ")
+        debug "Invoking os-inspect-application --sso \"#{cookie}\" --porcelin #{environment_info} #{app_name}"    
+        candidates = JSON.parse(`os-inspect-application --sso \"#{cookie}\" --porcelin #{environment_info} #{app_name}`)
+        csay("[OK]",:conf)
+    rescue JSON::ParserError => e
+        debug e.message
+        csay("[ERROR]",:conf)        
+        csay("Unable to load application data from server\n.",:error)
+        exit -400
+    end
+
+    if candidates.size == 0
+        csay("No application found with specified name or guid.\n",:error)
+        usage
+        exit -200
+    end
+
+    if candidates.size > 1
+        csay("Ambiguous application. Please consider specifing environment id and/or application guid.\n",:error)
+        usage
+        exit -201
+    end
+    
+    environment = candidates[0]["environment"]
+    app = candidates[0]["application"]
+    csay("Starting application... ")    
+    uri = URI.parse("https://#{environment['dns']}:4242/applications/#{app['guid']}/state")
+    response = Openshift::Rest.put(@http, uri, {"state" => "started"}, nil, {'user' => environment['username'], 'password' => environment['password']})
+    case response
+    when Net::HTTPSuccess
+        csay("[OK]",:conf)
+    else
+        debug "HTTP code: #{response.code}"
+        debug response.body
+        csay("[ERROR]",:error)
+        csay("Unable to start application",:error)
+    end
+    
+    csay("Loading application state...")    
+    cmd = "os-inspect-application --sso \"#{cookie}\" #{environment_info} #{app_name}"
+    exec(cmd)
+else
+    csay("This feature is currently not implemented for Openshift Express applications.\n",:red)    
+end

data/bin/os-start-environment

@@ -0,0 +1,144 @@
+#!/usr/bin/env ruby
+# Copyright 2010 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 'openshift'
+
+def usage
+puts <<USAGE
+== Synopsis
+
+os-start-environemnt: Starts an OpenShift Flex environment
+
+== Usage
+
+os start-environment [options] [NAME]
+
+-u|--username
+    Redhat Login (RHN or OpenShift login with OpenShift Express access)
+
+-p|--password
+    Redhat Password
+
+-t|--target flex|express
+    The cloud platform the environment is running on.
+    
+-h|--help
+    Prints this message
+
+NAME: The name or GUID of the environment to start.
+USAGE
+end
+
+opts = GetoptLong.new(
+    ["--username",         "-u", GetoptLong::REQUIRED_ARGUMENT],
+    ["--password",         "-p", GetoptLong::REQUIRED_ARGUMENT],
+    ["--sso",                    GetoptLong::REQUIRED_ARGUMENT],
+    ["--debug",                  GetoptLong::NO_ARGUMENT],        
+    ["--help",                   GetoptLong::NO_ARGUMENT],        
+    ["--porcelin",               GetoptLong::NO_ARGUMENT]
+)
+
+args = {}
+begin
+    opts.each{ |k,v| args[k]=v }
+rescue GetoptLong::Error => e
+    usage
+    exit -100
+end
+
+@debug = true if args['--debug']
+args['--target'] = conf('default_target') || 'flex' if args['--target'].nil? or args['--target']==""
+debug "Target platform #{args['--target']}"
+
+if args['--help']
+    usage
+    exit
+end
+
+if args['--target'] == 'flex'
+    flex_server = conf('flex_server')
+    cookie = args['--sso']
+    if !cookie
+        username = args['--username'] || conf("username") || Openshift::IO.prompt("Redhat username",[],Openshift::Validation.method(:check_login))
+        password = args['--password'] || Openshift::IO.prompt("Redhat password",nil,nil,true,false)
+        csay("Logging into Openshift Flex as #{username}\n",:message)
+        cookie=Openshift.login(@http,username,password)
+    end
+    
+    environment_id = ARGV.shift
+    debug "Deleting application name: #{environment_id}"
+    if not environment_id
+        csay("No environment specified.",:error)
+        exit
+    end
+
+    csay("Fetching environment list... ")
+    environments=nil
+    begin
+        environments=`os-list-environments --sso "#{cookie}" --porcelin`
+        environments = JSON.parse(environments)
+        csay("[OK]",:conf)        
+    rescue Exception => e
+        debug environments
+        debug e
+        csay("[ERROR]",:error)
+        csay("Error retrieving environment list.")
+        exit -400
+    end
+    candidates = environments.find_all{ |c| c["name"]==environment_id or c["id"]==environment_id }
+    
+    if candidates.size == 0
+        csay("Unable to find environment identified by #{environment_id}",:error)
+        exit -200
+    end
+    
+    if candidates.size > 1
+        csay("Multiple environments are named #{environment_id}. Please provide the environment Id",:error)
+        exit -201
+    end
+
+    env = candidates[0]
+    start_env_url = env['links']['start']
+    start_env_url['method'] = 'POST'     #override due to bug in Flex REST API
+            
+    csay("Starting environment ")
+    csay("#{candidates[0]["name"]} ",:emphasis)
+    csay("... ")
+    uri = URI.parse("#{flex_server}/rest/#{start_env_url['href']}")
+    response = Openshift::Rest.doHttp(@http, start_env_url['method'], uri, {"state" => "started"}, cookie, nil)
+    case response
+    when Net::HTTPSuccess
+        csay("[OK]",:conf)
+    else
+        debug "HTTP code: #{response.code}"
+        debug response.body
+        csay("[ERROR]",:error)
+        csay("Unable to start environment.",:error)
+        exit -301
+    end
+    
+    csay("Loading environment states...")
+    system( "os-list-environments --sso \"#{cookie}\"" )
+else
+    csay("This feature is currently not implemented for Openshift Express applications.\n",:red)    
+end

data/bin/os-stop-application

@@ -0,0 +1,147 @@
+#!/usr/bin/env ruby
+# Copyright 2010 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 'openshift'
+
+def usage
+    puts <<USAGE
+== Synopsis
+
+os-stop-application: Restart an application.
+
+== Usage
+
+os stop-application [options] [APP]
+
+-u|--username USERNAME:
+   Redhat Login (RHN or OpenShift login).
+
+-p|--password PASSWORD:
+   Redhat Password.
+
+-t|--target flex|express
+   Choose the cloud platform to clone the application from.
+
+-e|--environment ID:
+   The ID of the environment that is hosting the application. This is an optional 
+   argument to disambiguate the application name. This argument only applies 
+   to Openshift Flex environments
+
+-h|--help:
+   Prints this message
+
+APP: The application name or application GUID
+USAGE
+end
+
+begin
+    opts = GetoptLong.new(
+        ["--username",         "-u", GetoptLong::REQUIRED_ARGUMENT],
+        ["--password",         "-p", GetoptLong::REQUIRED_ARGUMENT],
+        ["--environment",      "-e", GetoptLong::REQUIRED_ARGUMENT],
+        ["--help",             "-h", GetoptLong::NO_ARGUMENT],        
+        ["--debug",                  GetoptLong::NO_ARGUMENT],                
+        ["--sso",                    GetoptLong::REQUIRED_ARGUMENT]        
+    )
+rescue Exception => e
+    puts e.message
+end
+
+args = {}
+begin
+    opts.each{ |k,v| args[k]=v }
+rescue GetoptLong::Error => e
+    usage
+    exit -100
+end
+
+app_name = ARGV.shift
+@debug = true if args['--debug']
+
+if args['--help'] or app_name.nil? or app_name == ""
+    usage
+    exit -101
+end
+
+args['--target'] = conf('default_target') || 'flex' if args['--target'].nil? or args['--target']==""
+debug args['--target']
+
+if args['--target'] == 'flex'
+    flex_server = conf('flex_server')
+    environment_id = args['--environment']
+    cookie = args['--sso']
+    
+    if !cookie
+        username = args['--username'] || conf("username") || Openshift::IO.prompt("Redhat username",[],Openshift::Validation.method(:check_login))
+        password = args['--password'] || Openshift::IO.prompt("Redhat password",nil,nil,true,false)
+        csay("Logging into Openshift Flex as #{username}\n",:message)
+        cookie=Openshift.login(@http,username,password)
+    end
+
+    candidates=nil
+    begin
+        environment_info = "--environment #{environment_id}" if environment_id
+        csay("Loading application state... ")
+        debug "Invoking os-inspect-application --sso \"#{cookie}\" --porcelin #{environment_info} #{app_name}"    
+        candidates = JSON.parse(`os-inspect-application --sso \"#{cookie}\" --porcelin #{environment_info} #{app_name}`)
+        csay("[OK]",:conf)
+    rescue JSON::ParserError => e
+        debug e.message
+        csay("[ERROR]",:conf)        
+        csay("Unable to load application data from server\n.",:error)
+        exit -400
+    end
+
+    if candidates.size == 0
+        csay("No application found with specified name or guid.\n",:error)
+        usage
+        exit -200
+    end
+
+    if candidates.size > 1
+        csay("Ambiguous application. Please consider specifing environment id and/or application guid.\n",:error)
+        usage
+        exit -201
+    end
+    
+    environment = candidates[0]["environment"]
+    app = candidates[0]["application"]
+    csay("Stopping application... ")    
+    uri = URI.parse("https://#{environment['dns']}:4242/applications/#{app['guid']}/state")
+    response = Openshift::Rest.put(@http, uri, {"state" => "stopped"}, nil, {'user' => environment['username'], 'password' => environment['password']})
+    case response
+    when Net::HTTPSuccess
+        csay("[OK]",:conf)
+    else
+        debug "HTTP code: #{response.code}"
+        debug response.body
+        csay("[ERROR]",:error)
+        csay("Unable to stop application",:error)
+    end
+    
+    csay("Loading application state...")    
+    cmd = "os-inspect-application --sso \"#{cookie}\" #{environment_info} #{app_name}"
+    exec(cmd)
+else
+    csay("This feature is currently not implemented for Openshift Express applications.\n",:red)    
+end

data/bin/os-stop-environment

@@ -0,0 +1,144 @@
+#!/usr/bin/env ruby
+# Copyright 2010 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 'openshift'
+
+def usage
+puts <<USAGE
+== Synopsis
+
+os-stop-environemnt: Stops an OpenShift Flex environment
+
+== Usage
+
+os stop-environment [options] [NAME]
+
+-u|--username
+    Redhat Login (RHN or OpenShift login with OpenShift Express access)
+
+-p|--password
+    Redhat Password
+
+-t|--target flex|express
+    The cloud platform the environment is running on.
+    
+-h|--help
+    Prints this message
+
+NAME: The name or GUID of the environment to stop.
+USAGE
+end
+
+opts = GetoptLong.new(
+    ["--username",         "-u", GetoptLong::REQUIRED_ARGUMENT],
+    ["--password",         "-p", GetoptLong::REQUIRED_ARGUMENT],
+    ["--sso",                    GetoptLong::REQUIRED_ARGUMENT],
+    ["--debug",                  GetoptLong::NO_ARGUMENT],        
+    ["--help",                   GetoptLong::NO_ARGUMENT],        
+    ["--porcelin",               GetoptLong::NO_ARGUMENT]
+)
+
+args = {}
+begin
+    opts.each{ |k,v| args[k]=v }
+rescue GetoptLong::Error => e
+    usage
+    exit -100
+end
+
+@debug = true if args['--debug']
+args['--target'] = conf('default_target') || 'flex' if args['--target'].nil? or args['--target']==""
+debug "Target platform #{args['--target']}"
+
+if args['--help']
+    usage
+    exit
+end
+
+if args['--target'] == 'flex'
+    flex_server = conf('flex_server')
+    cookie = args['--sso']
+    if !cookie
+        username = args['--username'] || conf("username") || Openshift::IO.prompt("Redhat username",[],Openshift::Validation.method(:check_login))
+        password = args['--password'] || Openshift::IO.prompt("Redhat password",nil,nil,true,false)
+        csay("Logging into Openshift Flex as #{username}\n",:message)
+        cookie=Openshift.login(@http,username,password)
+    end
+    
+    environment_id = ARGV.shift
+    debug "Deleting application name: #{environment_id}"
+    if not environment_id
+        csay("No environment specified.",:error)
+        exit
+    end
+
+    csay("Fetching environment list... ")
+    environments=nil
+    begin
+        environments=`os-list-environments --sso "#{cookie}" --porcelin`
+        environments = JSON.parse(environments)
+        csay("[OK]",:conf)        
+    rescue Exception => e
+        debug environments
+        debug e
+        csay("[ERROR]",:error)
+        csay("Error retrieving environment list.")
+        exit -400
+    end
+    candidates = environments.find_all{ |c| c["name"]==environment_id or c["id"]==environment_id }
+    
+    if candidates.size == 0
+        csay("Unable to find environment identified by #{environment_id}",:error)
+        exit -200
+    end
+    
+    if candidates.size > 1
+        csay("Multiple environments are named #{environment_id}. Please provide the environment Id",:error)
+        exit -201
+    end
+
+    env = candidates[0]
+    stop_env_url = env['links']['stop']
+    stop_env_url['method'] = 'POST'     #override due to bug in Flex REST API
+            
+    csay("Stopping environment ")
+    csay("#{candidates[0]["name"]} ",:emphasis)
+    csay("... ")
+    uri = URI.parse("#{flex_server}/rest/#{stop_env_url['href']}")
+    response = Openshift::Rest.doHttp(@http, stop_env_url['method'], uri, {"state" => "stopped"}, cookie, nil)
+    case response
+    when Net::HTTPSuccess
+        csay("[OK]",:conf)
+    else
+        debug "HTTP code: #{response.code}"
+        debug response.body
+        csay("[ERROR]",:error)
+        csay("Unable to stop environment.",:error)
+        exit -301
+    end
+    
+    csay("Loading environment states...")
+    system( "os-list-environments --sso \"#{cookie}\"" )
+else
+    csay("This feature is currently not implemented for Openshift Express applications.\n",:red)    
+end