Lichen

Annotated deducer.py

81:1b764ef8a184
2016-10-06 Paul Boddie Added an origin parent retrieval method, also fixing the ancestors method.
paul@44 1
#!/usr/bin/env python
paul@44 2
paul@44 3
"""
paul@44 4
Deduce types for usage observations.
paul@44 5
paul@44 6
Copyright (C) 2014, 2015, 2016 Paul Boddie <paul@boddie.org.uk>
paul@44 7
paul@44 8
This program is free software; you can redistribute it and/or modify it under
paul@44 9
the terms of the GNU General Public License as published by the Free Software
paul@44 10
Foundation; either version 3 of the License, or (at your option) any later
paul@44 11
version.
paul@44 12
paul@44 13
This program is distributed in the hope that it will be useful, but WITHOUT
paul@44 14
ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
paul@44 15
FOR A PARTICULAR PURPOSE.  See the GNU General Public License for more
paul@44 16
details.
paul@44 17
paul@44 18
You should have received a copy of the GNU General Public License along with
paul@44 19
this program.  If not, see <http://www.gnu.org/licenses/>.
paul@44 20
"""
paul@44 21
paul@65 22
from common import first, get_attrname_from_location, get_attrnames, \
paul@79 23
                   get_name_path, init_item, make_key, sorted_output, \
paul@44 24
                   CommonOutput
paul@44 25
from encoders import encode_attrnames, encode_access_location, \
paul@56 26
                     encode_constrained, encode_location, encode_usage, \
paul@67 27
                     get_kinds, test_for_kinds, test_for_type
paul@71 28
from errors import DeduceError
paul@44 29
from os.path import join
paul@57 30
from referencing import combine_types, is_single_class_type, separate_types, \
paul@57 31
                        Reference
paul@44 32
paul@44 33
class Deducer(CommonOutput):
paul@44 34
paul@44 35
    "Deduce types in a program."
paul@44 36
paul@44 37
    def __init__(self, importer, output):
paul@44 38
paul@44 39
        """
paul@44 40
        Initialise an instance using the given 'importer' that will perform
paul@44 41
        deductions on the program information, writing the results to the given
paul@44 42
        'output' directory.
paul@44 43
        """
paul@44 44
paul@44 45
        self.importer = importer
paul@44 46
        self.output = output
paul@44 47
paul@44 48
        # Descendants of classes.
paul@44 49
paul@44 50
        self.descendants = {}
paul@44 51
        self.init_descendants()
paul@44 52
        self.init_special_attributes()
paul@44 53
paul@44 54
        # Map locations to usage in order to determine specific types.
paul@44 55
paul@44 56
        self.location_index = {}
paul@44 57
paul@44 58
        # Map access locations to definition locations.
paul@44 59
paul@44 60
        self.access_index = {}
paul@44 61
paul@44 62
        # Map aliases to accesses that define them.
paul@44 63
paul@44 64
        self.alias_index = {}
paul@44 65
paul@64 66
        # Map constant accesses to redefined accesses.
paul@64 67
paul@64 68
        self.const_accesses = {}
paul@67 69
        self.const_accesses_rev = {}
paul@64 70
paul@44 71
        # Map usage observations to assigned attributes.
paul@44 72
paul@44 73
        self.assigned_attrs = {}
paul@44 74
paul@44 75
        # Map usage observations to objects.
paul@44 76
paul@44 77
        self.attr_class_types = {}
paul@44 78
        self.attr_instance_types = {}
paul@44 79
        self.attr_module_types = {}
paul@44 80
paul@44 81
        # Modified attributes from usage observations.
paul@44 82
paul@44 83
        self.modified_attributes = {}
paul@44 84
paul@71 85
        # Accesses that are assignments.
paul@71 86
paul@71 87
        self.reference_assignments = set()
paul@71 88
paul@44 89
        # Map locations to types, constrained indicators and attributes.
paul@44 90
paul@44 91
        self.accessor_class_types = {}
paul@44 92
        self.accessor_instance_types = {}
paul@44 93
        self.accessor_module_types = {}
paul@44 94
        self.provider_class_types = {}
paul@44 95
        self.provider_instance_types = {}
paul@44 96
        self.provider_module_types = {}
paul@67 97
        self.accessor_constrained = set()
paul@44 98
        self.access_constrained = set()
paul@44 99
        self.referenced_attrs = {}
paul@44 100
        self.referenced_objects = {}
paul@44 101
paul@67 102
        # Details of access operations.
paul@67 103
paul@67 104
        self.access_plans = {}
paul@67 105
paul@44 106
        # Accumulated information about accessors and providers.
paul@44 107
paul@44 108
        self.accessor_general_class_types = {}
paul@44 109
        self.accessor_general_instance_types = {}
paul@44 110
        self.accessor_general_module_types = {}
paul@44 111
        self.accessor_all_types = {}
paul@44 112
        self.accessor_all_general_types = {}
paul@44 113
        self.provider_all_types = {}
paul@44 114
        self.accessor_guard_tests = {}
paul@44 115
paul@44 116
        # Accumulated information about accessed attributes and
paul@67 117
        # access/attribute-specific accessor tests.
paul@44 118
paul@44 119
        self.reference_all_attrs = {}
paul@44 120
        self.reference_all_attrtypes = {}
paul@67 121
        self.reference_all_accessor_types = {}
paul@67 122
        self.reference_all_accessor_general_types = {}
paul@44 123
        self.reference_test_types = {}
paul@77 124
        self.reference_test_accessor_type = {}
paul@44 125
paul@44 126
        # The processing workflow itself.
paul@44 127
paul@44 128
        self.init_usage_index()
paul@44 129
        self.init_accessors()
paul@44 130
        self.init_accesses()
paul@44 131
        self.init_aliases()
paul@44 132
        self.init_attr_type_indexes()
paul@44 133
        self.modify_mutated_attributes()
paul@44 134
        self.identify_references()
paul@44 135
        self.classify_accessors()
paul@44 136
        self.classify_accesses()
paul@67 137
        self.initialise_access_plans()
paul@44 138
paul@44 139
    def to_output(self):
paul@44 140
paul@44 141
        "Write the output files using deduction information."
paul@44 142
paul@44 143
        self.check_output()
paul@44 144
paul@44 145
        self.write_mutations()
paul@44 146
        self.write_accessors()
paul@44 147
        self.write_accesses()
paul@65 148
        self.write_access_plans()
paul@44 149
paul@44 150
    def write_mutations(self):
paul@44 151
paul@44 152
        """
paul@44 153
        Write mutation-related output in the following format:
paul@44 154
paul@44 155
        qualified name " " original object type
paul@44 156
paul@44 157
        Object type can be "<class>", "<function>" or "<var>".
paul@44 158
        """
paul@44 159
paul@44 160
        f = open(join(self.output, "mutations"), "w")
paul@44 161
        try:
paul@44 162
            attrs = self.modified_attributes.items()
paul@44 163
            attrs.sort()
paul@44 164
paul@44 165
            for attr, value in attrs:
paul@44 166
                print >>f, attr, value
paul@44 167
        finally:
paul@44 168
            f.close()
paul@44 169
paul@44 170
    def write_accessors(self):
paul@44 171
paul@44 172
        """
paul@44 173
        Write reference-related output in the following format for types:
paul@44 174
paul@44 175
        location " " ( "constrained" | "deduced" ) " " attribute type " " most general type names " " number of specific types
paul@44 176
paul@44 177
        Note that multiple lines can be given for each location, one for each
paul@44 178
        attribute type.
paul@44 179
paul@44 180
        Locations have the following format:
paul@44 181
paul@44 182
        qualified name of scope "." local name ":" name version
paul@44 183
paul@44 184
        The attribute type can be "<class>", "<instance>", "<module>" or "<>",
paul@44 185
        where the latter indicates an absence of suitable references.
paul@44 186
paul@44 187
        Type names indicate the type providing the attributes, being either a
paul@44 188
        class or module qualified name.
paul@44 189
paul@44 190
        ----
paul@44 191
paul@44 192
        A summary of accessor types is formatted as follows:
paul@44 193
paul@44 194
        location " " ( "constrained" | "deduced" ) " " ( "specific" | "common" | "unguarded" ) " " most general type names " " number of specific types
paul@44 195
paul@44 196
        This summary groups all attribute types (class, instance, module) into a
paul@44 197
        single line in order to determine the complexity of identifying an
paul@44 198
        accessor.
paul@44 199
paul@44 200
        ----
paul@44 201
paul@44 202
        References that cannot be supported by any types are written to a
paul@44 203
        warnings file in the following format:
paul@44 204
paul@44 205
        location
paul@44 206
paul@44 207
        ----
paul@44 208
paul@44 209
        For each location where a guard would be asserted to guarantee the
paul@44 210
        nature of an object, the following format is employed:
paul@44 211
paul@44 212
        location " " ( "specific" | "common" ) " " object kind " " object types
paul@44 213
paul@44 214
        Object kind can be "<class>", "<instance>" or "<module>".
paul@44 215
        """
paul@44 216
paul@44 217
        f_type_summary = open(join(self.output, "type_summary"), "w")
paul@44 218
        f_types = open(join(self.output, "types"), "w")
paul@44 219
        f_warnings = open(join(self.output, "type_warnings"), "w")
paul@44 220
        f_guards = open(join(self.output, "guards"), "w")
paul@44 221
paul@44 222
        try:
paul@44 223
            locations = self.accessor_class_types.keys()
paul@44 224
            locations.sort()
paul@44 225
paul@44 226
            for location in locations:
paul@67 227
                constrained = location in self.accessor_constrained
paul@44 228
paul@44 229
                # Accessor information.
paul@44 230
paul@44 231
                class_types = self.accessor_class_types[location]
paul@44 232
                instance_types = self.accessor_instance_types[location]
paul@44 233
                module_types = self.accessor_module_types[location]
paul@44 234
paul@44 235
                general_class_types = self.accessor_general_class_types[location]
paul@44 236
                general_instance_types = self.accessor_general_instance_types[location]
paul@44 237
                general_module_types = self.accessor_general_module_types[location]
paul@44 238
paul@44 239
                all_types = self.accessor_all_types[location]
paul@44 240
                all_general_types = self.accessor_all_general_types[location]
paul@44 241
paul@44 242
                if class_types:
paul@44 243
                    print >>f_types, encode_location(location), encode_constrained(constrained), "<class>", \
paul@44 244
                        sorted_output(general_class_types), len(class_types)
paul@44 245
paul@44 246
                if instance_types:
paul@44 247
                    print >>f_types, encode_location(location), encode_constrained(constrained), "<instance>", \
paul@44 248
                        sorted_output(general_instance_types), len(instance_types)
paul@44 249
paul@44 250
                if module_types:
paul@44 251
                    print >>f_types, encode_location(location), encode_constrained(constrained), "<module>", \
