diff --git a/src/oca/ec2/econe-describe-images b/src/oca/ec2/econe-describe-images new file mode 100755 index 0000000000..5b43f52314 --- /dev/null +++ b/src/oca/ec2/econe-describe-images @@ -0,0 +1,130 @@ +#!/usr/bin/env ruby + +# == Synopsis +# econe-describe-images +# +# List and describe previously uploaded images of a user for use +# with an OpenNebula Cloud. +# +# == Usage +# +# econe-describe-images [OPTIONS] +# +# -h, --help: +# show help +# +# --access-key , -K : +# The username of the user +# +# --secret-key , -K : +# The password of the user +# +# --url , -U : +# Set url as the web service url to use +# +# --headers, -H: +# Display column headers + +# -------------------------------------------------------------------------- # +# Copyright 2002-2009, Distributed Systems Architecture Group, Universidad # +# Complutense de Madrid (dsa-research.org) # +# # +# Licensed under the Apache License, Version 2.0 (the "License"); you may # +# not use this file except in compliance with the License. You may obtain # +# a copy of the License at # +# # +# http://www.apache.org/licenses/LICENSE-2.0 # +# # +# Unless required by applicable law or agreed to in writing, software # +# distributed under the License is distributed on an "AS IS" BASIS, # +# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. # +# See the License for the specific language governing permissions and # +# limitations under the License. # +#--------------------------------------------------------------------------- # + +ONE_LOCATION=ENV["ONE_LOCATION"] + +if !ONE_LOCATION + RUBY_LIB_LOCATION="/usr/lib/one/ruby" +else + RUBY_LIB_LOCATION=ONE_LOCATION+"/lib/ruby" +end + + +$: << RUBY_LIB_LOCATION + +require 'EC2QueryClient' +require 'getoptlong' +require 'rdoc/usage' +require 'pp' + + +opts = GetoptLong.new( + ['--help', '-h',GetoptLong::NO_ARGUMENT], + ['--access-key', '-K',GetoptLong::REQUIRED_ARGUMENT], + ['--secret-key', '-S',GetoptLong::REQUIRED_ARGUMENT], + ['--url', '-U',GetoptLong::REQUIRED_ARGUMENT], + ['--headers', '-H',GetoptLong::NO_ARGUMENT] + ) + +headers = false +url = nil +access = nil +secret = nil +auth = nil + +begin + opts.each do |opt, arg| + case opt + when '--help' + RDoc::usage + when '--access-key' + access = arg + when '--secret-key' + secret = arg + when '--url' + url = arg + when '--headers' + headers = true + end + end +rescue Exception => e + exit -1 +end + +auth = "#{access}:#{secret}" if secret && access + +begin + ec2_client = EC2QueryClient::Client.new(auth,url) +rescue Exception => e + puts "#{$0}: #{e.message}" + exit -1 +end + +rc = ec2_client.describe_images() + +if OpenNebula::is_error?(rc) + puts "#{$0}: #{rc.message}" + exit -1 +end + +images = rc['imagesSet']['item'] + +fmt = "%-4s %-36s %s" + +if headers + puts fmt % ["Owner", "ImageId", "Location"] + puts "------------------------------------------------------------------------------" +end + +images.each { |img| + puts fmt % [img['imageOwnerId'],img['imageId'],img['imageLocation']] + } + +exit 0 + + + + + +