MoinLight

Annotated moinformat/parsers/common.py

121:50aa090efd45
2018-08-01 Paul Boddie Added a convenience function for choices of patterns.
paul@32 1
#!/usr/bin/env python
paul@32 2
paul@32 3
"""
paul@32 4
Moin wiki parsing functionality.
paul@32 5
paul@45 6
Copyright (C) 2017, 2018 Paul Boddie <paul@boddie.org.uk>
paul@32 7
paul@32 8
This program is free software; you can redistribute it and/or modify it under
paul@32 9
the terms of the GNU General Public License as published by the Free Software
paul@32 10
Foundation; either version 3 of the License, or (at your option) any later
paul@32 11
version.
paul@32 12
paul@32 13
This program is distributed in the hope that it will be useful, but WITHOUT
paul@32 14
ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
paul@32 15
FOR A PARTICULAR PURPOSE.  See the GNU General Public License for more
paul@32 16
details.
paul@32 17
paul@32 18
You should have received a copy of the GNU General Public License along with
paul@32 19
this program.  If not, see <http://www.gnu.org/licenses/>.
paul@32 20
"""
paul@32 21
paul@43 22
from collections import defaultdict
paul@83 23
from moinformat.tree.moin import Block, Region, Text
paul@33 24
import re
paul@33 25
paul@33 26
# Pattern management.
paul@33 27
paul@36 28
ws_excl_nl = r"[ \f\r\t\v]"
paul@55 29
quotes = "['" '"]'              # ['"]
paul@55 30
paul@121 31
def choice(l):
paul@121 32
paul@121 33
    "Return a pattern matching a choice of patterns in 'l'."
paul@121 34
paul@121 35
    return "(%s)" % "|".join(l)
paul@121 36
paul@55 37
def excl(s):
paul@55 38
paul@55 39
    "Return a non-matching pattern for 's'."
paul@55 40
paul@55 41
    return "(?!%s)" % s
paul@55 42
paul@55 43
def expect(s):
paul@55 44
paul@55 45
    "Return a pattern expecting 's'."
paul@55 46
paul@55 47
    return "(?=%s)" % s
paul@55 48
paul@55 49
def group(name, s):
paul@55 50
paul@55 51
    "Return a pattern group having 'name' and the pattern string 's'."
paul@55 52
paul@55 53
    return "(?P<%s>%s)" % (name, s)
paul@55 54
paul@55 55
def optional(s):
paul@55 56
paul@55 57
    "Return an optional pattern."
paul@55 58
paul@55 59
    return "(?:%s)?" % s
paul@55 60
paul@55 61
def recur(name):
paul@55 62
paul@55 63
    "Return a test for a recurrence of group 'name'."
paul@55 64
paul@55 65
    return "(?P=%s)" % name
paul@55 66
paul@55 67
def repeat(s, min=None, max=None):
paul@55 68
paul@55 69
    "Return a pattern matching 's' for the given 'min' and 'max' limits."
paul@55 70
paul@55 71
    return "%s{%s,%s}" % (s, min is not None and min or "",
paul@55 72
                             max is not None and max or "")
paul@36 73
paul@99 74
def get_pattern(s):
paul@99 75
paul@99 76
    "Return a compiled regular expression for the given pattern 's'."
paul@99 77
paul@99 78
    return re.compile(s, re.UNICODE | re.MULTILINE)
paul@99 79
paul@33 80
def get_patterns(syntax):
paul@33 81
paul@36 82
    """
paul@36 83
    Define patterns for the regular expressions in the 'syntax' mapping. In each
paul@36 84
    pattern, replace \N with a pattern for matching whitespace excluding
paul@36 85
    newlines.
paul@36 86
    """
paul@33 87
paul@33 88
    patterns = {}
paul@33 89
    for name, value in syntax.items():
paul@36 90
        value = value.replace(r"\N", ws_excl_nl)
paul@55 91
        value = value.replace(r"\Q", quotes)
paul@99 92
        patterns[name] = get_pattern(value)
paul@33 93
    return patterns
paul@33 94
paul@37 95
def get_subset(d, keys):
paul@33 96
paul@37 97
    "Return a subset of 'd' having the given 'keys'."
paul@36 98
paul@37 99
    subset = {}
paul@37 100
    for key in keys:
paul@37 101
        subset[key] = d[key]
paul@37 102
    return subset
paul@36 103
paul@36 104
paul@32 105
paul@32 106
# Tokenising functions.
paul@32 107
paul@32 108
class TokenStream:
paul@32 109
paul@32 110
    "A stream of tokens taken from a string."