paul@44 252
                        sorted_output(general_module_types), len(module_types)
paul@44 253
paul@44 254
                if not all_types:
paul@44 255
                    print >>f_types, encode_location(location), "deduced", "<>", 0
paul@55 256
                    attrnames = list(self.location_index[location])
paul@55 257
                    attrnames.sort()
paul@55 258
                    print >>f_warnings, encode_location(location), "; ".join(map(encode_usage, attrnames))
paul@44 259
paul@44 260
                guard_test = self.accessor_guard_tests.get(location)
paul@44 261
paul@44 262
                # Write specific type guard details.
paul@44 263
paul@44 264
                if guard_test and guard_test.startswith("specific"):
paul@44 265
                    print >>f_guards, encode_location(location), guard_test, \
paul@56 266
                        get_kinds(all_types)[0], \
paul@44 267
                        sorted_output(all_types)
paul@44 268
paul@44 269
                # Write common type guard details.
paul@44 270
paul@44 271
                elif guard_test and guard_test.startswith("common"):
paul@44 272
                    print >>f_guards, encode_location(location), guard_test, \
paul@56 273
                        get_kinds(all_general_types)[0], \
paul@44 274
                        sorted_output(all_general_types)
paul@44 275
paul@44 276
                print >>f_type_summary, encode_location(location), encode_constrained(constrained), \
paul@44 277
                    guard_test or "unguarded", sorted_output(all_general_types), len(all_types)
paul@44 278
paul@44 279
        finally:
paul@44 280
            f_type_summary.close()
paul@44 281
            f_types.close()
paul@44 282
            f_warnings.close()
paul@44 283
            f_guards.close()
paul@44 284
paul@44 285
    def write_accesses(self):
paul@44 286
paul@44 287
        """
paul@44 288
        Specific attribute output is produced in the following format:
paul@44 289
paul@44 290
        location " " ( "constrained" | "deduced" ) " " attribute type " " attribute references
paul@44 291
paul@44 292
        Note that multiple lines can be given for each location and attribute
paul@44 293
        name, one for each attribute type.
paul@44 294
paul@44 295
        Locations have the following format:
paul@44 296
paul@44 297
        qualified name of scope "." local name " " attribute name ":" access number
paul@44 298
paul@44 299
        The attribute type can be "<class>", "<instance>", "<module>" or "<>",
paul@44 300
        where the latter indicates an absence of suitable references.
paul@44 301
paul@44 302
        Attribute references have the following format:
paul@44 303
paul@44 304
        object type ":" qualified name
paul@44 305
paul@44 306
        Object type can be "<class>", "<function>" or "<var>".
paul@44 307
paul@44 308
        ----
paul@44 309
paul@44 310
        A summary of attributes is formatted as follows:
paul@44 311
paul@44 312
        location " " attribute name " " ( "constrained" | "deduced" ) " " test " " attribute references
paul@44 313
paul@44 314
        This summary groups all attribute types (class, instance, module) into a
paul@44 315
        single line in order to determine the complexity of each access.
paul@44 316
paul@44 317
        Tests can be "validate", "specific", "untested", "guarded-validate" or "guarded-specific".
paul@44 318
paul@44 319
        ----
paul@44 320
paul@44 321
        For each access where a test would be asserted to guarantee the
paul@44 322
        nature of an attribute, the following formats are employed:
paul@44 323
paul@44 324
        location " " attribute name " " "validate"
paul@44 325
        location " " attribute name " " "specific" " " attribute type " " object type
paul@44 326
paul@44 327
        ----
paul@44 328
paul@44 329
        References that cannot be supported by any types are written to a
paul@44 330
        warnings file in the following format:
paul@44 331
paul@44 332
        location
paul@44 333
        """
paul@44 334
paul@44 335
        f_attr_summary = open(join(self.output, "attribute_summary"), "w")
paul@44 336
        f_attrs = open(join(self.output, "attributes"), "w")
paul@44 337
        f_tests = open(join(self.output, "tests"), "w")
paul@44 338
        f_warnings = open(join(self.output, "attribute_warnings"), "w")
paul@44 339
paul@44 340
        try:
paul@44 341
            locations = self.referenced_attrs.keys()
paul@44 342
            locations.sort()
paul@44 343
paul@44 344
            for location in locations:
paul@44 345
                constrained = location in self.access_constrained
paul@44 346
paul@44 347
                # Attribute information, both name-based and anonymous.
paul@44 348
paul@44 349
                referenced_attrs = self.referenced_attrs[location]
paul@44 350
paul@44 351
                if referenced_attrs:
paul@44 352
                    attrname = get_attrname_from_location(location)
paul@44 353
paul@44 354
                    all_accessed_attrs = self.reference_all_attrs[location]
paul@44 355
paul@44 356
                    for attrtype, attrs in self.get_referenced_attrs(location):
paul@44 357
                        print >>f_attrs, encode_access_location(location), encode_constrained(constrained), attrtype, sorted_output(attrs)
paul@44 358
paul@44 359
                    test_type = self.reference_test_types.get(location)
paul@44 360
paul@44 361
                    # Write the need to test at run time.
paul@44 362
paul@44 363
                    if test_type == "validate":
paul@44 364
                        print >>f_tests, encode_access_location(location), test_type
paul@44 365
paul@44 366
                    # Write any type checks for anonymous accesses.
paul@44 367
paul@77 368
                    elif test_type and self.reference_test_accessor_type.get(location):
paul@44 369
                        print >>f_tests, encode_access_location(location), test_type, \
paul@44 370
                            sorted_output(all_accessed_attrs), \
paul@77 371
                            self.reference_test_accessor_type[location]
paul@44 372
paul@44 373
                    print >>f_attr_summary, encode_access_location(location), encode_constrained(constrained), \
paul@44 374
                        test_type or "untested", sorted_output(all_accessed_attrs)
paul@44 375
paul@44 376
                else:
paul@44 377
                    print >>f_warnings, encode_access_location(location)
paul@44 378
paul@44 379
        finally:
paul@44 380
            f_attr_summary.close()
paul@44 381
            f_attrs.close()
paul@44 382
            f_tests.close()
paul@44 383
            f_warnings.close()
paul@44 384
paul@67 385
    def write_access_plans(self):
paul@67 386
paul@67 387
        "Each attribute access is written out as a plan."
paul@67 388
paul@67 389
        f_attrs = open(join(self.output, "attribute_plans"), "w")
paul@67 390
paul@67 391
        try:
paul@67 392
            locations = self.access_plans.keys()
paul@67 393
            locations.sort()
paul@67 394
paul@67 395
            for location in locations:
paul@77 396
                name, test, test_type, base, traversed, attrnames, context, \
paul@77 397
                    method, attr = self.access_plans[location]
paul@77 398
paul@75 399
                print >>f_attrs, encode_access_location(location), \
paul@77 400
                                 name, test, test_type or "{}", \
paul@75 401
                                 base or "{}", \
paul@67 402
                                 ".".join(traversed) or "{}", \
paul@67 403
                                 ".".join(attrnames) or "{}", \
paul@77 404
                                 context, method, attr or "{}"
paul@67 405
paul@67 406
        finally:
paul@67 407
            f_attrs.close()
paul@67 408
paul@44 409
    def classify_accessors(self):
paul@44 410
paul@44 411
        "For each program location, classify accessors."
paul@44 412
paul@44 413
        # Where instance and module types are defined, class types are also
paul@44 414
        # defined. See: init_definition_details
paul@44 415
paul@44 416
        locations = self.accessor_class_types.keys()
paul@44 417
paul@44 418
        for location in locations:
paul@67 419
            constrained = location in self.accessor_constrained
paul@44 420
paul@44 421
            # Provider information.
paul@44 422
paul@44 423
            class_types = self.provider_class_types[location]
paul@44 424
            instance_types = self.provider_instance_types[location]
paul@44 425
            module_types = self.provider_module_types[location]
paul@44 426
paul@44 427
            # Collect specific and general type information.
paul@44 428
paul@69 429
            self.provider_all_types[location] = \
paul@57 430
                combine_types(class_types, instance_types, module_types)
paul@44 431
paul@44 432
            # Accessor information.
paul@44 433
paul@44 434
            class_types = self.accessor_class_types[location]
paul@44 435
            self.accessor_general_class_types[location] = \
paul@69 436
                general_class_types = self.get_most_general_class_types(class_types)
paul@44 437
paul@44 438
            instance_types = self.accessor_instance_types[location]
paul@44 439
            self.accessor_general_instance_types[location] = \
paul@69 440
                general_instance_types = self.get_most_general_class_types(instance_types)
paul@44 441
paul@44 442
            module_types = self.accessor_module_types[location]
paul@44 443
            self.accessor_general_module_types[location] = \
paul@44 444
                general_module_types = self.get_most_general_module_types(module_types)
paul@44 445
paul@44 446
            # Collect specific and general type information.
paul@44 447
paul@44 448
            self.accessor_all_types[location] = all_types = \
paul@57 449
                combine_types(class_types, instance_types, module_types)
paul@44 450
paul@44 451
            self.accessor_all_general_types[location] = all_general_types = \
paul@57 452
                combine_types(general_class_types, general_instance_types, general_module_types)
paul@44 453
paul@44 454
            # Record guard information.
paul@44 455
paul@44 456
            if not constrained:
paul@44 457
paul@44 458
                # Record specific type guard details.
paul@44 459
paul@44 460
                if len(all_types) == 1:
paul@67 461
                    self.accessor_guard_tests[location] = test_for_type("specific", first(all_types))
paul@57 462
                elif is_single_class_type(all_types):
paul@44 463
                    self.accessor_guard_tests[location] = "specific-object"
paul@44 464
paul@44 465
                # Record common type guard details.
paul@44 466
paul@44 467
                elif len(all_general_types) == 1:
paul@67 468
                    self.accessor_guard_tests[location] = test_for_type("common", first(all_types))
paul@57 469
                elif is_single_class_type(all_general_types):
paul@44 470
                    self.accessor_guard_tests[location] = "common-object"
paul@44 471
paul@44 472
                # Otherwise, no convenient guard can be defined.
paul@44 473
paul@44 474
    def classify_accesses(self):
paul@44 475
paul@44 476
        "For each program location, classify accesses."
paul@44 477
paul@44 478
        # Attribute accesses use potentially different locations to those of
paul@44 479
        # accessors.
paul@44 480
paul@44 481
        locations = self.referenced_attrs.keys()
paul@44 482
paul@44 483
        for location in locations:
paul@44 484
            constrained = location in self.access_constrained
paul@44 485
paul@69 486
            # Combine type information from all accessors supplying the access.
paul@44 487
paul@44 488
            accessor_locations = self.get_accessors_for_access(location)
paul@44 489
paul@44 490
            all_provider_types = set()
