cosfiletransfer_directory.erl

OTP是开放电信平台的简称

            [tk_ulong],
            [{tk_sequence,
                 {tk_struct,
                     "IDL:omg.org/CosFileTransfer/FileWrapper:1.0",
                     "FileWrapper",
                     [{"the_file",
                       {tk_objref,
                           "IDL:omg.org/CosFileTransfer/File:1.0",
                           "File"}},
                      {"file_type",
                       {tk_enum,
                           "IDL:omg.org/CosFileTransfer/FileType:1.0",
                           "FileType",
                           ["nfile","ndirectory"]}}]},
                 0},
             {tk_objref,
                 "IDL:omg.org/CosFileTransfer/FileIterator:1.0",
                 "FileIterator"}]};
oe_tc('_get_name') -> 'CosFileTransfer_File':oe_tc('_get_name');
oe_tc('_get_complete_file_name') -> 'CosFileTransfer_File':oe_tc('_get_complete_file_name');
oe_tc('_get_parent') -> 'CosFileTransfer_File':oe_tc('_get_parent');
oe_tc('_get_associated_session') -> 'CosFileTransfer_File':oe_tc('_get_associated_session');
oe_tc(get_allowed_property_types) -> 'CosPropertyService_PropertySetDef':oe_tc(get_allowed_property_types);
oe_tc(get_allowed_properties) -> 'CosPropertyService_PropertySetDef':oe_tc(get_allowed_properties);
oe_tc(define_property_with_mode) -> 'CosPropertyService_PropertySetDef':oe_tc(define_property_with_mode);
oe_tc(define_properties_with_modes) -> 'CosPropertyService_PropertySetDef':oe_tc(define_properties_with_modes);
oe_tc(get_property_mode) -> 'CosPropertyService_PropertySetDef':oe_tc(get_property_mode);
oe_tc(get_property_modes) -> 'CosPropertyService_PropertySetDef':oe_tc(get_property_modes);
oe_tc(set_property_mode) -> 'CosPropertyService_PropertySetDef':oe_tc(set_property_mode);
oe_tc(set_property_modes) -> 'CosPropertyService_PropertySetDef':oe_tc(set_property_modes);
oe_tc(define_property) -> 'CosPropertyService_PropertySet':oe_tc(define_property);
oe_tc(define_properties) -> 'CosPropertyService_PropertySet':oe_tc(define_properties);
oe_tc(get_number_of_properties) -> 'CosPropertyService_PropertySet':oe_tc(get_number_of_properties);
oe_tc(get_all_property_names) -> 'CosPropertyService_PropertySet':oe_tc(get_all_property_names);
oe_tc(get_property_value) -> 'CosPropertyService_PropertySet':oe_tc(get_property_value);
oe_tc(get_properties) -> 'CosPropertyService_PropertySet':oe_tc(get_properties);
oe_tc(get_all_properties) -> 'CosPropertyService_PropertySet':oe_tc(get_all_properties);
oe_tc(delete_property) -> 'CosPropertyService_PropertySet':oe_tc(delete_property);
oe_tc(delete_properties) -> 'CosPropertyService_PropertySet':oe_tc(delete_properties);
oe_tc(delete_all_properties) -> 'CosPropertyService_PropertySet':oe_tc(delete_all_properties);
oe_tc(is_property_defined) -> 'CosPropertyService_PropertySet':oe_tc(is_property_defined);
oe_tc(_) -> undefined.

