S-表达式解析

Question

我今天早些时候遇到了this question：

示例输入：我遇到了 Joe 和 Jill，然后我们去购物
示例输出： [顶部 [S [S [NP [PRP I]] [VP [VBD 跑] [PP [IN 进入] [NP [NNP 乔] [CC 和] [NNP 吉尔]]]]] [CC 和] [S [ADVP [RB 然后]] [NP [PRP我们]] [VP [VBD去] [NP [NN购物]]]]]]

我正要建议简单地将预期输出（因为它看起来像一个 s 表达式）解析为一个对象（在我们的例子中是一个树），然后使用简单的 LINQ 方法来处理它。然而，令我惊讶的是，我找不到 C# s-expression 解析器。

我唯一能想到的就是使用 Clojure 来解析它，因为它编译为 clr，但我不确定它是否是一个好的解决方案。

顺便说一句，我不介意dynamic 类型的输出的答案。我在这里找到的唯一答案是反序列化为特定架构。

总结一下我的问题： 我需要在 C# 中反序列化 s 表达式（序列化对于这个问题的未来读者来说会很好）

Answer 1

看起来你需要一个表单的数据结构：

public class SNode
{
    public String Name { get; set; }

    private readonly List<SNode> _Nodes = new List<SNode>();
    public ICollection<SNode> Nodes { get { return _Nodes; } }
}

表单的序列化器

public String Serialize(SNode root)
{
    var sb = new StringBuilder();
    Serialize(root, sb);
    return sb.ToString();
}

private void Serialize(SNode node, StringBuilder sb)
{
    sb.Append('(');

    sb.Append(node.Name);

    foreach (var item in node.Nodes)
        Serialize(item, sb);

    sb.Append(" )");
}

还有一个反序列化器：

public SNode Deserialize(String st)
{
    if (String.IsNullOrWhiteSpace(st))
        return null;

    var node = new SNode();

    var nodesPos = String.IndexOf('(');
    var endPos = String.LastIndexOf(')');

    var childrenString = st.SubString(nodesPos, endPos - nodesPos);

    node.Name = st.SubString(1, (nodesPos >= 0 ? nodePos : endPos)).TrimEnd();

    var childStrings = new List<string>();

    int brackets = 0;
    int startPos = nodesPos;
    for (int pos = nodesPos; pos++; pos < endPos)
    {
        if (st[pos] == '(')
            brackets++;
        else if (st[pos] == ')')
        {
            brackets--;

            if (brackets == 0)
            {
                childStrings.Add(st.SubString(startPos, pos - startPos + 1));
                startPos = pos + 1;
            }
        }
    }

    foreach (var child in childStrings)
    {
        var childNode = Deserialize(this, child);
        if (childNode != null)
            node.Nodes.Add(childNode);
    }

    return node;
}

如果还没有测试甚至编译过这段代码，那么它或多或少是可以工作的。

Answer 2

我编写了一个开源的 S-Expression 解析器，可以使用 S-Expression.NET。由于它使用 OMeta# 生成解析器，因此您可以快速使用它来添加新功能。