paul@44 491
            all_accessor_types = set()
paul@44 492
            all_accessor_general_types = set()
paul@44 493
paul@44 494
            for accessor_location in accessor_locations:
paul@44 495
paul@44 496
                # Obtain the provider types for guard-related attribute access
paul@44 497
                # checks.
paul@44 498
paul@67 499
                all_provider_types.update(self.provider_all_types.get(accessor_location))
paul@67 500
paul@67 501
                # Obtain the accessor guard types (specific and general).
paul@67 502
paul@67 503
                all_accessor_types.update(self.accessor_all_types.get(accessor_location))
paul@67 504
                all_accessor_general_types.update(self.accessor_all_general_types.get(accessor_location))
paul@44 505
paul@70 506
            # Obtain basic properties of the types involved in the access.
paul@70 507
paul@70 508
            single_accessor_type = len(all_accessor_types) == 1
paul@70 509
            single_accessor_class_type = is_single_class_type(all_accessor_types)
paul@70 510
            single_accessor_general_type = len(all_accessor_general_types) == 1
paul@70 511
            single_accessor_general_class_type = is_single_class_type(all_accessor_general_types)
paul@70 512
paul@69 513
            # Determine whether the attribute access is guarded or not.
paul@44 514
paul@44 515
            guarded = (
paul@70 516
                single_accessor_type or single_accessor_class_type or
paul@70 517
                single_accessor_general_type or single_accessor_general_class_type
paul@44 518
                )
paul@44 519
paul@44 520
            if guarded:
paul@44 521
                (guard_class_types, guard_instance_types, guard_module_types,
paul@57 522
                    _function_types, _var_types) = separate_types(all_provider_types)
paul@44 523
paul@67 524
            self.reference_all_accessor_types[location] = all_accessor_types
paul@67 525
            self.reference_all_accessor_general_types[location] = all_accessor_general_types
paul@63 526
paul@44 527
            # Attribute information, both name-based and anonymous.
paul@44 528
paul@44 529
            referenced_attrs = self.referenced_attrs[location]
paul@44 530
paul@71 531
            if not referenced_attrs:
paul@71 532
                raise DeduceError, location
paul@71 533
paul@71 534
            # Record attribute information for each name used on the
paul@71 535
            # accessor.
paul@71 536
paul@71 537
            attrname = get_attrname_from_location(location)
paul@71 538
paul@71 539
            all_accessed_attrs = set()
paul@71 540
            all_providers = set()
paul@71 541
paul@71 542
            # Obtain provider and attribute details for this kind of
paul@71 543
            # object.
paul@71 544
paul@71 545
            for attrtype, object_type, attr in referenced_attrs:
paul@71 546
                all_accessed_attrs.add(attr)
paul@71 547
                all_providers.add(object_type)
paul@71 548
paul@71 549
            all_general_providers = self.get_most_general_types(all_providers)
paul@71 550
paul@71 551
            # Determine which attributes would be provided by the
paul@71 552
            # accessor types upheld by a guard.
paul@71 553
paul@71 554
            if guarded:
paul@71 555
                guard_attrs = set()
paul@71 556
                for _attrtype, object_type, attr in \
paul@71 557
                    self._identify_reference_attribute(attrname, guard_class_types, guard_instance_types, guard_module_types):
paul@71 558
                    guard_attrs.add(attr)
paul@71 559
            else:
paul@71 560
                guard_attrs = None
paul@71 561
paul@71 562
            self.reference_all_attrs[location] = all_accessed_attrs
paul@71 563
paul@71 564
            # Constrained accesses guarantee the nature of the accessor.
paul@71 565
            # However, there may still be many types involved.
paul@71 566
paul@71 567
            if constrained:
paul@71 568
                if single_accessor_type:
paul@71 569
                    self.reference_test_types[location] = test_for_type("constrained-specific", first(all_accessor_types))
paul@71 570
                elif single_accessor_class_type:
paul@71 571
                    self.reference_test_types[location] = "constrained-specific-object"
paul@71 572
                elif single_accessor_general_type:
paul@71 573
                    self.reference_test_types[location] = test_for_type("constrained-common", first(all_accessor_general_types))
paul@71 574
                elif single_accessor_general_class_type:
paul@71 575
                    self.reference_test_types[location] = "constrained-common-object"
paul@44 576
                else:
paul@71 577
                    self.reference_test_types[location] = "constrained-many"
paul@71 578
paul@71 579
            # Suitably guarded accesses, where the nature of the
paul@71 580
            # accessor can be guaranteed, do not require the attribute
paul@71 581
            # involved to be validated. Otherwise, for unguarded
paul@71 582
            # accesses, access-level tests are required.
paul@71 583
paul@71 584
            elif guarded and all_accessed_attrs.issubset(guard_attrs):
paul@71 585
                if single_accessor_type:
paul@71 586
                    self.reference_test_types[location] = test_for_type("guarded-specific", first(all_accessor_types))
paul@71 587
                elif single_accessor_class_type:
paul@71 588
                    self.reference_test_types[location] = "guarded-specific-object"
paul@71 589
                elif single_accessor_general_type:
paul@71 590
                    self.reference_test_types[location] = test_for_type("guarded-common", first(all_accessor_general_types))
paul@71 591
                elif single_accessor_general_class_type:
paul@71 592
                    self.reference_test_types[location] = "guarded-common-object"
paul@71 593
paul@71 594
            # Record the need to test the type of anonymous and
paul@71 595
            # unconstrained accessors.
paul@71 596
paul@71 597
            elif len(all_providers) == 1:
paul@71 598
                provider = first(all_providers)
paul@71 599
                if provider != '__builtins__.object':
paul@71 600
                    all_accessor_kinds = set(get_kinds(all_accessor_types))
paul@71 601
                    if len(all_accessor_kinds) == 1:
paul@71 602
                        test_type = test_for_kinds("specific", all_accessor_kinds)
paul@70 603
                    else:
paul@71 604
                        test_type = "specific-object"
paul@71 605
                    self.reference_test_types[location] = test_type
paul@77 606
                    self.reference_test_accessor_type[location] = provider
paul@71 607
paul@71 608
            elif len(all_general_providers) == 1:
paul@71 609
                provider = first(all_general_providers)
paul@71 610
                if provider != '__builtins__.object':
paul@71 611
                    all_accessor_kinds = set(get_kinds(all_accessor_general_types))
paul@71 612
                    if len(all_accessor_kinds) == 1:
paul@71 613
                        test_type = test_for_kinds("common", all_accessor_kinds)
paul@71 614
                    else:
paul@71 615
                        test_type = "common-object"
paul@71 616
                    self.reference_test_types[location] = test_type
paul@77 617
                    self.reference_test_accessor_type[location] = provider
paul@71 618
paul@71 619
            # Record the need to test the identity of the attribute.
paul@71 620
paul@71 621
            else:
paul@71 622
                self.reference_test_types[location] = "validate"
paul@44 623
paul@67 624
    def initialise_access_plans(self):
paul@67 625
paul@67 626
        "Define attribute access plans."
paul@67 627
paul@67 628
        for location in self.referenced_attrs.keys():
paul@76 629
            original_location = self.const_accesses_rev.get(location)
paul@76 630
            self.access_plans[original_location or location] = self.get_access_plan(location)
paul@67 631
paul@44 632
    def get_referenced_attrs(self, location):
paul@44 633
paul@44 634
        """
paul@44 635
        Return attributes referenced at the given access 'location' by the given
paul@44 636
        'attrname' as a list of (attribute type, attribute set) tuples.
paul@44 637
        """
paul@44 638
paul@69 639
        d = {}
paul@69 640
        for attrtype, objtype, attr in self.referenced_attrs[location]:
paul@69 641
            init_item(d, attrtype, set)
paul@69 642
            d[attrtype].add(attr)
paul@69 643
        l = d.items()
paul@69 644
        l.sort() # class, module, instance
paul@44 645
        return l
paul@44 646
paul@44 647
    # Initialisation methods.
paul@44 648
paul@44 649
    def init_descendants(self):
paul@44 650
paul@44 651
        "Identify descendants of each class."
paul@44 652
paul@44 653
        for name in self.importer.classes.keys():
paul@44 654
            self.get_descendants_for_class(name)
paul@44 655
paul@44 656
    def get_descendants_for_class(self, name):
paul@44 657
paul@44 658
        """
paul@44 659
        Use subclass information to deduce the descendants for the class of the
paul@44 660
        given 'name'.
paul@44 661
        """
paul@44 662
paul@44 663
        if not self.descendants.has_key(name):
paul@44 664
            descendants = set()
paul@44 665
paul@44 666
            for subclass in self.importer.subclasses[name]:
paul@44 667
                descendants.update(self.get_descendants_for_class(subclass))
paul@44 668
                descendants.add(subclass)
paul@44 669
paul@44 670
            self.descendants[name] = descendants
paul@44 671
paul@44 672
        return self.descendants[name]
paul@44 673
paul@44 674
    def init_special_attributes(self):
paul@44 675
paul@44 676
        "Add special attributes to the classes for inheritance-related tests."
paul@44 677
paul@44 678
        all_class_attrs = self.importer.all_class_attrs
paul@44 679
paul@44 680
        for name, descendants in self.descendants.items():
paul@44 681
            for descendant in descendants:
paul@44 682
                all_class_attrs[descendant]["#%s" % name] = name
paul@44 683
paul@44 684
        for name in all_class_attrs.keys():
paul@44 685
            all_class_attrs[name]["#%s" % name] = name
paul@44 686
paul@44 687
    def init_usage_index(self):
paul@44 688
paul@44 689
        """
paul@44 690
        Create indexes for module and function attribute usage and for anonymous
paul@44 691
        accesses.
paul@44 692
        """
paul@44 693
paul@44 694
        for module in self.importer.get_modules():
paul@44 695
            for path, assignments in module.attr_usage.items():
paul@44 696
                self.add_usage(assignments, path)
paul@44 697
paul@44 698
        for location, all_attrnames in self.importer.all_attr_accesses.items():
paul@44 699
            for attrnames in all_attrnames:
paul@44 700
                attrname = get_attrnames(attrnames)[-1]
paul@44 701
                access_location = (location, None, attrnames, 0)
paul@44 702
                self.add_usage_term(access_location, [attrname])
paul@44 703
paul@44 704
    def add_usage(self, assignments, path):
paul@44 705
paul@44 706
        """
paul@44 707
        Collect usage from the given 'assignments', adding 'path' details to
paul@44 708
        each record if specified. Add the usage to an index mapping to location
paul@44 709
        information, as well as to an index mapping locations to usages.
paul@44 710
        """
paul@44 711
paul@44 712
        for name, versions in assignments.items():
paul@44 713
            for i, usages in enumerate(versions):
