mnesia_corba_session.erl

来自「OTP是开放电信平台的简称」· ERL 代码 · 共 1,226 行 · 第 1/3 页

    corba:call(OE_THIS, deactivate_checkpoint, [CpName], ?MODULE, OE_Options).

%%%% Operation: backup_checkpoint1
%% 
%%   Returns: RetVal, Reason
%%
backup_checkpoint1(OE_THIS, CpName, Filename) ->
    corba:call(OE_THIS, backup_checkpoint1, [CpName, Filename], ?MODULE).

backup_checkpoint1(OE_THIS, OE_Options, CpName, Filename) ->
    corba:call(OE_THIS, backup_checkpoint1, [CpName, Filename], ?MODULE, OE_Options).

%%%% Operation: backup_checkpoint2
%% 
%%   Returns: RetVal, Reason
%%
backup_checkpoint2(OE_THIS, CpName, Opaque, Modulename) ->
    corba:call(OE_THIS, backup_checkpoint2, [CpName, Opaque, Modulename], ?MODULE).

backup_checkpoint2(OE_THIS, OE_Options, CpName, Opaque, Modulename) ->
    corba:call(OE_THIS, backup_checkpoint2, [CpName, Opaque, Modulename], ?MODULE, OE_Options).

%%%% Operation: load_textfile
%% 
%%   Returns: RetVal, Reason
%%
load_textfile(OE_THIS, Filename) ->
    corba:call(OE_THIS, load_textfile, [Filename], ?MODULE).

load_textfile(OE_THIS, OE_Options, Filename) ->
    corba:call(OE_THIS, load_textfile, [Filename], ?MODULE, OE_Options).

%%%% Operation: dump_to_textfile
%% 
%%   Returns: RetVal, Reason
%%
dump_to_textfile(OE_THIS, Filename) ->
    corba:call(OE_THIS, dump_to_textfile, [Filename], ?MODULE).

dump_to_textfile(OE_THIS, OE_Options, Filename) ->
    corba:call(OE_THIS, dump_to_textfile, [Filename], ?MODULE, OE_Options).

%%%% Operation: table_info
%% 
%%   Returns: RetVal, Info, Reason
%%
table_info(OE_THIS, Tab) ->
    corba:call(OE_THIS, table_info, [Tab], ?MODULE).

table_info(OE_THIS, OE_Options, Tab) ->
    corba:call(OE_THIS, table_info, [Tab], ?MODULE, OE_Options).

%%%% Operation: system_info
%% 
%%   Returns: RetVal, Info, Reason
%%
system_info(OE_THIS) ->
    corba:call(OE_THIS, system_info, [], ?MODULE).

system_info(OE_THIS, OE_Options) ->
    corba:call(OE_THIS, system_info, [], ?MODULE, OE_Options).

%%------------------------------------------------------------
%%
%% Inherited Interfaces
%%
%%------------------------------------------------------------
oe_is_a("IDL:mnesia/corba_session:1.0") -> true;
oe_is_a(_) -> false.

%%------------------------------------------------------------
%%
%% Interface TypeCode
%%
%%------------------------------------------------------------
oe_tc(dirty_write) -> 
	{{tk_enum,"IDL:mnesia/Status:1.0",
                  "Status",
                  ["ok","end_of_table","timeout","error"]},
         [{tk_string,0},tk_any],
         [{tk_string,0}]};
oe_tc(dirty_read) -> 
	{{tk_enum,"IDL:mnesia/Status:1.0",
                  "Status",
                  ["ok","end_of_table","timeout","error"]},
         [{tk_string,0},tk_any],
         [{tk_sequence,tk_any,0},{tk_string,0}]};
oe_tc(dirty_update_counter) -> 
	{{tk_enum,"IDL:mnesia/Status:1.0",
                  "Status",
                  ["ok","end_of_table","timeout","error"]},
         [{tk_string,0},tk_any,tk_long],
         [tk_long,{tk_string,0}]};
oe_tc(dirty_delete) -> 
	{{tk_enum,"IDL:mnesia/Status:1.0",
                  "Status",
                  ["ok","end_of_table","timeout","error"]},
         [{tk_string,0},tk_any],
         [{tk_string,0}]};
oe_tc(dirty_delete_object) -> 
	{{tk_enum,"IDL:mnesia/Status:1.0",
                  "Status",
                  ["ok","end_of_table","timeout","error"]},
         [{tk_string,0},tk_any],
         [{tk_string,0}]};
