• Top
    • Documentation
    • Books
    • Recursion-and-induction
    • Boolean-reasoning
    • Debugging
    • Projects
    • Std
    • Proof-automation
    • Macro-libraries
    • ACL2
    • Interfacing-tools
    • Hardware-verification
    • Software-verification
      • Kestrel-books
      • X86isa
      • Execloader
        • Elf-reader
          • Elf64_sym
          • Elf32_sym
          • Elf-header
          • Elf-section-header
          • Elf64-segment-header
          • Elf32-segment-header
          • Elf_bits32
          • Elf_bits8
          • Elf_bits64
          • Elf_bits16
          • Section-info
          • Read-elf-header
          • Read-section-headers
          • Read-segment-headers-64
          • Read-segment-headers-32
          • Read-section-names
          • Elf64_sym-info
          • Elf32_sym-info
          • Parse-symtab-entries
            • Is-elf-content-p
            • Populate-elf-contents
            • Get-string-section-data
            • Get-section-info1
            • Set-elf-stobj-fields
            • Get-named-section-headers
            • Elf-read-mem-null-term
            • Get-section-info
            • Find-label-address-from-elf-symtab-info
            • Section-names
            • Get-symtab-entries
            • Populate-elf
            • Get-label-addresses
            • Get-label-address
            • Elf-read-string-null-term
            • Good-elf-p
            • Elf64_sym-equiv-under-mask
            • Elf64-segment-headers
            • Elf32_sym-equiv-under-mask
            • Elf32-segment-headers
            • Section-info-list
            • Elf64_sym-info-list
            • Elf32_sym-info-list
            • Elf-section-headers
            • Elf64_sym-debug
            • Elf32_sym-debug
          • Mach-o-reader
          • Merge-first-split-bytes
          • Split-bytes
          • Charlist->bytes
          • Take-till-zero
          • Merge-bytes
          • Bytes->charlist
          • Bytes->string
          • String->bytes
        • Axe
      • Testing-utilities
      • Math
    • Elf-reader

    Parse-symtab-entries

    Signature
    (parse-symtab-entries elf64 entrysize symbytes strbytes) 
      → 
    elf-entries
    Arguments
    elf64 — Guard (booleanp elf64).
    entrysize — Guard (natp entrysize).
    symbytes — Guard (byte-listp symbytes).
    strbytes — Guard (byte-listp strbytes).

    Definitions and Theorems

    Function: parse-symtab-entries

    (defun
     parse-symtab-entries
     (elf64 entrysize symbytes strbytes)
     (declare (xargs :guard (and (booleanp elf64)
                                 (natp entrysize)
                                 (byte-listp symbytes)
                                 (byte-listp strbytes))))
     (let
      ((__function__ 'parse-symtab-entries))
      (declare (ignorable __function__))
      (b*
       (((unless (and (< 0 (len symbytes))
                      (< 0 (nfix entrysize))))
         nil)
        ((mv entry rest-symbytes)
         (merge-first-split-bytes entrysize symbytes))
        ((unless (if elf64 (elf64_sym-p entry)
                     (elf32_sym-p entry)))
         (prog2$ (raise "Inconsistency with entrysize and symbytes?")
                 nil))
        (entry-name (if elf64 (elf64_sym->name entry)
                        (elf32_sym->name entry)))
        (name-str
         (bytes->string (take-till-zero (nthcdr entry-name strbytes)))))
       (cons (if elf64
                 (make-elf64_sym-info :name-str name-str
                                      :entry entry)
                 (make-elf32_sym-info :name-str name-str
                                      :entry entry))
             (parse-symtab-entries elf64
                                   entrysize rest-symbytes strbytes)))))

    Theorem: elf64_sym-info-list-p-of-parse-symtab-entries

    (defthm
     elf64_sym-info-list-p-of-parse-symtab-entries
     (b*
        ((?elf-entries
              (parse-symtab-entries elf64 entrysize symbytes strbytes)))
        (implies elf64
                 (elf64_sym-info-list-p elf-entries))))

    Theorem: elf32_sym-info-list-p-of-parse-symtab-entries

    (defthm
     elf32_sym-info-list-p-of-parse-symtab-entries
     (b*
        ((?elf-entries
              (parse-symtab-entries elf64 entrysize symbytes strbytes)))
        (implies (not elf64)
                 (elf32_sym-info-list-p elf-entries))))