# coding: utf-8
#
# Author:: Dangleterre Michaël
# © Copyright ArubaCloud.
#
# LICENSE: MIT (http://opensource.org/licenses/MIT)
#

require 'fog/arubacloud/service'
require 'fog/arubacloud/error'


module Fog
  module ArubaCloud
    class Compute
      class Real
        def create_scheduled_operation(data)
          body = {
              :NewSchedulePlan => {
                  :FirstExecutionTime => data[:dateStart],
                  :LastExecutionTime => data[:endDate],
                  :OperationType => data[:OperationType],
                  :ServerID => data[:ServerId],
                  :ScheduledPlanStatus => 'Enabled'
              }
          }
          self.request(
              body=body,
              method_name='SetAddServerScheduledOperation',
              failure_message='Error configuring Scheduled Operation.',
              benchmark=true
          )
        end # create_scheduled_operation
      end # Real

      class Mock
        def create_scheduled_operation(data)
          unless data['ServerId']
            raise ArgumentError
          end
          self.servers.select!{|s| s.id.eql?(data['ServerId'])}
          response = Excon::Response.new
          response.status = 200
          response.body = {
              'ExceptionInfo' => nil,
              'ResultCode' => 0,
              'ResultMessage' => nil,
              'Success' => true
          }
          response.body
        end # create_scheduled_operation
      end # Mock

    end # Compute
  end # ArubaCloud
end # Fog