Erlang mochiweb mnesia 集群调度

Erlang mochiweb mnesia 集群部署
想在MochiWeb中用mnesia，并且让mnesia按集群部署。
Erlang mochiweb 部署
环境：
2台centos系统的机器，在同一网段。

设置host

ip:192.168.2.126
more /etc/sysconfig/network

NETWORKING=yesHOSTNAME=centos-126GATEWAY=192.168.0.1

more /etc/hosts

127.0.0.1   centos-126 localhost.localdomain localhost4 localhost4.localdomain4::1         localhost localhost.localdomain localhost6 localhost6.localdomain6192.168.2.127 www.centos127.com

注意：192.168.2.127 www.centos127.com，要保证126这台机器能够通过域名，ping通127机器。

ip:192.168.2.127
more /etc/sysconfig/network

NETWORKING=yesHOSTNAME=centos-127GATEWAY=192.168.0.1

more /etc/hosts

127.0.0.1   centos-127 localhost.localdomain localhost4 localhost4.localdomain4::1         localhost localhost.localdomain localhost6 localhost6.localdomain6192.168.2.126 www.centos126.com

注意：192.168.2.126 www.centos126.com，要保证127这台机器能够通过域名，ping通126机器。

设置完host后，保证2台机器能通过，hostname相互ping通。

测试Erlang能否net_adm:ping通

启动Erlang虚拟机：

[root@centos-126 /]# erl -name "a@www.centos-126.com" -setcookie abc[root@centos-127 /]# erl -name "b@www.centos127.com" -setcookie abc

验证net_adm:ping

(b@www.centos127.com)1> net_adm:ping(a@www.centos126.com).pong(a@www.centos126.com)1> net_adm:ping(b@www.centos127.com).pong

说明Erlang能够彼此ping通。

接下来配置MochiWeb：

在Programming Erlang书中，说到
NETWORKING=yesHOSTNAME=centos126GATEWAY=192.168.0.1

vim /etc/hosts

127.0.0.1 centos126192.168.2.127 centos127

hostname centos126
让新设置的hostname生效

ip:192.168.2.127
vim /etc/sysconfig/network

NETWORKING=yesHOSTNAME=centos127GATEWAY=192.168.0.1

vim /etc/hosts

127.0.0.1 centos127192.168.2.126 centos126

hostname centos127
让新设置的hostname生效

互相ping通。

设置MochiWeb的start-dev.sh

126，127上的start-dev.sh 修改如下：

#!/bin/sh# NOTE: mustache templates need \ because they are not awesome.exec erl +P 500000 -pa ebin edit deps/*/ebin -boot start_sasl \    -setcookie abc \    -sname im_dev \    -s im \    -s reloader \    -mnesia dir '"/ide/erlang/im/db/online"'

设置mnesia的初始化方法，设置为两点同步，仅内存模式。
online_init.erl

-record(im_monitor, {pid,                                  user_name                                  }   ).%% save user_name, pid, type is bag-record(im_chat, {user_name,                                  pid                                  }   ).init() ->        mnesia:create_table(im_monitor,                                                [{ram_copies, [im_dev@centos126,im_dev@centos127]},                                                 {type, set},                                                 {attributes, record_info(fields, im_monitor)}]),        mnesia:create_table(im_chat,                                                [{ram_copies, [im_dev@centos126,im_dev@centos127]},                                                 {type, bag},                                                 {attributes, record_info(fields, im_chat)}]).

验证：详细请参考http://amornio.iteye.com/blog/1546536

126，127上
1) 分别输入./start-dev.sh，正常启动
2) 分别net_adm:ping()通
3) 第一次启动时候，在其中一台输入 mnesia:create_schema([im_dev@centos126,im_dev@centos127]).
4) 分别输入，mnesia:start().
5) 其中一台，输入online_init:init().返回{atomic, ok}.
6) 分别输入mnesia:info().数据表是否创建成功。

好了，现在完成了。

查看更多 下一篇