paul@32 111
paul@37 112
    def __init__(self, s, pos=0):
paul@32 113
        self.s = s
paul@36 114
        self.pos = pos
paul@45 115
paul@45 116
        # Match details.
paul@45 117
paul@32 118
        self.match = None
paul@45 119
        self.queued = None
paul@45 120
        self.match_start = None
paul@45 121
paul@45 122
        # Pattern name details.
paul@45 123
paul@32 124
        self.matching = None
paul@32 125
paul@32 126
    def rewind(self, length):
paul@32 127
paul@32 128
        "Rewind in the string by 'length'."
paul@32 129
paul@32 130
        self.pos -= min(length, self.pos)
paul@32 131
paul@45 132
    def queue_match(self):
paul@45 133
paul@45 134
        "Rewind in the string to the start of the last match."
paul@45 135
paul@45 136
        self.queued = self.match
paul@45 137
paul@37 138
    def read_until(self, patterns, remaining=True):
paul@32 139
paul@32 140
        """
paul@37 141
        Find the first match for the given 'patterns'. Return the text preceding
paul@37 142
        any match, the remaining text if no match was found, or None if no match
paul@37 143
        was found and 'remaining' is given as a false value.
paul@32 144
        """
paul@32 145
paul@45 146
        if self.queued:
paul@45 147
            self.match = self.queued
paul@45 148
            self.queued = None
paul@45 149
        else:
paul@45 150
            self.match_start = None
paul@45 151
            self.matching = None
paul@32 152
paul@45 153
            # Find the first matching pattern.
paul@32 154
paul@45 155
            for pattern_name, pattern in patterns.items():
paul@45 156
                match = pattern.search(self.s, self.pos)
paul@45 157
                if match:
paul@45 158
                    start, end = match.span()
paul@74 159
                    if self.matching is None or start < self.start:
paul@45 160
                        self.start = start
paul@45 161
                        self.matching = pattern_name
paul@45 162
                        self.match = match
paul@32 163
paul@32 164
        if self.matching is None:
paul@32 165
            if remaining:
paul@32 166
                return self.s[self.pos:]
paul@32 167
            else:
paul@32 168
                return None
paul@32 169
        else:
paul@45 170
            return self.s[self.pos:self.start]
paul@32 171
paul@54 172
    def match_group(self, group=1):
paul@32 173
paul@32 174
        """
paul@32 175
        Return the matched text, updating the position in the stream. If 'group'
paul@32 176
        is specified, the indicated group in a match will be returned.
paul@32 177
        Typically, group 1 should contain all pertinent data, but groups defined
paul@32 178
        within group 1 can provide sections of the data.
paul@32 179
        """
paul@32 180
paul@54 181
        self.update_pos()
paul@54 182
paul@32 183
        if self.match:
paul@32 184
            try:
paul@32 185
                return self.match.group(group)
paul@32 186
            except IndexError:
paul@32 187
                return ""
paul@32 188
        else:
paul@32 189
            return None
paul@32 190
paul@54 191
    def match_groups(self, groups=None):
paul@51 192
paul@54 193
        "Return the match 'groups', or all groups if unspecified."
paul@54 194
paul@54 195
        self.update_pos()
paul@51 196
paul@51 197
        if self.match:
paul@54 198
            if groups is None:
paul@54 199
                return self.match.groups()
paul@54 200
            else:
paul@54 201
                return self.match.groups(groups)
paul@51 202
        else:
paul@51 203
            return []
paul@51 204
paul@54 205
    def update_pos(self):
paul@54 206
paul@54 207
        "Update the position in the stream."
paul@54 208
paul@54 209
        if self.match:
paul@54 210
            _start, self.pos = self.match.span()
paul@54 211
        else:
paul@54 212
            self.pos = len(self.s)
paul@54 213
paul@32 214
paul@32 215
paul@32 216
# Parser abstractions.
paul@32 217
paul@32 218
class ParserBase:
paul@32 219
paul@32 220
    "Common parsing methods."
paul@32 221
paul@37 222
    region_pattern_names = None
paul@37 223
paul@87 224
    def __init__(self, formats=None, root=None):
paul@32 225
paul@32 226
        """
paul@32 227
        Initialise the parser with any given 'formats' mapping from region type
paul@87 228
        names to parser objects. An optional 'root' indicates the document-level
paul@87 229
        parser.
paul@32 230
        """
paul@32 231
paul@32 232
        self.formats = formats
