#!/usr/bin/ruby

# -------------------------------------------------------------------------- #
# Copyright 2002-2025, OpenNebula Project, OpenNebula Systems                #
#                                                                            #
# 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'
    GEMS_LOCATION     = '/usr/share/one/gems'
else
    RUBY_LIB_LOCATION = ONE_LOCATION + '/lib/ruby'
    GEMS_LOCATION     = ONE_LOCATION + '/share/gems'
end

# %%RUBYGEMS_SETUP_BEGIN%%
require 'load_opennebula_paths'
# %%RUBYGEMS_SETUP_END%%

$LOAD_PATH << RUBY_LIB_LOCATION
$LOAD_PATH << RUBY_LIB_LOCATION + '/cli'

require 'command_parser'
require 'one_helper/oneacl_helper'

CommandParser::CmdParser.new(ARGV) do
    usage '`oneacl` <command> [<args>] [<options>]'
    version OpenNebulaHelper::ONE_VERSION

    helper = OneAclHelper.new

    before_proc do
        helper.set_client(options)
    end

    ########################################################################
    # Global Options
    ########################################################################
    set :option, CommandParser::OPTIONS + OpenNebulaHelper::CLIENT_OPTIONS

    ########################################################################
    # Formatters for arguments
    ########################################################################
    set :format, :aclid_list, OneAclHelper.list_to_id_desc do |arg|
        helper.list_to_id(arg)
    end

    ########################################################################
    # Commands
    ########################################################################

    addrule_desc = <<-EOT.unindent
        Adds a new ACL rule
    EOT

    command :create, addrule_desc, [:user, :rulestr], [:resource, nil],
            [:rights, nil] do
        case args.length
        when 1
            new_args = Acl.parse_rule(args[0])

            if OpenNebula.is_error?(new_args)
                next -1, new_args.message
            end
        when 3, 4
            new_args = args
        else
            next -1, 'Wrong number of arguments, must be 1 or 4'
        end

        helper.create_resource(options) do |rule|
            rule.allocate(*new_args)
        end
    end

    delrule_desc = <<-EOT.unindent
        Deletes an existing ACL rule
    EOT

    command :delete, delrule_desc, [:range] do
        helper.perform_actions(args[0], options, 'deleted') do |obj|
            obj.delete
        end
    end

    list_desc = <<-EOT.unindent
        Lists the ACL rule set. #{OneAclHelper.list_layout_help}
    EOT

    command :list, list_desc, :options => [CLIHelper::OPTIONS,
                                           OpenNebulaHelper::FORMAT,
                                           OpenNebulaHelper::DESCRIBE] do
        helper.list_pool(options)
    end
end
