如何将Erlang sys.config转化为config.exs？

Question

这可能很简单。例如，这个sys.config到mix config.exs：

{gsms, [{interfaces,
  [
   {gsms_0705, 1, [{device,"/dev/tty.usbserial-FTF5DP2J"},
           {bnumber, "<phone-number>"},{baud,19200},
           {reopen_timeout, 5000}]}
   {gsms_0705, 2, [{device,"/dev/tty.HUAWEIMobile-Pcui"},
           {bnumber, "<phone-number>"},
           {reopen_timeout, 5000}]}
   {gsms_0705, 3, [{device, "/dev/tty.usbserial"},
          {bnumber, "<phone-number>"},
          {baud, 9600}]}
  ]}
]}

Answer 1

如果您修复语法错误(缺少逗号)并添加强制尾随点，甚至可以解析Elixir中的Erlang术语，并让解析器为您进行转换：

erlang_term = '{gsms, [{interfaces, [
  {gsms_0705, 1, [{device,"/dev/tty.usbserial-FTF5DP2J"},
                  {bnumber, "<phone-number>"},{baud,19200},
                  {reopen_timeout, 5000}]},
  {gsms_0705, 2, [{device,"/dev/tty.HUAWEIMobile-Pcui"},
                  {bnumber, "<phone-number>"},
                  {reopen_timeout, 5000}]},
  {gsms_0705, 3, [{device, "/dev/tty.usbserial"},
                  {bnumber, "<phone-number>"},
                  {baud, 9600}]}
 ]}
]}.'

{:ok, tokens, _} = :erl_scan.string(erlang_term)
{:ok, result} = :erl_parse.parse_term(tokens)
IO.inspect result, limit: :infinity

这些指纹：

{:gsms,
 [interfaces: [{:gsms_0705, 1,
    [device: '/dev/tty.usbserial-FTF5DP2J', bnumber: '<phone-number>',
     baud: 19200, reopen_timeout: 5000]},
   {:gsms_0705, 2,
    [device: '/dev/tty.HUAWEIMobile-Pcui', bnumber: '<phone-number>',
     reopen_timeout: 5000]},
   {:gsms_0705, 3,
    [device: '/dev/tty.usbserial', bnumber: '<phone-number>', baud: 9600]}]]}

元组的第一部分是应用程序名:gsms，另一部分是包含实际选项的proplist。您可以去掉周围的括号，稍微修改一下格式，这样您就可以得到：

config :gsms, interfaces: [
  {:gsms_0705, 1, [
    device: '/dev/tty.usbserial-FTF5DP2J',
    bnumber: '<phone-number>',
    baud: 19200,
    reopen_timeout: 5000]},
  {:gsms_0705, 2, [
    device: '/dev/tty.HUAWEIMobile-Pcui',
    bnumber: '<phone-number>',
    reopen_timeout: 5000]},
  {:gsms_0705, 3, [
    device: '/dev/tty.usbserial',
    bnumber: '<phone-number>',
    baud: 9600]}]

Answer 2

我想应该是这样的：

config :gsms, :interfaces, [
  {:gsms_0705, 1, [device: '/dev/tty.usbserial-FTF5DP2J',
                   bnumber: '<phone-number>',
                   baud: 19200,
                   reopen_timeout: 5000]},
  # and so on
]

在您要配置的应用程序中，:gsms是通过Application.get_env/2 (Application.get_env(:gsms, :interfaces))检索的键，{:gsms_*, ...}元组列表是该键的值。