c356496480
* 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.
121 lines
2.6 KiB
C
121 lines
2.6 KiB
C
/*
|
|
* << Haru Free PDF Library >> -- hpdf_binary.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_objects.h"
|
|
|
|
|
|
HPDF_Binary
|
|
HPDF_Binary_New (HPDF_MMgr mmgr,
|
|
HPDF_BYTE *value,
|
|
HPDF_UINT len)
|
|
{
|
|
HPDF_Binary obj;
|
|
|
|
obj = HPDF_GetMem (mmgr, sizeof(HPDF_Binary_Rec));
|
|
|
|
if (obj) {
|
|
HPDF_MemSet(&obj->header, 0, sizeof(HPDF_Obj_Header));
|
|
obj->header.obj_class = HPDF_OCLASS_BINARY;
|
|
|
|
obj->mmgr = mmgr;
|
|
obj->error = mmgr->error;
|
|
obj->value = NULL;
|
|
obj->len = 0;
|
|
if (HPDF_Binary_SetValue (obj, value, len) != HPDF_OK) {
|
|
HPDF_FreeMem (mmgr, obj);
|
|
return NULL;
|
|
}
|
|
}
|
|
|
|
return obj;
|
|
}
|
|
|
|
HPDF_STATUS
|
|
HPDF_Binary_Write (HPDF_Binary obj,
|
|
HPDF_Stream stream,
|
|
HPDF_Encrypt e)
|
|
{
|
|
HPDF_STATUS ret;
|
|
|
|
if (obj->len == 0)
|
|
return HPDF_Stream_WriteStr (stream, "<>");
|
|
|
|
if ((ret = HPDF_Stream_WriteChar (stream, '<')) != HPDF_OK)
|
|
return ret;
|
|
|
|
if (e)
|
|
HPDF_Encrypt_Reset (e);
|
|
|
|
if ((ret = HPDF_Stream_WriteBinary (stream, obj->value, obj->len, e)) !=
|
|
HPDF_OK)
|
|
return ret;
|
|
|
|
return HPDF_Stream_WriteChar (stream, '>');
|
|
}
|
|
|
|
|
|
HPDF_STATUS
|
|
HPDF_Binary_SetValue (HPDF_Binary obj,
|
|
HPDF_BYTE *value,
|
|
HPDF_UINT len)
|
|
{
|
|
if (len > HPDF_LIMIT_MAX_STRING_LEN)
|
|
return HPDF_SetError (obj->error, HPDF_BINARY_LENGTH_ERR, 0);
|
|
|
|
if (obj->value) {
|
|
HPDF_FreeMem (obj->mmgr, obj->value);
|
|
obj->len = 0;
|
|
}
|
|
|
|
obj->value = HPDF_GetMem (obj->mmgr, len);
|
|
if (!obj->value)
|
|
return HPDF_Error_GetCode (obj->error);
|
|
|
|
HPDF_MemCpy (obj->value, value, len);
|
|
obj->len = len;
|
|
|
|
return HPDF_OK;
|
|
}
|
|
|
|
|
|
void
|
|
HPDF_Binary_Free (HPDF_Binary obj)
|
|
{
|
|
if (!obj)
|
|
return;
|
|
|
|
if (obj->value)
|
|
HPDF_FreeMem (obj->mmgr, obj->value);
|
|
|
|
HPDF_FreeMem (obj->mmgr, obj);
|
|
}
|
|
|
|
HPDF_UINT
|
|
HPDF_Binary_GetLen (HPDF_Binary obj)
|
|
{
|
|
return obj->len;
|
|
}
|
|
|
|
HPDF_BYTE*
|
|
HPDF_Binary_GetValue (HPDF_Binary obj)
|
|
{
|
|
return obj->value;
|
|
}
|
|
|