syntaxtree.py 22.5 KB
Newer Older
1
"""syntaxtree.py - syntax tree classes for DHParser
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18

Copyright 2016  by Eckhart Arnold (arnold@badw.de)
                Bavarian Academy of Sciences an Humanities (badw.de)

Licensed under the Apache License, Version 2.0 (the "License");
you may not use this file except in compliance with the License.
You may obtain a copy of the License at

    http://www.apache.org/licenses/LICENSE-2.0

Unless required by applicable law or agreed to in writing, software
distributed under the License is distributed on an "AS IS" BASIS,
WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or
implied.  See the License for the specific language governing
permissions and limitations under the License.
"""

Eckhart Arnold's avatar
Eckhart Arnold committed
19
import collections.abc
20
import copy
21
import os
22
23
from functools import partial

24
25
26
27
try:
    import regex as re
except ImportError:
    import re
28
29
try:
    from typing import AbstractSet, Any, ByteString, Callable, cast, Container, Dict, \
30
        Iterator, Iterable, List, NamedTuple, Sequence, Union, Text, Tuple
31
32
except ImportError:
    from .typing34 import AbstractSet, Any, ByteString, Callable, cast, Container, Dict, \
33
        Iterator, Iterable, List, NamedTuple, Sequence, Union, Text, Tuple
34

35
from DHParser.toolkit import is_logging, log_dir, StringView, linebreaks, line_col, identity
36

37
__all__ = ('WHITESPACE_PTYPE',
38
           'MockParser',
39
           'TOKEN_PTYPE',
Eckhart Arnold's avatar
Eckhart Arnold committed
40
           'ZOMBIE_PARSER',
Eckhart Arnold's avatar
Eckhart Arnold committed
41
           'ParserBase',
Eckhart Arnold's avatar
Eckhart Arnold committed
42
           'Error',
43
44
           'is_warning',
           'is_error',
45
           'has_errors',
Eckhart Arnold's avatar
Eckhart Arnold committed
46
           'Node',
47
48
           'mock_syntax_tree',
           'TransformationFunc')
Eckhart Arnold's avatar
Eckhart Arnold committed
49
50


Eckhart Arnold's avatar
Eckhart Arnold committed
51
52
53
54
55
56
57
58
59
60
class ParserBase:
    """
    ParserBase is the base class for all real and mock parser classes.
    It is defined here, because Node objects require a parser object
    for instantiation.
    """
    def __init__(self, name=''):  # , pbases=frozenset()):
        self.name = name  # type: str
        self._ptype = ':' + self.__class__.__name__  # type: str

61
62
63
    def __repr__(self):
        return self.name + self.ptype

Eckhart Arnold's avatar
Eckhart Arnold committed
64
    def __str__(self):
65
        return self.name + (' = ' if self.name else '') + repr(self)
Eckhart Arnold's avatar
Eckhart Arnold committed
66
67
68
69
70

    @property
    def ptype(self) -> str:
        return self._ptype

71
72
73
    @property
    def repr(self) -> str:
        return self.name if self.name else repr(self)
Eckhart Arnold's avatar
Eckhart Arnold committed
74

75

76
77
78
79
WHITESPACE_PTYPE = ':Whitespace'
TOKEN_PTYPE = ':Token'


Eckhart Arnold's avatar
Eckhart Arnold committed
80
class MockParser(ParserBase):
81
82
    """
    MockParser objects can be used to reconstruct syntax trees from a
Eckhart Arnold's avatar
Eckhart Arnold committed
83
84
    serialized form like S-expressions or XML. Mock objects can mimic
    different parser types by assigning them a ptype on initialization.
85
86
87
88
89
    
    Mock objects should not be used for anything other than 
    syntax tree (re-)construction. In all other cases where a parser
    object substitute is needed, chose the singleton ZOMBIE_PARSER.
    """
Eckhart Arnold's avatar
Eckhart Arnold committed
90
    def __init__(self, name='', ptype=''):  # , pbases=frozenset()):
