MongoDB драйвер для Erlang

Question

[soif]

Возможно вопрос тупой, но никак не получается прикрутить MongoDB к Erlang приложению. Опыта прикручивания чего-то другого отличного от Монги тоже нет. Пытался сделать это 2-мя способами:

1) Официальный гайд

$ git clone git://github.com/mongodb/mongodb-erlang.git mongodb
$ cd mongodb
$ make

$ erl
1> code:lib_dir().
"/usr/lib/erlang/lib"

$ mkdir /usr/lib/erlang/lib/mongodb-master
$ cp -R deps ebin /usr/lib/erlang/lib/mongodb-master/

Ага, ок

erl -pa ebin deps/*/ebin

2> application:start(bson).
ok
3> application:start(mongodb).
ok

> Host = {localhost, 27017}.
> {ok, Conn} = mongo:connect (Host).
** exception error: undefined function mongo:connect/1

Посмотрел в mongo.erl и правда функции connect нету, странно, может чего не понимаю…

хм, попробовал на удачу mongo:insert (foo, {x,1, y,2}).
Думал будет какая-нибудь ошибка типа «нету подключения», а получил:

** exception error: {badrecord,context}
in function mongo:write/1 (src/mongo.erl, line 229)
in call from mongo:insert/2 (src/mongo.erl, line 78)
in call from mongo:insert/2 (src/mongo.erl, line 75)

Нифига не понимаю… ((

2) Создал пустое OTP приложение, прописал в rebar.config
{deps, [
{mongodb, ".*", {git, «git://github.com/mongodb/mongodb-erlang.git», {branch, «master»}}}
%%{bson, ".*", {git, «git://github.com/mongodb/bson-erlang.git», {branch, «master»}}}
]}.

soif@Ubuntu:~/try_mongo$ rebar get-deps compile
==> bson (get-deps)
==> mongodb (get-deps)
==> try_mongo (get-deps)
==> bson (compile)
==> mongodb (compile)
/home/soif/try_mongo/deps/mongodb/src/mongo.erl:333: syntax error before: '.'
/home/soif/try_mongo/deps/mongodb/src/mongo.erl:32: function add_user/3 undefined
/home/soif/try_mongo/deps/mongodb/src/mongo.erl:330: spec for undefined function mongo:add_user/3
ERROR: compile failed while processing /home/soif/try_mongo/deps/mongodb: rebar_abort

Не хватает понимания Эрланга, посоветуйте что-нибудь, hello world с монгой какой-нибудь бы…

Answer 1

[Tremax]

В папке test, а в ней файл — mongo_SUITE.erl (https://github.com/mongodb/mongodb-erlang/blob/refactor/test/mongo_SUITE.erl), а там пример как использовать.

{ok, Connection} = mongo_connection:start_link({"127.0.0.1", 27017}, [])

Comments

[soif]

Спасибо за ответ!
{ok, Connection} = mongo_connection:start_link({«127.0.0.1», 27017}, [])
коннектится, уже хорошо
Посмотрел mongo_SUITE.erl, не понял, что должно быть в Case и Config
Что делает этот код, макрос ?config и что должно быть в Config?

	Connection = ?config(connection, Config),
	Database   = ?config(database, Config),
	Collection = ?config(collection, Config),

Может растолкуете?)

[Tremax]

?config — макрос из common_test/include/ct.hrl, получает значение по ключу, обычный proplist:

[{connection, Connection}, {collection, collection(Case)}, {database, dbname}]

аналог proplists:get_value.

[soif]

Ага, спасибо, вроде понял…
т.е. по идее я делаю правильно, база test у меня создана и монга запущена:

7> Config2 = mongo_SUITE:init_per_testcase(test,Config1).
[{connection,<0.58.0>},
{collection,'mongo_SUITE-test-1369154928'},
{database,test}]
8> mongo_SUITE:insert_and_find(Config2).
** exception error: undefined function bson:lookup/2
in function mongo:assign_id/1 (src/mongo.erl, line 205)
in call from mongo:'-insert/2-lc$^0/1-0-'/1 (src/mongo.erl, line 77)
in call from mongo:insert/2 (src/mongo.erl, line 77)
in call from mongo_SUITE:'-insert_and_find/1-fun-0-'/1 (mongo_SUITE.erl, line 50)
in call from mongo:do/5 (src/mongo.erl, line 59)

Но откуда тогда ошибка в bson:lookup

Да и просто указать драйвер Монги в зависимостях не получается, ошибка как написано в самом начале.

[Tremax]

На самом деле, этот файлик не для таких тестов(http://erlang.org/doc/apps/common_test/write_test_chapter.html).

Но если хотите поиграть, нужно запускать:

init_per_suite(Config) ->
	application:start(bson),
	application:start(mongodb),
	[{database, test} | Config].

вы наверное забыли запустить application:start(bson)?

[soif]

Ура получилось! Благодарю за помощь! Плюсанул от души =)

soif@Ubuntu:~/mongodb$ rebar compile
==> bson (compile)
==> mongodb (compile)
soif@Ubuntu:~/mongodb$ erl -pa ebin deps/*/ebin
Erlang R16B (erts-5.10.1) [source-05f1189] [64-bit] [smp:4:4] [async-threads:10] [hipe] [kernel-poll:false]

Eshell V5.10.1 (abort with ^G)
1> application:start(bson).
ok
2> application:start(mongodb).
ok
3> Config = mongo_SUITE:init_per_suite([]).
[{database,test}]
4> Config2 = mongo_SUITE:init_per_testcase(test,Config).
[{connection,<0.46.0>},
{collection,'mongo_SUITE-test-1369158502'},
{database,test}]
5> mongo_SUITE:insert_and_find(Config2).
{{name,<<«Red Sox»>>,home,
{city,<<«Boston»>>,state,<<«MA»>>},
league,<<«American»>>,'_id',
{<<81,155,179,122,61,148,84,106,4,0,0,4>>}}}
6>