paul@87 233
        self.root = root
paul@37 234
paul@37 235
    def get_parser(self, format_type):
paul@37 236
paul@37 237
        """
paul@37 238
        Return a parser for 'format_type' or None if no suitable parser is found.
paul@37 239
        """
paul@37 240
paul@37 241
        if not self.formats:
paul@37 242
            return None
paul@37 243
paul@37 244
        cls = self.formats.get(format_type)
paul@37 245
        if cls:
paul@87 246
            return cls(self.formats, self.root or self)
paul@37 247
        else:
paul@37 248
            return None
paul@37 249
paul@37 250
    def get_patterns(self, pattern_names):
paul@37 251
paul@37 252
        "Return a mapping of the given 'pattern_names' to patterns."
paul@37 253
paul@37 254
        return get_subset(self.patterns, pattern_names)
paul@32 255
paul@36 256
    def get_items(self, s, pos=0):
paul@32 257
paul@36 258
        "Return a sequence of token items for 's' and 'pos'."
paul@32 259
paul@37 260
        return TokenStream(s, pos)
paul@37 261
paul@37 262
    def set_region(self, items, region):
paul@37 263
paul@37 264
        "Set the 'items' used to populate the given 'region'."
paul@32 265
paul@37 266
        self.items = items
paul@37 267
        self.region = region
paul@37 268
paul@37 269
    def read_until(self, pattern_names, remaining=True):
paul@36 270
paul@37 271
        """
paul@37 272
        Read the next portion of input, matching using 'pattern_names'. Return
paul@37 273
        the text preceding any match, the remaining text if no match was found,
paul@37 274
        or None if no match was found and 'remaining' is given as a false value.
paul@37 275
        """
paul@36 276
paul@37 277
        return self.items.read_until(self.get_patterns(pattern_names))
paul@37 278
paul@54 279
    def match_group(self, group=1):
paul@37 280
paul@37 281
        """
paul@37 282
        Return the group of the matching pattern with the given 'group' number.
paul@37 283
        """
paul@36 284
paul@54 285
        return self.items.match_group(group)
paul@37 286
paul@54 287
    def matching_pattern(self):
paul@36 288
paul@37 289
        "Return the name of the matching pattern."
paul@36 290
paul@37 291
        return self.items.matching
paul@37 292
paul@51 293
    def match_groups(self):
paul@51 294
paul@51 295
        "Return the number of groups in the match."
paul@51 296
paul@51 297
        return self.items.match_groups()
paul@51 298
paul@37 299
    # Parser methods invoked from other objects.
paul@36 300
paul@32 301
    def parse(self, s):
paul@32 302
paul@32 303
        """
paul@32 304
        Parse page text 's'. Pages consist of regions delimited by markers.
paul@32 305
        """
paul@32 306
paul@37 307
        self.items = self.get_items(s)
paul@37 308
        self.region = self.parse_region()
paul@37 309
        return self.region
paul@37 310
paul@37 311
    def parse_region_content(self, items, region):
paul@37 312
paul@37 313
        "Parse the data provided by 'items' to populate a 'region'."
paul@37 314
paul@37 315
        self.set_region(items, region)
paul@32 316
paul@70 317
        # Parse inline and opaque regions.
paul@70 318
paul@70 319
        if not region.transparent:
paul@70 320
            pattern_names = ["regionend"]
paul@70 321
paul@70 322
        # Define a block to hold text.
paul@70 323
paul@70 324
        else:
paul@70 325
            self.new_block(region)
paul@70 326
            pattern_names = self.region_pattern_names
paul@37 327
paul@70 328
        # Start parsing.
paul@70 329
paul@70 330
        if pattern_names:
paul@70 331
            self.parse_region_details(region, pattern_names)
paul@37 332
paul@70 333
        # Reset the type if the region was not inline.
paul@70 334
paul@70 335
        if region.type == "inline":
paul@70 336
            first = region.nodes and region.nodes[0]
paul@70 337
            if first and isinstance(first, Text) and first.multiline():
paul@70 338
                region.type = None
paul@37 339
paul@37 340
    # Top-level parser handler methods.
paul@37 341
paul@52 342
    def parse_region(self, level=0, indent=0, type=None):
paul@32 343
paul@32 344
        """
paul@37 345
        Parse the data to populate a region with the given 'level' at the given
paul@52 346
        'indent' having the given initial 'type'.
paul@32 347
        """
paul@32 348
paul@52 349
        region = Region([], level, indent, type)