oe_tc(dirty_slot) -> 
	{{tk_enum,"IDL:mnesia/Status:1.0",
                  "Status",
                  ["ok","end_of_table","timeout","error"]},
         [{tk_string,0},tk_long],
         [{tk_sequence,tk_any,0},{tk_string,0}]};
oe_tc(dirty_first) -> 
	{{tk_enum,"IDL:mnesia/Status:1.0",
                  "Status",
                  ["ok","end_of_table","timeout","error"]},
         [{tk_string,0}],
         [tk_any,{tk_string,0}]};
oe_tc(dirty_next) -> 
	{{tk_enum,"IDL:mnesia/Status:1.0",
                  "Status",
                  ["ok","end_of_table","timeout","error"]},
         [{tk_string,0},tk_any],
         [tk_any,{tk_string,0}]};
oe_tc(dirty_all_keys) -> 
	{{tk_enum,"IDL:mnesia/Status:1.0",
                  "Status",
                  ["ok","end_of_table","timeout","error"]},
         [{tk_string,0}],
         [{tk_sequence,tk_any,0},{tk_string,0}]};
oe_tc(dirty_match_all) -> 
	{{tk_enum,"IDL:mnesia/Status:1.0",
                  "Status",
                  ["ok","end_of_table","timeout","error"]},
         [{tk_string,0}],
         [{tk_sequence,tk_any,0},{tk_string,0}]};
oe_tc(dirty_index_read) -> 
	{{tk_enum,"IDL:mnesia/Status:1.0",
                  "Status",
                  ["ok","end_of_table","timeout","error"]},
         [{tk_string,0},tk_any,tk_long],
         [{tk_sequence,tk_any,0},{tk_string,0}]};
oe_tc(create_table) -> 
	{{tk_enum,"IDL:mnesia/Status:1.0",
                  "Status",
                  ["ok","end_of_table","timeout","error"]},
         [{tk_string,0},
          {tk_struct,"IDL:mnesia/TableDef:1.0",
                     "TableDef",
                     [{"type",
                       {tk_enum,"IDL:mnesia/SetOrBag:1.0",
                                "SetOrBag",
                                ["set","bag"]}},
                      {"mode",
                       {tk_enum,"IDL:mnesia/AccessMode:1.0",
                                "AccessMode",
                                ["read_only","read_write"]}},
                      {"ram_copies",{tk_sequence,{tk_string,0},0}},
                      {"disc_copies",{tk_sequence,{tk_string,0},0}},
                      {"disc_only_copies",{tk_sequence,{tk_string,0},0}},
                      {"index_list",{tk_sequence,tk_long,0}},
                      {"attributes",{tk_sequence,{tk_string,0},0}},
                      {"record_name",{tk_string,0}}]}],
         [{tk_string,0}]};
oe_tc(delete_table) -> 
	{{tk_enum,"IDL:mnesia/Status:1.0",
                  "Status",
                  ["ok","end_of_table","timeout","error"]},
         [{tk_string,0}],
         [{tk_string,0}]};
oe_tc(add_table_copy) -> 
	{{tk_enum,"IDL:mnesia/Status:1.0",
                  "Status",
                  ["ok","end_of_table","timeout","error"]},
         [{tk_string,0},
          {tk_string,0},
          {tk_enum,"IDL:mnesia/Storage:1.0",
                   "Storage",
                   ["ram_copies","disc_copies","disc_only_copies"]}],
         [{tk_string,0}]};
oe_tc(del_table_copy) -> 
	{{tk_enum,"IDL:mnesia/Status:1.0",
                  "Status",
                  ["ok","end_of_table","timeout","error"]},
         [{tk_string,0},{tk_string,0}],
         [{tk_string,0}]};
oe_tc(move_table_copy) -> 
	{{tk_enum,"IDL:mnesia/Status:1.0",
                  "Status",
                  ["ok","end_of_table","timeout","error"]},
         [{tk_string,0},{tk_string,0},{tk_string,0}],
         [{tk_string,0}]};
oe_tc(add_table_index) -> 
	{{tk_enum,"IDL:mnesia/Status:1.0",
                  "Status",
                  ["ok","end_of_table","timeout","error"]},
         [{tk_string,0},tk_long],
         [{tk_string,0}]};
oe_tc(del_table_index) -> 
	{{tk_enum,"IDL:mnesia/Status:1.0",
                  "Status",
                  ["ok","end_of_table","timeout","error"]},
         [{tk_string,0},tk_long],
         [{tk_string,0}]};
oe_tc(change_table_copy_type) -> 
	{{tk_enum,"IDL:mnesia/Status:1.0",
                  "Status",
                  ["ok","end_of_table","timeout","error"]},
         [{tk_string,0},
          {tk_string,0},
          {tk_enum,"IDL:mnesia/Storage:1.0",
                   "Storage",
                   ["ram_copies","disc_copies","disc_only_copies"]}],
         [{tk_string,0}]};
