aboutsummaryrefslogtreecommitdiff
path: root/src/tree_sitter/node.c
diff options
context:
space:
mode:
authorThomas Vigouroux <tomvig38@gmail.com>2020-09-17 11:25:22 +0200
committerThomas Vigouroux <tomvig38@gmail.com>2020-11-03 10:39:35 +0100
commit3eb241d8310f453ce5e5485f12796a0ae43a0a18 (patch)
treefa214d8724a4c3d3646b1c1c5e12137757464d6f /src/tree_sitter/node.c
parenta061d53e18168130aad537a9e8012390834ff8c2 (diff)
downloadrneovim-3eb241d8310f453ce5e5485f12796a0ae43a0a18.tar.gz
rneovim-3eb241d8310f453ce5e5485f12796a0ae43a0a18.tar.bz2
rneovim-3eb241d8310f453ce5e5485f12796a0ae43a0a18.zip
bundle: move tree-sitter as a bundled dep
fixup! bundle: move tree-sitter as a bundled dep fixup! bundle: move tree-sitter as a bundled dep
Diffstat (limited to 'src/tree_sitter/node.c')
-rw-r--r--src/tree_sitter/node.c677
1 files changed, 0 insertions, 677 deletions
diff --git a/src/tree_sitter/node.c b/src/tree_sitter/node.c
deleted file mode 100644
index 576f3ef38e..0000000000
--- a/src/tree_sitter/node.c
+++ /dev/null
@@ -1,677 +0,0 @@
-#include <stdbool.h>
-#include "./subtree.h"
-#include "./tree.h"
-#include "./language.h"
-
-typedef struct {
- Subtree parent;
- const TSTree *tree;
- Length position;
- uint32_t child_index;
- uint32_t structural_child_index;
- const TSSymbol *alias_sequence;
-} NodeChildIterator;
-
-// TSNode - constructors
-
-TSNode ts_node_new(
- const TSTree *tree,
- const Subtree *subtree,
- Length position,
- TSSymbol alias
-) {
- return (TSNode) {
- {position.bytes, position.extent.row, position.extent.column, alias},
- subtree,
- tree,
- };
-}
-
-static inline TSNode ts_node__null(void) {
- return ts_node_new(NULL, NULL, length_zero(), 0);
-}
-
-// TSNode - accessors
-
-uint32_t ts_node_start_byte(TSNode self) {
- return self.context[0];
-}
-
-TSPoint ts_node_start_point(TSNode self) {
- return (TSPoint) {self.context[1], self.context[2]};
-}
-
-static inline uint32_t ts_node__alias(const TSNode *self) {
- return self->context[3];
-}
-
-static inline Subtree ts_node__subtree(TSNode self) {
- return *(const Subtree *)self.id;
-}
-
-// NodeChildIterator
-
-static inline NodeChildIterator ts_node_iterate_children(const TSNode *node) {
- Subtree subtree = ts_node__subtree(*node);
- if (ts_subtree_child_count(subtree) == 0) {
- return (NodeChildIterator) {NULL_SUBTREE, node->tree, length_zero(), 0, 0, NULL};
- }
- const TSSymbol *alias_sequence = ts_language_alias_sequence(
- node->tree->language,
- subtree.ptr->production_id
- );
- return (NodeChildIterator) {
- .tree = node->tree,
- .parent = subtree,
- .position = {ts_node_start_byte(*node), ts_node_start_point(*node)},
- .child_index = 0,
- .structural_child_index = 0,
- .alias_sequence = alias_sequence,
- };
-}
-
-static inline bool ts_node_child_iterator_done(NodeChildIterator *self) {
- return self->child_index == self->parent.ptr->child_count;
-}
-
-static inline bool ts_node_child_iterator_next(
- NodeChildIterator *self,
- TSNode *result
-) {
- if (!self->parent.ptr || ts_node_child_iterator_done(self)) return false;
- const Subtree *child = &self->parent.ptr->children[self->child_index];
- TSSymbol alias_symbol = 0;
- if (!ts_subtree_extra(*child)) {
- if (self->alias_sequence) {
- alias_symbol = self->alias_sequence[self->structural_child_index];
- }
- self->structural_child_index++;
- }
- if (self->child_index > 0) {
- self->position = length_add(self->position, ts_subtree_padding(*child));
- }
- *result = ts_node_new(
- self->tree,
- child,
- self->position,
- alias_symbol
- );
- self->position = length_add(self->position, ts_subtree_size(*child));
- self->child_index++;
- return true;
-}
-
-// TSNode - private
-
-static inline bool ts_node__is_relevant(TSNode self, bool include_anonymous) {
- Subtree tree = ts_node__subtree(self);
- if (include_anonymous) {
- return ts_subtree_visible(tree) || ts_node__alias(&self);
- } else {
- TSSymbol alias = ts_node__alias(&self);
- if (alias) {
- return ts_language_symbol_metadata(self.tree->language, alias).named;
- } else {
- return ts_subtree_visible(tree) && ts_subtree_named(tree);
- }
- }
-}
-
-static inline uint32_t ts_node__relevant_child_count(
- TSNode self,
- bool include_anonymous
-) {
- Subtree tree = ts_node__subtree(self);
- if (ts_subtree_child_count(tree) > 0) {
- if (include_anonymous) {
- return tree.ptr->visible_child_count;
- } else {
- return tree.ptr->named_child_count;
- }
- } else {
- return 0;
- }
-}
-
-static inline TSNode ts_node__child(
- TSNode self,
- uint32_t child_index,
- bool include_anonymous
-) {
- TSNode result = self;
- bool did_descend = true;
-
- while (did_descend) {
- did_descend = false;
-
- TSNode child;
- uint32_t index = 0;
- NodeChildIterator iterator = ts_node_iterate_children(&result);
- while (ts_node_child_iterator_next(&iterator, &child)) {
- if (ts_node__is_relevant(child, include_anonymous)) {
- if (index == child_index) {
- if (ts_node__is_relevant(self, true)) {
- ts_tree_set_cached_parent(self.tree, &child, &self);
- }
- return child;
- }
- index++;
- } else {
- uint32_t grandchild_index = child_index - index;
- uint32_t grandchild_count = ts_node__relevant_child_count(child, include_anonymous);
- if (grandchild_index < grandchild_count) {
- did_descend = true;
- result = child;
- child_index = grandchild_index;
- break;
- }
- index += grandchild_count;
- }
- }
- }
-
- return ts_node__null();
-}
-
-static bool ts_subtree_has_trailing_empty_descendant(
- Subtree self,
- Subtree other
-) {
- for (unsigned i = ts_subtree_child_count(self) - 1; i + 1 > 0; i--) {
- Subtree child = self.ptr->children[i];
- if (ts_subtree_total_bytes(child) > 0) break;
- if (child.ptr == other.ptr || ts_subtree_has_trailing_empty_descendant(child, other)) {
- return true;
- }
- }
- return false;
-}
-
-static inline TSNode ts_node__prev_sibling(TSNode self, bool include_anonymous) {
- Subtree self_subtree = ts_node__subtree(self);
- bool self_is_empty = ts_subtree_total_bytes(self_subtree) == 0;
- uint32_t target_end_byte = ts_node_end_byte(self);
-
- TSNode node = ts_node_parent(self);
- TSNode earlier_node = ts_node__null();
- bool earlier_node_is_relevant = false;
-
- while (!ts_node_is_null(node)) {
- TSNode earlier_child = ts_node__null();
- bool earlier_child_is_relevant = false;
- bool found_child_containing_target = false;
-
- TSNode child;
- NodeChildIterator iterator = ts_node_iterate_children(&node);
- while (ts_node_child_iterator_next(&iterator, &child)) {
- if (child.id == self.id) break;
- if (iterator.position.bytes > target_end_byte) {
- found_child_containing_target = true;
- break;
- }
-
- if (iterator.position.bytes == target_end_byte &&
- (!self_is_empty ||
- ts_subtree_has_trailing_empty_descendant(ts_node__subtree(child), self_subtree))) {
- found_child_containing_target = true;
- break;
- }
-
- if (ts_node__is_relevant(child, include_anonymous)) {
- earlier_child = child;
- earlier_child_is_relevant = true;
- } else if (ts_node__relevant_child_count(child, include_anonymous) > 0) {
- earlier_child = child;
- earlier_child_is_relevant = false;
- }
- }
-
- if (found_child_containing_target) {
- if (!ts_node_is_null(earlier_child)) {
- earlier_node = earlier_child;
- earlier_node_is_relevant = earlier_child_is_relevant;
- }
- node = child;
- } else if (earlier_child_is_relevant) {
- return earlier_child;
- } else if (!ts_node_is_null(earlier_child)) {
- node = earlier_child;
- } else if (earlier_node_is_relevant) {
- return earlier_node;
- } else {
- node = earlier_node;
- }
- }
-
- return ts_node__null();
-}
-
-static inline TSNode ts_node__next_sibling(TSNode self, bool include_anonymous) {
- uint32_t target_end_byte = ts_node_end_byte(self);
-
- TSNode node = ts_node_parent(self);
- TSNode later_node = ts_node__null();
- bool later_node_is_relevant = false;
-
- while (!ts_node_is_null(node)) {
- TSNode later_child = ts_node__null();
- bool later_child_is_relevant = false;
- TSNode child_containing_target = ts_node__null();
-
- TSNode child;
- NodeChildIterator iterator = ts_node_iterate_children(&node);
- while (ts_node_child_iterator_next(&iterator, &child)) {
- if (iterator.position.bytes < target_end_byte) continue;
- if (ts_node_start_byte(child) <= ts_node_start_byte(self)) {
- if (ts_node__subtree(child).ptr != ts_node__subtree(self).ptr) {
- child_containing_target = child;
- }
- } else if (ts_node__is_relevant(child, include_anonymous)) {
- later_child = child;
- later_child_is_relevant = true;
- break;
- } else if (ts_node__relevant_child_count(child, include_anonymous) > 0) {
- later_child = child;
- later_child_is_relevant = false;
- break;
- }
- }
-
- if (!ts_node_is_null(child_containing_target)) {
- if (!ts_node_is_null(later_child)) {
- later_node = later_child;
- later_node_is_relevant = later_child_is_relevant;
- }
- node = child_containing_target;
- } else if (later_child_is_relevant) {
- return later_child;
- } else if (!ts_node_is_null(later_child)) {
- node = later_child;
- } else if (later_node_is_relevant) {
- return later_node;
- } else {
- node = later_node;
- }
- }
-
- return ts_node__null();
-}
-
-static inline TSNode ts_node__first_child_for_byte(
- TSNode self,
- uint32_t goal,
- bool include_anonymous
-) {
- TSNode node = self;
- bool did_descend = true;
-
- while (did_descend) {
- did_descend = false;
-
- TSNode child;
- NodeChildIterator iterator = ts_node_iterate_children(&node);
- while (ts_node_child_iterator_next(&iterator, &child)) {
- if (ts_node_end_byte(child) > goal) {
- if (ts_node__is_relevant(child, include_anonymous)) {
- return child;
- } else if (ts_node_child_count(child) > 0) {
- did_descend = true;
- node = child;
- break;
- }
- }
- }
- }
-
- return ts_node__null();
-}
-
-static inline TSNode ts_node__descendant_for_byte_range(
- TSNode self,
- uint32_t range_start,
- uint32_t range_end,
- bool include_anonymous
-) {
- TSNode node = self;
- TSNode last_visible_node = self;
-
- bool did_descend = true;
- while (did_descend) {
- did_descend = false;
-
- TSNode child;
- NodeChildIterator iterator = ts_node_iterate_children(&node);
- while (ts_node_child_iterator_next(&iterator, &child)) {
- uint32_t node_end = iterator.position.bytes;
-
- // The end of this node must extend far enough forward to touch
- // the end of the range and exceed the start of the range.
- if (node_end < range_end) continue;
- if (node_end <= range_start) continue;
-
- // The start of this node must extend far enough backward to
- // touch the start of the range.
- if (range_start < ts_node_start_byte(child)) break;
-
- node = child;
- if (ts_node__is_relevant(node, include_anonymous)) {
- ts_tree_set_cached_parent(self.tree, &child, &last_visible_node);
- last_visible_node = node;
- }
- did_descend = true;
- break;
- }
- }
-
- return last_visible_node;
-}
-
-static inline TSNode ts_node__descendant_for_point_range(
- TSNode self,
- TSPoint range_start,
- TSPoint range_end,
- bool include_anonymous
-) {
- TSNode node = self;
- TSNode last_visible_node = self;
-
- bool did_descend = true;
- while (did_descend) {
- did_descend = false;
-
- TSNode child;
- NodeChildIterator iterator = ts_node_iterate_children(&node);
- while (ts_node_child_iterator_next(&iterator, &child)) {
- TSPoint node_end = iterator.position.extent;
-
- // The end of this node must extend far enough forward to touch
- // the end of the range and exceed the start of the range.
- if (point_lt(node_end, range_end)) continue;
- if (point_lte(node_end, range_start)) continue;
-
- // The start of this node must extend far enough backward to
- // touch the start of the range.
- if (point_lt(range_start, ts_node_start_point(child))) break;
-
- node = child;
- if (ts_node__is_relevant(node, include_anonymous)) {
- ts_tree_set_cached_parent(self.tree, &child, &last_visible_node);
- last_visible_node = node;
- }
- did_descend = true;
- break;
- }
- }
-
- return last_visible_node;
-}
-
-// TSNode - public
-
-uint32_t ts_node_end_byte(TSNode self) {
- return ts_node_start_byte(self) + ts_subtree_size(ts_node__subtree(self)).bytes;
-}
-
-TSPoint ts_node_end_point(TSNode self) {
- return point_add(ts_node_start_point(self), ts_subtree_size(ts_node__subtree(self)).extent);
-}
-
-TSSymbol ts_node_symbol(TSNode self) {
- TSSymbol symbol = ts_node__alias(&self);
- if (!symbol) symbol = ts_subtree_symbol(ts_node__subtree(self));
- return ts_language_public_symbol(self.tree->language, symbol);
-}
-
-const char *ts_node_type(TSNode self) {
- TSSymbol symbol = ts_node__alias(&self);
- if (!symbol) symbol = ts_subtree_symbol(ts_node__subtree(self));
- return ts_language_symbol_name(self.tree->language, symbol);
-}
-
-char *ts_node_string(TSNode self) {
- return ts_subtree_string(ts_node__subtree(self), self.tree->language, false);
-}
-
-bool ts_node_eq(TSNode self, TSNode other) {
- return self.tree == other.tree && self.id == other.id;
-}
-
-bool ts_node_is_null(TSNode self) {
- return self.id == 0;
-}
-
-bool ts_node_is_extra(TSNode self) {
- return ts_subtree_extra(ts_node__subtree(self));
-}
-
-bool ts_node_is_named(TSNode self) {
- TSSymbol alias = ts_node__alias(&self);
- return alias
- ? ts_language_symbol_metadata(self.tree->language, alias).named
- : ts_subtree_named(ts_node__subtree(self));
-}
-
-bool ts_node_is_missing(TSNode self) {
- return ts_subtree_missing(ts_node__subtree(self));
-}
-
-bool ts_node_has_changes(TSNode self) {
- return ts_subtree_has_changes(ts_node__subtree(self));
-}
-
-bool ts_node_has_error(TSNode self) {
- return ts_subtree_error_cost(ts_node__subtree(self)) > 0;
-}
-
-TSNode ts_node_parent(TSNode self) {
- TSNode node = ts_tree_get_cached_parent(self.tree, &self);
- if (node.id) return node;
-
- node = ts_tree_root_node(self.tree);
- uint32_t end_byte = ts_node_end_byte(self);
- if (node.id == self.id) return ts_node__null();
-
- TSNode last_visible_node = node;
- bool did_descend = true;
- while (did_descend) {
- did_descend = false;
-
- TSNode child;
- NodeChildIterator iterator = ts_node_iterate_children(&node);
- while (ts_node_child_iterator_next(&iterator, &child)) {
- if (
- ts_node_start_byte(child) > ts_node_start_byte(self) ||
- child.id == self.id
- ) break;
- if (iterator.position.bytes >= end_byte) {
- node = child;
- if (ts_node__is_relevant(child, true)) {
- ts_tree_set_cached_parent(self.tree, &node, &last_visible_node);
- last_visible_node = node;
- }
- did_descend = true;
- break;
- }
- }
- }
-
- return last_visible_node;
-}
-
-TSNode ts_node_child(TSNode self, uint32_t child_index) {
- return ts_node__child(self, child_index, true);
-}
-
-TSNode ts_node_named_child(TSNode self, uint32_t child_index) {
- return ts_node__child(self, child_index, false);
-}
-
-TSNode ts_node_child_by_field_id(TSNode self, TSFieldId field_id) {
-recur:
- if (!field_id || ts_node_child_count(self) == 0) return ts_node__null();
-
- const TSFieldMapEntry *field_map, *field_map_end;
- ts_language_field_map(
- self.tree->language,
- ts_node__subtree(self).ptr->production_id,
- &field_map,
- &field_map_end
- );
- if (field_map == field_map_end) return ts_node__null();
-
- // The field mappings are sorted by their field id. Scan all
- // the mappings to find the ones for the given field id.
- while (field_map->field_id < field_id) {
- field_map++;
- if (field_map == field_map_end) return ts_node__null();
- }
- while (field_map_end[-1].field_id > field_id) {
- field_map_end--;
- if (field_map == field_map_end) return ts_node__null();
- }
-
- TSNode child;
- NodeChildIterator iterator = ts_node_iterate_children(&self);
- while (ts_node_child_iterator_next(&iterator, &child)) {
- if (!ts_subtree_extra(ts_node__subtree(child))) {
- uint32_t index = iterator.structural_child_index - 1;
- if (index < field_map->child_index) continue;
-
- // Hidden nodes' fields are "inherited" by their visible parent.
- if (field_map->inherited) {
-
- // If this is the *last* possible child node for this field,
- // then perform a tail call to avoid recursion.
- if (field_map + 1 == field_map_end) {
- self = child;
- goto recur;
- }
-
- // Otherwise, descend into this child, but if it doesn't contain
- // the field, continue searching subsequent children.
- else {
- TSNode result = ts_node_child_by_field_id(child, field_id);
- if (result.id) return result;
- field_map++;
- if (field_map == field_map_end) return ts_node__null();
- }
- }
-
- else if (ts_node__is_relevant(child, true)) {
- return child;
- }
-
- // If the field refers to a hidden node, return its first visible
- // child.
- else {
- return ts_node_child(child, 0);
- }
- }
- }
-
- return ts_node__null();
-}
-
-TSNode ts_node_child_by_field_name(
- TSNode self,
- const char *name,
- uint32_t name_length
-) {
- TSFieldId field_id = ts_language_field_id_for_name(
- self.tree->language,
- name,
- name_length
- );
- return ts_node_child_by_field_id(self, field_id);
-}
-
-uint32_t ts_node_child_count(TSNode self) {
- Subtree tree = ts_node__subtree(self);
- if (ts_subtree_child_count(tree) > 0) {
- return tree.ptr->visible_child_count;
- } else {
- return 0;
- }
-}
-
-uint32_t ts_node_named_child_count(TSNode self) {
- Subtree tree = ts_node__subtree(self);
- if (ts_subtree_child_count(tree) > 0) {
- return tree.ptr->named_child_count;
- } else {
- return 0;
- }
-}
-
-TSNode ts_node_next_sibling(TSNode self) {
- return ts_node__next_sibling(self, true);
-}
-
-TSNode ts_node_next_named_sibling(TSNode self) {
- return ts_node__next_sibling(self, false);
-}
-
-TSNode ts_node_prev_sibling(TSNode self) {
- return ts_node__prev_sibling(self, true);
-}
-
-TSNode ts_node_prev_named_sibling(TSNode self) {
- return ts_node__prev_sibling(self, false);
-}
-
-TSNode ts_node_first_child_for_byte(TSNode self, uint32_t byte) {
- return ts_node__first_child_for_byte(self, byte, true);
-}
-
-TSNode ts_node_first_named_child_for_byte(TSNode self, uint32_t byte) {
- return ts_node__first_child_for_byte(self, byte, false);
-}
-
-TSNode ts_node_descendant_for_byte_range(
- TSNode self,
- uint32_t start,
- uint32_t end
-) {
- return ts_node__descendant_for_byte_range(self, start, end, true);
-}
-
-TSNode ts_node_named_descendant_for_byte_range(
- TSNode self,
- uint32_t start,
- uint32_t end
-) {
- return ts_node__descendant_for_byte_range(self, start, end, false);
-}
-
-TSNode ts_node_descendant_for_point_range(
- TSNode self,
- TSPoint start,
- TSPoint end
-) {
- return ts_node__descendant_for_point_range(self, start, end, true);
-}
-
-TSNode ts_node_named_descendant_for_point_range(
- TSNode self,
- TSPoint start,
- TSPoint end
-) {
- return ts_node__descendant_for_point_range(self, start, end, false);
-}
-
-void ts_node_edit(TSNode *self, const TSInputEdit *edit) {
- uint32_t start_byte = ts_node_start_byte(*self);
- TSPoint start_point = ts_node_start_point(*self);
-
- if (start_byte >= edit->old_end_byte) {
- start_byte = edit->new_end_byte + (start_byte - edit->old_end_byte);
- start_point = point_add(edit->new_end_point, point_sub(start_point, edit->old_end_point));
- } else if (start_byte > edit->start_byte) {
- start_byte = edit->new_end_byte;
- start_point = edit->new_end_point;
- }
-
- self->context[0] = start_byte;
- self->context[1] = start_point.row;
- self->context[2] = start_point.column;
-}