paul@44 714
                location = (path, name, None, i)
paul@44 715
paul@44 716
                for attrnames in usages:
paul@44 717
                    self.add_usage_term(location, attrnames)
paul@44 718
paul@44 719
    def add_usage_term(self, location, attrnames):
paul@44 720
paul@44 721
        """
paul@44 722
        For 'location' and using 'attrnames' as a description of usage, record
paul@44 723
        in the usage index a mapping from the usage to 'location', and record in
paul@44 724
        the location index a mapping from 'location' to the usage.
paul@44 725
        """
paul@44 726
paul@44 727
        key = make_key(attrnames)
paul@44 728
paul@44 729
        init_item(self.location_index, location, set)
paul@44 730
        self.location_index[location].add(key)
paul@44 731
paul@44 732
    def init_accessors(self):
paul@44 733
paul@44 734
        "Create indexes for module and function accessor information."
paul@44 735
paul@44 736
        for module in self.importer.get_modules():
paul@44 737
            for path, all_accesses in module.attr_accessors.items():
paul@44 738
                self.add_accessors(all_accesses, path)
paul@44 739
paul@44 740
    def add_accessors(self, all_accesses, path):
paul@44 741
paul@44 742
        """
paul@44 743
        For attribute accesses described by the mapping of 'all_accesses' from
paul@44 744
        name details to accessor details, record the locations of the accessors
paul@44 745
        for each access.
paul@44 746
        """
paul@44 747
paul@44 748
        # Get details for each access combining the given name and attribute.
paul@44 749
paul@44 750
        for (name, attrnames), accesses in all_accesses.items():
paul@44 751
paul@44 752
            # Obtain the usage details using the access information.
paul@44 753
paul@44 754
            for access_number, versions in enumerate(accesses):
paul@44 755
                access_location = (path, name, attrnames, access_number)
paul@44 756
                locations = []
paul@44 757
paul@44 758
                for version in versions:
paul@44 759
                    location = (path, name, None, version)
paul@44 760
                    locations.append(location)
paul@44 761
paul@44 762
                self.access_index[access_location] = locations
paul@44 763
paul@44 764
    def get_accessors_for_access(self, access_location):
paul@44 765
paul@44 766
        "Find a definition providing accessor details, if necessary."
paul@44 767
paul@44 768
        try:
paul@44 769
            return self.access_index[access_location]
paul@44 770
        except KeyError:
paul@44 771
            return [access_location]
paul@44 772
paul@44 773
    def init_accesses(self):
paul@44 774
paul@44 775
        """
paul@44 776
        Initialise collections for accesses involving assignments.
paul@44 777
        """
paul@44 778
paul@44 779
        # For each scope, obtain access details.
paul@44 780
paul@44 781
        for path, all_accesses in self.importer.all_attr_access_modifiers.items():
paul@44 782
paul@44 783
            # For each combination of name and attribute names, obtain
paul@44 784
            # applicable modifiers.
paul@44 785
paul@44 786
            for (name, attrnames), modifiers in all_accesses.items():
paul@44 787
paul@44 788
                # For each access, determine the name versions affected by
paul@44 789
                # assignments.
paul@44 790
paul@78 791
                for access_number, modifier in enumerate(modifiers):
paul@44 792
                    if name:
paul@44 793
                        access_location = (path, name, attrnames, access_number)
paul@44 794
                    else:
paul@44 795
                        access_location = (path, None, attrnames, 0)
paul@44 796
paul@78 797
                    assignment = modifier == "A"
paul@71 798
                    if assignment:
paul@71 799
                        self.reference_assignments.add(access_location)
paul@71 800
paul@44 801
                    # Associate assignments with usage.
paul@44 802
paul@44 803
                    accessor_locations = self.get_accessors_for_access(access_location)
paul@44 804
paul@44 805
                    for location in accessor_locations:
paul@44 806
                        for usage in self.location_index[location]:
paul@44 807
                            key = make_key(usage)
paul@44 808
paul@44 809
                            if assignment:
paul@44 810
                                init_item(self.assigned_attrs, key, set)
paul@44 811
                                self.assigned_attrs[key].add((path, name, attrnames))
paul@44 812
paul@44 813
    def init_aliases(self):
paul@44 814
paul@44 815
        "Expand aliases so that alias-based accesses can be resolved."
paul@44 816
paul@44 817
        # Get aliased names with details of their accesses.
paul@44 818
paul@44 819
        for name_path, all_aliases in self.importer.all_aliased_names.items():
paul@44 820
            path, name = name_path.rsplit(".", 1)
paul@44 821
paul@44 822
            # For each version of the name, obtain the access location.
paul@44 823
paul@44 824
            for version, (original_name, attrnames, access_number) in all_aliases.items():
paul@44 825
                accessor_location = (path, name, None, version)
paul@44 826
                access_location = (path, original_name, attrnames, access_number)
paul@44 827
                init_item(self.alias_index, accessor_location, list)
paul@44 828
                self.alias_index[accessor_location].append(access_location)
paul@44 829
paul@44 830
        # Get aliases in terms of non-aliases and accesses.
paul@44 831
paul@44 832
        for accessor_location, access_locations in self.alias_index.items():
paul@44 833
            self.update_aliases(accessor_location, access_locations)
paul@44 834
paul@44 835
    def update_aliases(self, accessor_location, access_locations, visited=None):
paul@44 836
paul@44 837
        """
paul@44 838
        Update the given 'accessor_location' defining an alias, update
paul@44 839
        'access_locations' to refer to non-aliases, following name references
paul@44 840
        via the access index.
paul@44 841
paul@44 842
        If 'visited' is specified, it contains a set of accessor locations (and
paul@44 843
        thus keys to the alias index) that are currently being defined.
paul@44 844
        """
paul@44 845
paul@44 846
        if visited is None:
paul@44 847
            visited = set()
paul@44 848
paul@44 849
        updated_locations = set()
paul@44 850
paul@44 851
        for access_location in access_locations:
paul@44 852
            (path, original_name, attrnames, access_number) = access_location
paul@44 853
paul@44 854
            # Where an alias refers to a name access, obtain the original name
paul@44 855
            # version details.
paul@44 856
paul@44 857
            if attrnames is None:
paul@44 858
paul@44 859
                # For each name version, attempt to determine any accesses that
paul@44 860
                # initialise the name.
paul@44 861
paul@44 862
                for name_accessor_location in self.access_index[access_location]:
paul@44 863
paul@44 864
                    # Already-visited aliases do not contribute details.
paul@44 865
paul@44 866
                    if name_accessor_location in visited:
paul@44 867
                        continue
paul@44 868
paul@44 869
                    visited.add(name_accessor_location)
paul@44 870
paul@44 871
                    name_access_locations = self.alias_index.get(name_accessor_location)
paul@44 872
                    if name_access_locations:
paul@44 873
                        updated_locations.update(self.update_aliases(name_accessor_location, name_access_locations, visited))
paul@44 874
                    else:
paul@44 875
                        updated_locations.add(name_accessor_location)
paul@44 876
paul@44 877
            # Otherwise, record the access details.
paul@44 878
paul@44 879
            else:
paul@44 880
                updated_locations.add(access_location)
paul@44 881
paul@44 882
        self.alias_index[accessor_location] = updated_locations
paul@44 883
        return updated_locations
paul@44 884
paul@44 885
    # Attribute mutation for types.
paul@44 886
paul@44 887
    def modify_mutated_attributes(self):
paul@44 888
paul@44 889
        "Identify known, mutated attributes and change their state."
paul@44 890
paul@44 891
        # Usage-based accesses.
paul@44 892
paul@44 893
        for usage, all_attrnames in self.assigned_attrs.items():
paul@44 894
            if not usage:
paul@44 895
                continue
paul@44 896
paul@44 897
            for path, name, attrnames in all_attrnames:
paul@44 898
                class_types = self.get_class_types_for_usage(usage)
paul@44 899
                only_instance_types = set(self.get_instance_types_for_usage(usage)).difference(class_types)
paul@44 900
                module_types = self.get_module_types_for_usage(usage)
paul@44 901
paul@44 902
                # Detect self usage within methods in order to narrow the scope
paul@44 903
                # of the mutation.
paul@44 904
paul@44 905
                t = name == "self" and self.constrain_self_reference(path, class_types, only_instance_types)
paul@44 906
                if t:
paul@44 907
                    class_types, only_instance_types, module_types, constrained = t
paul@44 908
                objects = set(class_types).union(only_instance_types).union(module_types)
paul@44 909
paul@44 910
                self.mutate_attribute(objects, attrnames)
paul@44 911
paul@44 912
    def mutate_attribute(self, objects, attrnames):
paul@44 913
paul@44 914
        "Mutate static 'objects' with the given 'attrnames'."
paul@44 915
paul@44 916
        for name in objects:
paul@44 917
            attr = "%s.%s" % (name, attrnames)
paul@44 918
            value = self.importer.get_object(attr)
paul@44 919
paul@44 920
            # If the value is None, the attribute is
paul@44 921
            # inherited and need not be set explicitly on
paul@44 922
            # the class concerned.
paul@44 923
paul@44 924
            if value:
paul@44 925
                self.modified_attributes[attr] = value
paul@44 926
                self.importer.set_object(attr, value.as_var())
paul@44 927
paul@44 928
    # Simplification of types.
paul@44 929
paul@69 930
    def get_most_general_types(self, types):
paul@69 931
paul@69 932
        "Return the most general types for the given 'types'."
paul@69 933
paul@69 934
        module_types = set()
paul@69 935
        class_types = set()
paul@69 936
paul@69 937
        for type in types:
paul@69 938
            ref = self.importer.identify(type)
paul@69 939
            if ref.has_kind("<module>"):
paul@69 940
                module_types.add(type)
paul@69 941
            else:
paul@69 942
                class_types.add(type)
paul@69 943
paul@69 944
        types = set(self.get_most_general_module_types(module_types))
paul@69 945
        types.update(self.get_most_general_class_types(class_types))
paul@69 946
        return types
paul@69 947
paul@69 948
    def get_most_general_class_types(self, class_types):
paul@44 949
paul@44 950
        "Return the most general types for the given 'class_types'."
paul@44 951
paul@44 952
        class_types = set(class_types)
paul@44 953
        to_remove = set()
paul@44 954
paul@44 955
        for class_type in class_types:
paul@44 956
            for base in self.importer.classes[class_type]:
paul@44 957
                base = base.get_origin()
paul@44 958
                descendants = self.descendants[base]
paul@44 959
                if base in class_types and descendants.issubset(class_types):
paul@44 960
                    to_remove.update(descendants)
paul@44 961
paul@44 962
        class_types.difference_update(to_remove)
paul@44 963
        return class_types
paul@44 964
paul@44 965
    def get_most_general_module_types(self, module_types):