91
        assert not ptype or ptype[0] == ':'
Eckhart Arnold's avatar
Eckhart Arnold committed
92
        super(MockParser, self).__init__(name)
93
        self.name = name
Eckhart Arnold's avatar
Eckhart Arnold committed
94
        self._ptype = ptype or ':' + self.__class__.__name__
95
96
97


class ZombieParser(MockParser):
98
99
100
101
102
103
104
105
106
107
108
109
    """
    Serves as a substitute for a Parser instance.

    ``ZombieParser`` is the class of the singelton object
    ``ZOMBIE_PARSER``. The  ``ZOMBIE_PARSER`` has a name and can be
    called, but it never matches. It serves as a substitute where only
    these (or one of these properties) is needed, but no real Parser-
    object is instantiated.
    """
    alive = False

    def __init__(self):
110
        super(ZombieParser, self).__init__("__ZOMBIE__")
111
112
113
114
        assert not self.__class__.alive, "There can be only one!"
        assert self.__class__ == ZombieParser, "No derivatives, please!"
        self.__class__.alive = True

Eckhart Arnold's avatar
Eckhart Arnold committed
115
116
117
118
119
120
    def __copy__(self):
        return self

    def __deepcopy__(self, memo):
        return self

121
122
123
124
    def __call__(self, text):
        """Better call Saul ;-)"""
        return None, text

125
126
127
128

ZOMBIE_PARSER = ZombieParser()


129
class Error:
130
    __slots__ = ['message', 'level', 'code', 'pos', 'line', 'column']
131

132
133
134
    WARNING   = 1
    ERROR     = 1000
    HIGHEST   = ERROR
135

136
    def __init__(self, message: str, level: int=ERROR, code: str=''):
137
        self.message = message
138
139
        assert level >= 0
        self.level = level or Error.ERROR
140
141
142
143
144
145
146
        self.code = code
        self.pos = -1
        self.line = -1
        self.column = -1

    def __str__(self):
        return ("line: %3i, column: %2i" % (self.line, self.column)
147
                + ", %s: %s" % (self.level_str, self.message))
148
149

    @staticmethod
150
    def from_template(template: str, level: int=ERROR, content: Union[tuple, dict]=()):
151
        if isinstance(content, tuple):
152
            return Error((template % content) if content else template, level, template)
153
        else:
154
155
156
157
158
159
160
            return Error(template.format(**content), level, template)

    @property
    def level_str(self):
        return "warning" if is_warning(self.level) else "error"


161
def is_warning(level: int) -> bool:
162
163
164
    return level < Error.ERROR


165
def is_error(level:  int) -> bool:
166
    return level >= Error.ERROR
167

168

169
170
171
172
173
174
175
176
177
178
179
180
def has_errors(messages: Iterable[Error], level: int=Error.ERROR) -> bool:
    """
    Returns True, if at least one entry in `messages` has at
    least the given error `level`.
    """
    for err_obj in messages:
        if err_obj.level >= level:
            return True
    return False



181
ChildrenType = Tuple['Node', ...]
182
183
StrictResultType = Union[ChildrenType, StringView, str]
ResultType = Union[ChildrenType, 'Node', StringView, str, None]
184
185


Eckhart Arnold's avatar
Eckhart Arnold committed
186
187
def flatten_sxpr(sxpr: str) -> str:
    """Returns S-expression `sxpr` as a one-liner without unnecessary
Eckhart Arnold's avatar
Eckhart Arnold committed
188
189
190
    whitespace.

    Example:
Eckhart Arnold's avatar
Eckhart Arnold committed
191
    >>> flatten_sxpr('(a\\n    (b\\n        c\\n    )\\n)\\n')
Eckhart Arnold's avatar
Eckhart Arnold committed
192
193
194
195
196
    '(a (b c))'
    """
    return re.sub('\s(?=\))', '', re.sub('\s+', ' ', sxpr)).strip()


