mirror of
https://sourceware.org/git/binutils-gdb.git
synced 2024-11-27 03:51:15 +08:00
3cff7cc71f
.fini_array.* when do relocatable linking. * scripttempl/elf.sc: Likewise. * scripttempl/elf32sh-symbian.sc: Likewise. * scripttempl/elf64hppa.sc: Likewise. * scripttempl/elfxtensa.sc: Likewise. testsuite/ * ld-elf/init-fini-arrays.s: New test. * ld-elf/init-fini-arrays.d: New test.
388 lines
14 KiB
Python
388 lines
14 KiB
Python
#
|
|
# Unusual variables checked by this code:
|
|
# NOP - four byte opcode for no-op (defaults to 0)
|
|
# DATA_ADDR - if end-of-text-plus-one-page isn't right for data start
|
|
# INITIAL_READONLY_SECTIONS - at start of text segment
|
|
# OTHER_READONLY_SECTIONS - other than .text .init .rodata ...
|
|
# (e.g., .PARISC.milli)
|
|
# OTHER_TEXT_SECTIONS - these get put in .text when relocating
|
|
# OTHER_READWRITE_SECTIONS - other than .data .bss .ctors .sdata ...
|
|
# (e.g., .PARISC.global)
|
|
# ATTRS_SECTIONS - at the end
|
|
# OTHER_SECTIONS - at the end
|
|
# EXECUTABLE_SYMBOLS - symbols that must be defined for an
|
|
# executable (e.g., _DYNAMIC_LINK)
|
|
# TEXT_START_SYMBOLS - symbols that appear at the start of the
|
|
# .text section.
|
|
# DATA_START_SYMBOLS - symbols that appear at the start of the
|
|
# .data section.
|
|
# OTHER_GOT_SYMBOLS - symbols defined just before .got.
|
|
# OTHER_GOT_SECTIONS - sections just after .got.
|
|
# OTHER_SDATA_SECTIONS - sections just after .sdata.
|
|
# OTHER_BSS_SYMBOLS - symbols that appear at the start of the
|
|
# .bss section besides __bss_start.
|
|
# DATA_PLT - .plt should be in data segment, not text segment.
|
|
# BSS_PLT - .plt should be in bss segment
|
|
# TEXT_DYNAMIC - .dynamic in text segment, not data segment.
|
|
# EMBEDDED - whether this is for an embedded system.
|
|
# SHLIB_TEXT_START_ADDR - if set, add to SIZEOF_HEADERS to set
|
|
# start address of shared library.
|
|
# INPUT_FILES - INPUT command of files to always include
|
|
# WRITABLE_RODATA - if set, the .rodata section should be writable
|
|
# INIT_START, INIT_END - statements just before and just after
|
|
# combination of .init sections.
|
|
# FINI_START, FINI_END - statements just before and just after
|
|
# combination of .fini sections.
|
|
# STACK_ADDR - start of a .stack section.
|
|
# OTHER_SYMBOLS - symbols to place right at the end of the script.
|
|
#
|
|
# When adding sections, do note that the names of some sections are used
|
|
# when specifying the start address of the next.
|
|
#
|
|
|
|
# Many sections come in three flavours. There is the 'real' section,
|
|
# like ".data". Then there are the per-procedure or per-variable
|
|
# sections, generated by -ffunction-sections and -fdata-sections in GCC,
|
|
# and useful for --gc-sections, which for a variable "foo" might be
|
|
# ".data.foo". Then there are the linkonce sections, for which the linker
|
|
# eliminates duplicates, which are named like ".gnu.linkonce.d.foo".
|
|
# The exact correspondences are:
|
|
#
|
|
# Section Linkonce section
|
|
# .text .gnu.linkonce.t.foo
|
|
# .rodata .gnu.linkonce.r.foo
|
|
# .data .gnu.linkonce.d.foo
|
|
# .bss .gnu.linkonce.b.foo
|
|
# .sdata .gnu.linkonce.s.foo
|
|
# .sbss .gnu.linkonce.sb.foo
|
|
# .sdata2 .gnu.linkonce.s2.foo
|
|
# .sbss2 .gnu.linkonce.sb2.foo
|
|
# .debug_info .gnu.linkonce.wi.foo
|
|
# .tdata .gnu.linkonce.td.foo
|
|
# .tbss .gnu.linkonce.tb.foo
|
|
#
|
|
# Each of these can also have corresponding .rel.* and .rela.* sections.
|
|
|
|
test -z "$ENTRY" && ENTRY=_start
|
|
test -z "${BIG_OUTPUT_FORMAT}" && BIG_OUTPUT_FORMAT=${OUTPUT_FORMAT}
|
|
test -z "${LITTLE_OUTPUT_FORMAT}" && LITTLE_OUTPUT_FORMAT=${OUTPUT_FORMAT}
|
|
if [ -z "$MACHINE" ]; then OUTPUT_ARCH=${ARCH}; else OUTPUT_ARCH=${ARCH}:${MACHINE}; fi
|
|
test -z "${ELFSIZE}" && ELFSIZE=32
|
|
test -z "${ALIGNMENT}" && ALIGNMENT="${ELFSIZE} / 8"
|
|
test "$LD_FLAG" = "N" && DATA_ADDR=.
|
|
test -n "$CREATE_SHLIB$CREATE_PIE" && test -n "$SHLIB_DATA_ADDR" && COMMONPAGESIZE=""
|
|
test -z "$CREATE_SHLIB$CREATE_PIE" && test -n "$DATA_ADDR" && COMMONPAGESIZE=""
|
|
test -z "$ATTRS_SECTIONS" && ATTRS_SECTIONS=".gnu.attributes 0 : { KEEP (*(.gnu.attributes)) }"
|
|
DATA_SEGMENT_ALIGN="ALIGN(${SEGMENT_SIZE}) + (. & (${MAXPAGESIZE} - 1))"
|
|
DATA_SEGMENT_END=""
|
|
if test -n "${COMMONPAGESIZE}"; then
|
|
DATA_SEGMENT_ALIGN="ALIGN (${SEGMENT_SIZE}) - ((${MAXPAGESIZE} - .) & (${MAXPAGESIZE} - 1)); . = DATA_SEGMENT_ALIGN (${MAXPAGESIZE}, ${COMMONPAGESIZE})"
|
|
DATA_SEGMENT_END=". = DATA_SEGMENT_END (.);"
|
|
fi
|
|
INTERP=".interp ALIGN(4) : { *(.interp) }"
|
|
PLT=".plt : { *(.plt) } :dynamic :dyn"
|
|
DYNAMIC=".dynamic : { *(.dynamic) } :dynamic :dyn"
|
|
RODATA=".rodata ALIGN(4) : { *(.rodata${RELOCATING+ .rodata.* .gnu.linkonce.r.*}) }"
|
|
DISCARDED="/DISCARD/ : { *(.note.GNU-stack) *(.gnu_debuglink) *(.directive) *(.gnu.lto_*) }"
|
|
test -z "$GOT" && GOT=".got ${RELOCATING-0} : { *(.got.plt) *(.got) } :dynamic :dyn"
|
|
INIT_ARRAY=".init_array ${RELOCATING-0} :
|
|
{
|
|
${RELOCATING+${CREATE_SHLIB-PROVIDE_HIDDEN (__init_array_start = .);}}
|
|
KEEP (*(SORT(.init_array.*)))
|
|
KEEP (*(.init_array))
|
|
${RELOCATING+${CREATE_SHLIB-PROVIDE_HIDDEN (__init_array_end = .);}}
|
|
}"
|
|
FINI_ARRAY=".fini_array ${RELOCATING-0} :
|
|
{
|
|
${RELOCATING+${CREATE_SHLIB-PROVIDE_HIDDEN (__fini_array_start = .);}}
|
|
KEEP (*(SORT(.fini_array.*)))
|
|
KEEP (*(.fini_array))
|
|
${RELOCATING+${CREATE_SHLIB-PROVIDE_HIDDEN (__fini_array_end = .);}}
|
|
}"
|
|
CTOR=".ctors ALIGN(4) :
|
|
{
|
|
${CONSTRUCTING+${CTOR_START}}
|
|
/* gcc uses crtbegin.o to find the start of
|
|
the constructors, so we make sure it is
|
|
first. Because this is a wildcard, it
|
|
doesn't matter if the user does not
|
|
actually link against crtbegin.o; the
|
|
linker won't look for a file to match a
|
|
wildcard. The wildcard also means that it
|
|
doesn't matter which directory crtbegin.o
|
|
is in. */
|
|
|
|
KEEP (*crtbegin.o(.ctors))
|
|
KEEP (*crtbegin?.o(.ctors))
|
|
|
|
/* We don't want to include the .ctor section from
|
|
the crtend.o file until after the sorted ctors.
|
|
The .ctor section from the crtend file contains the
|
|
end of ctors marker and it must be last */
|
|
|
|
KEEP (*(EXCLUDE_FILE (*crtend.o *crtend?.o $OTHER_EXCLUDE_FILES) .ctors))
|
|
KEEP (*(SORT(.ctors.*)))
|
|
KEEP (*(.ctors))
|
|
${CONSTRUCTING+${CTOR_END}}
|
|
} :text"
|
|
DTOR=".dtors ALIGN(4) :
|
|
{
|
|
${CONSTRUCTING+${DTOR_START}}
|
|
KEEP (*crtbegin.o(.dtors))
|
|
KEEP (*crtbegin?.o(.dtors))
|
|
KEEP (*(EXCLUDE_FILE (*crtend.o *crtend?.o $OTHER_EXCLUDE_FILES) .dtors))
|
|
KEEP (*(SORT(.dtors.*)))
|
|
KEEP (*(.dtors))
|
|
${CONSTRUCTING+${DTOR_END}}
|
|
} :text"
|
|
STACK=" .stack ${RELOCATING-0}${RELOCATING+${STACK_ADDR}} :
|
|
{
|
|
${RELOCATING+_stack = .;}
|
|
*(.stack)
|
|
} :data"
|
|
|
|
# if this is for an embedded system, don't add SIZEOF_HEADERS.
|
|
if [ -z "$EMBEDDED" ]; then
|
|
test -z "${TEXT_BASE_ADDRESS}" && TEXT_BASE_ADDRESS="${TEXT_START_ADDR} + SIZEOF_HEADERS"
|
|
else
|
|
test -z "${TEXT_BASE_ADDRESS}" && TEXT_BASE_ADDRESS="${TEXT_START_ADDR}"
|
|
fi
|
|
|
|
cat <<EOF
|
|
OUTPUT_FORMAT("${OUTPUT_FORMAT}", "${BIG_OUTPUT_FORMAT}",
|
|
"${LITTLE_OUTPUT_FORMAT}")
|
|
OUTPUT_ARCH(${OUTPUT_ARCH})
|
|
${RELOCATING+ENTRY(${ENTRY})}
|
|
|
|
${RELOCATING+${LIB_SEARCH_DIRS}}
|
|
${RELOCATING+/* Do we need any of these for elf?
|
|
__DYNAMIC = 0; ${STACKZERO+${STACKZERO}} ${SHLIB_PATH+${SHLIB_PATH}} */}
|
|
${RELOCATING+${EXECUTABLE_SYMBOLS}}
|
|
${RELOCATING+${INPUT_FILES}}
|
|
${RELOCATING- /* For some reason, the Solaris linker makes bad executables
|
|
if gld -r is used and the intermediate file has sections starting
|
|
at non-zero addresses. Could be a Solaris ld bug, could be a GNU ld
|
|
bug. But for now assigning the zero vmas works. */}
|
|
|
|
PHDRS
|
|
{
|
|
headers PT_PHDR PHDRS ;
|
|
text PT_LOAD ;
|
|
data PT_LOAD ;
|
|
dyn PT_LOAD FLAGS (0) ;
|
|
dynamic PT_DYNAMIC ;
|
|
}
|
|
|
|
SECTIONS
|
|
{
|
|
/* Read-only sections, merged into text segment: */
|
|
${CREATE_SHLIB-${CREATE_PIE-${RELOCATING+. = ${TEXT_BASE_ADDRESS};}}}
|
|
${CREATE_SHLIB+${RELOCATING+. = ${SHLIB_TEXT_START_ADDR:-0};}}
|
|
${CREATE_PIE+${RELOCATING+. = ${SHLIB_TEXT_START_ADDR:-0};}}
|
|
${CREATE_SHLIB-${INTERP}}
|
|
|
|
${INITIAL_READONLY_SECTIONS}
|
|
|
|
.init ALIGN(4) :
|
|
{
|
|
${RELOCATING+${INIT_START}}
|
|
KEEP (*(.init))
|
|
${RELOCATING+${INIT_END}}
|
|
} :text =${NOP-0}
|
|
|
|
.text ALIGN(4) :
|
|
{
|
|
${RELOCATING+${TEXT_START_SYMBOLS}}
|
|
*(.text .stub${RELOCATING+ .text.* .gnu.linkonce.t.*})
|
|
/* .gnu.warning sections are handled specially by elf32.em. */
|
|
*(.gnu.warning)
|
|
${RELOCATING+${OTHER_TEXT_SECTIONS}}
|
|
} =${NOP-0}
|
|
|
|
${RELOCATING+${CTOR}}
|
|
${RELOCATING+${DTOR}}
|
|
|
|
.fini ALIGN(4) :
|
|
{
|
|
${RELOCATING+${FINI_START}}
|
|
KEEP (*(.fini))
|
|
${RELOCATING+${FINI_END}}
|
|
} =${NOP-0}
|
|
|
|
${RELOCATING+PROVIDE (__etext = .);}
|
|
${RELOCATING+PROVIDE (_etext = .);}
|
|
${RELOCATING+PROVIDE (etext = .);}
|
|
|
|
${WRITABLE_RODATA-${RODATA}}
|
|
.rodata1 ALIGN(4) : { *(.rodata1) }
|
|
|
|
ExportTable ALIGN(4) : { KEEP (*(ExportTable)) }
|
|
.eh_frame_hdr ALIGN(4) : { *(.eh_frame_hdr) } :text
|
|
|
|
/* Adjust the address for the data segment. We want to adjust up to
|
|
the same address within the page on the next page up. */
|
|
. = ALIGN(128) + (. & (128 - 1));
|
|
.preinit_array ${RELOCATING-0} :
|
|
{
|
|
${RELOCATING+${CREATE_SHLIB-PROVIDE_HIDDEN (__preinit_array_start = .);}}
|
|
KEEP (*(.preinit_array))
|
|
${RELOCATING+${CREATE_SHLIB-PROVIDE_HIDDEN (__preinit_array_end = .);}}
|
|
}
|
|
${RELOCATING+${INIT_ARRAY}}
|
|
${RELOCATING+${FINI_ARRAY}}
|
|
|
|
${CREATE_SHLIB-${CREATE_PIE-${RELOCATING+. = ${DATA_ADDR-${DATA_SEGMENT_ALIGN}};}}}
|
|
${CREATE_SHLIB+${RELOCATING+. = ${SHLIB_DATA_ADDR-${DATA_SEGMENT_ALIGN}};}}
|
|
${CREATE_PIE+${RELOCATING+. = ${SHLIB_DATA_ADDR-${DATA_SEGMENT_ALIGN}};}}
|
|
|
|
.data ALIGN(4) :
|
|
{
|
|
${RELOCATING+${DATA_START_SYMBOLS}}
|
|
*(.data${RELOCATING+ .data.* .gnu.linkonce.d.*})
|
|
${CONSTRUCTING+SORT(CONSTRUCTORS)}
|
|
} :data
|
|
|
|
.data1 ALIGN(4) : { *(.data1) } :data
|
|
.tdata ALIGN(4) : { *(.tdata${RELOCATING+ .tdata.* .gnu.linkonce.td.*}) } :data
|
|
.tbss ALIGN(4) : { *(.tbss${RELOCATING+ .tbss.* .gnu.linkonce.tb.*})${RELOCATING+ *(.tcommon)} } :data
|
|
.eh_frame ALIGN(4) : { KEEP (*(.eh_frame)) } :data
|
|
.gcc_except_table ALIGN(4) : { *(.gcc_except_table) } :data
|
|
${WRITABLE_RODATA+${RODATA}}
|
|
${OTHER_READWRITE_SECTIONS}
|
|
${SDATA}
|
|
${OTHER_SDATA_SECTIONS}
|
|
${RELOCATING+_edata = .;}
|
|
${RELOCATING+PROVIDE (edata = .);}
|
|
${RELOCATING+__bss_start = .;}
|
|
${RELOCATING+${OTHER_BSS_SYMBOLS}}
|
|
${BSS_PLT+${PLT}}
|
|
.bss ALIGN(4) :
|
|
{
|
|
*(.dynbss)
|
|
*(.bss${RELOCATING+ .bss.* .gnu.linkonce.b.*})
|
|
*(COMMON)
|
|
/* Align here to ensure that the .bss section occupies space up to
|
|
_end. Align after .bss to ensure correct alignment even if the
|
|
.bss section disappears because there are no input sections. */
|
|
${RELOCATING+. = ALIGN(${ALIGNMENT});}
|
|
} :data
|
|
${RELOCATING+${OTHER_BSS_END_SYMBOLS}}
|
|
${RELOCATING+. = ALIGN(${ALIGNMENT});}
|
|
${RELOCATING+${OTHER_END_SYMBOLS}}
|
|
${RELOCATING+_end = .;}
|
|
${RELOCATING+PROVIDE (end = .);}
|
|
${RELOCATING+${DATA_SEGMENT_END}}
|
|
|
|
${TEXT_DYNAMIC-${DYNAMIC}}
|
|
${TEXT_DYNAMIC+${DYNAMIC}}
|
|
.hash ${RELOCATING-0} : { *(.hash) } :dynamic :dyn
|
|
.dynsym ${RELOCATING-0} : { *(.dynsym) } :dynamic :dyn
|
|
.dynstr ${RELOCATING-0} : { *(.dynstr) } :dynamic :dyn
|
|
${DATA_PLT-${BSS_PLT-${PLT}}}
|
|
.got.plt : { *(.got.plt) } :dynamic :dyn
|
|
.gnu.version ${RELOCATING-0} : { *(.gnu.version) }
|
|
.gnu.version_d ${RELOCATING-0}: { *(.gnu.version_d) }
|
|
.gnu.version_r ${RELOCATING-0}: { *(.gnu.version_r) }
|
|
EOF
|
|
if [ "x$COMBRELOC" = x ]; then
|
|
COMBRELOCCAT=cat
|
|
else
|
|
COMBRELOCCAT="cat > $COMBRELOC"
|
|
fi
|
|
eval $COMBRELOCCAT <<EOF
|
|
.rel.init ${RELOCATING-0} : { *(.rel.init) }
|
|
.rela.init ${RELOCATING-0} : { *(.rela.init) }
|
|
.rel.text ${RELOCATING-0} : { *(.rel.text${RELOCATING+ .rel.text.* .rel.gnu.linkonce.t.*}) }
|
|
.rela.text ${RELOCATING-0} : { *(.rela.text${RELOCATING+ .rela.text.* .rela.gnu.linkonce.t.*}) }
|
|
.rel.fini ${RELOCATING-0} : { *(.rel.fini) }
|
|
.rela.fini ${RELOCATING-0} : { *(.rela.fini) }
|
|
.rel.rodata ${RELOCATING-0} : { *(.rel.rodata${RELOCATING+ .rel.rodata.* .rel.gnu.linkonce.r.*}) }
|
|
.rela.rodata ${RELOCATING-0} : { *(.rela.rodata${RELOCATING+ .rela.rodata.* .rela.gnu.linkonce.r.*}) }
|
|
${OTHER_READONLY_RELOC_SECTIONS}
|
|
.rel.data ${RELOCATING-0} : { *(.rel.data${RELOCATING+ .rel.data.* .rel.gnu.linkonce.d.*}) }
|
|
.rela.data ${RELOCATING-0} : { *(.rela.data${RELOCATING+ .rela.data.* .rela.gnu.linkonce.d.*}) }
|
|
.rel.tdata ${RELOCATING-0} : { *(.rel.tdata${RELOCATING+ .rel.tdata.* .rel.gnu.linkonce.td.*}) }
|
|
.rela.tdata ${RELOCATING-0} : { *(.rela.tdata${RELOCATING+ .rela.tdata.* .rela.gnu.linkonce.td.*}) }
|
|
.rel.tbss ${RELOCATING-0} : { *(.rel.tbss${RELOCATING+ .rel.tbss.* .rel.gnu.linkonce.tb.*}) }
|
|
.rela.tbss ${RELOCATING-0} : { *(.rela.tbss${RELOCATING+ .rela.tbss.* .rela.gnu.linkonce.tb.*}) }
|
|
.rel.ctors ${RELOCATING-0} : { *(.rel.ctors) }
|
|
.rela.ctors ${RELOCATING-0} : { *(.rela.ctors) }
|
|
.rel.dtors ${RELOCATING-0} : { *(.rel.dtors) }
|
|
.rela.dtors ${RELOCATING-0} : { *(.rela.dtors) }
|
|
.rel.got ${RELOCATING-0} : { *(.rel.got) }
|
|
.rela.got ${RELOCATING-0} : { *(.rela.got) }
|
|
${OTHER_GOT_RELOC_SECTIONS}
|
|
.rel.bss ${RELOCATING-0} : { *(.rel.bss${RELOCATING+ .rel.bss.* .rel.gnu.linkonce.b.*}) }
|
|
.rela.bss ${RELOCATING-0} : { *(.rela.bss${RELOCATING+ .rela.bss.* .rela.gnu.linkonce.b.*}) }
|
|
EOF
|
|
if [ -n "$COMBRELOC" ]; then
|
|
cat <<EOF
|
|
.rel.dyn ${RELOCATING-0} :
|
|
{
|
|
EOF
|
|
sed -e '/^[ ]*[{}][ ]*$/d;/:[ ]*$/d;/\.rela\./d;s/^.*: { *\(.*\)}$/ \1/' $COMBRELOC
|
|
cat <<EOF
|
|
}
|
|
.rela.dyn ${RELOCATING-0} :
|
|
{
|
|
EOF
|
|
sed -e '/^[ ]*[{}][ ]*$/d;/:[ ]*$/d;/\.rel\./d;s/^.*: { *\(.*\)}/ \1/' $COMBRELOC
|
|
cat <<EOF
|
|
}
|
|
EOF
|
|
fi
|
|
cat <<EOF
|
|
.rel.plt ${RELOCATING-0} : { *(.rel.plt) }
|
|
.rela.plt ${RELOCATING-0} : { *(.rela.plt) }
|
|
${OTHER_PLT_RELOC_SECTIONS}
|
|
|
|
|
|
/* Stabs debugging sections. */
|
|
.stab 0 : { *(.stab) }
|
|
.stabstr 0 : { *(.stabstr) }
|
|
.stab.excl 0 : { *(.stab.excl) }
|
|
.stab.exclstr 0 : { *(.stab.exclstr) }
|
|
.stab.index 0 : { *(.stab.index) }
|
|
.stab.indexstr 0 : { *(.stab.indexstr) }
|
|
|
|
.comment 0 : { *(.comment) }
|
|
|
|
/* DWARF debug sections.
|
|
Symbols in the DWARF debugging sections are relative to the beginning
|
|
of the section so we begin them at 0. */
|
|
|
|
/* DWARF 1 */
|
|
.debug 0 : { *(.debug) }
|
|
.line 0 : { *(.line) }
|
|
|
|
/* GNU DWARF 1 extensions */
|
|
.debug_srcinfo 0 : { *(.debug_srcinfo) }
|
|
.debug_sfnames 0 : { *(.debug_sfnames) }
|
|
|
|
/* DWARF 1.1 and DWARF 2 */
|
|
.debug_aranges 0 : { *(.debug_aranges) }
|
|
.debug_pubnames 0 : { *(.debug_pubnames) }
|
|
|
|
/* DWARF 2 */
|
|
.debug_info 0 : { *(.debug_info .gnu.linkonce.wi.*) }
|
|
.debug_abbrev 0 : { *(.debug_abbrev) }
|
|
.debug_line 0 : { *(.debug_line) }
|
|
.debug_frame 0 : { *(.debug_frame) }
|
|
.debug_str 0 : { *(.debug_str) }
|
|
.debug_loc 0 : { *(.debug_loc) }
|
|
.debug_macinfo 0 : { *(.debug_macinfo) }
|
|
|
|
/* SGI/MIPS DWARF 2 extensions */
|
|
.debug_weaknames 0 : { *(.debug_weaknames) }
|
|
.debug_funcnames 0 : { *(.debug_funcnames) }
|
|
.debug_typenames 0 : { *(.debug_typenames) }
|
|
.debug_varnames 0 : { *(.debug_varnames) }
|
|
|
|
${STACK_ADDR+${STACK}}
|
|
${ATTRS_SECTIONS}
|
|
${OTHER_SECTIONS}
|
|
${RELOCATING+${OTHER_SYMBOLS}}
|
|
${RELOCATING+${DISCARDED}}
|
|
}
|
|
EOF
|