paul@44 966
paul@44 967
        "Return the most general type for the given 'module_types'."
paul@44 968
paul@44 969
        # Where all modules are provided, an object would provide the same
paul@44 970
        # attributes.
paul@44 971
paul@44 972
        if len(module_types) == len(self.importer.modules):
paul@44 973
            return ["__builtins__.object"]
paul@44 974
        else:
paul@44 975
            return module_types
paul@44 976
paul@44 977
    # Type deduction for usage.
paul@44 978
paul@44 979
    def get_types_for_usage(self, attrnames, objects):
paul@44 980
paul@44 981
        """
paul@44 982
        Identify the types that can support the given 'attrnames', using the
paul@44 983
        given 'objects' as the catalogue of type details.
paul@44 984
        """
paul@44 985
paul@44 986
        types = []
paul@44 987
        for name, _attrnames in objects.items():
paul@44 988
            if set(attrnames).issubset(_attrnames):
paul@44 989
                types.append(name)
paul@44 990
        return types
paul@44 991
paul@44 992
    # More efficient usage-to-type indexing and retrieval.
paul@44 993
paul@44 994
    def init_attr_type_indexes(self):
paul@44 995
paul@44 996
        "Identify the types that can support each attribute name."
paul@44 997
paul@44 998
        self._init_attr_type_index(self.attr_class_types, self.importer.all_class_attrs)
paul@44 999
        self._init_attr_type_index(self.attr_instance_types, self.importer.all_combined_attrs)
paul@44 1000
        self._init_attr_type_index(self.attr_module_types, self.importer.all_module_attrs)
paul@44 1001
paul@44 1002
    def _init_attr_type_index(self, attr_types, attrs):
paul@44 1003
paul@44 1004
        """
paul@44 1005
        Initialise the 'attr_types' attribute-to-types mapping using the given
paul@44 1006
        'attrs' type-to-attributes mapping.
paul@44 1007
        """
paul@44 1008
paul@44 1009
        for name, attrnames in attrs.items():
paul@44 1010
            for attrname in attrnames:
paul@44 1011
                init_item(attr_types, attrname, set)
paul@44 1012
                attr_types[attrname].add(name)
paul@44 1013
paul@44 1014
    def get_class_types_for_usage(self, attrnames):
paul@44 1015
paul@44 1016
        "Return names of classes supporting the given 'attrnames'."
paul@44 1017
paul@44 1018
        return self._get_types_for_usage(attrnames, self.attr_class_types, self.importer.all_class_attrs)
paul@44 1019
paul@44 1020
    def get_instance_types_for_usage(self, attrnames):
paul@44 1021
paul@44 1022
        """
paul@44 1023
        Return names of classes whose instances support the given 'attrnames'
paul@44 1024
        (as either class or instance attributes).
paul@44 1025
        """
paul@44 1026
paul@44 1027
        return self._get_types_for_usage(attrnames, self.attr_instance_types, self.importer.all_combined_attrs)
paul@44 1028
paul@44 1029
    def get_module_types_for_usage(self, attrnames):
paul@44 1030
paul@44 1031
        "Return names of modules supporting the given 'attrnames'."
paul@44 1032
paul@44 1033
        return self._get_types_for_usage(attrnames, self.attr_module_types, self.importer.all_module_attrs)
paul@44 1034
paul@44 1035
    def _get_types_for_usage(self, attrnames, attr_types, attrs):
paul@44 1036
paul@44 1037
        """
paul@44 1038
        For the given 'attrnames' representing attribute usage, return types
paul@44 1039
        recorded in the 'attr_types' attribute-to-types mapping that support
paul@44 1040
        such usage, with the given 'attrs' type-to-attributes mapping used to
paul@44 1041
        quickly assess whether a type supports all of the stated attributes.
paul@44 1042
        """
paul@44 1043
paul@44 1044
        # Where no attributes are used, any type would be acceptable.
paul@44 1045
paul@44 1046
        if not attrnames:
paul@44 1047
            return attrs.keys()
paul@44 1048
paul@44 1049
        types = []
paul@44 1050
paul@44 1051
        # Obtain types supporting the first attribute name...
paul@44 1052
paul@44 1053
        for name in attr_types.get(attrnames[0]) or []:
paul@44 1054
paul@44 1055
            # Record types that support all of the other attributes as well.
paul@44 1056
paul@44 1057
            _attrnames = attrs[name]
paul@44 1058
            if set(attrnames).issubset(_attrnames):
paul@44 1059
                types.append(name)
paul@44 1060
paul@44 1061
        return types
paul@44 1062
paul@44 1063
    # Reference identification.
paul@44 1064
paul@44 1065
    def identify_references(self):
paul@44 1066
paul@44 1067
        "Identify references using usage and name reference information."
paul@44 1068
paul@44 1069
        # Names with associated attribute usage.
paul@44 1070
paul@44 1071
        for location, usages in self.location_index.items():
paul@44 1072
paul@44 1073
            # Obtain attribute usage associated with a name, deducing the nature
paul@44 1074
            # of the name. Obtain types only for branches involving attribute
paul@44 1075
            # usage. (In the absence of usage, any type could be involved, but
paul@44 1076
            # then no accesses exist to require knowledge of the type.)
paul@44 1077
paul@44 1078
            have_usage = False
paul@44 1079
            have_no_usage_branch = False
paul@44 1080
paul@44 1081
            for usage in usages:
paul@44 1082
                if not usage:
paul@44 1083
                    have_no_usage_branch = True
paul@44 1084
                    continue
paul@44 1085
                elif not have_usage:
paul@44 1086
                    self.init_definition_details(location)
paul@44 1087
                    have_usage = True
paul@44 1088
                self.record_types_for_usage(location, usage)
paul@44 1089
paul@44 1090
            # Where some usage occurs, but where branches without usage also
paul@44 1091
            # occur, record the types for those branches anyway.
paul@44 1092
paul@44 1093
            if have_usage and have_no_usage_branch:
paul@44 1094
                self.init_definition_details(location)
paul@44 1095
                self.record_types_for_usage(location, None)
paul@44 1096
paul@44 1097
        # Specific name-based attribute accesses.
paul@44 1098
paul@44 1099
        alias_accesses = set()
paul@44 1100
paul@44 1101
        for access_location, accessor_locations in self.access_index.items():
paul@44 1102
            self.record_types_for_access(access_location, accessor_locations, alias_accesses)
paul@44 1103
paul@44 1104
        # Anonymous references with attribute chains.
paul@44 1105
paul@44 1106
        for location, accesses in self.importer.all_attr_accesses.items():
paul@44 1107
paul@44 1108
            # Get distinct attribute names.
paul@44 1109
paul@44 1110
            all_attrnames = set()
paul@44 1111
paul@44 1112
            for attrnames in accesses:
paul@44 1113
                all_attrnames.update(get_attrnames(attrnames))
paul@44 1114
paul@44 1115
            # Get attribute and accessor details for each attribute name.
paul@44 1116
paul@44 1117
            for attrname in all_attrnames:
paul@44 1118
                access_location = (location, None, attrname, 0)
paul@44 1119
                self.record_types_for_attribute(access_location, attrname)
paul@44 1120
paul@44 1121
        # References via constant/identified objects.
paul@44 1122
paul@44 1123
        for location, name_accesses in self.importer.all_const_accesses.items():
paul@44 1124
paul@44 1125
            # A mapping from the original name and attributes to resolved access
paul@44 1126
            # details.
paul@44 1127
paul@44 1128
            for original_access, access in name_accesses.items():
paul@44 1129
                original_name, original_attrnames = original_access
paul@44 1130
                objpath, ref, attrnames = access
paul@44 1131
paul@44 1132
                # Build an accessor combining the name and attribute names used.
paul@44 1133
paul@44 1134
                original_accessor = tuple([original_name] + original_attrnames.split("."))
paul@44 1135
paul@44 1136
                # Direct accesses to attributes.
paul@44 1137
paul@44 1138
                if not attrnames:
paul@44 1139
paul@44 1140
                    # Build a descriptive location based on the original
paul@44 1141
                    # details, exposing the final attribute name.
paul@44 1142
paul@44 1143
                    oa, attrname = original_accessor[:-1], original_accessor[-1]
paul@44 1144
                    oa = ".".join(oa)
paul@44 1145
paul@44 1146
                    access_location = (location, oa, attrname, 0)
paul@44 1147
                    accessor_location = (location, oa, None, 0)
paul@44 1148
                    self.access_index[access_location] = [accessor_location]
paul@44 1149
paul@44 1150
                    self.init_access_details(access_location)
paul@44 1151
                    self.init_definition_details(accessor_location)
paul@44 1152
paul@44 1153
                    # Obtain a reference for the accessor in order to properly
paul@44 1154
                    # determine its type.
paul@44 1155
paul@44 1156
                    if ref.get_kind() != "<instance>":
paul@44 1157
                        objpath = ref.get_origin()
paul@44 1158
paul@44 1159
                    objpath = objpath.rsplit(".", 1)[0]
paul@44 1160
paul@44 1161
                    # Where the object name conflicts with the module
paul@44 1162
                    # providing it, obtain the module details.
paul@44 1163
paul@44 1164
                    if objpath in self.importer.modules:
paul@44 1165
                        accessor = Reference("<module>", objpath)
paul@44 1166
                    else:
paul@44 1167
                        accessor = self.importer.get_object(objpath)
paul@44 1168
paul@44 1169
                    self.referenced_attrs[access_location] = [(accessor.get_kind(), accessor.get_origin(), ref)]
paul@44 1170
                    self.access_constrained.add(access_location)
paul@44 1171
paul@57 1172
                    class_types, instance_types, module_types = accessor.get_types()
paul@44 1173
                    self.record_reference_types(accessor_location, class_types, instance_types, module_types, True, True)
paul@64 1174
paul@64 1175
                else:
paul@44 1176
paul@64 1177
                    # Build a descriptive location based on the original
paul@64 1178
                    # details, employing the first remaining attribute name.
paul@64 1179
paul@64 1180
                    l = get_attrnames(attrnames)
paul@64 1181
                    attrname = l[0]
paul@44 1182
paul@64 1183
                    oa = original_accessor[:-len(l)]
paul@64 1184
                    oa = ".".join(oa)
paul@44 1185
paul@64 1186
                    access_location = (location, oa, attrnames, 0)
paul@64 1187
                    accessor_location = (location, oa, None, 0)
paul@64 1188
                    self.access_index[access_location] = [accessor_location]
paul@64 1189
paul@64 1190
                    self.init_access_details(access_location)
paul@64 1191
                    self.init_definition_details(accessor_location)
paul@44 1192
paul@64 1193
                    class_types, instance_types, module_types = ref.get_types()
paul@64 1194
paul@64 1195
                    self.identify_reference_attributes(access_location, attrname, class_types, instance_types, module_types, True)