Eckhart Arnold's avatar
Eckhart Arnold committed
197
class Node(collections.abc.Sized):
198
199
200
201
202
203
204
205
206
207
208
    """
    Represents a node in the concrete or abstract syntax tree.

    Attributes:
        tag_name (str):  The name of the node, which is either its
            parser's name or, if that is empty, the parser's class name
        result (str or tuple):  The result of the parser which
            generated this node, which can be either a string or a
            tuple of child nodes.
        children (tuple):  The tuple of child nodes or an empty tuple
            if there are no child nodes. READ ONLY!
209
210
211
212
213
214
        parser (Parser):  The parser which generated this node. 
            WARNING: In case you use mock syntax trees for testing or
            parser replacement during the AST-transformation: DO NOT
            rely on this being a real parser object in any phase after 
            parsing (i.e. AST-transformation and compiling), for 
            example by calling ``isinstance(node.parer, ...)``.
215
216
        errors (list):  A list of parser- or compiler-errors:
            tuple(position, string) attached to this node
217
218
219
        error_flag (int):  0 if no error occurred in either the node
            itself or any of its descendants. Otherwise contains the
            highest warning or error level or all errors that occurred.
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
        len (int):  The full length of the node's string result if the
            node is a leaf node or, otherwise, the concatenated string
            result's of its descendants. The figure always represents
            the length before AST-transformation ans will never change
            through AST-transformation. READ ONLY!
        pos (int):  the position of the node within the parsed text.

            The value of ``pos`` is -1 meaning invalid by default. 
            Setting this value will set the positions of all child
            nodes relative to this value.  

            To set the pos values of all nodes in a syntax tree, the
            pos value of the root node should be set to 0 right 
            after parsing.

            Other than that, this value should be considered READ ONLY. 
            At any rate, it should only be reassigned only during
            parsing stage and never during or after the
            AST-transformation.
    """
240

241
242
    __slots__ = ['_result', 'children', '_errors', '_len', '_pos', 'parser', 'error_flag']

243

Eckhart Arnold's avatar
Eckhart Arnold committed
244
    def __init__(self, parser, result: ResultType) -> None:
245
246
247
        """Initializes the ``Node``-object with the ``Parser``-Instance
        that generated the node and the parser's result.
        """
Eckhart Arnold's avatar
Eckhart Arnold committed
248
        # self._result = ''  # type: StrictResultType
249
        # self.children = ()  # type: ChildrenType
250
        self.error_flag = 0   # type: bool
251
        self._errors = []  # type: List[Error]
252
        self.result = result
Eckhart Arnold's avatar
Eckhart Arnold committed
253
        self._len = len(self._result) if not self.children else \
254
            sum(child._len for child in self.children)  # type: int
Eckhart Arnold's avatar
Eckhart Arnold committed
255
        # self.pos: int  = 0  # continuous updating of pos values wastes a lot of time
256
        self._pos = -1  # type: int
257
258
        self.parser = parser or ZOMBIE_PARSER

Eckhart Arnold's avatar
Eckhart Arnold committed
259

260
261
    def __str__(self):
        if self.children:
262
            return "".join(str(child) for child in self.children)
263
264
        return str(self.result)

Eckhart Arnold's avatar
Eckhart Arnold committed
265

266
267
268
269
270
271
    def __repr__(self):
        mpargs = {'name': self.parser.name, 'ptype': self.parser.ptype}
        parg = "MockParser({name}, {ptype})".format(**mpargs)
        rarg = str(self) if not self.children else \
               "(" + ", ".join(repr(child) for child in self.children) + ")"
        return "Node(%s, %s)" % (parg, rarg)
272

Eckhart Arnold's avatar
Eckhart Arnold committed
273

274
275
276
277
278
279
280
281
282
    def __len__(self):
        return self._len


    def __bool__(self):
        # A node that is not None is always True, even if it's empty
        return True


283
    def __eq__(self, other):