oe_get_interface() -> 
	[{"is_property_defined", 'CosPropertyService_PropertySet':oe_tc(is_property_defined)},
	{"delete_all_properties", 'CosPropertyService_PropertySet':oe_tc(delete_all_properties)},
	{"delete_properties", 'CosPropertyService_PropertySet':oe_tc(delete_properties)},
	{"delete_property", 'CosPropertyService_PropertySet':oe_tc(delete_property)},
	{"get_all_properties", 'CosPropertyService_PropertySet':oe_tc(get_all_properties)},
	{"get_properties", 'CosPropertyService_PropertySet':oe_tc(get_properties)},
	{"get_property_value", 'CosPropertyService_PropertySet':oe_tc(get_property_value)},
	{"get_all_property_names", 'CosPropertyService_PropertySet':oe_tc(get_all_property_names)},
	{"get_number_of_properties", 'CosPropertyService_PropertySet':oe_tc(get_number_of_properties)},
	{"define_properties", 'CosPropertyService_PropertySet':oe_tc(define_properties)},
	{"define_property", 'CosPropertyService_PropertySet':oe_tc(define_property)},
	{"set_property_modes", 'CosPropertyService_PropertySetDef':oe_tc(set_property_modes)},
	{"set_property_mode", 'CosPropertyService_PropertySetDef':oe_tc(set_property_mode)},
	{"get_property_modes", 'CosPropertyService_PropertySetDef':oe_tc(get_property_modes)},
	{"get_property_mode", 'CosPropertyService_PropertySetDef':oe_tc(get_property_mode)},
	{"define_properties_with_modes", 'CosPropertyService_PropertySetDef':oe_tc(define_properties_with_modes)},
	{"define_property_with_mode", 'CosPropertyService_PropertySetDef':oe_tc(define_property_with_mode)},
	{"get_allowed_properties", 'CosPropertyService_PropertySetDef':oe_tc(get_allowed_properties)},
	{"get_allowed_property_types", 'CosPropertyService_PropertySetDef':oe_tc(get_allowed_property_types)},
	{"_get_associated_session", 'CosFileTransfer_File':oe_tc('_get_associated_session')},
	{"_get_parent", 'CosFileTransfer_File':oe_tc('_get_parent')},
	{"_get_complete_file_name", 'CosFileTransfer_File':oe_tc('_get_complete_file_name')},
	{"_get_name", 'CosFileTransfer_File':oe_tc('_get_name')},
	{"list", oe_tc(list)}].




%%------------------------------------------------------------
%%
%% Object server implementation.
%%
%%------------------------------------------------------------


%%------------------------------------------------------------
%%
%% Function for fetching the interface type ID.
%%
%%------------------------------------------------------------

typeID() ->
    "IDL:omg.org/CosFileTransfer/Directory:1.0".


%%------------------------------------------------------------
%%
%% Object creation functions.
%%
%%------------------------------------------------------------

oe_create() ->
    corba:create(?MODULE, "IDL:omg.org/CosFileTransfer/Directory:1.0").

oe_create_link() ->
    corba:create_link(?MODULE, "IDL:omg.org/CosFileTransfer/Directory:1.0").

oe_create(Env) ->
    corba:create(?MODULE, "IDL:omg.org/CosFileTransfer/Directory:1.0", Env).

oe_create_link(Env) ->
    corba:create_link(?MODULE, "IDL:omg.org/CosFileTransfer/Directory:1.0", Env).

oe_create(Env, RegName) ->
    corba:create(?MODULE, "IDL:omg.org/CosFileTransfer/Directory:1.0", Env, RegName).

oe_create_link(Env, RegName) ->
    corba:create_link(?MODULE, "IDL:omg.org/CosFileTransfer/Directory:1.0", Env, RegName).

%%------------------------------------------------------------
%%
%% Init & terminate functions.
%%
%%------------------------------------------------------------

init(Env) ->
%% Call to implementation init
    corba:handle_init('CosFileTransfer_Directory_impl', Env).

terminate(Reason, State) ->
    corba:handle_terminate('CosFileTransfer_Directory_impl', Reason, State).


%%%% Operation: list
%% 
%%   Returns: RetVal, Fl, Fi
%%
handle_call({OE_THIS, OE_Context, list, [How_many]}, _, OE_State) ->
  corba:handle_call('CosFileTransfer_Directory_impl', list, [How_many], OE_State, OE_Context, OE_THIS, false);

%%%% Operation: '_get_name'
%% 
%%   Returns: RetVal
%%
handle_call({OE_THIS, OE_Context, '_get_name', []}, _, OE_State) ->
  corba:handle_call('CosFileTransfer_Directory_impl', '_get_name', [], OE_State, OE_Context, OE_THIS, false);

%%%% Operation: '_get_complete_file_name'
%% 
%%   Returns: RetVal
%%
handle_call({OE_THIS, OE_Context, '_get_complete_file_name', []}, _, OE_State) ->
  corba:handle_call('CosFileTransfer_Directory_impl', '_get_complete_file_name', [], OE_State, OE_Context, OE_THIS, false);

%%%% Operation: '_get_parent'
%% 
%%   Returns: RetVal
%%
handle_call({OE_THIS, OE_Context, '_get_parent', []}, _, OE_State) ->
  corba:handle_call('CosFileTransfer_Directory_impl', '_get_parent', [], OE_State, OE_Context, OE_THIS, false);

