diff options
author | Vincent Sanders <vince@kyllikki.org> | 2014-10-26 23:49:18 +0000 |
---|---|---|
committer | Vincent Sanders <vince@kyllikki.org> | 2014-10-26 23:53:14 +0000 |
commit | d204d6d555ac8e79da330a93e96fb070c8ee8f8c (patch) | |
tree | 5422294976240b8f63d8255f5e47c8396ad88248 /desktop/font_haru.c | |
parent | 29dfdd459dc4f835bc4dda5d67714b4aaa2c897a (diff) | |
download | netsurf-d204d6d555ac8e79da330a93e96fb070c8ee8f8c.tar.gz netsurf-d204d6d555ac8e79da330a93e96fb070c8ee8f8c.tar.bz2 |
Clean up saving as PDF
This removes the global PDF_Password interface that had completely
bitrotted and moves it into the standard misc operation table with a
sensible defualt implementation.
This also cleans up and fixes the gtk frontend implementation of the
pdf password callback so it compiles.
Finally this moves the implementation to a sensible place alongside
the other exporters reducing target makefile complexity futher.
Diffstat (limited to 'desktop/font_haru.c')
-rw-r--r-- | desktop/font_haru.c | 375 |
1 files changed, 375 insertions, 0 deletions
diff --git a/desktop/font_haru.c b/desktop/font_haru.c new file mode 100644 index 000000000..aaee84c35 --- /dev/null +++ b/desktop/font_haru.c @@ -0,0 +1,375 @@ +/* + * Copyright 2008 Adam Blokus <adamblokus@gmail.com> + * Copyright 2009 John Tytgat <joty@netsurf-browser.org> + * + * This file is part of NetSurf, http://www.netsurf-browser.org/ + * + * NetSurf 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; version 2 of the License. + * + * NetSurf 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/>. + */ + + /** \file + * Font handling in Haru pdf documents (implementation). + * + * The functions were written to implement the same interface as the Pango ones + * so that the usage of the latter wouldn't have to be modified. + */ + +#include "utils/config.h" +#ifdef WITH_PDF_EXPORT + +/*#define FONT_HARU_DEBUG */ + +#include <assert.h> +#include <float.h> +#include <math.h> +#include <string.h> + +#include <hpdf.h> + +#include "css/css.h" +#include "css/utils.h" + +#include "utils/nsoption.h" +#include "desktop/save_pdf/font_haru.h" +#include "desktop/font.h" +#include "utils/log.h" + + +static bool haru_nsfont_init(HPDF_Doc *pdf, HPDF_Page *page, + const char *string, char **string_nt, int length); + +static bool haru_nsfont_width(const plot_font_style_t *fstyle, + const char *string, size_t length, + int *width); + +static bool haru_nsfont_position_in_string(const plot_font_style_t *fstyle, + const char *string, size_t length, + int x, size_t *char_offset, int *actual_x); + +static bool haru_nsfont_split(const plot_font_style_t *fstyle, + const char *string, size_t length, + int x, size_t *char_offset, int *actual_x); + +static float pdf_text_scale = DEFAULT_EXPORT_SCALE; + +const struct font_functions haru_nsfont = { + haru_nsfont_width, + haru_nsfont_position_in_string, + haru_nsfont_split +}; + +/** + * Haru error handler + * for debugging purposes - it immediately exits the program on the first error, + * as it would otherwise flood the user with all resulting complications, + * covering the most important error source. + */ +static void error_handler(HPDF_STATUS error_no, HPDF_STATUS detail_no, + void *user_data) +{ + LOG(("ERROR: in font_haru \n\terror_no=%x\n\tdetail_no=%d\n", + (HPDF_UINT)error_no, (HPDF_UINT)detail_no)); +#ifdef FONT_HARU_DEBUG + exit(1); +#endif +} + +static bool haru_nsfont_init(HPDF_Doc *pdf, HPDF_Page *page, + const char *string, char **string_nt, int length) +{ + + *pdf = HPDF_New(error_handler, NULL); + + if (*pdf == NULL) + return false; + + *page = HPDF_AddPage(*pdf); + + if (*page == NULL) { + HPDF_Free(*pdf); + return false; + } + + *string_nt = malloc((length + 1) * sizeof(char)); + if (*string_nt == NULL) { + HPDF_Free(*pdf); + return false; + } + + memcpy(*string_nt, string, length); + (*string_nt)[length] = '\0'; + return true; +} + +/** + * Measure the width of a string. + * + * \param fstyle style for this text + * \param string string to measure (no UTF-8 currently) + * \param length length of string + * \param width updated to width of string[0..length] + * \return true on success, false on error and error reported + */ +bool haru_nsfont_width(const plot_font_style_t *fstyle, + const char *string, size_t length, + int *width) +{ + HPDF_Doc pdf; + HPDF_Page page; + char *string_nt; + HPDF_REAL width_real; + + *width = 0; + + if (length == 0) + return true; + + if (!haru_nsfont_init(&pdf, &page, string, &string_nt, length)) + return false; + + if (!haru_nsfont_apply_style(fstyle, pdf, page, NULL, NULL)) { + free(string_nt); + HPDF_Free(pdf); + return false; + } + + width_real = HPDF_Page_TextWidth(page, string_nt); + *width = width_real; + +#ifdef FONT_HARU_DEBUG + LOG(("Measuring string: %s ; Calculated width: %f %i",string_nt, width_real, *width)); +#endif + free(string_nt); + HPDF_Free(pdf); + + return true; +} + + +/** + * Find the position in a string where an x coordinate falls. + * + * \param fstyle style for this text + * \param string string to measure (no UTF-8 currently) + * \param length length of string + * \param x x coordinate to search for + * \param char_offset updated to offset in string of actual_x, [0..length] + * \param actual_x updated to x coordinate of character closest to x + * \return true on success, false on error and error reported + */ + +bool haru_nsfont_position_in_string(const plot_font_style_t *fstyle, + const char *string, size_t length, + int x, size_t *char_offset, int *actual_x) +{ + HPDF_Doc pdf; + HPDF_Page page; + char *string_nt; + HPDF_UINT offset; + HPDF_REAL real_width; + + if (!haru_nsfont_init(&pdf, &page, string, &string_nt, length)) + return false; + + if (HPDF_Page_SetWidth(page, x) != HPDF_OK + || !haru_nsfont_apply_style(fstyle, pdf, page, NULL, NULL)) { + free(string_nt); + HPDF_Free(pdf); + return false; + } + + + offset = HPDF_Page_MeasureText(page, string_nt, x, + HPDF_FALSE, &real_width); + + + if (real_width < x) + *char_offset = offset; + else { + assert(fabs(real_width - x) < FLT_EPSILON); + assert(offset > 0); + *char_offset = offset - 1; + } + + /*TODO: this is only the right edge of the character*/ + *actual_x = real_width; + +#ifdef FONT_HARU_DEBUG + LOG(("Position in string: %s at x: %i; Calculated position: %i", + string_nt, x, *char_offset)); +#endif + free(string_nt); + HPDF_Free(pdf); + + return true; +} + +/** + * Find where to split a string to make it fit a width. + * + * \param fstyle style for this text + * \param string string to measure (no UTF-8 currently) + * \param length length of string + * \param x width available + * \param char_offset updated to offset in string of actual_x, [0..length] + * \param actual_x updated to x coordinate of character closest to x + * \return true on success, false on error and error reported + */ + +bool haru_nsfont_split(const plot_font_style_t *fstyle, + const char *string, size_t length, + int x, size_t *char_offset, int *actual_x) +{ + HPDF_Doc pdf; + HPDF_Page page; + char *string_nt; + HPDF_REAL real_width; + HPDF_UINT offset; + + + if (!haru_nsfont_init(&pdf, &page, string, &string_nt, length)) + return false; + + if (HPDF_Page_SetWidth(page, x) != HPDF_OK + || !haru_nsfont_apply_style(fstyle, pdf, page, NULL, NULL)) { + free(string_nt); + HPDF_Free(pdf); + return false; + } + + offset = HPDF_Page_MeasureText(page, string_nt, x, + HPDF_TRUE, &real_width); + +#ifdef FONT_HARU_DEBUG + LOG(("Splitting string: %s for width: %i ; Calculated position: %i Calculated real_width: %f", + string_nt, x, *char_offset, real_width)); +#endif + *char_offset = offset - 1; + + /*TODO: this is only the right edge of the character*/ + *actual_x = real_width; + + free(string_nt); + HPDF_Free(pdf); + + return true; +} + +/** + * Apply font style to a Haru HPDF_Page + * + * \param fstyle plot style for this page + * \param doc document owning the page + * \param page the page to apply the style to + * \param font if this is non NULL it is updated to the font based + * on given style + * \param font_size if this is non NULL it is updated to the font size + * based on given style + * \return true on success, false on error and error reported + * + * When both font and font_size are NULL, the HPDF_Page is updated for given + * style, otherwise it is left to the called to do this. + */ +bool haru_nsfont_apply_style(const plot_font_style_t *fstyle, + HPDF_Doc doc, HPDF_Page page, + HPDF_Font *font, HPDF_REAL *font_size) +{ + HPDF_Font pdf_font; + HPDF_REAL size; + char font_name[50]; + bool roman = false; + bool bold = false; + bool styled = false; + + /*TODO: style handling, we are mapping the + styles on the basic 14 fonts only + */ + switch (fstyle->family) { + case PLOT_FONT_FAMILY_SERIF: + strcpy(font_name, "Times"); + roman = true; + break; + case PLOT_FONT_FAMILY_MONOSPACE: + strcpy(font_name, "Courier"); + break; + case PLOT_FONT_FAMILY_SANS_SERIF: + strcpy(font_name, "Helvetica"); + break; + case PLOT_FONT_FAMILY_CURSIVE: + case PLOT_FONT_FAMILY_FANTASY: + default: + strcpy(font_name, "Times"); + roman=true; + break; + } + + if (fstyle->weight == 700) { + strcat(font_name, "-Bold"); + bold = true; + } + + if ((fstyle->flags & FONTF_ITALIC) || (fstyle->flags & FONTF_OBLIQUE)) { + if (!bold) + strcat(font_name,"-"); + if (roman) + strcat(font_name,"Italic"); + else + strcat(font_name,"Oblique"); + + styled = true; + } + + if (roman && !styled && !bold) + strcat(font_name, "-Roman"); + +#ifdef FONT_HARU_DEBUG + LOG(("Setting font: %s", font_name)); +#endif + + size = fstyle->size; + + if (font != NULL) + size *= pdf_text_scale; + + if (size <= 0) + return true; + + size /= FONT_SIZE_SCALE; + + if (size > HPDF_MAX_FONTSIZE) + size = HPDF_MAX_FONTSIZE; + + if (font_size) + *font_size = size; + + pdf_font = HPDF_GetFont(doc, font_name, "StandardEncoding"); + if (pdf_font == NULL) + return false; + if (font != NULL) + *font = pdf_font; + + if (font == NULL || font_size == NULL) + HPDF_Page_SetFontAndSize(page, pdf_font, size); + + return true; +} + +/** + * Sync the text scale with the scale for the whole content + */ +void haru_nsfont_set_scale(float s) +{ + pdf_text_scale = s; +} + +#endif /* WITH_PDF_EXPORT */ |