284
285
        # return str(self.parser) == str(other.parser) and self.result == other.result
        return self.tag_name == other.tag_name and self.result == other.result
286

Eckhart Arnold's avatar
Eckhart Arnold committed
287

288
    def __hash__(self):
289
        return hash(self.tag_name)
290

Eckhart Arnold's avatar
Eckhart Arnold committed
291

292
293
294
295
296
297
    def __deepcopy__(self, memodict={}):
        result = copy.deepcopy(self.result)
        other = Node(self.parser, result)
        other._pos = self._pos
        return other

Eckhart Arnold's avatar
Eckhart Arnold committed
298

299
    @property   # this needs to be a (dynamic) property, in case sef.parser gets updated
300
    def tag_name(self) -> str:
301
        return self.parser.name or self.parser.ptype
302

Eckhart Arnold's avatar
Eckhart Arnold committed
303

304
    @property
Eckhart Arnold's avatar
Eckhart Arnold committed
305
    def result(self) -> StrictResultType:
306
307
308
        return self._result

    @result.setter
Eckhart Arnold's avatar
Eckhart Arnold committed
309
    def result(self, result: ResultType):
Eckhart Arnold's avatar
Eckhart Arnold committed
310
        # # made obsolete by static type checking with mypy
311
312
313
        # assert ((isinstance(result, tuple) and all(isinstance(child, Node) for child in result))
        #         or isinstance(result, Node)
        #         or isinstance(result, str)), str(result)
Eckhart Arnold's avatar
Eckhart Arnold committed
314
315
        # Possible optimization: Do not allow single nodes as argument:
        # assert not isinstance(result, Node)
316
        self._result = (result,) if isinstance(result, Node) else str(result) \
317
            if isinstance(result, StringView) else result or ''  # type: StrictResultType
318
        self.children = cast(ChildrenType, self._result) \
Eckhart Arnold's avatar
Eckhart Arnold committed
319
            if isinstance(self._result, tuple) else cast(ChildrenType, ())  # type: ChildrenType
320
321
322
        if self.children:
            self.error_flag = max(self.error_flag,
                                  max(child.error_flag for child in self.children))  # type: bool
323
324

    @property
325
    def pos(self) -> int:
326
327
328
329
        assert self._pos >= 0, "position value not initialized!"
        return self._pos

    @pos.setter
330
    def pos(self, pos: int):
331
332
        self._pos = pos
        offset = 0
333
        # recursively adjust pos-values of all children
334
335
        for child in self.children:
            child.pos = pos + offset
336
            offset += len(child)
337
338
339
        # add pos-values to Error-objects
        for err in self._errors:
            err.pos = pos
340

Eckhart Arnold's avatar
Eckhart Arnold committed
341

342
    @property
343
    def errors(self) -> List[Error]:
344
345
        return self._errors.copy()

346

347
348
349
350
351
    # def add_error(self, error_str: str) -> 'Node':
    #     assert isinstance(error_str, str)
    #     self._errors.append(error_str)
    #     self.error_flag = True
    #     return self
Eckhart Arnold's avatar
Eckhart Arnold committed
352

353
354
355

    def add_error(self: 'Node',
                  template: Union[str, Error],
356
                  level: int=0,
357
358
                  content: Union[tuple, dict]=()) -> 'Node':
        if isinstance(template, Error):
359
            assert not (bool(level) or bool(content))
360
361
            self._errors.append(template)
        else:
362
363
            self._errors.append(Error.from_template(template, level, content))
        self.error_flag = max(self.error_flag, self._errors[-1].level)
Eckhart Arnold's avatar
Eckhart Arnold committed
364
365
        return self

Eckhart Arnold's avatar
Eckhart Arnold committed
366

