static void prep_docnum_line( text_line * p_line, char * p ) { text_chars * curr_t; uint32_t h_left; uint32_t h_right; h_left = g_page_left + conv_hor_unit( &layout_work.docnum.left_adjust ); h_right = g_page_right - conv_hor_unit( &layout_work.docnum.right_adjust ); if( *p ) { curr_t = alloc_text_chars( layout_work.docnum.string, 1 + strlen( p ) + strlen( layout_work.docnum.string ), g_curr_font ); } else { curr_t = alloc_text_chars( layout_work.docnum.string, 1 + strlen( layout_work.docnum.string ), g_curr_font ); } if( *p ) { strcat_s( curr_t->text, curr_t->length, p ); } curr_t->count = strlen( curr_t->text ); curr_t->count = len_to_trail_space( curr_t->text, curr_t->count ); intrans( curr_t->text, &curr_t->count, g_curr_font ); curr_t->width = cop_text_width( curr_t->text, curr_t->count, g_curr_font ); while( curr_t->width > (h_right - h_left) ) { // too long for line if( curr_t->count < 2) { // sanity check break; } curr_t->count -= 1; // truncate text curr_t->width = cop_text_width( curr_t->text, curr_t->count, g_curr_font ); } p_line->first = curr_t; p_line->last = curr_t; p_line->line_height = wgml_fonts[g_curr_font].line_height; curr_t->x_address = h_left; if( layout_work.docnum.page_position == pos_center ) { if( h_left + curr_t->width < h_right ) { curr_t->x_address += (h_right - h_left - curr_t->width) / 2; } } else if( layout_work.docnum.page_position == pos_right ) { curr_t->x_address = h_right - curr_t->width; } ju_x_start = curr_t->x_address; return; }
void start_line_with_string( const char *text, font_number font, bool leave_1space ) { text_chars *n_char; // new text char size_t count; unsigned space_count; count = strlen( text ); if( count == 0 ) { return; } space_count = 0; while( *(text + count - 1) == ' ' ) { // strip trailing spaces space_count++; if( --count == 0 ) { break; } } if( leave_1space && space_count > 0 ) {// for ordered :LI keep 1 trailing space space_count--; count++; } n_char = alloc_text_chars( text, count, font ); n_char->x_address = g_cur_h_start; ju_x_start = g_cur_h_start; input_cbs->fmflags &= ~II_sol; // no longer start of line n_char->width = cop_text_width( n_char->text, n_char->count, font ); /***********************************************************/ /* Test if word hits right margin */ /***********************************************************/ if( n_char->x_address + n_char->width > g_page_right ) { process_line_full( t_line, ProcFlags.concat ); t_line = alloc_text_line(); n_char->x_address = g_cur_h_start; } if( t_line == NULL ) { t_line = alloc_text_line(); } if( t_line->first == NULL ) { // first element in output line t_line->first = n_char; t_line->line_height = wgml_fonts[font].line_height; ju_x_start = n_char->x_address; ProcFlags.line_started = true; } else { t_line->last->next = n_char; n_char->prev = t_line->last; } t_line->last = n_char; g_cur_h_start = n_char->x_address + n_char->width; post_space = space_count * wgml_fonts[layout_work.defaults.font].spc_width; }
static void doc_header( su *p_sk, su *top_sk, xx_str *h_string, font_number font, spacing_line spacing_ln, bool no_eject ) { doc_element * cur_el; font_number font_save; int32_t h_left; text_chars * curr_t; text_line * hd_line; font_save = g_curr_font; g_curr_font = font; g_curr_font = font_save; set_skip_vars( NULL, top_sk, p_sk, spacing_ln, g_curr_font ); if( (h_string == NULL) || (*h_string == '\0') || (*h_string == ' ') || (*h_string == '\t') ) { /********************************************************/ /* header contained "yes" but the string was empty: */ /* the OW docs do this with APPENDIX for PS/PDF output */ /********************************************************/ hd_line = alloc_text_line(); // defaults work } else { curr_t = alloc_text_chars( h_string, strlen( h_string ), font ); curr_t->width = cop_text_width( curr_t->text, curr_t->count, font ); h_left = g_page_left +(g_page_right - g_page_left - curr_t->width) / 2; curr_t->x_address = h_left; hd_line = alloc_text_line(); hd_line->first = curr_t; hd_line->line_height = wgml_fonts[font].line_height; } if( input_cbs->fmflags & II_research ) { test_out_t_line( hd_line ); } cur_el = alloc_doc_el( el_text ); cur_el->blank_lines = g_blank_lines; g_blank_lines = 0; cur_el->depth = hd_line->line_height; cur_el->subs_skip = g_subs_skip; cur_el->top_skip = g_top_skip; cur_el->element.text.overprint = ProcFlags.overprint; ProcFlags.overprint = false; cur_el->element.text.spacing = g_spacing; cur_el->element.text.first = hd_line; ProcFlags.skips_valid = false; hd_line = NULL; if( no_eject ) { insert_col_main( cur_el ); } else { insert_page_width( cur_el ); } }
static void prep_date_line( text_line *p_line, const char *p ) { text_chars * curr_t; uint32_t h_left; uint32_t h_right; symsub * subdate; int rc; h_left = g_page_left + conv_hor_unit( &layout_work.date.left_adjust ); h_right = g_page_right - conv_hor_unit( &layout_work.date.right_adjust ); if( *p ) { curr_t = alloc_text_chars( p, strlen( p ), g_curr_font ); } else { rc = find_symvar( &global_dict, "date", no_subscript, &subdate ); curr_t = alloc_text_chars( subdate->value, strlen( subdate->value ), g_curr_font ); } curr_t->count = len_to_trail_space( curr_t->text, curr_t->count ); curr_t->count = intrans( curr_t->text, curr_t->count, g_curr_font ); curr_t->width = cop_text_width( curr_t->text, curr_t->count, g_curr_font ); while( curr_t->width > (h_right - h_left) ) { // too long for line if( curr_t->count < 2) { // sanity check break; } curr_t->count -= 1; // truncate text curr_t->width = cop_text_width( curr_t->text, curr_t->count, g_curr_font ); } p_line->first = curr_t; p_line->last = curr_t; curr_t->x_address = h_left; if( layout_work.date.page_position == pos_center ) { if( h_left + curr_t->width < h_right ) { curr_t->x_address += (h_right - h_left - curr_t->width) / 2; } } else if( layout_work.date.page_position == pos_right ) { curr_t->x_address = h_right - curr_t->width; } ju_x_start = curr_t->x_address; return; }
static void prep_title_line( text_line * p_line, const char * p ) { text_chars * curr_t; uint32_t h_left; uint32_t h_right; uint32_t curr_x; h_left = g_page_left + conv_hor_unit( &layout_work.title.left_adjust, g_curr_font ); h_right = g_page_right - conv_hor_unit( &layout_work.title.right_adjust, g_curr_font ); curr_t = alloc_text_chars( p, strlen( p ), g_curr_font ); curr_t->count = len_to_trail_space( curr_t->text, curr_t->count ); curr_t->count = intrans( curr_t->text, curr_t->count, g_curr_font ); curr_t->font = layout_work.title.font; curr_t->width = cop_text_width( curr_t->text, curr_t->count, g_curr_font ); while( curr_t->width > (h_right - h_left) ) { // too long for line if( curr_t->count < 2 ) { // sanity check break; } curr_t->count -= 1; // truncate text curr_t->width = cop_text_width( curr_t->text, curr_t->count, g_curr_font ); } p_line->first = curr_t; p_line->last = curr_t; curr_x = h_left; if( layout_work.title.page_position == pos_center ) { if( h_left + curr_t->width < h_right ) { curr_x += (h_right - h_left - curr_t->width) / 2; } } else if( layout_work.title.page_position == pos_right ) { curr_x = h_right - curr_t->width; } curr_t->x_address = curr_x; ju_x_start = curr_x; return; }
extern void gml_note( const gmltag * entry ) { char * p; font_number font_save; text_chars * marker; uint32_t spc_cnt; scan_err = false; p = scan_start; start_doc_sect(); // if not already done scr_process_break(); font_save = g_curr_font; g_curr_font = layout_work.note.font; set_skip_vars( &layout_work.note.pre_skip, NULL, &layout_work.note.post_skip, spacing, g_curr_font ); post_space = 0; if( nest_cb->c_tag == t_NONE ) { g_cur_left = g_page_left + conv_hor_unit( &layout_work.note.left_indent, g_curr_font ); } else { g_cur_left += conv_hor_unit( &layout_work.note.left_indent, g_curr_font ); } g_cur_h_start = g_cur_left; ProcFlags.keep_left_margin = true; // keep special Note indent start_line_with_string( layout_work.note.string, layout_work.note.font, false ); /* the value of post_space after start_line_with_string() is wrong for */ /* two reasons: 1) it uses the wrong font; 2) it is at most "1" even if */ /* more than one space appears at the end of the note_string. */ spc_cnt = post_space / wgml_fonts[g_curr_font].spc_width; post_space = spc_cnt * wgml_fonts[font_save].spc_width; if( (t_line != NULL) && (t_line->last != NULL) ) { g_cur_left += t_line->last->width + post_space; } g_cur_h_start = g_cur_left; ju_x_start = g_cur_h_start; spacing = layout_work.note.spacing; g_curr_font = layout_work.defaults.font; set_skip_vars( NULL, NULL, NULL, spacing, g_curr_font ); if( *p == '.' ) p++; // over '.' while( *p == ' ' ) p++; // skip initial space if( *p ) { // if text follows post_space = 0; process_text( p, g_curr_font ); } else if( !ProcFlags.concat && ProcFlags.has_aa_block && (t_line != NULL) && (post_space > 0) ) { /* only create marker if line not empty, */ /* :NOTE note_string is not nullstring and ends in at least 1 space */ marker = alloc_text_chars( NULL, 0, font_save ); marker->x_address = g_cur_h_start; if( t_line->first == NULL ) { t_line->first = marker; t_line->last = t_line->first; } else { marker->prev = t_line->last; t_line->last->next = marker; t_line->last = t_line->last->next; } post_space = 0; } g_curr_font = font_save; scan_start = scan_stop + 1; return; }
static void content_reg( banner_lay_tag * ban ) { text_chars * curr_t; char * pbuf; symsub * symsubval; int k; int rc; switch( ban->region->contents.content_type ) { case string_content: pbuf = mem_alloc( buf_size ); *pbuf = '\0'; if( ban->region->script_format ) { /***************************************************************/ /* substitute variables and create text_chars instances */ /***************************************************************/ for( k = 0; k < 3; ++k ) { if( ban->region->script_region[k].string != NULL ) { substitute_vars( pbuf, ban->region->script_region[k].string, ban->region->script_region[k].len ); if( *pbuf ) { curr_t = alloc_text_chars( pbuf, strlen( pbuf ), ban->region->font ); /***************************************************/ /* use font 0 for width calculation */ /* even if another font is used for banregion */ /* to get the same result as wgml4 TBD */ /***************************************************/ curr_t->width = cop_text_width( curr_t->text, curr_t->count, 0 ); // ban->region->font ); reg_text[k] = curr_t; } } } } else { // no script format only normal string with perhaps vars substitute_vars( pbuf, ban->region->contents.string, strlen( ban->region->contents.string ) ); if( *pbuf ) { curr_t = alloc_text_chars( pbuf, strlen( pbuf ), ban->region->font ); /***********************************************************/ /* is font 0 used for width calc? TBD */ /***********************************************************/ curr_t->width = cop_text_width( curr_t->text, curr_t->count, ban->region->font ); if( ban->region->region_position == pos_left ) { reg_text[0] = curr_t; } else if( ban->region->region_position == pos_center ) { reg_text[1] = curr_t; } else if( ban->region->region_position == pos_right ) { reg_text[2] = curr_t; } else { reg_text[0] = curr_t; // position left if unknown } } } mem_free( pbuf ); break; case author_content : rc = find_symvar( &global_dict, "$author", no_subscript, &symsubval ); if( rc == 2 ) { curr_t = alloc_text_chars( symsubval->value, strlen( symsubval->value ), ban->region->font ); } else { curr_t = alloc_text_chars( "author", 6, ban->region->font ); } break; case bothead_content : rc = find_symvar( &global_dict, "$bothead", no_subscript, &symsubval ); if( rc == 2 ) { curr_t = alloc_text_chars( symsubval->value, strlen( symsubval->value ), ban->region->font ); } else { curr_t = alloc_text_chars( "bothead", 7, ban->region->font ); } break; case date_content : rc = find_symvar( &global_dict, "$date", no_subscript, &symsubval ); if( rc == 2 ) { curr_t = alloc_text_chars( symsubval->value, strlen( symsubval->value ), ban->region->font ); } else { curr_t = alloc_text_chars( "date", 4, ban->region->font ); } break; case docnum_content : rc = find_symvar( &global_dict, "$docnum", no_subscript, &symsubval ); if( rc == 2 ) { curr_t = alloc_text_chars( symsubval->value, strlen( symsubval->value ), ban->region->font ); } else { curr_t = alloc_text_chars( "docnum", 6, ban->region->font ); } break; case head0_content : rc = find_symvar( &global_dict, "$head0", no_subscript, &symsubval ); if( rc == 2 ) { curr_t = alloc_text_chars( symsubval->value, strlen( symsubval->value ), ban->region->font ); } else { curr_t = alloc_text_chars( "head0", 5, ban->region->font ); } break; case head1_content : rc = find_symvar( &global_dict, "$head1", no_subscript, &symsubval ); if( rc == 2 ) { curr_t = alloc_text_chars( symsubval->value, strlen( symsubval->value ), ban->region->font ); } else { curr_t = alloc_text_chars( "head1", 5, ban->region->font ); } break; case head2_content : rc = find_symvar( &global_dict, "$head2", no_subscript, &symsubval ); if( rc == 2 ) { curr_t = alloc_text_chars( symsubval->value, strlen( symsubval->value ), ban->region->font ); } else { curr_t = alloc_text_chars( "head2", 5, ban->region->font ); } break; case head3_content : rc = find_symvar( &global_dict, "$head3", no_subscript, &symsubval ); if( rc == 2 ) { curr_t = alloc_text_chars( symsubval->value, strlen( symsubval->value ), ban->region->font ); } else { curr_t = alloc_text_chars( "head3", 5, ban->region->font ); } break; case head4_content : rc = find_symvar( &global_dict, "$head4", no_subscript, &symsubval ); if( rc == 2 ) { curr_t = alloc_text_chars( symsubval->value, strlen( symsubval->value ), ban->region->font ); } else { curr_t = alloc_text_chars( "head4", 5, ban->region->font ); } break; case head5_content : rc = find_symvar( &global_dict, "$head5", no_subscript, &symsubval ); if( rc == 2 ) { curr_t = alloc_text_chars( symsubval->value, strlen( symsubval->value ), ban->region->font ); } else { curr_t = alloc_text_chars( "head5", 5, ban->region->font ); } break; case head6_content : rc = find_symvar( &global_dict, "$head6", no_subscript, &symsubval ); if( rc == 2 ) { curr_t = alloc_text_chars( symsubval->value, strlen( symsubval->value ), ban->region->font ); } else { curr_t = alloc_text_chars( "head6", 5, ban->region->font ); } break; case headnum0_content : rc = find_symvar( &global_dict, "$hnum0", no_subscript, &symsubval ); if( rc == 2 ) { curr_t = alloc_text_chars( symsubval->value, strlen( symsubval->value ), ban->region->font ); } else { curr_t = alloc_text_chars( "hnum0", 5, ban->region->font ); } break; case headnum1_content : rc = find_symvar( &global_dict, "$hnum1", no_subscript, &symsubval ); if( rc == 2 ) { curr_t = alloc_text_chars( symsubval->value, strlen( symsubval->value ), ban->region->font ); } else { curr_t = alloc_text_chars( "hnum1", 5, ban->region->font ); } break; case headnum2_content : rc = find_symvar( &global_dict, "$hnum2", no_subscript, &symsubval ); if( rc == 2 ) { curr_t = alloc_text_chars( symsubval->value, strlen( symsubval->value ), ban->region->font ); } else { curr_t = alloc_text_chars( "hnum2", 5, ban->region->font ); } break; case headnum3_content : rc = find_symvar( &global_dict, "$hnum3", no_subscript, &symsubval ); if( rc == 2 ) { curr_t = alloc_text_chars( symsubval->value, strlen( symsubval->value ), ban->region->font ); } else { curr_t = alloc_text_chars( "hnum3", 5, ban->region->font ); } break; case headnum4_content : rc = find_symvar( &global_dict, "$hnum4", no_subscript, &symsubval ); if( rc == 2 ) { curr_t = alloc_text_chars( symsubval->value, strlen( symsubval->value ), ban->region->font ); } else { curr_t = alloc_text_chars( "hnum4", 5, ban->region->font ); } break; case headnum5_content : rc = find_symvar( &global_dict, "$hnum5", no_subscript, &symsubval ); if( rc == 2 ) { curr_t = alloc_text_chars( symsubval->value, strlen( symsubval->value ), ban->region->font ); } else { curr_t = alloc_text_chars( "hnum5", 5, ban->region->font ); } break; case headnum6_content : rc = find_symvar( &global_dict, "$hnum6", no_subscript, &symsubval ); if( rc == 2 ) { curr_t = alloc_text_chars( symsubval->value, strlen( symsubval->value ), ban->region->font ); } else { curr_t = alloc_text_chars( "hnum6", 5, ban->region->font ); } break; case headtext0_content : rc = find_symvar( &global_dict, "$htext0", no_subscript, &symsubval ); if( rc == 2 ) { curr_t = alloc_text_chars( symsubval->value, strlen( symsubval->value ), ban->region->font ); } else { curr_t = alloc_text_chars( "htext0", 5, ban->region->font ); } break; case headtext1_content : rc = find_symvar( &global_dict, "$htext1", no_subscript, &symsubval ); if( rc == 2 ) { curr_t = alloc_text_chars( symsubval->value, strlen( symsubval->value ), ban->region->font ); } else { curr_t = alloc_text_chars( "htext1", 5, ban->region->font ); } break; case headtext2_content : rc = find_symvar( &global_dict, "$htext2", no_subscript, &symsubval ); if( rc == 2 ) { curr_t = alloc_text_chars( symsubval->value, strlen( symsubval->value ), ban->region->font ); } else { curr_t = alloc_text_chars( "htext2", 5, ban->region->font ); } break; case headtext3_content : rc = find_symvar( &global_dict, "$htext3", no_subscript, &symsubval ); if( rc == 2 ) { curr_t = alloc_text_chars( symsubval->value, strlen( symsubval->value ), ban->region->font ); } else { curr_t = alloc_text_chars( "htext3", 5, ban->region->font ); } break; case headtext4_content : rc = find_symvar( &global_dict, "$htext4", no_subscript, &symsubval ); if( rc == 2 ) { curr_t = alloc_text_chars( symsubval->value, strlen( symsubval->value ), ban->region->font ); } else { curr_t = alloc_text_chars( "htext4", 5, ban->region->font ); } break; case headtext5_content : rc = find_symvar( &global_dict, "$htext5", no_subscript, &symsubval ); if( rc == 2 ) { curr_t = alloc_text_chars( symsubval->value, strlen( symsubval->value ), ban->region->font ); } else { curr_t = alloc_text_chars( "htext5", 5, ban->region->font ); } break; case headtext6_content : rc = find_symvar( &global_dict, "$htext6", no_subscript, &symsubval ); if( rc == 2 ) { curr_t = alloc_text_chars( symsubval->value, strlen( symsubval->value ), ban->region->font ); } else { curr_t = alloc_text_chars( "htext6", 5, ban->region->font ); } break; case pgnuma_content : rc = find_symvar( &global_dict, "$pgnuma", no_subscript, &symsubval ); if( rc == 2 ) { curr_t = alloc_text_chars( symsubval->value, strlen( symsubval->value ), ban->region->font ); } else { curr_t = alloc_text_chars( "pgnuma", 6, ban->region->font ); } break; case pgnumad_content : rc = find_symvar( &global_dict, "$pgnumad", no_subscript, &symsubval ); if( rc == 2 ) { curr_t = alloc_text_chars( symsubval->value, strlen( symsubval->value ), ban->region->font ); } else { curr_t = alloc_text_chars( "pgnumad", 7, ban->region->font ); } break; case pgnumc_content : rc = find_symvar( &global_dict, "$pgnumc", no_subscript, &symsubval ); if( rc == 2 ) { curr_t = alloc_text_chars( symsubval->value, strlen( symsubval->value ), ban->region->font ); } else { curr_t = alloc_text_chars( "pgnumc", 6, ban->region->font ); } break; case pgnumcd_content : rc = find_symvar( &global_dict, "$pgnumcd", no_subscript, &symsubval ); if( rc == 2 ) { curr_t = alloc_text_chars( symsubval->value, strlen( symsubval->value ), ban->region->font ); } else { curr_t = alloc_text_chars( "pgnumcd", 7, ban->region->font ); } break; case pgnumr_content : rc = find_symvar( &global_dict, "$pgnumr", no_subscript, &symsubval ); if( rc == 2 ) { curr_t = alloc_text_chars( symsubval->value, strlen( symsubval->value ), ban->region->font ); } else { curr_t = alloc_text_chars( "pgnumr", 6, ban->region->font ); } break; case pgnumrd_content : rc = find_symvar( &global_dict, "$pgnumrd", no_subscript, &symsubval ); if( rc == 2 ) { curr_t = alloc_text_chars( symsubval->value, strlen( symsubval->value ), ban->region->font ); } else { curr_t = alloc_text_chars( "pgnumrd", 7, ban->region->font ); } break; case sec_content : rc = find_symvar( &global_dict, "$sec", no_subscript, &symsubval ); if( rc == 2 ) { curr_t = alloc_text_chars( symsubval->value, strlen( symsubval->value ), ban->region->font ); } else { curr_t = alloc_text_chars( "sec", 3, ban->region->font ); } break; case stitle_content : rc = find_symvar( &global_dict, "$stitle", no_subscript, &symsubval ); if( rc == 2 ) { curr_t = alloc_text_chars( symsubval->value, strlen( symsubval->value ), ban->region->font ); } else { curr_t = alloc_text_chars( "stitle", 6, ban->region->font ); } break; case title_content : rc = find_symvar( &global_dict, "$title", no_subscript, &symsubval ); if( rc == 2 ) { curr_t = alloc_text_chars( symsubval->value, strlen( symsubval->value ), ban->region->font ); } else { curr_t = alloc_text_chars( "title", 6, ban->region->font ); } break; case time_content : rc = find_symvar( &global_dict, "$time", no_subscript, &symsubval ); if( rc == 2 ) { curr_t = alloc_text_chars( symsubval->value, strlen( symsubval->value ), ban->region->font ); } else { curr_t = alloc_text_chars( "time", 4, ban->region->font ); } break; case tophead_content : rc = find_symvar( &global_dict, "$tophead", no_subscript, &symsubval ); if( rc == 2 ) { curr_t = alloc_text_chars( symsubval->value, strlen( symsubval->value ), ban->region->font ); } else { curr_t = alloc_text_chars( "tophead", 7, ban->region->font ); } break; case no_content : // empty region curr_t = NULL; // curr_t = alloc_text_chars( "no content", 10, ban->region->font ); break; default: // the other possible banner region values are TBD curr_t = alloc_text_chars( "Dummy region", 12, ban->region->font ); break; } if( curr_t == NULL ) { /* do nothing */ } else { if( ban->region->contents.content_type != string_content ) { /***********************************************************/ /* is font 0 used for width calc? TBD */ /***********************************************************/ curr_t->width = cop_text_width( curr_t->text, curr_t->count, ban->region->font ); if( ban->region->region_position == pos_left ) { reg_text[0] = curr_t; } else if( ban->region->region_position == pos_center ) { reg_text[1] = curr_t; } else if( ban->region->region_position == pos_right ) { reg_text[2] = curr_t; } else { reg_text[0] = curr_t; // position left if invalid } } } return; }
static void hx_header( int hx_lvl, const char *hnumstr, const char *txt ) { doc_element * cur_el; font_number font_save; font_number font; int32_t width; int32_t widthn; text_chars * curr_t; text_chars * curr_tn; text_line * hd_line; hd_line = NULL; font_save = g_curr_font; g_spacing_ln = layout_work.hx[hx_lvl].spacing; if( layout_work.hx[hx_lvl].line_break ) { set_skip_vars( &layout_work.hx[hx_lvl].pre_skip, &layout_work.hx[hx_lvl].pre_top_skip, &layout_work.hx[hx_lvl].post_skip, g_spacing_ln, layout_work.hx[hx_lvl].number_font ); } else { set_skip_vars( &layout_work.hx[hx_lvl].pre_skip, &layout_work.hx[hx_lvl].pre_top_skip, NULL, g_spacing_ln, layout_work.hx[hx_lvl].number_font ); } post_space = 0; curr_t = NULL; curr_tn = NULL; width = 0; widthn = 0; hd_line = alloc_text_line(); if( layout_work.hx[hx_lvl].number_form != num_none ) { font = layout_work.hx[hx_lvl].number_font; curr_tn = alloc_text_chars( hnumstr, strlen( hnumstr ), font ); curr_tn->width = cop_text_width( curr_tn->text, curr_tn->count, font ); widthn = curr_tn->width + wgml_fonts[font].spc_width;; hd_line->first = curr_tn; hd_line->line_height = wgml_fonts[font].line_height; hd_line->last = curr_tn; } if( (txt != NULL) && (*txt != '\0') ) { font = layout_work.hx[hx_lvl].font; curr_t = alloc_text_chars( txt, strlen( txt ), font ); curr_t->width = cop_text_width( curr_t->text, curr_t->count, font ); width = curr_t->width; if( hd_line->first == NULL ) { hd_line->first = curr_t; } else { curr_tn->next = curr_t; curr_t->prev = curr_tn; } hd_line->last = curr_t; if( hd_line->line_height < wgml_fonts[font].line_height ) { hd_line->line_height = wgml_fonts[font].line_height; } } if( curr_t == NULL ) { curr_t = curr_tn; curr_tn = NULL; width = widthn; widthn = 0; } g_cur_left = g_page_left + conv_hor_unit( &layout_work.hx[hx_lvl].indent ) + conv_hor_unit( &layout_work.hx[hx_lvl].align ); if( layout_work.hx[hx_lvl].page_position == pos_left ) { if( curr_tn != NULL ) { curr_tn->x_address = g_cur_left; } curr_t->x_address = g_cur_left + widthn; } else { if( layout_work.hx[hx_lvl].page_position == pos_center ) { curr_t->x_address = g_cur_left + widthn + (g_page_right - g_cur_left - widthn - width) / 2; } else { curr_t->x_address = g_page_right - width; } if( curr_tn != NULL ) { curr_tn->x_address = curr_t->x_address - widthn; } } if( input_cbs->fmflags & II_research ) { test_out_t_line( hd_line ); } cur_el = alloc_doc_el( el_text ); cur_el->blank_lines = g_blank_lines; g_blank_lines = 0; cur_el->depth = hd_line->line_height; cur_el->subs_skip = g_subs_skip; cur_el->top_skip = g_top_skip; cur_el->element.text.overprint = ProcFlags.overprint; ProcFlags.overprint = false; cur_el->element.text.spacing = g_spacing; cur_el->element.text.first = hd_line; ProcFlags.skips_valid = false; hd_line = NULL; if( layout_work.hx[hx_lvl].page_eject == ej_no ) { insert_col_main( cur_el ); } else { insert_page_width( cur_el ); } }