diff --git a/Mnesia/gamedb.erl b/Mnesia/gamedb.erl new file mode 100644 index 0000000..9d6bbbe --- /dev/null +++ b/Mnesia/gamedb.erl @@ -0,0 +1,31 @@ +%Test Mnesia +-module(gamedb). +-import(mnesia). +-export([init/0,insert_player/1,example_player/0,read_player/1,test_player/0]). +-include("gamedb.hrl"). + +init() -> + mnesia:create_table(player, [{attributes, record_info(fields, player)}]). + +test_player() -> + insert_player(example_player()), + read_player(0001). + +insert_player(Player) -> + Fun = fun() -> + mnesia:write(Player) + end, + mnesia:transaction(Fun). + +example_player() -> + #player{id = 0001, + name = "Tux"}. + +read_player(Player_Key) -> + Fun = fun() -> + [P] = mnesia:read(player, Player_Key), + Name = P#player.name, + io:format("Player name: ~s~n",[Name]) + end, + mnesia:transaction(Fun). + diff --git a/Mnesia/gamedb.hrl b/Mnesia/gamedb.hrl new file mode 100644 index 0000000..1ae9c8f --- /dev/null +++ b/Mnesia/gamedb.hrl @@ -0,0 +1,6 @@ +%% gamedb.hrl + +-record(player, {id, name}). + + + diff --git a/Mnesia/gamedb_usage.txt b/Mnesia/gamedb_usage.txt new file mode 100644 index 0000000..b3a07a0 --- /dev/null +++ b/Mnesia/gamedb_usage.txt @@ -0,0 +1,12 @@ +1. From terminal: erl -mnesia dir '"/home/user/dir/to/GGS/GameDB.Player"' +2. mnesia:create_schema([node()]). +3. mnesia:start(). +4. c(gamedb). +5. gamedb:init(). +6. mnesia:info(). +7. gamedb:test_player(). + +Last output should be: + Player name: Tux + {atomic,ok} + diff --git a/ebin/.GGS.app.swp b/ebin/.GGS.app.swp deleted file mode 100644 index 8f4a74e..0000000 Binary files a/ebin/.GGS.app.swp and /dev/null differ diff --git a/src/.ggs_server.erl.swp b/src/.ggs_server.erl.swp deleted file mode 100644 index 5b754bd..0000000 Binary files a/src/.ggs_server.erl.swp and /dev/null differ diff --git a/src/.ggs_sup.erl.swp b/src/.ggs_sup.erl.swp deleted file mode 100644 index 6ee82a8..0000000 Binary files a/src/.ggs_sup.erl.swp and /dev/null differ