367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
    def _finalize_errors(self, lbreaks: List[int]):
        if self.error_flag:
            for err in self._errors:
                assert err.pos >= 0
                err.line, err.column = line_col(lbreaks, err.pos)
            for child in self.children:
                child._finalize_errors(lbreaks)


    def finalize_errors(self, source_text: Union[StringView, str]):
        """Recursively adds line- and column-numbers to all error objects.
        """
        if self.error_flag:
            lbreaks = linebreaks(source_text)
            self._finalize_errors(lbreaks)


Eckhart Arnold's avatar
Eckhart Arnold committed
384
385
386
387
388
389
390
391
392
    def collect_errors(self, clear_errors=False) -> List[Error]:
        """
        Returns all errors of this node or any child node in the form
        of a set of tuples (position, error_message), where position
        is always relative to this node.
        """
        errors = self.errors
        if clear_errors:
            self._errors = []
393
            self.error_flag = 0
Eckhart Arnold's avatar
Eckhart Arnold committed
394
395
396
397
        if self.children:
            for child in self.children:
                errors.extend(child.collect_errors(clear_errors))
        return errors
398

Eckhart Arnold's avatar
Eckhart Arnold committed
399

400
    def _tree_repr(self, tab, openF, closeF, dataF=identity, density=0) -> str:
401
402
403
404
405
406
407
408
        """
        Generates a tree representation of this node and its children
        in string from.

        The kind ot tree-representation that is determined by several
        function parameters. This could be an XML-representation or a
        lisp-like S-expression.

409
        Args:
410
411
412
413
414
415
416
417
418
419
420
421
422
423
424
425
            tab (str):  The indentation string, e.g. '\t' or '    '
            openF:  (Node->str) A function that returns an opening
                string (e.g. an XML-tag_name) for a given node
            closeF:  (Node->str) A function that returns a closeF
                string (e.g. an XML-tag_name) for a given node.
            dataF:  (str->str) A function that filters the data string
                before printing, e.g. to add quotation marks

        Returns (str):
            A string that contains a (serialized) tree representation
            of the node and its children.
        """
        head = openF(self)
        tail = closeF(self)

        if not self.result:
426
            return head.rstrip() + tail.lstrip()
427

428
        D = None if density & 2 else ''
429
430
431

        if self.children:
            content = []
432
            for child in self.children:
433
                subtree = child._tree_repr(tab, openF, closeF, dataF, density).split('\n')
434
                content.append('\n'.join((tab + s) for s in subtree))
435
            return head + '\n'.join(content) + tail.lstrip(D)
436

437
        res = cast(str, self.result)  # safe, because if there are no children, result is a string
438
439
440
441
        if density & 1 and res.find('\n') < 0:  # and head[0] == "<":
            # except for XML, add a gap between opening statement and content
            gap = ' ' if head.rstrip()[-1] != '>' else ''
            return head.rstrip() + gap + dataF(self.result) + tail.lstrip()
442
        else:
443
            return head + '\n'.join([tab + dataF(s) for s in res.split('\n')]) + tail.lstrip(D)
444

Eckhart Arnold's avatar
Eckhart Arnold committed
445

446
    def as_sxpr(self, src: str=None, compact: bool=False) -> str:
447
448
449
        """
        Returns content as S-expression, i.e. in lisp-like form.

450
        Args:
451
452
453
            src:  The source text or `None`. In case the source text is
                given the position of the element in the text will be
                reported as line and column.
Eckhart Arnold's avatar
Eckhart Arnold committed
454
455
456
            compact:  If True a compact representation is returned where
                brackets are ommited and only the indentation indicates the
                tree structure.
457
458
        """

459
460
        lB, rB, D = ('', '', 1) if compact else ('(', '\n)', 0)

461
        def opening(node) -> str:
462
            s = lB + node.tag_name
463
464
            # s += " '(pos %i)" % node.pos
            if src:
Eckhart Arnold's avatar
Eckhart Arnold committed
465
                s += " '(pos %i " % node.pos + " %i %i)" % line_col(src, node.pos)
466
467
468
            if node.errors:
                s += " '(err '(%s))" % ' '.join(str(err).replace('"', r'\"')
                                                for err in node.errors)
