mirror of
https://github.com/VCMP-SqMod/SqMod.git
synced 2025-02-14 16:57:12 +01:00
4a6bfc086c
Switched to POCO library for unified platform/library interface. Deprecated the external module API. It was creating more problems than solving. Removed most built-in libraries in favor of system libraries for easier maintenance. Cleaned and secured code with help from static analyzers.
355 lines
8.2 KiB
C
355 lines
8.2 KiB
C
/*
|
|
* << Haru Free PDF Library >> -- hpdf_array.c
|
|
*
|
|
* URL: http://libharu.org
|
|
*
|
|
* Copyright (c) 1999-2006 Takeshi Kanno <takeshi_kanno@est.hi-ho.ne.jp>
|
|
* Copyright (c) 2007-2009 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_Array
|
|
HPDF_Array_New (HPDF_MMgr mmgr)
|
|
{
|
|
HPDF_Array obj;
|
|
|
|
HPDF_PTRACE((" HPDF_Array_New\n"));
|
|
|
|
obj = HPDF_GetMem (mmgr, sizeof(HPDF_Array_Rec));
|
|
if (obj) {
|
|
HPDF_MemSet (obj, 0, sizeof(HPDF_Array_Rec));
|
|
obj->header.obj_class = HPDF_OCLASS_ARRAY;
|
|
obj->mmgr = mmgr;
|
|
obj->error = mmgr->error;
|
|
obj->list = HPDF_List_New (mmgr, HPDF_DEF_ITEMS_PER_BLOCK);
|
|
if (!obj->list) {
|
|
HPDF_FreeMem (mmgr, obj);
|
|
obj = NULL;
|
|
}
|
|
}
|
|
|
|
return obj;
|
|
}
|
|
|
|
|
|
HPDF_Array
|
|
HPDF_Box_Array_New (HPDF_MMgr mmgr,
|
|
HPDF_Box box)
|
|
{
|
|
HPDF_Array obj;
|
|
HPDF_STATUS ret = HPDF_OK;
|
|
|
|
HPDF_PTRACE((" HPDF_Box_Array_New\n"));
|
|
|
|
obj = HPDF_Array_New (mmgr);
|
|
if (!obj)
|
|
return NULL;
|
|
|
|
ret += HPDF_Array_Add (obj, HPDF_Real_New (mmgr, box.left));
|
|
ret += HPDF_Array_Add (obj, HPDF_Real_New (mmgr, box.bottom));
|
|
ret += HPDF_Array_Add (obj, HPDF_Real_New (mmgr, box.right));
|
|
ret += HPDF_Array_Add (obj, HPDF_Real_New (mmgr, box.top));
|
|
|
|
if (ret != HPDF_OK) {
|
|
HPDF_Array_Free (obj);
|
|
return NULL;
|
|
}
|
|
|
|
return obj;
|
|
}
|
|
|
|
|
|
void
|
|
HPDF_Array_Free (HPDF_Array array)
|
|
{
|
|
if (!array)
|
|
return;
|
|
|
|
HPDF_PTRACE((" HPDF_Array_Free\n"));
|
|
|
|
HPDF_Array_Clear (array);
|
|
|
|
HPDF_List_Free (array->list);
|
|
|
|
array->header.obj_class = 0;
|
|
|
|
HPDF_FreeMem (array->mmgr, array);
|
|
}
|
|
|
|
|
|
HPDF_STATUS
|
|
HPDF_Array_Write (HPDF_Array array,
|
|
HPDF_Stream stream,
|
|
HPDF_Encrypt e)
|
|
{
|
|
HPDF_UINT i;
|
|
HPDF_STATUS ret;
|
|
|
|
HPDF_PTRACE((" HPDF_Array_Write\n"));
|
|
|
|
ret = HPDF_Stream_WriteStr (stream, "[ ");
|
|
if (ret != HPDF_OK)
|
|
return ret;
|
|
|
|
for (i = 0; i < array->list->count; i++) {
|
|
void * element = HPDF_List_ItemAt (array->list, i);
|
|
|
|
ret = HPDF_Obj_Write (element, stream, e);
|
|
if (ret != HPDF_OK)
|
|
return ret;
|
|
|
|
ret = HPDF_Stream_WriteChar (stream, ' ');
|
|
if (ret != HPDF_OK)
|
|
return ret;
|
|
}
|
|
|
|
ret = HPDF_Stream_WriteChar (stream, ']');
|
|
|
|
return ret;
|
|
}
|
|
|
|
|
|
HPDF_STATUS
|
|
HPDF_Array_AddNumber (HPDF_Array array,
|
|
HPDF_INT32 value)
|
|
{
|
|
HPDF_Number n = HPDF_Number_New (array->mmgr, value);
|
|
|
|
HPDF_PTRACE((" HPDF_Array_AddNumber\n"));
|
|
|
|
if (!n)
|
|
return HPDF_Error_GetCode (array->error);
|
|
else
|
|
return HPDF_Array_Add (array, n);
|
|
}
|
|
|
|
|
|
HPDF_STATUS
|
|
HPDF_Array_AddReal (HPDF_Array array,
|
|
HPDF_REAL value)
|
|
{
|
|
HPDF_Real r = HPDF_Real_New (array->mmgr, value);
|
|
|
|
HPDF_PTRACE((" HPDF_Array_AddReal\n"));
|
|
|
|
if (!r)
|
|
return HPDF_Error_GetCode (array->error);
|
|
else
|
|
return HPDF_Array_Add (array, r);
|
|
}
|
|
|
|
|
|
HPDF_STATUS
|
|
HPDF_Array_AddName (HPDF_Array array,
|
|
const char *value)
|
|
{
|
|
HPDF_Name n = HPDF_Name_New (array->mmgr, value);
|
|
|
|
HPDF_PTRACE((" HPDF_Array_AddName\n"));
|
|
|
|
if (!n)
|
|
return HPDF_Error_GetCode (array->error);
|
|
else
|
|
return HPDF_Array_Add (array, n);
|
|
}
|
|
|
|
HPDF_STATUS
|
|
HPDF_Array_Add (HPDF_Array array,
|
|
void *obj)
|
|
{
|
|
HPDF_Obj_Header *header;
|
|
HPDF_STATUS ret;
|
|
|
|
HPDF_PTRACE((" HPDF_Array_Add\n"));
|
|
|
|
if (!obj) {
|
|
if (HPDF_Error_GetCode (array->error) == HPDF_OK)
|
|
return HPDF_SetError (array->error, HPDF_INVALID_OBJECT, 0);
|
|
else
|
|
return HPDF_INVALID_OBJECT;
|
|
}
|
|
|
|
header = (HPDF_Obj_Header *)obj;
|
|
|
|
if (header->obj_id & HPDF_OTYPE_DIRECT)
|
|
return HPDF_SetError (array->error, HPDF_INVALID_OBJECT, 0);
|
|
|
|
if (array->list->count >= HPDF_LIMIT_MAX_ARRAY) {
|
|
HPDF_PTRACE((" HPDF_Array_Add exceed limitatin of array count(%d)\n",
|
|
HPDF_LIMIT_MAX_ARRAY));
|
|
|
|
HPDF_Obj_Free (array->mmgr, obj);
|
|
return HPDF_SetError (array->error, HPDF_ARRAY_COUNT_ERR, 0);
|
|
}
|
|
|
|
if (header->obj_id & HPDF_OTYPE_INDIRECT) {
|
|
HPDF_Proxy proxy = HPDF_Proxy_New (array->mmgr, obj);
|
|
|
|
if (!proxy) {
|
|
HPDF_Obj_Free (array->mmgr, obj);
|
|
return HPDF_Error_GetCode (array->error);
|
|
}
|
|
|
|
proxy->header.obj_id |= HPDF_OTYPE_DIRECT;
|
|
obj = proxy;
|
|
} else
|
|
header->obj_id |= HPDF_OTYPE_DIRECT;
|
|
|
|
ret = HPDF_List_Add (array->list, obj);
|
|
if (ret != HPDF_OK)
|
|
HPDF_Obj_Free (array->mmgr, obj);
|
|
|
|
return ret;
|
|
}
|
|
|
|
|
|
HPDF_UINT
|
|
HPDF_Array_Items (HPDF_Array array)
|
|
{
|
|
return array->list->count;
|
|
}
|
|
|
|
|
|
HPDF_STATUS
|
|
HPDF_Array_Insert (HPDF_Array array,
|
|
void *target,
|
|
void *obj)
|
|
{
|
|
HPDF_Obj_Header *header;
|
|
HPDF_STATUS ret;
|
|
HPDF_UINT i;
|
|
|
|
HPDF_PTRACE((" HPDF_Array_Insert\n"));
|
|
|
|
if (!obj) {
|
|
if (HPDF_Error_GetCode (array->error) == HPDF_OK)
|
|
return HPDF_SetError (array->error, HPDF_INVALID_OBJECT, 0);
|
|
else
|
|
return HPDF_INVALID_OBJECT;
|
|
}
|
|
|
|
header = (HPDF_Obj_Header *)obj;
|
|
|
|
if (header->obj_id & HPDF_OTYPE_DIRECT) {
|
|
HPDF_PTRACE((" HPDF_Array_Add this object cannot owned by array "
|
|
"obj=0x%08X\n", (HPDF_UINT)array));
|
|
|
|
return HPDF_SetError (array->error, HPDF_INVALID_OBJECT, 0);
|
|
}
|
|
|
|
if (array->list->count >= HPDF_LIMIT_MAX_ARRAY) {
|
|
HPDF_PTRACE((" HPDF_Array_Add exceed limitatin of array count(%d)\n",
|
|
HPDF_LIMIT_MAX_ARRAY));
|
|
|
|
HPDF_Obj_Free (array->mmgr, obj);
|
|
|
|
return HPDF_SetError (array->error, HPDF_ARRAY_COUNT_ERR, 0);
|
|
}
|
|
|
|
if (header->obj_id & HPDF_OTYPE_INDIRECT) {
|
|
HPDF_Proxy proxy = HPDF_Proxy_New (array->mmgr, obj);
|
|
|
|
if (!proxy) {
|
|
HPDF_Obj_Free (array->mmgr, obj);
|
|
return HPDF_Error_GetCode (array->error);
|
|
}
|
|
|
|
proxy->header.obj_id |= HPDF_OTYPE_DIRECT;
|
|
obj = proxy;
|
|
} else
|
|
header->obj_id |= HPDF_OTYPE_DIRECT;
|
|
|
|
/* get the target-object from object-list
|
|
* consider that the pointer contained in list may be proxy-object.
|
|
*/
|
|
for (i = 0; i < array->list->count; i++) {
|
|
void *ptr = HPDF_List_ItemAt (array->list, i);
|
|
void *obj_ptr;
|
|
|
|
header = (HPDF_Obj_Header *)obj;
|
|
if (header->obj_class == HPDF_OCLASS_PROXY)
|
|
obj_ptr = ((HPDF_Proxy)ptr)->obj;
|
|
else
|
|
obj_ptr = ptr;
|
|
|
|
if (obj_ptr == target) {
|
|
ret = HPDF_List_Insert (array->list, ptr, obj);
|
|
if (ret != HPDF_OK)
|
|
HPDF_Obj_Free (array->mmgr, obj);
|
|
|
|
return ret;
|
|
}
|
|
}
|
|
|
|
HPDF_Obj_Free (array->mmgr, obj);
|
|
|
|
return HPDF_ITEM_NOT_FOUND;
|
|
}
|
|
|
|
|
|
void*
|
|
HPDF_Array_GetItem (HPDF_Array array,
|
|
HPDF_UINT index,
|
|
HPDF_UINT16 obj_class)
|
|
{
|
|
void *obj;
|
|
HPDF_Obj_Header *header;
|
|
|
|
HPDF_PTRACE((" HPDF_Array_GetItem\n"));
|
|
|
|
obj = HPDF_List_ItemAt (array->list, index);
|
|
|
|
if (!obj) {
|
|
HPDF_SetError (array->error, HPDF_ARRAY_ITEM_NOT_FOUND, 0);
|
|
return NULL;
|
|
}
|
|
|
|
header = (HPDF_Obj_Header *)obj;
|
|
|
|
if (header->obj_class == HPDF_OCLASS_PROXY) {
|
|
obj = ((HPDF_Proxy)obj)->obj;
|
|
header = (HPDF_Obj_Header *)obj;
|
|
}
|
|
|
|
if ((header->obj_class & HPDF_OCLASS_ANY) != obj_class) {
|
|
HPDF_SetError (array->error, HPDF_ARRAY_ITEM_UNEXPECTED_TYPE, 0);
|
|
|
|
return NULL;
|
|
}
|
|
|
|
return obj;
|
|
}
|
|
|
|
void
|
|
HPDF_Array_Clear (HPDF_Array array)
|
|
{
|
|
HPDF_UINT i;
|
|
|
|
HPDF_PTRACE((" HPDF_Array_Clear\n"));
|
|
|
|
if (!array)
|
|
return;
|
|
|
|
for (i = 0; i < array->list->count; i++) {
|
|
void * obj = HPDF_List_ItemAt (array->list, i);
|
|
|
|
if (obj) {
|
|
HPDF_Obj_Free (array->mmgr, obj);
|
|
}
|
|
}
|
|
|
|
HPDF_List_Clear (array->list);
|
|
}
|
|
|