d4f08b3096
Specifically: * Properties must precede sub-object declarations. * There shouldn't be any newlines in-between properties. * There should be a newline in-between each sub-object. * Object declarations must include the curly braces. * There should be a newline between the properties of an object and it's sub-objects.
131 lines
3.9 KiB
C++
131 lines
3.9 KiB
C++
/*
|
|
* Copyright (c) 2020, Andreas Kling <kling@serenityos.org>
|
|
* Copyright (c) 2022, kleines Filmröllchen <filmroellchen@serenityos.org>
|
|
*
|
|
* SPDX-License-Identifier: BSD-2-Clause
|
|
*/
|
|
|
|
#include "Parser.h"
|
|
#include "AST.h"
|
|
#include "Lexer.h"
|
|
#include <AK/Error.h>
|
|
#include <AK/GenericLexer.h>
|
|
#include <AK/JsonObject.h>
|
|
#include <AK/JsonValue.h>
|
|
#include <AK/Queue.h>
|
|
#include <AK/RefPtr.h>
|
|
|
|
namespace GUI::GML {
|
|
|
|
static ErrorOr<NonnullRefPtr<Object>> parse_gml_object(Queue<Token>& tokens)
|
|
{
|
|
auto object = TRY(try_make_ref_counted<Object>());
|
|
|
|
auto peek = [&] {
|
|
if (tokens.is_empty())
|
|
return Token::Type::Unknown;
|
|
return tokens.head().m_type;
|
|
};
|
|
|
|
while (peek() == Token::Type::Comment) {
|
|
dbgln("found comment {}", tokens.head().m_view);
|
|
TRY(object->add_property_child(TRY(Node::from_token<Comment>(tokens.dequeue()))));
|
|
}
|
|
|
|
if (peek() != Token::Type::ClassMarker)
|
|
return Error::from_string_literal("Expected class marker"sv);
|
|
|
|
tokens.dequeue();
|
|
|
|
if (peek() != Token::Type::ClassName)
|
|
return Error::from_string_literal("Expected class name"sv);
|
|
|
|
auto class_name = tokens.dequeue();
|
|
object->set_name(class_name.m_view);
|
|
|
|
if (peek() != Token::Type::LeftCurly)
|
|
return Error::from_string_literal("Expected {{"sv);
|
|
|
|
tokens.dequeue();
|
|
|
|
NonnullRefPtrVector<Comment> pending_comments;
|
|
for (;;) {
|
|
if (peek() == Token::Type::RightCurly) {
|
|
// End of object
|
|
break;
|
|
}
|
|
|
|
if (peek() == Token::Type::ClassMarker) {
|
|
// It's a child object.
|
|
|
|
while (!pending_comments.is_empty())
|
|
TRY(object->add_sub_object_child(pending_comments.take_last()));
|
|
|
|
TRY(object->add_sub_object_child(TRY(parse_gml_object(tokens))));
|
|
} else if (peek() == Token::Type::Identifier) {
|
|
// It's a property.
|
|
|
|
while (!pending_comments.is_empty())
|
|
TRY(object->add_property_child(pending_comments.take_last()));
|
|
|
|
auto property_name = tokens.dequeue();
|
|
|
|
if (property_name.m_view.is_empty())
|
|
return Error::from_string_literal("Expected non-empty property name"sv);
|
|
|
|
if (peek() != Token::Type::Colon)
|
|
return Error::from_string_literal("Expected ':'"sv);
|
|
|
|
tokens.dequeue();
|
|
|
|
RefPtr<ValueNode> value;
|
|
if (peek() == Token::Type::ClassMarker)
|
|
value = TRY(parse_gml_object(tokens));
|
|
else if (peek() == Token::Type::JsonValue)
|
|
value = TRY(try_make_ref_counted<JsonValueNode>(TRY(JsonValueNode::from_string(tokens.dequeue().m_view))));
|
|
|
|
auto property = TRY(try_make_ref_counted<KeyValuePair>(property_name.m_view, value.release_nonnull()));
|
|
TRY(object->add_property_child(property));
|
|
} else if (peek() == Token::Type::Comment) {
|
|
pending_comments.append(TRY(Node::from_token<Comment>(tokens.dequeue())));
|
|
} else {
|
|
return Error::from_string_literal("Expected child, property, comment, or }}"sv);
|
|
}
|
|
}
|
|
|
|
if (peek() != Token::Type::RightCurly)
|
|
return Error::from_string_literal("Expected }}"sv);
|
|
|
|
tokens.dequeue();
|
|
|
|
return object;
|
|
}
|
|
|
|
ErrorOr<NonnullRefPtr<GMLFile>> parse_gml(StringView string)
|
|
{
|
|
auto lexer = Lexer(string);
|
|
|
|
Queue<Token> tokens;
|
|
for (auto& token : lexer.lex())
|
|
tokens.enqueue(token);
|
|
|
|
auto file = TRY(try_make_ref_counted<GMLFile>());
|
|
|
|
auto peek = [&] {
|
|
if (tokens.is_empty())
|
|
return Token::Type::Unknown;
|
|
return tokens.head().m_type;
|
|
};
|
|
|
|
while (peek() == Token::Type::Comment)
|
|
TRY(file->add_child(TRY(Node::from_token<Comment>(tokens.dequeue()))));
|
|
|
|
TRY(file->add_child(TRY(parse_gml_object(tokens))));
|
|
|
|
while (!tokens.is_empty())
|
|
TRY(file->add_child(TRY(Node::from_token<Comment>(tokens.dequeue()))));
|
|
|
|
return file;
|
|
}
|
|
|
|
}
|