469
            return s + '\n'
470
471
472
473
474
475

        def pretty(s):
            return '"%s"' % s if s.find('"') < 0 \
                else "'%s'" % s if s.find("'") < 0 \
                else '"%s"' % s.replace('"', r'\"')

476
        return self._tree_repr('    ', opening, lambda node: rB, pretty, density=D)
477

Eckhart Arnold's avatar
Eckhart Arnold committed
478

479
    def as_xml(self, src: str=None) -> str:
480
481
482
        """
        Returns content as XML-tree.

483
        Args:
484
485
486
487
488
            src:  The source text or `None`. In case the source text is
                given the position will also be reported as line and
                column.
        """

489
        def opening(node) -> str:
490
491
492
493
494
495
            s = '<' + node.tag_name
            # s += ' pos="%i"' % node.pos
            if src:
                s += ' line="%i" col="%i"' % line_col(src, node.pos)
            if node.errors:
                s += ' err="%s"' % ''.join(str(err).replace('"', r'\"') for err in node.errors)
496
            return s + ">\n"
497
498

        def closing(node):
499
            return '\n</' + node.tag_name + '>'
500

501
        return self._tree_repr('    ', opening, closing, density=1)
502

Eckhart Arnold's avatar
Eckhart Arnold committed
503

Eckhart Arnold's avatar
Eckhart Arnold committed
504
505
506
    def structure(self) -> str:
        """Return structure (and content) as S-expression on a single line
        without any line breaks."""
Eckhart Arnold's avatar
Eckhart Arnold committed
507
508
        return flatten_sxpr(self.as_sxpr())

509

Eckhart Arnold's avatar
Eckhart Arnold committed
510
    def content(self) -> str:
511
        """
Eckhart Arnold's avatar
Eckhart Arnold committed
512
513
        Returns content as string, inserting error messages where
        errors occurred.
514
        """
Eckhart Arnold's avatar
Eckhart Arnold committed
515
516
517
518
        s = "".join(child.content() for child in self.children) if self.children \
            else str(self.result)
        return (
        ' <<< Error on "%s" | %s >>> ' % (s, '; '.join(self._errors))) if self._errors else s
519

Eckhart Arnold's avatar
Eckhart Arnold committed
520

521
    def find(self, match_function: Callable) -> Iterator['Node']:
522
523
524
525
526
527
528
529
530
531
532
533
534
535
536
537
538
539
540
541
        """Finds nodes in the tree that match a specific criterion.
        
        ``find`` is a generator that yields all nodes for which the
        given ``match_function`` evaluates to True. The tree is 
        traversed pre-order.
        
        Args:
            match_function (function): A function  that takes as Node
                object as argument and returns True or False
        Yields:
            Node: all nodes of the tree for which 
            ``match_function(node)`` returns True
        """
        if match_function(self):
            yield self
        else:
            for child in self.children:
                for nd in child.find(match_function):
                    yield nd

Eckhart Arnold's avatar
Eckhart Arnold committed
542

543
544
545
546
547
548
549
550
551
552
553
554
555
556
557
558
559
    # def range(self, match_first, match_last):
    #     """Iterates over the range of nodes, starting from the first
    #     node for which ``match_first`` becomes True until the first node
    #     after this one for which ``match_last`` becomes true or until
    #     the end if it never does.
    #
    #     Args:
    #         match_first (function): A function  that takes as Node
    #             object as argument and returns True or False
    #         match_last (function): A function  that takes as Node
    #             object as argument and returns True or False
    #     Yields:
    #         Node: all nodes of the tree for which
    #         ``match_function(node)`` returns True
    #     """