oe_tc(change_table_access_mode) -> 
	{{tk_enum,"IDL:mnesia/Status:1.0",
                  "Status",
                  ["ok","end_of_table","timeout","error"]},
         [{tk_string,0},
          {tk_enum,"IDL:mnesia/AccessMode:1.0",
                   "AccessMode",
                   ["read_only","read_write"]}],
         [{tk_string,0}]};
oe_tc(wait_for_tables) -> 
	{{tk_enum,"IDL:mnesia/Status:1.0",
                  "Status",
                  ["ok","end_of_table","timeout","error"]},
         [{tk_sequence,{tk_string,0},0},tk_long],
         [{tk_sequence,{tk_string,0},0},{tk_string,0}]};
oe_tc(force_load_table) -> 
	{{tk_enum,"IDL:mnesia/Status:1.0",
                  "Status",
                  ["ok","end_of_table","timeout","error"]},
         [{tk_string,0}],
         [{tk_string,0}]};
oe_tc(change_table_load_order) -> 
	{{tk_enum,"IDL:mnesia/Status:1.0",
                  "Status",
                  ["ok","end_of_table","timeout","error"]},
         [{tk_string,0},tk_long],
         [{tk_string,0}]};
oe_tc(set_master_nodes1) -> 
	{{tk_enum,"IDL:mnesia/Status:1.0",
                  "Status",
                  ["ok","end_of_table","timeout","error"]},
         [{tk_sequence,{tk_string,0},0}],
         [{tk_string,0}]};
oe_tc(set_master_nodes2) -> 
	{{tk_enum,"IDL:mnesia/Status:1.0",
                  "Status",
                  ["ok","end_of_table","timeout","error"]},
         [{tk_string,0},{tk_sequence,{tk_string,0},0}],
         [{tk_string,0}]};
oe_tc(backup1) -> 
	{{tk_enum,"IDL:mnesia/Status:1.0",
                  "Status",
                  ["ok","end_of_table","timeout","error"]},
         [{tk_string,0}],
         [{tk_string,0}]};
oe_tc(backup2) -> 
	{{tk_enum,"IDL:mnesia/Status:1.0",
                  "Status",
                  ["ok","end_of_table","timeout","error"]},
         [tk_any,{tk_string,0}],
         [{tk_string,0}]};
oe_tc(install_fallback1) -> 
	{{tk_enum,"IDL:mnesia/Status:1.0",
                  "Status",
                  ["ok","end_of_table","timeout","error"]},
         [{tk_string,0}],
         [{tk_string,0}]};
oe_tc(install_fallback2) -> 
	{{tk_enum,"IDL:mnesia/Status:1.0",
                  "Status",
                  ["ok","end_of_table","timeout","error"]},
         [tk_any,{tk_string,0}],
         [{tk_string,0}]};
oe_tc(uninstall_fallback) -> 
	{{tk_enum,"IDL:mnesia/Status:1.0",
                  "Status",
                  ["ok","end_of_table","timeout","error"]},
         [],
         [{tk_string,0}]};
oe_tc(dump_log) -> 
	{{tk_enum,"IDL:mnesia/Status:1.0",
                  "Status",
                  ["ok","end_of_table","timeout","error"]},
         [],
         [{tk_string,0}]};
oe_tc(dump_tables) -> 
	{{tk_enum,"IDL:mnesia/Status:1.0",
                  "Status",
                  ["ok","end_of_table","timeout","error"]},
         [{tk_sequence,{tk_string,0},0}],
         [{tk_string,0}]};
oe_tc(activate_checkpoint) -> 
	{{tk_enum,"IDL:mnesia/Status:1.0",
                  "Status",
                  ["ok","end_of_table","timeout","error"]},
         [{tk_struct,"IDL:mnesia/CheckpointDef:1.0",
                     "CheckpointDef",
                     [{"cpName",{tk_string,0}},
                      {"max",{tk_sequence,{tk_string,0},0}},
                      {"min",{tk_sequence,{tk_string,0},0}},
                      {"allow_remote",tk_boolean},
                      {"ram_overrides_dump",tk_boolean}]}],
         [{tk_string,0}]};
oe_tc(deactivate_checkpoint) -> 
	{{tk_enum,"IDL:mnesia/Status:1.0",
                  "Status",
                  ["ok","end_of_table","timeout","error"]},
         [{tk_string,0}],
         [{tk_string,0}]};
