Skip to main content

oak_tcl/builder/
mod.rs

1use crate::{ast::*, language::TclLanguage, lexer::TclLexer, parser::TclParser};
2use oak_core::{Builder, BuilderCache, GreenNode, Lexer, OakDiagnostics, OakError, Parser, RedNode, SourceText, TextEdit, source::Source};
3
4/// Tcl 语言的 AST 构建器
5#[derive(Clone)]
6pub struct TclBuilder<'config> {
7    /// 语言配置
8    config: &'config TclLanguage,
9}
10
11impl<'config> TclBuilder<'config> {
12    /// 创建新的 Tcl 构建器
13    pub fn new(config: &'config TclLanguage) -> Self {
14        Self { config }
15    }
16}
17
18impl<'config> Builder<TclLanguage> for TclBuilder<'config> {
19    fn build<'a, S: Source + ?Sized>(&self, source: &'a S, edits: &[TextEdit], _cache: &'a mut impl BuilderCache<TclLanguage>) -> oak_core::builder::BuildOutput<TclLanguage> {
20        let parser = TclParser::new(self.config);
21        let lexer = TclLexer::new(&self.config);
22
23        let mut cache = oak_core::parser::session::ParseSession::<TclLanguage>::default();
24        lexer.lex(source, edits, &mut cache);
25        let parse_result = parser.parse(source, edits, &mut cache);
26
27        match parse_result.result {
28            Ok(green_tree) => {
29                let source_text = SourceText::new(source.get_text_in((0..source.length()).into()).into_owned());
30                match self.build_root(green_tree.clone(), &source_text) {
31                    Ok(ast_root) => OakDiagnostics { result: Ok(ast_root), diagnostics: parse_result.diagnostics },
32                    Err(build_error) => {
33                        let mut diagnostics = parse_result.diagnostics;
34                        diagnostics.push(build_error.clone());
35                        OakDiagnostics { result: Err(build_error), diagnostics }
36                    }
37                }
38            }
39            Err(parse_error) => OakDiagnostics { result: Err(parse_error), diagnostics: parse_result.diagnostics },
40        }
41    }
42}
43
44impl<'config> TclBuilder<'config> {
45    /// 构建根节点
46    pub(crate) fn build_root(&self, green_tree: GreenNode<TclLanguage>, _source: &SourceText) -> Result<TclRoot, OakError> {
47        let red_root = RedNode::new(&green_tree, 0);
48        let span = red_root.span();
49        let items = Vec::new();
50
51        // TODO: 遍历 red_root.children() 并构建 TclItem
52
53        Ok(TclRoot { span: span.into(), items })
54    }
55}