read-payload ( rel-base struct -- tuple )

Vocabulary

tools.image-analyzer.data-heap-reader

Inputs

rel-base	an object
struct	an object

Outputs

tuple

an object

Definition

IN: tools.image-analyzer.data-heap-reader

GENERIC: read-payload ( rel-base struct -- tuple )

Methods

USING: kernel tools.image-analyzer.data-heap-reader ;

M: array-payload read-payload nip read-array-payload ;


USING: accessors kernel math
tools.image-analyzer.data-heap-reader tools.image-analyzer.vm.64
;

M: byte-array read-payload
    nip [ capacity>> -4 shift ] keep read-uchar-payload ;


USING: accessors kernel math
tools.image-analyzer.data-heap-reader tools.image-analyzer.vm ;

M: callstack read-payload
    nip [ length>> -4 shift ] keep read-uchar-payload ;


USING: kernel tools.image-analyzer.data-heap-reader ;

M: no-payload read-payload nip read-no-payload ;


USING: accessors kernel math
tools.image-analyzer.data-heap-reader tools.image-analyzer.vm ;

M: string read-payload
    nip [ length>> -4 shift ] keep read-uchar-payload ;


USING: accessors classes.struct io kernel math
tools.image-analyzer.data-heap-reader tools.image-analyzer.utils
tools.image-analyzer.vm vm ;

M: tuple read-payload
    [
        [
            layout-address seek-absolute seek-input
            tuple-layout read-struct size>> -4 shift
        ] save-io-excursion
    ] keep cell_t read-padded-payload ;