paul@64 1196
                    self.record_reference_types(accessor_location, class_types, instance_types, module_types, True, True)
paul@64 1197
paul@64 1198
                original_location = (location, original_name, original_attrnames, 0)
paul@64 1199
paul@64 1200
                if original_location != access_location:
paul@64 1201
                    self.const_accesses[original_location] = access_location
paul@67 1202
                    self.const_accesses_rev[access_location] = original_location
paul@44 1203
paul@64 1204
        # Aliased name definitions. All aliases with usage will have been
paul@64 1205
        # defined, but they may be refined according to referenced accesses.
paul@44 1206
paul@64 1207
        for accessor_location in self.alias_index.keys():
paul@64 1208
            self.record_types_for_alias(accessor_location)
paul@44 1209
paul@64 1210
        # Update accesses employing aliases.
paul@64 1211
paul@64 1212
        for access_location in alias_accesses:
paul@64 1213
            self.record_types_for_access(access_location, self.access_index[access_location])
paul@44 1214
paul@44 1215
    def constrain_types(self, path, class_types, instance_types, module_types):
paul@44 1216
paul@44 1217
        """
paul@44 1218
        Using the given 'path' to an object, constrain the given 'class_types',
paul@44 1219
        'instance_types' and 'module_types'.
paul@44 1220
paul@44 1221
        Return the class, instance, module types plus whether the types are
paul@44 1222
        constrained to a specific kind of type.
paul@44 1223
        """
paul@44 1224
paul@44 1225
        ref = self.importer.identify(path)
paul@44 1226
        if ref:
paul@44 1227
paul@44 1228
            # Constrain usage suggestions using the identified object.
paul@44 1229
paul@44 1230
            if ref.has_kind("<class>"):
paul@44 1231
                return (
paul@44 1232
                    set(class_types).intersection([ref.get_origin()]), [], [], True
paul@44 1233
                    )
paul@44 1234
            elif ref.has_kind("<module>"):
paul@44 1235
                return (
paul@44 1236
                    [], [], set(module_types).intersection([ref.get_origin()]), True
paul@44 1237
                    )
paul@44 1238
paul@44 1239
        return class_types, instance_types, module_types, False
paul@44 1240
paul@44 1241
    def get_target_types(self, location, usage):
paul@44 1242
paul@44 1243
        """
paul@44 1244
        Return the class, instance and module types constrained for the name at
paul@44 1245
        the given 'location' exhibiting the given 'usage'. Whether the types
paul@44 1246
        have been constrained using contextual information is also indicated,
paul@44 1247
        plus whether the types have been constrained to a specific kind of type.
paul@44 1248
        """
paul@44 1249
paul@44 1250
        unit_path, name, attrnames, version = location
paul@44 1251
paul@44 1252
        # Detect any initialised name for the location.
paul@44 1253
paul@44 1254
        if name:
paul@44 1255
            ref = self.get_initialised_name(location)
paul@44 1256
            if ref:
paul@44 1257
                (class_types, only_instance_types, module_types,
paul@57 1258
                    _function_types, _var_types) = separate_types([ref])
paul@44 1259
                return class_types, only_instance_types, module_types, True, False
paul@44 1260
paul@44 1261
        # Retrieve the recorded types for the usage.
paul@44 1262
paul@44 1263
        class_types = self.get_class_types_for_usage(usage)
paul@44 1264
        only_instance_types = set(self.get_instance_types_for_usage(usage)).difference(class_types)
paul@44 1265
        module_types = self.get_module_types_for_usage(usage)
paul@44 1266
paul@44 1267
        # Merge usage deductions with observations to obtain reference types
paul@44 1268
        # for names involved with attribute accesses.
paul@44 1269
paul@44 1270
        if not name:
paul@44 1271
            return class_types, only_instance_types, module_types, False, False
paul@44 1272
paul@44 1273
        # Obtain references to known objects.
paul@44 1274
paul@79 1275
        path = get_name_path(unit_path, name)
paul@44 1276
paul@44 1277
        class_types, only_instance_types, module_types, constrained_specific = \
paul@44 1278
            self.constrain_types(path, class_types, only_instance_types, module_types)
paul@44 1279
paul@44 1280
        if constrained_specific:
paul@44 1281
            return class_types, only_instance_types, module_types, constrained_specific, constrained_specific
paul@44 1282
paul@44 1283
        # Constrain "self" references.
paul@44 1284
paul@44 1285
        if name == "self":
paul@44 1286
            t = self.constrain_self_reference(unit_path, class_types, only_instance_types)
paul@44 1287
            if t:
paul@44 1288
                class_types, only_instance_types, module_types, constrained = t
paul@44 1289
                return class_types, only_instance_types, module_types, constrained, False
paul@44 1290
paul@44 1291
        return class_types, only_instance_types, module_types, False, False
paul@44 1292
paul@44 1293
    def constrain_self_reference(self, unit_path, class_types, only_instance_types):
paul@44 1294
paul@44 1295
        """
paul@44 1296
        Where the name "self" appears in a method, attempt to constrain the
paul@44 1297
        classes involved.
paul@44 1298
paul@44 1299
        Return the class, instance, module types plus whether the types are
paul@44 1300
        constrained.
paul@44 1301
        """
paul@44 1302
paul@44 1303
        class_name = self.in_method(unit_path)
paul@44 1304
paul@44 1305
        if not class_name:
paul@44 1306
            return None
paul@44 1307
paul@44 1308
        classes = set([class_name])
paul@44 1309
        classes.update(self.get_descendants_for_class(class_name))
paul@44 1310
paul@44 1311
        # Note that only instances will be expected for these references but
paul@44 1312
        # either classes or instances may provide the attributes.
paul@44 1313
paul@44 1314
        return (
paul@44 1315
            set(class_types).intersection(classes),
paul@44 1316
            set(only_instance_types).intersection(classes),
paul@44 1317
            [], True
paul@44 1318
            )
paul@44 1319
paul@44 1320
    def in_method(self, path):
paul@44 1321
paul@44 1322
        "Return whether 'path' refers to a method."
paul@44 1323
paul@44 1324
        class_name, method_name = path.rsplit(".", 1)
paul@44 1325
        return self.importer.classes.has_key(class_name) and class_name
paul@44 1326
paul@44 1327
    def init_reference_details(self, location):
paul@44 1328
paul@44 1329
        "Initialise reference-related details for 'location'."
paul@44 1330
paul@44 1331
        self.init_definition_details(location)
paul@44 1332
        self.init_access_details(location)
paul@44 1333
paul@44 1334
    def init_definition_details(self, location):
paul@44 1335
paul@44 1336
        "Initialise name definition details for 'location'."
paul@44 1337
paul@44 1338
        self.accessor_class_types[location] = set()
paul@44 1339
        self.accessor_instance_types[location] = set()
paul@44 1340
        self.accessor_module_types[location] = set()
paul@44 1341
        self.provider_class_types[location] = set()
paul@44 1342
        self.provider_instance_types[location] = set()
paul@44 1343
        self.provider_module_types[location] = set()
paul@44 1344
paul@44 1345
    def init_access_details(self, location):
paul@44 1346
paul@44 1347
        "Initialise access details at 'location'."
paul@44 1348
paul@44 1349
        self.referenced_attrs[location] = {}
paul@44 1350
paul@44 1351
    def record_types_for_access(self, access_location, accessor_locations, alias_accesses=None):
paul@44 1352
paul@44 1353
        """
paul@44 1354
        Define types for the 'access_location' associated with the given
paul@44 1355
        'accessor_locations'.
paul@44 1356
        """
paul@44 1357
paul@44 1358
        path, name, attrnames, version = access_location
paul@44 1359
        if not attrnames:
paul@44 1360
            return
paul@44 1361
paul@44 1362
        attrname = get_attrnames(attrnames)[0]
paul@44 1363
paul@44 1364
        # Collect all suggested types for the accessors. Accesses may
paul@44 1365
        # require accessors from of a subset of the complete set of types.
paul@44 1366
paul@44 1367
        class_types = set()
paul@44 1368
        module_types = set()
paul@44 1369
        instance_types = set()
paul@44 1370
paul@44 1371
        constrained = True
paul@44 1372
paul@44 1373
        for location in accessor_locations:
paul@44 1374
paul@44 1375
            # Remember accesses employing aliases.
paul@44 1376
paul@44 1377
            if alias_accesses is not None and self.alias_index.has_key(location):
paul@44 1378
                alias_accesses.add(access_location)
paul@44 1379
paul@44 1380
            # Use the type information deduced for names from above.
paul@44 1381
paul@44 1382
            if self.accessor_class_types.has_key(location):
paul@44 1383
                class_types.update(self.accessor_class_types[location])
paul@44 1384
                module_types.update(self.accessor_module_types[location])
paul@44 1385
                instance_types.update(self.accessor_instance_types[location])
paul@44 1386
paul@44 1387
            # Where accesses are associated with assignments but where no
paul@44 1388
            # attribute usage observations have caused such an association,
paul@44 1389
            # the attribute name is considered by itself.
paul@44 1390
paul@44 1391
            else:
paul@44 1392
                self.init_definition_details(location)
paul@44 1393
                self.record_types_for_usage(location, [attrname])
paul@44 1394
paul@67 1395
            constrained = location in self.accessor_constrained and constrained
paul@44 1396
paul@44 1397
        self.init_access_details(access_location)
paul@44 1398
        self.identify_reference_attributes(access_location, attrname, class_types, instance_types, module_types, constrained)
paul@44 1399
paul@44 1400
    def record_types_for_usage(self, accessor_location, usage):
paul@44 1401
paul@44 1402
        """
paul@44 1403
        Record types for the given 'accessor_location' according to the given
paul@44 1404
        'usage' observations which may be None to indicate an absence of usage.
paul@44 1405
        """
paul@44 1406
paul@44 1407
        (class_types,
paul@44 1408
         instance_types,
paul@44 1409
         module_types,
paul@44 1410
         constrained,
paul@44 1411
         constrained_specific) = self.get_target_types(accessor_location, usage)
paul@44 1412
paul@44 1413
        self.record_reference_types(accessor_location, class_types, instance_types, module_types, constrained, constrained_specific)
paul@44 1414
paul@44 1415
    def record_types_for_attribute(self, access_location, attrname):
paul@44 1416
paul@44 1417
        """
paul@44 1418
        Record types for the 'access_location' employing only the given
paul@44 1419
        'attrname' for type deduction.
paul@44 1420
        """
paul@44 1421
paul@44 1422
        usage = [attrname]
paul@44 1423
paul@44 1424
        class_types = self.get_class_types_for_usage(usage)
paul@44 1425
        only_instance_types = set(self.get_instance_types_for_usage(usage)).difference(class_types)
