#! /bin/sh

# Copyright (C) 2012 Red Hat, Inc.

# This file is part of elfutils.

#

# This file is free software; you can redistribute it and/or modify

# it under the terms of the GNU General Public License as published by

# the Free Software Foundation; either version 3 of the License, or

# (at your option) any later version.

#

# elfutils is distributed in the hope that it will be useful, but

# WITHOUT ANY WARRANTY; without even the implied warranty of

# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the

# GNU General Public License for more details.

#

# You should have received a copy of the GNU General Public License

# along with this program.  If not, see <http://www.gnu.org/licenses/>.

. $srcdir/test-subr.sh

# common.h

# struct foo

# {

#   const char *bar;

# };

#

# extern char *global;

# int say (struct foo *prefix);

# hello.c

# #include "common.h"

#

# static char *hello = "Hello";

#

# int

# main (int argc, char **argv)

# {

#   struct foo baz;

#   global = hello;

#   baz.bar = global;

#   return say(&baz;;

# }

# world.c

# #include "common.h"

#

# char *global;

#

# static int hello (const char *bar)

# {

#   return bar == global;

# }

#

# int

# say (struct foo *prefix)

# {

#   return hello (prefix->bar);

# }

# gcc -g -fdebug-types-section -c hello.c

# gcc -g -fdebug-types-section -c world.c

# gcc -g -fdebug-types-section -o testfilegdbindex7 hello.o world.o

# gdb testfilegdbindex7

# (gdb) save gdb-index .

# objcopy --add-section .gdb_index=testfilegdbindex7.gdb-index --set-section-flags .gdb_index=readonly testfilegdbindex7 testfilegdbindex7

testfiles testfilegdbindex5 testfilegdbindex7

testrun_compare ${abs_top_builddir}/src/readelf --debug-dump=gdb_index testfilegdbindex5 <<\EOF

GDB section [33] '.gdb_index' at offset 0xe76 contains 8383 bytes :

 Version:         5

 CU offset:       0x18

 TU offset:       0x38

 address offset:  0x50

 symbol offset:   0x78

 constant offset: 0x2078

 CU list at offset 0x18 contains 2 entries:

 [   0] start: 00000000, length:   184

 [   1] start: 0x0000b8, length:   204

 TU list at offset 0x38 contains 1 entries:

 [   0] CU offset:     0, type offset:    29, signature: 0x87e03f92cc37cdf0

 Address list at offset 0x50 contains 2 entries:

 [   0] 0x000000000040049c <main>..0x00000000004004d1 <main+0x35>, CU index:     0

 [   1] 0x00000000004004d4 <hello>..0x000000000040050b <say+0x1c>, CU index:     1

 Symbol table at offset 0x50 contains 1024 slots:

 [ 123] symbol: global, CUs: 1

 [ 489] symbol: main, CUs: 0

 [ 518] symbol: char, CUs: 0

 [ 661] symbol: foo, CUs: 0T

 [ 741] symbol: hello, CUs: 0, 1

 [ 746] symbol: say, CUs: 1

 [ 754] symbol: int, CUs: 0

EOF

testrun_compare ${abs_top_builddir}/src/readelf --debug-dump=gdb_index testfilegdbindex7 <<\EOF

GDB section [33] '.gdb_index' at offset 0xe76 contains 8399 bytes :

 Version:         7

 CU offset:       0x18

 TU offset:       0x38

 address offset:  0x50

 symbol offset:   0x78

 constant offset: 0x2078

 CU list at offset 0x18 contains 2 entries:

 [   0] start: 00000000, length:   184

 [   1] start: 0x0000b8, length:   204

 TU list at offset 0x38 contains 1 entries:

 [   0] CU offset:     0, type offset:    29, signature: 0x87e03f92cc37cdf0

 Address list at offset 0x50 contains 2 entries:

 [   0] 0x000000000040049c <main>..0x00000000004004d1 <main+0x35>, CU index:     0

 [   1] 0x00000000004004d4 <hello>..0x000000000040050b <say+0x1c>, CU index:     1

 Symbol table at offset 0x50 contains 1024 slots:

 [ 123] symbol: global, CUs: 1 (var:G)

 [ 489] symbol: main, CUs: 0 (func:G)

 [ 518] symbol: char, CUs: 0 (type:S)

 [ 661] symbol: foo, CUs: 0T (type:S)

 [ 741] symbol: hello, CUs: 0 (var:S), 1 (func:S)

 [ 746] symbol: say, CUs: 1 (func:G)

 [ 754] symbol: int, CUs: 0 (type:S)

EOF

exit 0