erlang – 如何重命名运行mnesia数据库的节点

我在machine1上创建了一个Mnesia数据库/ Schema.该节点被命名为mypl @ machine1.然后我将所有文件移动到machine2,因为machine1中断了.只要代码运行的名称为“mypl @ machine1”,一切正常运行.显然这是有点confugsing,因为它现在运行在machine2上.

如果我以节点名“mypl @ machine2”启动Erlang,则Mnesia数据库显示为空.

如何将Mnesia数据库中的节点从machine1重命名为machine2？

解决方法

我不认为这可以在单个节点(任何人)上在线完成,但除了运行两个节点和添加表副本之外,还可以通过备份/恢复进行.在 Mnesia User’s guide部分6.9.1中,您将找到一些使用mnesia：traverse_backup的代码来修改mnesia备份文件中的模式表(如下所示)中的节点名称.应该使用的模块名称是mnesia_backup.

使用此代码,您需要：

%% On mypl@machine1
mnesia:backup("/path/to/mnesia.backup").
change_node_name(mnesia_backup,mypl@machine1,mypl@machine2,"/path/to/mnesia.backup","/path/to/new.mnesia.backup").
%% On mypl@machine2
mnesia:restore("/path/to/new.mnesia.backup",[]).

我不知道您是否需要在mypl @ machine2上首先创建架构.

用户指南中的更改节点名称代码：

change_node_name(Mod,From,To,Source,Target) ->
    Switch =
        fun(Node) when Node == From -> To;
           (Node) when Node == To -> throw({error,already_exists});
           (Node) -> Node
        end,Convert =
        fun({schema,db_nodes,Nodes},Acc) ->
                {[{schema,lists:map(Switch,Nodes)}],Acc};
           ({schema,version,Version},Version}],cookie,Cookie},Cookie}],Tab,CreateList},Acc) ->
                Keys = [ram_copies,disc_copies,disc_only_copies],OptSwitch =
                    fun({Key,Val}) ->
                            case lists:member(Key,Keys) of
                                true -> {Key,Val)};
                                false-> {Key,Val}
                            end
                    end,{[{schema,lists:map(OptSwitch,CreateList)}],Acc};
           (Other,Acc) ->
                {[Other],Acc}
        end,mnesia:traverse_backup(Source,Mod,Target,Convert,switched).