extra/elf/nm/nm-tests.factor

   1 ! Copyright (C) 2010 Erik Charlebois.
   2 ! See https://factorcode.org/license.txt for BSD license.
   3 USING: elf.nm io io.streams.string kernel literals multiline strings
   4 system tools.test ;
   5 IN: elf.nm.tests
   6
   7 STRING: validation-output
   8 0000000000000000 absolute         init.c
   9 000000000040046c .text            call_gmon_start
  10 0000000000000000 absolute         crtstuff.c
  11 0000000000600e18 .ctors           __CTOR_LIST__
  12 0000000000600e28 .dtors           __DTOR_LIST__
  13 0000000000600e38 .jcr             __JCR_LIST__
  14 0000000000400490 .text            __do_global_dtors_aux
  15 0000000000601020 .bss             completed.7342
  16 0000000000601028 .bss             dtor_idx.7344
  17 0000000000400500 .text            frame_dummy
  18 0000000000000000 absolute         crtstuff.c
  19 0000000000600e20 .ctors           __CTOR_END__
  20 00000000004006d8 .eh_frame        __FRAME_END__
  21 0000000000600e38 .jcr             __JCR_END__
  22 00000000004005e0 .text            __do_global_ctors_aux
  23 0000000000000000 absolute         test.c
  24 0000000000600fe8 .got.plt         _GLOBAL_OFFSET_TABLE_
  25 0000000000600e14 .ctors           __init_array_end
  26 0000000000600e14 .ctors           __init_array_start
  27 0000000000600e40 .dynamic         _DYNAMIC
  28 0000000000601010 .data            data_start
  29 0000000000000000 undefined        printf@@GLIBC_2.2.5
  30 0000000000400540 .text            __libc_csu_fini
  31 0000000000400440 .text            _start
  32 0000000000000000 undefined        __gmon_start__
  33 0000000000000000 undefined        _Jv_RegisterClasses
  34 0000000000400618 .fini            _fini
  35 0000000000000000 undefined        __libc_start_main@@GLIBC_2.2.5
  36 0000000000400628 .rodata          _IO_stdin_used
  37 0000000000601010 .data            __data_start
  38 0000000000601018 .data            __dso_handle
  39 0000000000600e30 .dtors           __DTOR_END__
  40 0000000000400550 .text            __libc_csu_init
  41 0000000000601020 absolute         __bss_start
  42 0000000000601030 absolute         _end
  43 0000000000601020 absolute         _edata
  44 0000000000400524 .text            main
  45 00000000004003f0 .init            _init
  46
  47 ;
  48
  49 cpu ppc? [
  50     { $ validation-output }
  51     [ [ "resource:extra/elf/a.elf" elf-nm ] with-string-writer ]
  52     unit-test
  53 ] unless