symbol-data ( symbol -- data )

Vocabulary

elf

Inputs

symbol

an object

Outputs

data

an object

Definition

USING: accessors alien alien.c-types alien.data kernel math ;

IN: elf

:: symbol-data ( symbol -- data )
    symbol [ elf-header>> ] [ sym>> st_value>> ] bi
    virtual-address-segment
    :> segment symbol sym>> st_value>> segment p_vaddr>> -
    segment p_offset>> +
    :> faddress faddress symbol elf-header>> >c-ptr
    <displaced-alien>
    symbol sym>> st_size>> uchar <c-direct-array> ;