* INSTALL
* external/Makefile
+ external/libhpdf/*
+ external/libpng/*
+ Added libharu and libpng to Harbour repository.
Now it's possible to use libhpdf as static lib on all
platforms. This is useful because this lib isn't yet part
of Linux distros.
libpng is only built for win/dos/os2 platforms.
It's possible to override libpng location by using
HB_INC_LIBPNG envvar.
* contrib/hbhpdf/Makefile
+ Look for libharu headers in /external dir.
* external/sqlite3/Makefile
- Disabled for bcc. Latest sqlite3 version breaks with this compiler:
---
Error E2293 ../../sqlite3.c 29156: ) expected in function winCurrentTime
Warning W8013 ../../sqlite3.c 29157: Possible use of 'timeW' before definition in function winCurrentTime
Error E2379 ../../sqlite3.c 29157: Statement missing ; in function winCurrentTime
Error E2379 ../../sqlite3.c 29158: Statement missing ; in function winCurrentTime
Error E2379 ../../sqlite3.c 29160: Statement missing ; in function winCurrentTime
Error E2293 ../../sqlite3.c 29161: ) expected in function winCurrentTime
Error E2379 ../../sqlite3.c 29162: Statement missing ; in function winCurrentTime
Error E2293 ../../sqlite3.c 29163: ) expected in function winCurrentTime
Warning W8057 ../../sqlite3.c 29171: Parameter 'prNow' is never used in function winCurrentTime
*** 7 errors in Compile ***
---
bcc users can report this problem here:
http://www.sqlite.org/cvstrac/tktnew
+ tests/bnch_win.bat
- tests/bnchmark
* Moved bnch_win.bat to tests.
343 lines
8.6 KiB
C
343 lines
8.6 KiB
C
/*
|
|
* << Haru Free PDF Library >> -- hpdf_destination.c
|
|
*
|
|
* URL: http://libharu.org
|
|
*
|
|
* Copyright (c) 1999-2006 Takeshi Kanno <takeshi_kanno@est.hi-ho.ne.jp>
|
|
* Copyright (c) 2007-2008 Antony Dovgal <tony@daylessday.org>
|
|
*
|
|
* Permission to use, copy, modify, distribute and sell this software
|
|
* and its documentation for any purpose is hereby granted without fee,
|
|
* provided that the above copyright notice appear in all copies and
|
|
* that both that copyright notice and this permission notice appear
|
|
* in supporting documentation.
|
|
* It is provided "as is" without express or implied warranty.
|
|
*
|
|
*/
|
|
|
|
#include "hpdf_conf.h"
|
|
#include "hpdf_utils.h"
|
|
#include "hpdf.h"
|
|
|
|
const char *HPDF_DESTINATION_TYPE_NAMES[] = {
|
|
"XYZ",
|
|
"Fit",
|
|
"FitH",
|
|
"FitV",
|
|
"FitR",
|
|
"FitB",
|
|
"FitBH",
|
|
"FitBV",
|
|
NULL
|
|
};
|
|
|
|
/*----------------------------------------------------------------------------*/
|
|
/*----- HPDF_Destination -----------------------------------------------------*/
|
|
|
|
HPDF_Destination
|
|
HPDF_Destination_New (HPDF_MMgr mmgr,
|
|
HPDF_Page target,
|
|
HPDF_Xref xref)
|
|
{
|
|
HPDF_Destination dst;
|
|
|
|
HPDF_PTRACE((" HPDF_Destination_New\n"));
|
|
|
|
if (!HPDF_Page_Validate (target)) {
|
|
HPDF_SetError (mmgr->error, HPDF_INVALID_PAGE, 0);
|
|
return NULL;
|
|
}
|
|
|
|
dst = HPDF_Array_New (mmgr);
|
|
if (!dst)
|
|
return NULL;
|
|
|
|
dst->header.obj_class |= HPDF_OSUBCLASS_DESTINATION;
|
|
|
|
if (HPDF_Xref_Add (xref, dst) != HPDF_OK)
|
|
return NULL;
|
|
|
|
/* first item of array must be target page */
|
|
if (HPDF_Array_Add (dst, target) != HPDF_OK)
|
|
return NULL;
|
|
|
|
/* default type is HPDF_FIT */
|
|
if (HPDF_Array_AddName (dst,
|
|
HPDF_DESTINATION_TYPE_NAMES[(HPDF_INT)HPDF_FIT]) != HPDF_OK)
|
|
return NULL;
|
|
|
|
return dst;
|
|
}
|
|
|
|
|
|
HPDF_BOOL
|
|
HPDF_Destination_Validate (HPDF_Destination dst)
|
|
{
|
|
HPDF_Obj_Header *header = (HPDF_Obj_Header *)dst;
|
|
HPDF_Page target;
|
|
|
|
if (!dst || header->obj_class !=
|
|
(HPDF_OCLASS_ARRAY | HPDF_OSUBCLASS_DESTINATION))
|
|
return HPDF_FALSE;
|
|
|
|
/* destination-types not defined. */
|
|
if (dst->list->count < 2)
|
|
return HPDF_FALSE;
|
|
|
|
target = (HPDF_Page)HPDF_Array_GetItem (dst, 0, HPDF_OCLASS_DICT);
|
|
if (!HPDF_Page_Validate (target))
|
|
return HPDF_SetError (dst->error, HPDF_INVALID_PAGE, 0);
|
|
|
|
return HPDF_TRUE;
|
|
}
|
|
|
|
|
|
HPDF_EXPORT(HPDF_STATUS)
|
|
HPDF_Destination_SetXYZ (HPDF_Destination dst,
|
|
HPDF_REAL left,
|
|
HPDF_REAL top,
|
|
HPDF_REAL zoom)
|
|
{
|
|
HPDF_STATUS ret = HPDF_OK;
|
|
HPDF_Page target;
|
|
|
|
HPDF_PTRACE((" HPDF_Destination_SetXYZ\n"));
|
|
|
|
if (!HPDF_Destination_Validate (dst))
|
|
return HPDF_INVALID_DESTINATION;
|
|
|
|
if (left < 0 || top < 0 || zoom < 0.08 || zoom > 32)
|
|
return HPDF_RaiseError (dst->error, HPDF_INVALID_PARAMETER, 0);
|
|
|
|
|
|
target = (HPDF_Page)HPDF_Array_GetItem (dst, 0, HPDF_OCLASS_DICT);
|
|
|
|
if (dst->list->count > 1) {
|
|
HPDF_Array_Clear (dst);
|
|
ret += HPDF_Array_Add (dst, target);
|
|
}
|
|
|
|
ret += HPDF_Array_AddName (dst,
|
|
HPDF_DESTINATION_TYPE_NAMES[(HPDF_INT)HPDF_XYZ]);
|
|
ret += HPDF_Array_AddReal (dst, left);
|
|
ret += HPDF_Array_AddReal (dst, top);
|
|
ret += HPDF_Array_AddReal (dst, zoom);
|
|
|
|
if (ret != HPDF_OK)
|
|
return HPDF_CheckError (dst->error);
|
|
|
|
return HPDF_OK;
|
|
}
|
|
|
|
|
|
HPDF_EXPORT(HPDF_STATUS)
|
|
HPDF_Destination_SetFit (HPDF_Destination dst)
|
|
{
|
|
HPDF_STATUS ret = HPDF_OK;
|
|
HPDF_Page target;
|
|
|
|
HPDF_PTRACE((" HPDF_Destination_SetFit\n"));
|
|
|
|
if (!HPDF_Destination_Validate (dst))
|
|
return HPDF_INVALID_DESTINATION;
|
|
|
|
target = (HPDF_Page)HPDF_Array_GetItem (dst, 0, HPDF_OCLASS_DICT);
|
|
|
|
if (dst->list->count > 1) {
|
|
HPDF_Array_Clear (dst);
|
|
ret += HPDF_Array_Add (dst, target);
|
|
}
|
|
|
|
ret += HPDF_Array_AddName (dst,
|
|
HPDF_DESTINATION_TYPE_NAMES[(HPDF_INT)HPDF_FIT]);
|
|
|
|
if (ret != HPDF_OK)
|
|
return HPDF_CheckError (dst->error);
|
|
|
|
return HPDF_OK;
|
|
}
|
|
|
|
|
|
HPDF_EXPORT(HPDF_STATUS)
|
|
HPDF_Destination_SetFitH (HPDF_Destination dst,
|
|
HPDF_REAL top)
|
|
{
|
|
HPDF_STATUS ret = HPDF_OK;
|
|
HPDF_Page target;
|
|
|
|
HPDF_PTRACE((" HPDF_Destination_SetFitH\n"));
|
|
|
|
if (!HPDF_Destination_Validate (dst))
|
|
return HPDF_INVALID_DESTINATION;
|
|
|
|
target = (HPDF_Page)HPDF_Array_GetItem (dst, 0, HPDF_OCLASS_DICT);
|
|
|
|
if (dst->list->count > 1) {
|
|
HPDF_Array_Clear (dst);
|
|
ret += HPDF_Array_Add (dst, target);
|
|
}
|
|
|
|
ret += HPDF_Array_AddName (dst,
|
|
HPDF_DESTINATION_TYPE_NAMES[(HPDF_INT)HPDF_FIT_H]);
|
|
ret += HPDF_Array_AddReal (dst, top);
|
|
|
|
if (ret != HPDF_OK)
|
|
return HPDF_CheckError (dst->error);
|
|
|
|
return HPDF_OK;
|
|
}
|
|
|
|
HPDF_EXPORT(HPDF_STATUS)
|
|
HPDF_Destination_SetFitV (HPDF_Destination dst,
|
|
HPDF_REAL left)
|
|
{
|
|
HPDF_STATUS ret = HPDF_OK;
|
|
HPDF_Page target;
|
|
|
|
HPDF_PTRACE((" HPDF_Destination_SetFitV\n"));
|
|
|
|
if (!HPDF_Destination_Validate (dst))
|
|
return HPDF_INVALID_DESTINATION;
|
|
|
|
target = (HPDF_Page)HPDF_Array_GetItem (dst, 0, HPDF_OCLASS_DICT);
|
|
|
|
if (dst->list->count > 1) {
|
|
HPDF_Array_Clear (dst);
|
|
ret += HPDF_Array_Add (dst, target);
|
|
}
|
|
|
|
ret += HPDF_Array_AddName (dst,
|
|
HPDF_DESTINATION_TYPE_NAMES[(HPDF_INT)HPDF_FIT_V]);
|
|
ret += HPDF_Array_AddReal (dst, left);
|
|
|
|
if (ret != HPDF_OK)
|
|
return HPDF_CheckError (dst->error);
|
|
|
|
return HPDF_OK;
|
|
}
|
|
|
|
|
|
HPDF_EXPORT(HPDF_STATUS)
|
|
HPDF_Destination_SetFitR (HPDF_Destination dst,
|
|
HPDF_REAL left,
|
|
HPDF_REAL bottom,
|
|
HPDF_REAL right,
|
|
HPDF_REAL top)
|
|
{
|
|
HPDF_STATUS ret = HPDF_OK;
|
|
HPDF_Page target;
|
|
|
|
HPDF_PTRACE((" HPDF_Destination_SetFitR\n"));
|
|
|
|
if (!HPDF_Destination_Validate (dst))
|
|
return HPDF_INVALID_DESTINATION;
|
|
|
|
target = (HPDF_Page)HPDF_Array_GetItem (dst, 0, HPDF_OCLASS_DICT);
|
|
|
|
if (dst->list->count > 1) {
|
|
HPDF_Array_Clear (dst);
|
|
ret += HPDF_Array_Add (dst, target);
|
|
}
|
|
|
|
ret += HPDF_Array_AddName (dst,
|
|
HPDF_DESTINATION_TYPE_NAMES[(HPDF_INT)HPDF_FIT_R]);
|
|
ret += HPDF_Array_AddReal (dst, left);
|
|
ret += HPDF_Array_AddReal (dst, bottom);
|
|
ret += HPDF_Array_AddReal (dst, right);
|
|
ret += HPDF_Array_AddReal (dst, top);
|
|
|
|
if (ret != HPDF_OK)
|
|
return HPDF_CheckError (dst->error);
|
|
|
|
return HPDF_OK;
|
|
}
|
|
|
|
|
|
HPDF_EXPORT(HPDF_STATUS)
|
|
HPDF_Destination_SetFitB (HPDF_Destination dst)
|
|
{
|
|
HPDF_STATUS ret = HPDF_OK;
|
|
HPDF_Page target;
|
|
|
|
HPDF_PTRACE((" HPDF_Destination_SetFitB\n"));
|
|
|
|
if (!HPDF_Destination_Validate (dst))
|
|
return HPDF_INVALID_DESTINATION;
|
|
|
|
target = (HPDF_Page)HPDF_Array_GetItem (dst, 0, HPDF_OCLASS_DICT);
|
|
|
|
if (dst->list->count > 1) {
|
|
HPDF_Array_Clear (dst);
|
|
ret += HPDF_Array_Add (dst, target);
|
|
}
|
|
|
|
ret += HPDF_Array_AddName (dst,
|
|
HPDF_DESTINATION_TYPE_NAMES[(HPDF_INT)HPDF_FIT_B]);
|
|
|
|
if (ret != HPDF_OK)
|
|
return HPDF_CheckError (dst->error);
|
|
|
|
return HPDF_OK;
|
|
}
|
|
|
|
|
|
HPDF_EXPORT(HPDF_STATUS)
|
|
HPDF_Destination_SetFitBH (HPDF_Destination dst,
|
|
HPDF_REAL top)
|
|
{
|
|
HPDF_STATUS ret = HPDF_OK;
|
|
HPDF_Page target;
|
|
|
|
HPDF_PTRACE((" HPDF_Destination_SetFitBH\n"));
|
|
|
|
if (!HPDF_Destination_Validate (dst))
|
|
return HPDF_INVALID_DESTINATION;
|
|
|
|
target = (HPDF_Page)HPDF_Array_GetItem (dst, 0, HPDF_OCLASS_DICT);
|
|
|
|
if (dst->list->count > 1) {
|
|
HPDF_Array_Clear (dst);
|
|
ret += HPDF_Array_Add (dst, target);
|
|
}
|
|
|
|
ret += HPDF_Array_AddName (dst,
|
|
HPDF_DESTINATION_TYPE_NAMES[(HPDF_INT)HPDF_FIT_BH]);
|
|
ret += HPDF_Array_AddReal (dst, top);
|
|
|
|
if (ret != HPDF_OK)
|
|
return HPDF_CheckError (dst->error);
|
|
|
|
return HPDF_OK;
|
|
}
|
|
|
|
HPDF_EXPORT(HPDF_STATUS)
|
|
HPDF_Destination_SetFitBV (HPDF_Destination dst,
|
|
HPDF_REAL left)
|
|
{
|
|
HPDF_STATUS ret = HPDF_OK;
|
|
HPDF_Page target;
|
|
|
|
HPDF_PTRACE((" HPDF_Destination_SetFitBV\n"));
|
|
|
|
if (!HPDF_Destination_Validate (dst))
|
|
return HPDF_INVALID_DESTINATION;
|
|
|
|
target = (HPDF_Page)HPDF_Array_GetItem (dst, 0, HPDF_OCLASS_DICT);
|
|
|
|
if (dst->list->count > 1) {
|
|
HPDF_Array_Clear (dst);
|
|
ret += HPDF_Array_Add (dst, target);
|
|
}
|
|
|
|
ret += HPDF_Array_AddName (dst,
|
|
HPDF_DESTINATION_TYPE_NAMES[(HPDF_INT)HPDF_FIT_BV]);
|
|
ret += HPDF_Array_AddReal (dst, left);
|
|
|
|
if (ret != HPDF_OK)
|
|
return HPDF_CheckError (dst->error);
|
|
|
|
return HPDF_OK;
|
|
|
|
}
|
|
|