%%%% Operation: '_get_associated_session'
%% 
%%   Returns: RetVal
%%
handle_call({OE_THIS, OE_Context, '_get_associated_session', []}, _, OE_State) ->
  corba:handle_call('CosFileTransfer_Directory_impl', '_get_associated_session', [], OE_State, OE_Context, OE_THIS, false);

%%%% Operation: get_allowed_property_types
%% 
%%   Returns: RetVal, Property_types
%%
handle_call({OE_THIS, OE_Context, get_allowed_property_types, []}, _, OE_State) ->
  corba:handle_call('CosFileTransfer_Directory_impl', get_allowed_property_types, [], OE_State, OE_Context, OE_THIS, false);

%%%% Operation: get_allowed_properties
%% 
%%   Returns: RetVal, Property_defs
%%
handle_call({OE_THIS, OE_Context, get_allowed_properties, []}, _, OE_State) ->
  corba:handle_call('CosFileTransfer_Directory_impl', get_allowed_properties, [], OE_State, OE_Context, OE_THIS, false);

%%%% Operation: define_property_with_mode
%% 
%%   Returns: RetVal
%%   Raises:  CosPropertyService::InvalidPropertyName, CosPropertyService::ConflictingProperty, CosPropertyService::UnsupportedTypeCode, CosPropertyService::UnsupportedProperty, CosPropertyService::UnsupportedMode, CosPropertyService::ReadOnlyProperty
%%
handle_call({OE_THIS, OE_Context, define_property_with_mode, [Property_name, Property_value, Property_mode]}, _, OE_State) ->
  corba:handle_call('CosFileTransfer_Directory_impl', define_property_with_mode, [Property_name, Property_value, Property_mode], OE_State, OE_Context, OE_THIS, false);

%%%% Operation: define_properties_with_modes
%% 
%%   Returns: RetVal
%%   Raises:  CosPropertyService::MultipleExceptions
%%
handle_call({OE_THIS, OE_Context, define_properties_with_modes, [Property_defs]}, _, OE_State) ->
  corba:handle_call('CosFileTransfer_Directory_impl', define_properties_with_modes, [Property_defs], OE_State, OE_Context, OE_THIS, false);

%%%% Operation: get_property_mode
%% 
%%   Returns: RetVal
%%   Raises:  CosPropertyService::PropertyNotFound, CosPropertyService::InvalidPropertyName
%%
handle_call({OE_THIS, OE_Context, get_property_mode, [Property_name]}, _, OE_State) ->
  corba:handle_call('CosFileTransfer_Directory_impl', get_property_mode, [Property_name], OE_State, OE_Context, OE_THIS, false);

%%%% Operation: get_property_modes
%% 
%%   Returns: RetVal, Property_modes
%%
handle_call({OE_THIS, OE_Context, get_property_modes, [Property_names]}, _, OE_State) ->
  corba:handle_call('CosFileTransfer_Directory_impl', get_property_modes, [Property_names], OE_State, OE_Context, OE_THIS, false);

%%%% Operation: set_property_mode
%% 
%%   Returns: RetVal
%%   Raises:  CosPropertyService::InvalidPropertyName, CosPropertyService::PropertyNotFound, CosPropertyService::UnsupportedMode
%%
handle_call({OE_THIS, OE_Context, set_property_mode, [Property_name, Property_mode]}, _, OE_State) ->
  corba:handle_call('CosFileTransfer_Directory_impl', set_property_mode, [Property_name, Property_mode], OE_State, OE_Context, OE_THIS, false);

%%%% Operation: set_property_modes
%% 
%%   Returns: RetVal
%%   Raises:  CosPropertyService::MultipleExceptions
%%
handle_call({OE_THIS, OE_Context, set_property_modes, [Property_modes]}, _, OE_State) ->
  corba:handle_call('CosFileTransfer_Directory_impl', set_property_modes, [Property_modes], OE_State, OE_Context, OE_THIS, false);

%%%% Operation: define_property
%% 
%%   Returns: RetVal
%%   Raises:  CosPropertyService::InvalidPropertyName, CosPropertyService::ConflictingProperty, CosPropertyService::UnsupportedTypeCode, CosPropertyService::UnsupportedProperty, CosPropertyService::ReadOnlyProperty
%%
handle_call({OE_THIS, OE_Context, define_property, [Property_name, Property_value]}, _, OE_State) ->
  corba:handle_call('CosFileTransfer_Directory_impl', define_property, [Property_name, Property_value], OE_State, OE_Context, OE_THIS, false);