paul@44 1426
        module_types = self.get_module_types_for_usage(usage)
paul@44 1427
paul@44 1428
        self.init_reference_details(access_location)
paul@44 1429
paul@44 1430
        self.identify_reference_attributes(access_location, attrname, class_types, only_instance_types, module_types, False)
paul@44 1431
        self.record_reference_types(access_location, class_types, only_instance_types, module_types, False)
paul@44 1432
paul@44 1433
    def record_types_for_alias(self, accessor_location):
paul@44 1434
paul@44 1435
        """
paul@44 1436
        Define types for the 'accessor_location' not having associated usage.
paul@44 1437
        """
paul@44 1438
paul@44 1439
        have_access = self.provider_class_types.has_key(accessor_location)
paul@44 1440
paul@44 1441
        # With an access, attempt to narrow the existing selection of provider
paul@44 1442
        # types.
paul@44 1443
paul@44 1444
        if have_access:
paul@44 1445
            provider_class_types = self.provider_class_types[accessor_location]
paul@44 1446
            provider_instance_types = self.provider_instance_types[accessor_location]
paul@44 1447
            provider_module_types = self.provider_module_types[accessor_location]
paul@44 1448
paul@44 1449
            # Find details for any corresponding access.
paul@44 1450
paul@44 1451
            all_class_types = set()
paul@44 1452
            all_instance_types = set()
paul@44 1453
            all_module_types = set()
paul@44 1454
paul@44 1455
            for access_location in self.alias_index[accessor_location]:
paul@44 1456
                location, name, attrnames, access_number = access_location
paul@44 1457
paul@44 1458
                # Alias references an attribute access.
paul@44 1459
paul@44 1460
                if attrnames:
paul@44 1461
paul@44 1462
                    # Obtain attribute references for the access.
paul@44 1463
paul@44 1464
                    attrs = [attr for _attrtype, object_type, attr in self.referenced_attrs[access_location]]
paul@44 1465
paul@44 1466
                    # Separate the different attribute types.
paul@44 1467
paul@44 1468
                    (class_types, instance_types, module_types,
paul@57 1469
                        function_types, var_types) = separate_types(attrs)
paul@44 1470
paul@44 1471
                    # Where non-accessor types are found, do not attempt to refine
paul@44 1472
                    # the defined accessor types.
paul@44 1473
paul@44 1474
                    if function_types or var_types:
paul@44 1475
                        return
paul@44 1476
paul@44 1477
                    class_types = set(provider_class_types).intersection(class_types)
paul@44 1478
                    instance_types = set(provider_instance_types).intersection(instance_types)
paul@44 1479
                    module_types = set(provider_module_types).intersection(module_types)
paul@44 1480
paul@44 1481
                # Alias references a name, not an access.
paul@44 1482
paul@44 1483
                else:
paul@44 1484
                    # Attempt to refine the types using initialised names.
paul@44 1485
paul@44 1486
                    attr = self.get_initialised_name(access_location)
paul@44 1487
                    if attr:
paul@44 1488
                        (class_types, instance_types, module_types,
paul@57 1489
                            _function_types, _var_types) = separate_types([attr])
paul@44 1490
paul@44 1491
                    # Where no further information is found, do not attempt to
paul@44 1492
                    # refine the defined accessor types.
paul@44 1493
paul@44 1494
                    else:
paul@44 1495
                        return
paul@44 1496
paul@44 1497
                all_class_types.update(class_types)
paul@44 1498
                all_instance_types.update(instance_types)
paul@44 1499
                all_module_types.update(module_types)
paul@44 1500
paul@44 1501
            # Record refined type details for the alias as an accessor.
paul@44 1502
paul@44 1503
            self.init_definition_details(accessor_location)
paul@44 1504
            self.record_reference_types(accessor_location, all_class_types, all_instance_types, all_module_types, False)
paul@44 1505
paul@44 1506
        # Without an access, attempt to identify references for the alias.
paul@44 1507
paul@44 1508
        else:
paul@44 1509
            refs = set()
paul@44 1510
paul@44 1511
            for access_location in self.alias_index[accessor_location]:
paul@64 1512
paul@64 1513
                # Obtain any redefined constant access location.
paul@64 1514
paul@64 1515
                if self.const_accesses.has_key(access_location):
paul@64 1516
                    access_location = self.const_accesses[access_location]
paul@64 1517
paul@44 1518
                location, name, attrnames, access_number = access_location
paul@44 1519
paul@44 1520
                # Alias references an attribute access.
paul@44 1521
paul@44 1522
                if attrnames:
paul@44 1523
                    attrs = [attr for attrtype, object_type, attr in self.referenced_attrs[access_location]]
paul@44 1524
                    refs.update(attrs)
paul@44 1525
paul@44 1526
                # Alias references a name, not an access.
paul@44 1527
paul@44 1528
                else:
paul@44 1529
                    attr = self.get_initialised_name(access_location)
paul@44 1530
                    attrs = attr and [attr] or []
paul@44 1531
                    if not attrs and self.provider_class_types.has_key(access_location):
paul@44 1532
                        class_types = self.provider_class_types[access_location]
paul@44 1533
                        instance_types = self.provider_instance_types[access_location]
paul@44 1534
                        module_types = self.provider_module_types[access_location]
paul@57 1535
                        attrs = combine_types(class_types, instance_types, module_types)
paul@44 1536
                    if attrs:
paul@44 1537
                        refs.update(attrs)
paul@44 1538
paul@44 1539
            # Record reference details for the alias separately from accessors.
paul@44 1540
paul@44 1541
            self.referenced_objects[accessor_location] = refs
paul@44 1542
paul@44 1543
    def get_initialised_name(self, access_location):
paul@44 1544
paul@44 1545
        """
paul@44 1546
        Return references for any initialised names at 'access_location', or
paul@44 1547
        None if no such references exist.
paul@44 1548
        """
paul@44 1549
paul@44 1550
        location, name, attrnames, version = access_location
paul@79 1551
        path = get_name_path(location, name)
paul@44 1552
paul@44 1553
        # Use initialiser information, if available.
paul@44 1554
paul@44 1555
        refs = self.importer.all_initialised_names.get(path)
paul@44 1556
        if refs and refs.has_key(version):
paul@44 1557
            return refs[version]
paul@44 1558
        else:
paul@44 1559
            return None
paul@44 1560
paul@44 1561
    def record_reference_types(self, location, class_types, instance_types,
paul@44 1562
        module_types, constrained, constrained_specific=False):
paul@44 1563
paul@44 1564
        """
paul@44 1565
        Associate attribute provider types with the given 'location', consisting
paul@44 1566
        of the given 'class_types', 'instance_types' and 'module_types'.
paul@44 1567
paul@44 1568
        If 'constrained' is indicated, the constrained nature of the accessor is
paul@44 1569
        recorded for the location.
paul@44 1570
paul@44 1571
        If 'constrained_specific' is indicated using a true value, instance types
paul@44 1572
        will not be added to class types to permit access via instances at the
paul@44 1573
        given location. This is only useful where a specific accessor is known
paul@44 1574
        to be a class.
paul@44 1575
paul@44 1576
        Note that the specified types only indicate the provider types for
paul@44 1577
        attributes, whereas the recorded accessor types indicate the possible
paul@44 1578
        types of the actual objects used to access attributes.
paul@44 1579
        """
paul@44 1580
paul@44 1581
        # Update the type details for the location.
paul@44 1582
paul@44 1583
        self.provider_class_types[location].update(class_types)
paul@44 1584
        self.provider_instance_types[location].update(instance_types)
paul@44 1585
        self.provider_module_types[location].update(module_types)
paul@44 1586
paul@44 1587
        # Class types support classes and instances as accessors.
paul@44 1588
        # Instance-only and module types support only their own kinds as
paul@44 1589
        # accessors.
paul@44 1590
paul@44 1591
        # However, the nature of accessors can be further determined.
paul@44 1592
        # Any self variable may only refer to an instance.
paul@44 1593
paul@44 1594
        path, name, version, attrnames = location
paul@44 1595
        if name != "self" or not self.in_method(path):
paul@44 1596
            self.accessor_class_types[location].update(class_types)
paul@44 1597
paul@44 1598
        if not constrained_specific:
paul@44 1599
            self.accessor_instance_types[location].update(class_types)
paul@44 1600
paul@44 1601
        self.accessor_instance_types[location].update(instance_types)
paul@44 1602
paul@44 1603
        if name != "self" or not self.in_method(path):
paul@44 1604
            self.accessor_module_types[location].update(module_types)
paul@44 1605
paul@44 1606
        if constrained:
paul@67 1607
            self.accessor_constrained.add(location)
paul@44 1608
paul@44 1609
    def identify_reference_attributes(self, location, attrname, class_types, instance_types, module_types, constrained):
paul@44 1610
paul@44 1611
        """
paul@44 1612
        Identify reference attributes, associating them with the given
paul@44 1613
        'location', identifying the given 'attrname', employing the given
paul@44 1614
        'class_types', 'instance_types' and 'module_types'.
paul@44 1615
paul@44 1616
        If 'constrained' is indicated, the constrained nature of the access is
paul@44 1617
        recorded for the location.
paul@44 1618
        """
paul@44 1619
paul@44 1620
        # Record the referenced objects.
paul@44 1621
paul@44 1622
        self.referenced_attrs[location] = \
paul@44 1623
            self._identify_reference_attribute(attrname, class_types, instance_types, module_types)
paul@44 1624
paul@44 1625
        if constrained:
paul@44 1626
            self.access_constrained.add(location)
paul@44 1627
paul@44 1628
    def _identify_reference_attribute(self, attrname, class_types, instance_types, module_types):
paul@44 1629
paul@44 1630
        """
paul@44 1631
        Identify the reference attribute with the given 'attrname', employing
paul@44 1632
        the given 'class_types', 'instance_types' and 'module_types'.
paul@44 1633
        """
paul@44 1634
paul@44 1635
        attrs = set()
paul@44 1636
paul@44 1637
        # The class types expose class attributes either directly or via
paul@44 1638
        # instances.
paul@44 1639
paul@44 1640
        for object_type in class_types:
paul@44 1641
            ref = self.importer.get_class_attribute(object_type, attrname)
paul@44 1642
            if ref:
paul@44 1643
                attrs.add(("<class>", object_type, ref))
paul@44 1644
paul@44 1645
            # Add any distinct instance attributes that would be provided
paul@44 1646
            # by instances also providing indirect class attribute access.
paul@44 1647
paul@44 1648
            for ref in self.importer.get_instance_attributes(object_type, attrname):
paul@44 1649
                attrs.add(("<instance>", object_type, ref))
paul@44 1650
paul@44 1651
        # The instance-only types expose instance attributes, but although
paul@44 1652
        # classes are excluded as potential accessors (since they do not provide
