基于Erlang的群聊应用用户注册：理论实现与代码示例问询

一、存储方案理论分析 #

1. 存储格式选择 #

• Erlang Term格式：最适配Erlang生态的方案，直接通过term_to_binary/1将用户数据（map或tuple结构）转为二进制，读取时用binary_to_term/1还原，无需额外解析逻辑，性能高效，适合中小规模用户数据存储。
• JSON格式：若需跨语言读取可选用，但Erlang中需依赖jiffy或jsx库，序列化/解析存在额外开销，仅适合需与外部系统交互的场景。
• 纯文本（CSV）：虽易读但解析繁琐、容错性差，不推荐用于用户数据存储，仅适合需手动编辑的极简单场景。

2. 存储方法 #

• 单文件存储：适合初期用户量少的场景，注册时读取整个文件内容，添加新用户后覆盖写入。需注意添加文件锁（如file:write_file/3的[append, exclusive]参数），避免并发写入冲突。
• 目录拆分存储：用户量增长后，可按用户名首字母或哈希值拆分到不同文件/目录，减小单文件体积，提升读写效率。
• 数据库存储：用户规模扩大后，建议切换到Erlang自带的Mnesia（分布式数据库）或ETS（内存表配合持久化），比文件存储更高效，支持并发操作和快速查询。

二、代码示例 #

假设你已实现控制台输入读取，以下是用户信息处理与存储的核心代码：

1. 用户数据结构定义 #

推荐用map存储，结构清晰易扩展：

% 注册时生成的用户结构（包含盐值和哈希后的密码，禁止明文存密码）
NewUser = #{
    email => "user@example.com",
    username => "testuser",
    salt => <<...>>, % 随机盐值
    password_hash => <<...>> % 哈希后的密码
}.

2. 密码哈希处理（必须实现） #

禁止明文存储密码，用Erlang自带:crypto模块做安全哈希：

hash_password(PlainPassword) ->
    % 生成16字节随机盐值
    Salt = crypto:strong_rand_bytes(16),
    % 用PBKDF2-HMAC-SHA256算法哈希，迭代10000次，生成32字节哈希值
    Hash = crypto:pbkdf2_hmac(sha256, PlainPassword, Salt, 10000, 32),
    {Salt, Hash}.

3. 文件读写核心逻辑 #

% 读取现有用户列表
read_users() ->
    case file:read_file("users.dat") of
        {ok, Binary} -> binary_to_term(Binary);
        {error, enoent} -> [] % 文件不存在时返回空列表
    end.

% 将用户列表写入文件
save_users(Users) ->
    Binary = term_to_binary(Users),
    % exclusive参数确保同一时间只有一个进程写入，避免并发冲突
    file:write_file("users.dat", Binary, [write, exclusive]).

% 注册核心逻辑
register_user(Email, Username, PlainPassword) ->
    ExistingUsers = read_users(),
    % 检查用户名是否已存在
    case lists:any(fun(#{username := U}) -> U =:= Username end, ExistingUsers) of
        true -> {error, username_exists};
        false ->
            % 检查邮箱是否已存在
            case lists:any(fun(#{email := E}) -> E =:= Email end, ExistingUsers) of
                true -> {error, email_exists};
                false ->
                    {Salt, Hash} = hash_password(PlainPassword),
                    NewUser = #{
                        email => Email,
                        username => Username,
                        salt => Salt,
                        password_hash => Hash
                    },
                    NewUsers = [NewUser | ExistingUsers],
                    save_users(NewUsers),
                    {ok, registered}
            end
    end.

4. 控制台交互整合 #

start_registration() ->
    io:format("Enter email: "),
    Email = string:trim(io:get_line("")), % 去除换行符和首尾空格
    io:format("Enter username: "),
    Username = string:trim(io:get_line("")),
    io:format("Enter password: "),
    Password = string:trim(io:get_line("")),
    
    case register_user(Email, Username, Password) of
        {ok, registered} -> io:format("Registration successful!\n");
        {error, username_exists} -> io:format("Username already taken!\n");
        {error, email_exists} -> io:format("Email already registered!\n")
    end.

三、关键注意事项 #

• 并发安全：如果是多进程同时处理注册请求，单文件的exclusive写入会导致后续进程失败，建议用gen_server封装用户存储逻辑，所有读写操作通过gen_server串行处理，保证数据一致性。
• 数据备份：定期备份users.dat文件，避免意外丢失数据。
• 后期迁移：用户量增长后，可无缝将数据迁移到Mnesia，支持分布式部署和更高效的用户查询。

内容的提问来源于stack exchange，提问作者anfamn