%%%% Operation: define_properties
%% 
%%   Returns: RetVal
%%   Raises:  CosPropertyService::MultipleExceptions
%%
handle_call({OE_THIS, OE_Context, define_properties, [Nproperties]}, _, OE_State) ->
  corba:handle_call('CosFileTransfer_Directory_impl', define_properties, [Nproperties], OE_State, OE_Context, OE_THIS, false);

%%%% Operation: get_number_of_properties
%% 
%%   Returns: RetVal
%%
handle_call({OE_THIS, OE_Context, get_number_of_properties, []}, _, OE_State) ->
  corba:handle_call('CosFileTransfer_Directory_impl', get_number_of_properties, [], OE_State, OE_Context, OE_THIS, false);

%%%% Operation: get_all_property_names
%% 
%%   Returns: RetVal, Property_names, Rest
%%
handle_call({OE_THIS, OE_Context, get_all_property_names, [How_many]}, _, OE_State) ->
  corba:handle_call('CosFileTransfer_Directory_impl', get_all_property_names, [How_many], OE_State, OE_Context, OE_THIS, false);

%%%% Operation: get_property_value
%% 
%%   Returns: RetVal
%%   Raises:  CosPropertyService::PropertyNotFound, CosPropertyService::InvalidPropertyName
%%
handle_call({OE_THIS, OE_Context, get_property_value, [Property_name]}, _, OE_State) ->
  corba:handle_call('CosFileTransfer_Directory_impl', get_property_value, [Property_name], OE_State, OE_Context, OE_THIS, false);

%%%% Operation: get_properties
%% 
%%   Returns: RetVal, Nproperties
%%
handle_call({OE_THIS, OE_Context, get_properties, [Property_names]}, _, OE_State) ->
  corba:handle_call('CosFileTransfer_Directory_impl', get_properties, [Property_names], OE_State, OE_Context, OE_THIS, false);

%%%% Operation: get_all_properties
%% 
%%   Returns: RetVal, Nproperties, Rest
%%
handle_call({OE_THIS, OE_Context, get_all_properties, [How_many]}, _, OE_State) ->
  corba:handle_call('CosFileTransfer_Directory_impl', get_all_properties, [How_many], OE_State, OE_Context, OE_THIS, false);

%%%% Operation: delete_property
%% 
%%   Returns: RetVal
%%   Raises:  CosPropertyService::PropertyNotFound, CosPropertyService::InvalidPropertyName, CosPropertyService::FixedProperty
%%
handle_call({OE_THIS, OE_Context, delete_property, [Property_name]}, _, OE_State) ->
  corba:handle_call('CosFileTransfer_Directory_impl', delete_property, [Property_name], OE_State, OE_Context, OE_THIS, false);

%%%% Operation: delete_properties
%% 
%%   Returns: RetVal
%%   Raises:  CosPropertyService::MultipleExceptions
%%
handle_call({OE_THIS, OE_Context, delete_properties, [Property_names]}, _, OE_State) ->
  corba:handle_call('CosFileTransfer_Directory_impl', delete_properties, [Property_names], OE_State, OE_Context, OE_THIS, false);

%%%% Operation: delete_all_properties
%% 
%%   Returns: RetVal
%%
handle_call({OE_THIS, OE_Context, delete_all_properties, []}, _, OE_State) ->
  corba:handle_call('CosFileTransfer_Directory_impl', delete_all_properties, [], OE_State, OE_Context, OE_THIS, false);

%%%% Operation: is_property_defined
%% 
%%   Returns: RetVal
%%   Raises:  CosPropertyService::InvalidPropertyName
%%
handle_call({OE_THIS, OE_Context, is_property_defined, [Property_name]}, _, OE_State) ->
  corba:handle_call('CosFileTransfer_Directory_impl', is_property_defined, [Property_name], OE_State, OE_Context, OE_THIS, false);



%%%% Standard gen_server call handle
%%
handle_call(stop, _, State) ->
    {stop, normal, ok, State};

handle_call(_, _, State) ->
    {reply, catch corba:raise(#'BAD_OPERATION'{minor=1163001857, completion_status='COMPLETED_NO'}), State}.


%%%% Standard gen_server cast handle
%%
handle_cast(stop, State) ->
    {stop, normal, State};

handle_cast(_, State) ->
    {noreply, State}.


%%%% Standard gen_server handles
%%
handle_info(Info, State) ->
    corba:handle_info('CosFileTransfer_Directory_impl', Info, State).


code_change(OldVsn, State, Extra) ->
    corba:handle_code_change('CosFileTransfer_Directory_impl', OldVsn, State, Extra).