paul@44 1653
        # the instance attributes), the class types may still provide some
paul@44 1654
        # attributes.
paul@44 1655
paul@44 1656
        for object_type in instance_types:
paul@44 1657
            instance_attrs = self.importer.get_instance_attributes(object_type, attrname)
paul@44 1658
paul@44 1659
            if instance_attrs:
paul@44 1660
                for ref in instance_attrs:
paul@44 1661
                    attrs.add(("<instance>", object_type, ref))
paul@44 1662
            else:
paul@44 1663
                ref = self.importer.get_class_attribute(object_type, attrname)
paul@44 1664
                if ref:
paul@44 1665
                    attrs.add(("<class>", object_type, ref))
paul@44 1666
paul@44 1667
        # Module types expose module attributes for module accessors.
paul@44 1668
paul@44 1669
        for object_type in module_types:
paul@44 1670
            ref = self.importer.get_module_attribute(object_type, attrname)
paul@44 1671
            if ref:
paul@44 1672
                attrs.add(("<module>", object_type, ref))
paul@44 1673
paul@44 1674
        return attrs
paul@44 1675
paul@70 1676
    constrained_specific_tests = (
paul@70 1677
        "constrained-specific-instance",
paul@70 1678
        "constrained-specific-type",
paul@70 1679
        "constrained-specific-object",
paul@70 1680
        )
paul@70 1681
paul@70 1682
    constrained_common_tests = (
paul@70 1683
        "constrained-common-instance",
paul@70 1684
        "constrained-common-type",
paul@70 1685
        "constrained-common-object",
paul@70 1686
        )
paul@70 1687
paul@67 1688
    guarded_specific_tests = (
paul@67 1689
        "guarded-specific-instance",
paul@67 1690
        "guarded-specific-type",
paul@67 1691
        "guarded-specific-object",
paul@67 1692
        )
paul@67 1693
paul@67 1694
    guarded_common_tests = (
paul@67 1695
        "guarded-common-instance",
paul@67 1696
        "guarded-common-type",
paul@67 1697
        "guarded-common-object",
paul@67 1698
        )
paul@67 1699
paul@67 1700
    specific_tests = (
paul@67 1701
        "specific-instance",
paul@67 1702
        "specific-type",
paul@67 1703
        "specific-object",
paul@67 1704
        )
paul@67 1705
paul@67 1706
    common_tests = (
paul@67 1707
        "common-instance",
paul@67 1708
        "common-type",
paul@67 1709
        "common-object",
paul@67 1710
        )
paul@67 1711
paul@67 1712
    class_tests = (
paul@67 1713
        "guarded-specific-type",
paul@67 1714
        "guarded-common-type",
paul@67 1715
        "specific-type",
paul@67 1716
        "common-type",
paul@67 1717
        )
paul@67 1718
paul@67 1719
    class_or_instance_tests = (
paul@67 1720
        "guarded-specific-object",
paul@67 1721
        "guarded-common-object",
paul@67 1722
        "specific-object",
paul@67 1723
        "common-object",
paul@67 1724
        )
paul@67 1725
paul@67 1726
    def get_access_plan(self, location):
paul@65 1727
paul@77 1728
        """
paul@77 1729
        Return details of the access at the given 'location'. The details are as
paul@77 1730
        follows:
paul@77 1731
paul@77 1732
         * the initial accessor (from which accesses will be performed if no
paul@77 1733
           computed static accessor is found)
paul@77 1734
         * details of any test required on the initial accessor
paul@77 1735
         * details of any type employed by the test
paul@77 1736
         * any static accessor (from which accesses will be performed in
paul@77 1737
           preference to the initial accessor)
paul@77 1738
         * attributes needing to be traversed from the base that yield
paul@77 1739
           unambiguous objects
paul@77 1740
         * remaining attributes needing to be tested and traversed
paul@77 1741
         * details of the context
paul@77 1742
         * the method of obtaining the final attribute
paul@77 1743
         * any static final attribute
paul@77 1744
        """
paul@65 1745
paul@67 1746
        const_access = self.const_accesses_rev.has_key(location)
paul@65 1747
paul@75 1748
        path, name, attrnames, version = location
paul@75 1749
        remaining = attrnames.split(".")
paul@75 1750
        attrname = remaining[0]
paul@65 1751
paul@67 1752
        # Obtain reference and accessor information, retaining also distinct
paul@67 1753
        # provider kind details.
paul@65 1754
paul@65 1755
        attrs = []
paul@65 1756
        objtypes = []
paul@67 1757
        provider_kinds = set()
paul@67 1758
paul@65 1759
        for attrtype, objtype, attr in self.referenced_attrs[location]:
paul@65 1760
            attrs.append(attr)
paul@65 1761
            objtypes.append(objtype)
paul@67 1762
            provider_kinds.add(attrtype)
paul@67 1763
paul@67 1764
        # Obtain accessor type and kind information.
paul@67 1765
paul@67 1766
        accessor_types = self.reference_all_accessor_types[location]
paul@67 1767
        accessor_general_types = self.reference_all_accessor_general_types[location]
paul@67 1768
        accessor_kinds = get_kinds(accessor_general_types)
paul@67 1769
paul@67 1770
        # Determine any guard or test requirements.
paul@67 1771
paul@67 1772
        constrained = location in self.access_constrained
paul@70 1773
        test = self.reference_test_types[location]
paul@77 1774
        test_type = self.reference_test_accessor_type.get(location)
paul@67 1775
paul@67 1776
        # Determine the accessor and provider properties.
paul@67 1777
paul@67 1778
        class_accessor = "<class>" in accessor_kinds
paul@67 1779
        module_accessor = "<module>" in accessor_kinds
paul@67 1780
        instance_accessor = "<instance>" in accessor_kinds
paul@67 1781
        provided_by_class = "<class>" in provider_kinds
paul@67 1782
        provided_by_instance = "<instance>" in provider_kinds
paul@67 1783
paul@74 1784
        # Determine how attributes may be accessed relative to the accessor.
paul@74 1785
paul@74 1786
        object_relative = class_accessor or module_accessor or provided_by_instance
paul@74 1787
        class_relative = instance_accessor and provided_by_class
paul@74 1788
paul@67 1789
        # Identify the last static attribute for context acquisition.
paul@67 1790
paul@67 1791
        base = None
paul@67 1792
        dynamic_base = None
paul@67 1793
paul@67 1794
        # Constant accesses have static accessors.
paul@65 1795
paul@65 1796
        if const_access:
paul@65 1797
            base = len(objtypes) == 1 and first(objtypes)
paul@67 1798
paul@67 1799
        # Constant accessors are static.
paul@67 1800
paul@65 1801
        else:
paul@65 1802
            ref = self.importer.identify("%s.%s" % (path, name))
paul@67 1803
            if ref:
paul@65 1804
                base = ref.get_origin()
paul@65 1805
paul@70 1806
            # Usage of previously-generated guard and test details.
paul@70 1807
paul@70 1808
            elif test in self.constrained_specific_tests:
paul@67 1809
                ref = first(accessor_types)
paul@67 1810
paul@70 1811
            elif test in self.constrained_common_tests:
paul@67 1812
                ref = first(accessor_general_types)
paul@67 1813
paul@67 1814
            elif test in self.guarded_specific_tests:
paul@67 1815
                ref = first(accessor_types)
paul@67 1816
paul@67 1817
            elif test in self.guarded_common_tests:
paul@67 1818
                ref = first(accessor_general_types)
paul@67 1819
paul@70 1820
            # For attribute-based tests, tentatively identify a dynamic base.
paul@70 1821
            # Such tests allow single or multiple kinds of a type.
paul@70 1822
paul@67 1823
            elif test in self.common_tests or test in self.specific_tests:
paul@77 1824
                dynamic_base = test_type
paul@67 1825
paul@67 1826
            # Static accessors.
paul@67 1827
paul@70 1828
            if not base and test in self.class_tests:
paul@70 1829
                base = ref and ref.get_origin() or dynamic_base
paul@70 1830
paul@70 1831
            # Accessors that are not static but whose nature is determined.
paul@70 1832
paul@70 1833
            elif not base and ref:
paul@67 1834
                dynamic_base = ref.get_origin()
paul@67 1835
paul@65 1836
        traversed = []
paul@65 1837
paul@65 1838
        # Traverse remaining attributes.
paul@65 1839
paul@65 1840
        while len(attrs) == 1:
paul@65 1841
            attr = first(attrs)
paul@65 1842
paul@65 1843
            traversed.append(attrname)
paul@75 1844
            del remaining[0]
paul@75 1845
paul@75 1846
            if not remaining:
paul@65 1847
                break
paul@65 1848
paul@67 1849
            # Update the last static attribute.
paul@67 1850
paul@65 1851
            if attr.static():
paul@65 1852
                base = attr.get_origin()
paul@65 1853
                traversed = []
paul@65 1854
paul@67 1855
            # Get the next attribute.
paul@67 1856
paul@75 1857
            attrname = remaining[0]
paul@65 1858
            attrs = self.importer.get_attributes(attr, attrname)
paul@67 1859
paul@67 1860
        # Where many attributes are suggested, no single attribute identity can
paul@67 1861
        # be loaded.
paul@67 1862
paul@65 1863
        else:
paul@65 1864
            attr = None
paul@65 1865
paul@67 1866
        # Determine the method of access.
paul@67 1867
paul@71 1868
        # Identified attribute that must be accessed via its parent.
paul@71 1869
paul@74 1870
        if attr and attr.get_name() and location in self.reference_assignments:
paul@71 1871
            method = "direct"; origin = attr.get_name()
paul@71 1872
paul@67 1873
        # Static, identified attribute.
paul@67 1874
paul@71 1875
        elif attr and attr.static():
paul@67 1876
            method = "static"; origin = attr.final()
paul@67 1877
paul@67 1878
        # Attribute accessed at a known position via its parent.
paul@67 1879
paul@67 1880
        elif base or dynamic_base:
paul@74 1881
            method = "relative" + (object_relative and "-object" or "") + \
paul@74 1882
                                  (class_relative and "-class" or "")
paul@74 1883
            origin = None
paul@67 1884
paul@67 1885
        # The fallback case is always run-time testing and access.
paul@67 1886
paul@67 1887
        else:
paul@74 1888
            method = "check" + (object_relative and "-object" or "") + \
paul@74 1889
                               (class_relative and "-class" or "")
paul@67 1890
            origin = None
paul@67 1891
paul@75 1892
        # Determine the nature of the context.
paul@75 1893
paul@77 1894
        context = base and "base" or len(traversed or remaining) > 1 and "traversal" or "accessor"
paul@77 1895
paul@77 1896
        return name, test, test_type, base, traversed, remaining, context, method, origin
paul@65 1897
paul@44 1898
# vim: tabstop=4 expandtab shiftwidth=4