class IDL::AST::Operation

def concrete_raises(_context)
  @raises.collect do |ex|
    ex.instantiate(_context)
  end
end

def copy_from(_template, _context)
  super
  self.walk_members do |param|
    case param.attribute
    when Parameter::IN
      @in << param
    when Parameter::OUT
      @out << param
    when Parameter::INOUT
      @in << param
      @out << param
    end
  end
  self
end

def define(*args)
  param = super(*args)
  case param.attribute
  when Parameter::IN
    @in << param
  when Parameter::OUT
    @out << param
  when Parameter::INOUT
    @in << param
    @out << param
  end
  param
end

def in_params
  @in
end

def initialize(_name, _enclosure, params)
  super(_name, _enclosure)
  @idltype  = params[:type]
  @oneway = (params[:oneway] == true)
  @in = []
  @out = []
  @raises = []
  @context = nil
  unless @idltype.is_a?(IDL::Type::ScopedName) && @idltype.is_node?(IDL::AST::TemplateParam)
    raise RuntimeError, "Anonymous type definitions are not allowed!" if params[:type].is_anonymous?
    if @idltype.is_local?
      if _enclosure.is_a?(IDL::AST::Interface) && !_enclosure.is_local?
        raise RuntimeError, "Local type #{@idltype.typename} not allowed for operation on unrestricted interface"
      end
      ## IDL_Valuetype: no problem as valuetype operations are local
    end
    if !@idltype.is_complete?
      if _enclosure.is_a?(IDL::AST::Interface)
        raise RuntimeError, "Incomplete type #{@idltype.typename} not allowed here!"
      end
      ## IDL_Valuetype: no problem as valuetype operations are local
    end
  end
end

def instantiate(_context, _enclosure)
  _params = {
    :type => @idltype.instantiate(_context),
    :oneway => @oneway,
  }
  _op = super(_context, _enclosure, _params)
  _op.raises = self.concrete_raises(_context)
  _op.context = @context
  _op
end

def marshal_dump
  super() << @idltype << @oneway << @in << @out << @raises << @context
end

def marshal_load(vars)
  @context = vars.pop
  @raises = vars.pop
  @out = vars.pop
  @in = vars.pop
  @oneway = vars.pop
  @idltype = vars.pop
  super(vars)
end

def out_params
  @out
end

def params
  self.children
end

def raises=(exlist)
  exlist.each do |extype|
    unless extype.is_a?(IDL::Type::ScopedName) &&
            (extype.is_node?(IDL::AST::Exception) || extype.is_node?(IDL::AST::TemplateParam) || extype.resolved_type.is_a?(IDL::Type::Native))
      raise RuntimeError, 'Only IDL Exception or Native types allowed in raises declaration.'
    end
    @raises << extype
  end
end