parser.c

#include "prism/internal/parser.h"
 
#include "prism/internal/allocator.h"
#include "prism/internal/comments.h"
#include "prism/internal/diagnostic.h"
#include "prism/internal/encoding.h"
#include "prism/internal/magic_comments.h"
 
#include <stdlib.h>
 
void
pm_parser_encoding_changed_callback_set(pm_parser_t *parser, pm_encoding_changed_callback_t callback) {
    parser->encoding_changed_callback = callback;
}
 
void
pm_parser_lex_callback_set(pm_parser_t *parser, pm_lex_callback_t callback, void *data) {
    parser->lex_callback.callback = callback;
    parser->lex_callback.data = data;
}
 
void *
pm_parser_lex_callback_data(const pm_parser_t *parser) {
    return parser->lex_callback.data;
}
 
const uint8_t *
pm_parser_start(const pm_parser_t *parser) {
    return parser->start;
}
 
const uint8_t *
pm_parser_end(const pm_parser_t *parser) {
    return parser->end;
}
 
int32_t
pm_parser_start_line(const pm_parser_t *parser) {
    return parser->start_line;
}
 
const char *
pm_parser_encoding_name(const pm_parser_t *parser) {
    return parser->encoding->name;
}
 
size_t
pm_parser_encoding_char_width(const pm_parser_t *parser, const uint8_t *start, ptrdiff_t remaining) {
    return parser->encoding->char_width(start, remaining);
}
 
bool
pm_parser_encoding_us_ascii(const pm_parser_t *parser) {
    return parser->encoding == PM_ENCODING_US_ASCII_ENTRY;
}
 
const pm_string_t *
pm_parser_filepath(const pm_parser_t *parser) {
    return &parser->filepath;
}
 
pm_constant_id_t
pm_parser_constant_find(const pm_parser_t *parser, const uint8_t *start, size_t length) {
    return pm_constant_pool_find(&parser->constant_pool, start, length);
}
 
int8_t
pm_parser_frozen_string_literal(const pm_parser_t *parser) {
    return parser->frozen_string_literal;
}
 
const pm_line_offset_list_t *
pm_parser_line_offsets(const pm_parser_t *parser) {
    return &parser->line_offsets;
}
 
const pm_location_t *
pm_parser_data_loc(const pm_parser_t *parser) {
    return &parser->data_loc;
}
 
bool
pm_parser_continuable(const pm_parser_t *parser) {
    return parser->continuable;
}
 
int
pm_parser_lex_state(const pm_parser_t *parser) {
    return (int) parser->lex_state;
}
 
pm_location_t
pm_comment_location(const pm_comment_t *comment) {
    return comment->location;
}
 
pm_comment_type_t
pm_comment_type(const pm_comment_t *comment) {
    return comment->type;
}
 
size_t
pm_parser_comments_size(const pm_parser_t *parser) {
    return parser->comment_list.size;
}
 
void
pm_parser_comments_each(const pm_parser_t *parser, pm_comment_callback_t callback, void *data) {
    const pm_list_node_t *current = parser->comment_list.head;
    while (current != NULL) {
        const pm_comment_t *comment = (const pm_comment_t *) current;
        callback(comment, data);
        current = current->next;
    }
}
 
pm_location_t
pm_magic_comment_key(const pm_magic_comment_t *magic_comment) {
    return magic_comment->key;
}
 
pm_location_t
pm_magic_comment_value(const pm_magic_comment_t *magic_comment) {
    return magic_comment->value;
}
 
size_t
pm_parser_magic_comments_size(const pm_parser_t *parser) {
    return parser->magic_comment_list.size;
}
 
void
pm_parser_magic_comments_each(const pm_parser_t *parser, pm_magic_comment_callback_t callback, void *data) {
    const pm_list_node_t *current = parser->magic_comment_list.head;
    while (current != NULL) {
        const pm_magic_comment_t *magic_comment = (const pm_magic_comment_t *) current;
        callback(magic_comment, data);
        current = current->next;
    }
}
 
size_t
pm_parser_errors_size(const pm_parser_t *parser) {
    return parser->error_list.size;
}
 
size_t
pm_parser_warnings_size(const pm_parser_t *parser) {
    return parser->warning_list.size;
}
 
static inline void
pm_parser_diagnostics_each(const pm_list_t *list, pm_diagnostic_callback_t callback, void *data) {
    const pm_list_node_t *current = list->head;
    while (current != NULL) {
        const pm_diagnostic_t *diagnostic = (const pm_diagnostic_t *) current;
        callback(diagnostic, data);
        current = current->next;
    }
}
 
void
pm_parser_errors_each(const pm_parser_t *parser, pm_diagnostic_callback_t callback, void *data) {
    pm_parser_diagnostics_each(&parser->error_list, callback, data);
}
 
void
pm_parser_warnings_each(const pm_parser_t *parser, pm_diagnostic_callback_t callback, void *data) {
    pm_parser_diagnostics_each(&parser->warning_list, callback, data);
}
 
size_t
pm_parser_constants_size(const pm_parser_t *parser) {
    return parser->constant_pool.size;
}
 
void
pm_parser_constants_each(const pm_parser_t *parser, pm_constant_callback_t callback, void *data) {
    for (uint32_t index = 0; index < parser->constant_pool.size; index++) {
        const pm_constant_t *constant = &parser->constant_pool.constants[index];
        callback(constant, data);
    }
}
 
const pm_constant_t *
pm_parser_constant(const pm_parser_t *parser, pm_constant_id_t constant_id) {
    return pm_constant_pool_id_to_constant(&parser->constant_pool, constant_id);
}