etree_value_type result;
switch (tree->type.node_code)
{
+ case SIZEOF_HEADERS:
+ if (allocation_done != lang_first_phase_enum)
+ {
+ result = new_abs(bfd_sizeof_headers(output_bfd,
+ config.relocateable_output));
+
+ }
+ else {
+ result.valid = false;
+ }
+ break;
case DEFINED:
result.value =
ldsym_get_soft(tree->name.name) != (ldsym_type *)NULL;
((lang_input_statement_type*)(sdef->the_bfd->usrdata))->just_syms_flag == true)
{
result = new_abs(sdef->value + (sdef->section ?
- sdef->section->vma : 0));
+ sdef->section->vma : 0));
}
else {
result = new_rel(sdef->value + sdef->section->output_offset, os);
result.value = -result.value;
break;
case NEXT:
+ if (allocation_done ==lang_allocating_phase_enum) {
+ make_abs(&result);
+ result.value = ALIGN(dot, result.value);
+ }
+ else {
+ /* Return next place aligned to value */
result.valid = false;
+ }
break;
default:
FAIL();
{
return (int)exp_get_vma(tree,(bfd_vma)def,name, allocation_done);
}
+
%token SECTIONS
%token '{' '}'
%token ALIGNMENT SIZEOF_HEADERS OUTPUT_FORMAT FORCE_COMMON_ALLOCATION OUTPUT_ARCH
-%token NEXT SIZEOF ADDR SCRIPT ENDSCRIPT
+%token NEXT SIZEOF ADDR SCRIPT ENDSCRIPT SIZEOF_HEADERS
%token MEMORY
%token DSECT NOLOAD COPY INFO OVERLAY
%token NAME DEFINED TARGET_K SEARCH_DIR MAP ENTRY
{ $$ = exp_nameop(DEFINED, $3); }
| INT
{ $$ = exp_intop($1); }
+ | SIZEOF_HEADERS
+ { $$ = exp_nameop(SIZEOF_HEADERS,0); }
| SIZEOF '(' NAME ')'
{ $$ = exp_nameop($1,$3); }
print_space();
print_section("");
print_space();
- ASSERT(print_dot == data->output_vma);
+/* ASSERT(print_dot == data->output_vma);*/
print_address(data->output_vma);
print_space();
case lang_data_statement_enum:
{
unsigned int size;
- s->data_statement.output_vma = dot;
+ s->data_statement.output_vma = dot - output_section_statement->bfd_section->vma;
s->data_statement.output_section =
output_section_statement->bfd_section;
"SCRIPT", SCRIPT,
"ENDSCRIPT", ENDSCRIPT,
"NEXT",NEXT,
+"sizeof_headers",SIZEOF_HEADERS,
+"SIZEOF_HEADERS",SIZEOF_HEADERS,
"MAP",MAP,
"SIZEOF",SIZEOF,
"TARGET",TARGET_K,