paul@32 350
paul@32 351
        # Parse section headers, then parse according to region type.
paul@32 352
paul@37 353
        self.parse_region_header(region)
paul@37 354
        self.parse_region_type(region)
paul@32 355
paul@32 356
        return region
paul@32 357
paul@37 358
    def parse_region_type(self, region):
paul@32 359
paul@32 360
        """
paul@37 361
        Use configured parsers to parse 'region' based on its type.
paul@32 362
        """
paul@32 363
paul@32 364
        # Find an appropriate parser given the type.
paul@32 365
paul@37 366
        parser = self.get_parser(region.type)
paul@70 367
        if not parser:
paul@70 368
            region.transparent = False
paul@70 369
        parser = parser or self.get_parser("moin")
paul@70 370
        parser.parse_region_content(self.items, region)
paul@32 371
paul@37 372
    def parse_region_header(self, region):
paul@32 373
paul@32 374
        """
paul@37 375
        Parse the region header, setting it on the 'region' object.
paul@32 376
        """
paul@32 377
paul@37 378
        if self.read_until(["header"], False) == "": # None means no header
paul@55 379
            region.type = self.match_group("args")
paul@32 380
paul@32 381
    # Parsing utilities.
paul@32 382
paul@43 383
    def parse_region_details(self, region, pattern_names, strict=False):
paul@32 384
paul@43 385
        """
paul@43 386
        Search 'region' using the 'pattern_names'. If 'strict' is set to a true
paul@43 387
        value, forbid the accumulation of additional textual padding.
paul@43 388
        """
paul@32 389
paul@32 390
        try:
paul@32 391
            while True:
paul@32 392
paul@32 393
                # Obtain text before any marker or the end of the input.
paul@32 394
paul@37 395
                preceding = self.read_until(pattern_names)
paul@32 396
                if preceding:
paul@43 397
                    if not strict:
paul@43 398
                        region.append_inline(Text(preceding))
paul@43 399
                    else:
paul@43 400
                        break
paul@32 401
paul@32 402
                # End of input.
paul@32 403
paul@54 404
                if not self.matching_pattern():
paul@32 405
                    break
paul@32 406
paul@32 407
                # Obtain any feature.
paul@32 408
paul@67 409
                feature = self.match_group("feature") or self.match_group()
paul@54 410
                handler = self.handlers.get(self.matching_pattern())
paul@32 411
paul@32 412
                # Handle each feature or add text to the region.
paul@32 413
paul@32 414
                if handler:
paul@37 415
                    handler(self, region)
paul@43 416
                elif not strict:
paul@43 417
                    region.append_inline(Text(feature))
paul@32 418
                else:
paul@43 419
                    break
paul@32 420
paul@32 421
        except StopIteration:
paul@32 422
            pass
paul@32 423
paul@32 424
        region.normalise()
paul@32 425
paul@43 426
    def add_node(self, region, node):
paul@43 427
paul@43 428
        "Add to 'region' the given 'node'."
paul@43 429
paul@43 430
        region.add(node)
paul@43 431
paul@43 432
    def append_node(self, region, node):
paul@43 433
paul@43 434
        "Append to 'region' the given 'node'."
paul@43 435
paul@43 436
        region.append(node)
paul@43 437
paul@37 438
    def end_region(self, region):
paul@32 439
paul@32 440
        "End the parsing of 'region', breaking out of the parsing loop."
paul@32 441
paul@32 442
        raise StopIteration
paul@32 443
paul@45 444
    def queue_match(self):
paul@43 445
paul@45 446
        "Queue the current match."
paul@43 447
paul@45 448
        self.items.queue_match()
paul@43 449
paul@43 450
    def new_block(self, region):
paul@43 451
paul@43 452
        "Start a new block in 'region'."
paul@43 453
paul@43 454
        self.add_node(region, Block([]))
paul@43 455
paul@98 456
    # Common handler methods.
paul@98 457
paul@98 458
    def parse_region_end(self, node):
paul@98 459
paul@98 460
        "Handle the end of a region occurring within 'node'."
paul@98 461
paul@98 462
        level = self.match_group("level")
paul@98 463
        feature = self.match_group("feature")
paul@98 464
        self.region.extra = self.match_group("extra")
paul@98 465
paul@98 466
        if self.region.have_end(level):
paul@98 467
            raise StopIteration
paul@98 468
        else:
paul@98 469
            node.append_inline(Text(feature))
paul@98 470
paul@32 471
# vim: tabstop=4 expandtab shiftwidth=4