oe_tc(backup_checkpoint1) -> 
	{{tk_enum,"IDL:mnesia/Status:1.0",
                  "Status",
                  ["ok","end_of_table","timeout","error"]},
         [{tk_string,0},{tk_string,0}],
         [{tk_string,0}]};
oe_tc(backup_checkpoint2) -> 
	{{tk_enum,"IDL:mnesia/Status:1.0",
                  "Status",
                  ["ok","end_of_table","timeout","error"]},
         [{tk_string,0},tk_any,{tk_string,0}],
         [{tk_string,0}]};
oe_tc(load_textfile) -> 
	{{tk_enum,"IDL:mnesia/Status:1.0",
                  "Status",
                  ["ok","end_of_table","timeout","error"]},
         [{tk_string,0}],
         [{tk_string,0}]};
oe_tc(dump_to_textfile) -> 
	{{tk_enum,"IDL:mnesia/Status:1.0",
                  "Status",
                  ["ok","end_of_table","timeout","error"]},
         [{tk_string,0}],
         [{tk_string,0}]};
oe_tc(table_info) -> 
	{{tk_enum,"IDL:mnesia/Status:1.0",
                  "Status",
                  ["ok","end_of_table","timeout","error"]},
         [{tk_string,0}],
         [{tk_struct,"IDL:mnesia/TableInfo:1.0",
                     "TableInfo",
                     [{"mode",
                       {tk_enum,"IDL:mnesia/AccessMode:1.0",
                                "AccessMode",
                                ["read_only","read_write"]}},
                      {"attributes",{tk_sequence,{tk_string,0},0}},
                      {"arity",tk_long},
                      {"checkpoints",{tk_sequence,{tk_string,0},0}},
                      {"ram_copies",{tk_sequence,{tk_string,0},0}},
                      {"disc_copies",{tk_sequence,{tk_string,0},0}},
                      {"disc_only_copies",{tk_sequence,{tk_string,0},0}},
                      {"indexlist",{tk_sequence,tk_long,0}},
                      {"load_order",tk_long},
                      {"local_content",tk_boolean},
                      {"master_nodes",{tk_sequence,{tk_string,0},0}},
                      {"memory",tk_long},
                      {"size",tk_long},
                      {"storage_type",
                       {tk_enum,"IDL:mnesia/Storage:1.0",
                                "Storage",
                                ["ram_copies",
                                 "disc_copies",
                                 "disc_only_copies"]}},
                      {"type",
                       {tk_enum,"IDL:mnesia/SetOrBag:1.0",
                                "SetOrBag",
                                ["set","bag"]}},
                      {"where_to_read",{tk_string,0}},
                      {"where_to_write",{tk_sequence,{tk_string,0},0}},
                      {"record_name",{tk_string,0}}]},
          {tk_string,0}]};
oe_tc(system_info) -> 
	{{tk_enum,"IDL:mnesia/Status:1.0",
                  "Status",
                  ["ok","end_of_table","timeout","error"]},
         [],
         [{tk_struct,"IDL:mnesia/SystemInfo:1.0",
                     "SystemInfo",
                     [{"auto_repair",tk_boolean},
                      {"backup_module",{tk_string,0}},
                      {"event_module",{tk_string,0}},
                      {"db_nodes",{tk_sequence,{tk_string,0},0}},
                      {"debug",{tk_string,0}},
                      {"directory",{tk_string,0}},
                      {"dump_log_load_regulation",tk_boolean},
                      {"dump_log_time_threshold",tk_long},
                      {"dump_log_update_in_place",tk_boolean},
                      {"dump_log_write_threshold",tk_long},
                      {"extra_db_nodes",{tk_sequence,{tk_string,0},0}},
                      {"is_running",tk_boolean},
                      {"schema_location",{tk_string,0}},
                      {"use_dir",tk_boolean},
                      {"checkpoints",{tk_sequence,{tk_string,0},0}},
                      {"fallback_activated",tk_boolean},
                      {"local_tables",{tk_sequence,{tk_string,0},0}},
                      {"master_node_tables",{tk_sequence,{tk_string,0},0}},
                      {"running_db_nodes",{tk_sequence,{tk_string,0},0}},
                      {"tables",{tk_sequence,{tk_string,0},0}},
                      {"transaction_failures",tk_long},
                      {"transaction_commits",tk_long},
                      {"transaction_restarts",tk_long},
                      {"transaction_log_writes",tk_long}]},
          {tk_string,0}]};
oe_tc(_) -> undefined.

oe_get_interface() -> 
	[{"system_info", oe_tc(system_info)},