560
561
562
563
564
565
566
567
568
569
570
571
572
573
574
575
576
577
578
579
580
581
    # def navigate(self, path):
    #     """Yields the results of all descendant elements matched by
    #     ``path``, e.g.
    #     'd/s' yields 'l' from (d (s l)(e (r x1) (r x2))
    #     'e/r' yields 'x1', then 'x2'
    #     'e'   yields (r x1)(r x2)
    #
    #     Args:
    #         path (str):  The path of the object, e.g. 'a/b/c'. The
    #             components of ``path`` can be regular expressions
    #
    #     Returns:
    #         The object at the path, either a string or a Node or
    #         ``None``, if the path did not match.
    #     """
    #     def nav(node, pl):
    #         if pl:
    #             return itertools.chain(nav(child, pl[1:]) for child in node.children
    #                                    if re.match(pl[0], child.tag_name))
    #         else:
    #             return self.result,
    #     return nav(path.split('/'))
582

Eckhart Arnold's avatar
Eckhart Arnold committed
583

584
585
586
587
588
    def tree_size(self) -> int:
        """Recursively counts the number of nodes in the tree including the root node."""
        return sum(child.tree_size() for child in self.children) + 1


Eckhart Arnold's avatar
Eckhart Arnold committed
589
    def log(self, log_file_name):
590
        if is_logging():
Eckhart Arnold's avatar
Eckhart Arnold committed
591
592
593
594
            path = os.path.join(log_dir(), log_file_name)
            if os.path.exists(path):
                print('WARNING: Log-file "%s" already exists and will be overwritten!' % path)
            with open(path, "w", encoding="utf-8") as f:
595
                f.write(self.as_sxpr())
Eckhart Arnold's avatar
Eckhart Arnold committed
596

597

598
def mock_syntax_tree(sxpr):
599
600
601
602
603
604
605
606
607
608
609
610
611
612
613
614
615
616
617
618
619
620
621
622
    """
    Generates a tree of nodes from an S-expression.

    Example:
    >>> mock_syntax_tree("(a (b c))").as_sxpr()
    '(a\\n    (b\\n        "c"\\n    )\\n)'
    """

    def next_block(s):
        s = s.strip()
        while s[0] != ')':
            if s[0] != '(': raise ValueError('"(" expected, not ' + s[:10])
            # assert s[0] == '(', s
            level = 1
            i = 1
            while level > 0:
                if s[i] == '(':
                    level += 1
                elif s[i] == ')':
                    level -= 1
                i += 1
            yield s[:i]
            s = s[i:].strip()

623
624
625
626
627
628
629
630
631
    sxpr = sxpr.strip()
    if sxpr[0] != '(': raise ValueError('"(" expected, not ' + sxpr[:10])
    # assert sxpr[0] == '(', sxpr
    sxpr = sxpr[1:].strip()
    m = re.match('[\w:]+', sxpr)
    name, class_name = (sxpr[:m.end()].split(':') + [''])[:2]
    sxpr = sxpr[m.end():].strip()
    if sxpr[0] == '(':
        result = tuple(mock_syntax_tree(block) for block in next_block(sxpr))
632
633
    else:
        lines = []
634
        while sxpr and sxpr[0] != ')':
635
            for qm in ['"""', "'''", '"', "'"]:
636
                m = re.match(qm + r'.*?' + qm, sxpr, re.DOTALL)
637
638
                if m:
                    i = len(qm)
639
640
                    lines.append(sxpr[i:m.end() - i])
                    sxpr = sxpr[m.end():].strip()
641
642
                    break
            else:
643
644
645
                m = re.match(r'(?:(?!\)).)*', sxpr, re.DOTALL)
                lines.append(sxpr[:m.end()])
                sxpr = sxpr[m.end():]
646
647
648
649
        result = "\n".join(lines)
    return Node(MockParser(name, ':' + class_name), result)


650
TransformationFunc = Union[Callable[[Node], Any], partial]
651

652
653
654
655
656

# if __name__ == "__main__":
#     st = mock_syntax_tree("(alpha (beta (gamma i\nj\nk) (delta y)) (epsilon z))")
#     print(st.as_sxpr())
#     print(st.as_xml())