U32
wvStream_read (void *ptr, size_t size, size_t nmemb, wvStream * in)
{
if (in->kind == GSF_STREAM)
{
gsf_input_read (GSF_INPUT (in->stream.gsf_stream), size*nmemb, ptr);
return size*nmemb;
}
else if (in->kind == FILE_STREAM)
{
return (fread (ptr, size, nmemb, in->stream.file_stream));
}
else
{
return memorystream_read(in->stream.memory_stream, ptr, size * nmemb);
}
}
U8
read_8ubit (wvStream * in)
{
if (in->kind == GSF_STREAM)
{
U8 ret = 0;
gsf_input_read (GSF_INPUT (in->stream.gsf_stream), 1, &ret);
return (ret);
}
else if (in->kind == FILE_STREAM)
{
return (getc (in->stream.file_stream));
}
else
{
U8 ret = 0;
memorystream_read(in->stream.memory_stream, &ret, 1);
return ret;
}
}
/* return value: 1 == success 0 == failure */
int
wvGetPICF (wvVersion ver, PICF * apicf, wvStream * fd)
{
U8 temp;
U32 i;
U8 *buf,*p;
size_t size;
long pos = wvStream_tell (fd);
apicf->lcb = read_32ubit (fd);
apicf->cbHeader = read_16ubit (fd);
wvTrace (("size of pic is %x (%d)\n", apicf->cbHeader, apicf->cbHeader));
apicf->mfp_mm = (S16) read_16ubit (fd);
wvTrace (("mm type is %d\n", apicf->mfp_mm));
apicf->mfp_xExt = (S16) read_16ubit (fd);
apicf->mfp_yExt = (S16) read_16ubit (fd);
apicf->mfp_hMF = (S16) read_16ubit (fd);
if (apicf->mfp_mm == 99)
wvGetBITMAP (&(apicf->obj.bitmap), fd);
else
wvGetrc (&(apicf->obj.arc), fd);
apicf->dxaGoal = (S16) read_16ubit (fd);
apicf->dyaGoal = (S16) read_16ubit (fd);
apicf->mx = read_16ubit (fd);
apicf->my = read_16ubit (fd);
apicf->dxaCropLeft = (S16) read_16ubit (fd);
apicf->dyaCropTop = (S16) read_16ubit (fd);
apicf->dxaCropRight = (S16) read_16ubit (fd);
apicf->dyaCropBottom = (S16) read_16ubit (fd);
temp = read_8ubit (fd);
apicf->brcl = temp & 0x0F;
apicf->fFrameEmpty = (temp & 0x10) >> 4;
apicf->fBitmap = (temp & 0x20) >> 5;
wvTrace (("bitmap is %d\n", apicf->fBitmap));
apicf->fDrawHatch = (temp & 0x40) >> 6;
apicf->fError = (temp & 0x80) >> 7;
apicf->bpp = read_8ubit (fd);
wvGetBRC (ver, &(apicf->brcTop), fd);
wvGetBRC (ver, &(apicf->brcLeft), fd);
wvGetBRC (ver, &(apicf->brcBottom), fd);
wvGetBRC (ver, &(apicf->brcRight), fd);
apicf->dxaOrigin = (S16) read_16ubit (fd);
apicf->dyaOrigin = (S16) read_16ubit (fd);
if (ver == WORD8)
apicf->cProps = (S16) read_16ubit (fd);
else
apicf->cProps = 0;
pos = wvStream_tell (fd) - pos;
for (i = pos; i < apicf->cbHeader; i++)
read_8ubit (fd);
wvTrace (("pos is finally %x\n", wvStream_tell (fd)));
wvTrace (("len of data is %d\n", apicf->lcb - apicf->cbHeader));
wvTrace (
("ends at %x\n",
wvStream_tell (fd) + apicf->lcb - apicf->cbHeader));
i = 0;
if (apicf->mfp_mm < 90){
MSOFBH bse_pic_amsofbh;
size_t lHeaderSize;
size_t lWordStructsSize;
U8 *pHeader;
U8 *pWordStructs;
U32 len;
U32 j;
U8 bmp_header[40];
U32 header_len;
U32 colors_used;
U16 bpp;
pWordStructs = pHeader = 0;
wvTrace (("test\n"));
len = apicf->lcb - apicf->cbHeader;
/*[email protected] store*/
pos = wvStream_tell (fd);
i = wvEatOldGraphicHeader (fd, len);
if(i!=-1)/*Found BMP */
{
wvTrace (("len is %d, header len guess is %d\n", len, i));
if (i + 2 >= len)
{
wvTrace (("all read ok methinks\n"));
apicf->rgb = NULL;
return 1;
}
len -= i;
pos = wvStream_tell (fd);
for(j=0;j< sizeof(bmp_header);j++)
bmp_header[j] = read_8ubit (fd);
bpp = bmp_header[14] + (bmp_header[15] << 8);
if ( bpp < 9)
{
colors_used = bmp_header[32]
+ (bmp_header[33] << 8)
+ (bmp_header[34] << 16)
+ (bmp_header[35] << 24);
}
else
{
colors_used = 0;
}
wvStream_goto(fd,pos);
header_len = 14 + 40 + 4 * colors_used;
/*Get Blip Header Size*/
lHeaderSize = PutWord8BitmapHeader(apicf, 0, len + i-14, header_len);
pHeader = malloc(lHeaderSize);
/*Write Blip Header*/
PutWord8BitmapHeader(apicf, pHeader, len, header_len);
/*Set Type of FBSE Header*/
bse_pic_amsofbh.ver = 0;
bse_pic_amsofbh.inst = msobiDIB;
bse_pic_amsofbh.fbt = msofbtBlipFirst + msoblipDIB;/*msoblipJPEG msoblipPNG*/
bse_pic_amsofbh.cbLength = lHeaderSize+len;
}else{/*must be WMF*/
/*Get Blip Header Size*/
lHeaderSize = PutWord8MetafileHeader(apicf, 0);
pHeader = malloc(lHeaderSize);
/*Write Blip Header*/
PutWord8MetafileHeader(apicf, pHeader);
/*Set Type of FBSE Header*/
bse_pic_amsofbh.ver = 0;
bse_pic_amsofbh.inst = msobiWMF;
bse_pic_amsofbh.fbt = msofbtBlipFirst + msoblipWMF;
bse_pic_amsofbh.cbLength = lHeaderSize+len;
i = 0;
wvStream_goto(fd,pos);
}
lWordStructsSize = PutWord8Structs(&bse_pic_amsofbh, 0,0);
pWordStructs = malloc(lWordStructsSize);
PutWord8Structs(&bse_pic_amsofbh, pWordStructs, lWordStructsSize);
size = lHeaderSize + lWordStructsSize + apicf->lcb - apicf->cbHeader;
p = buf = malloc(size);
if(!p)
{
free(pWordStructs);
free(pHeader);
return 0;
}
memcpy(p, pWordStructs, lWordStructsSize);
p+= lWordStructsSize;
memcpy(p, pHeader, lHeaderSize);
p+=lHeaderSize;
free(pWordStructs);
free(pHeader);
}
else{
size = apicf->lcb - apicf->cbHeader;
p = buf = malloc(size);
}
#if 0
for (; i < apicf->lcb - apicf->cbHeader; i++)
*p++ = read_8ubit (fd);
#endif
U32 length = apicf->lcb - apicf->cbHeader - i;
if (fd->kind == GSF_STREAM)
{
gsf_input_read (GSF_INPUT (fd->stream.gsf_stream), length, p);
p += length;
}
else if (fd->kind == FILE_STREAM)
{
fread(p, sizeof(guint8), length, fd->stream.file_stream);
p += length;
}
else
{
memorystream_read(fd->stream.memory_stream, p, length);
p += length;
}
/* f = fopen("test.dat","wb");
fwrite(buf, 1,size, f);
fclose(f);
*/
wvStream_memory_create(&apicf->rgb, (char*)buf, size);
return 1;
}
