You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
tdegraphics/kviewshell/plugins/djvu/libdjvu/DjVuDumpHelper.cpp

353 lines
10 KiB

//C- -------------------------------------------------------------------
//C- DjVuLibre-3.5
//C- Copyright (c) 2002 Leon Bottou and Yann Le Cun.
//C- Copyright (c) 2001 AT&T
//C-
//C- This software is subject to, and may be distributed under, the
//C- GNU General Public License, Version 2. The license should have
//C- accompanied the software or you may obtain a copy of the license
//C- from the Free Software Foundation at http://www.fsf.org .
//C-
//C- This program is distributed in the hope that it will be useful,
//C- but WITHOUT ANY WARRANTY; without even the implied warranty of
//C- MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
//C- GNU General Public License for more details.
//C-
//C- DjVuLibre-3.5 is derived from the DjVu(r) Reference Library
//C- distributed by Lizardtech Software. On July 19th 2002, Lizardtech
//C- Software authorized us to replace the original DjVu(r) Reference
//C- Library notice by the following text (see doc/lizard2002.djvu):
//C-
//C- ------------------------------------------------------------------
//C- | DjVu (r) Reference Library (v. 3.5)
//C- | Copyright (c) 1999-2001 LizardTech, Inc. All Rights Reserved.
//C- | The DjVu Reference Library is protected by U.S. Pat. No.
//C- | 6,058,214 and patents pending.
//C- |
//C- | This software is subject to, and may be distributed under, the
//C- | GNU General Public License, Version 2. The license should have
//C- | accompanied the software or you may obtain a copy of the license
//C- | from the Free Software Foundation at http://www.fsf.org .
//C- |
//C- | The computer code originally released by LizardTech under this
//C- | license and unmodified by other parties is deemed "the LIZARDTECH
//C- | ORIGINAL CODE." Subject to any third party intellectual property
//C- | claims, LizardTech grants recipient a worldwide, royalty-free,
//C- | non-exclusive license to make, use, sell, or otherwise dispose of
//C- | the LIZARDTECH ORIGINAL CODE or of programs derived from the
//C- | LIZARDTECH ORIGINAL CODE in compliance with the terms of the GNU
//C- | General Public License. This grant only confers the right to
//C- | infringe patent claims underlying the LIZARDTECH ORIGINAL CODE to
//C- | the extent such infringement is reasonably necessary to enable
//C- | recipient to make, have made, practice, sell, or otherwise dispose
//C- | of the LIZARDTECH ORIGINAL CODE (or portions thereof) and not to
//C- | any greater extent that may be necessary to utilize further
//C- | modifications or combinations.
//C- |
//C- | The LIZARDTECH ORIGINAL CODE is provided "AS IS" WITHOUT WARRANTY
//C- | OF ANY KIND, EITHER EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED
//C- | TO ANY WARRANTY OF NON-INFRINGEMENT, OR ANY IMPLIED WARRANTY OF
//C- | MERCHANTABILITY OR FITNESS FOR A PARTICULAR PURPOSE.
//C- +------------------------------------------------------------------
//
// $Id: DjVuDumpHelper.cpp,v 1.9 2003/11/07 22:08:20 leonb Exp $
// $Name: release_3_5_15 $
#ifdef HAVE_CONFIG_H
# include "config.h"
#endif
#if NEED_GNUG_PRAGMAS
# pragma implementation
#endif
#include "DjVuDumpHelper.h"
#include "DataPool.h"
#include "DjVmDir.h"
#include "DjVuInfo.h"
#include "IFFByteStream.h"
#ifdef HAVE_NAMESPACES
namespace DJVU {
# ifdef NOT_DEFINED // Just to fool emacs c++ mode
}
#endif
#endif
#ifdef putchar
#undef putchar
#endif
struct DjVmInfo
{
GP<DjVmDir> dir;
GPMap<int,DjVmDir::File> map;
};
inline static void
putchar(ByteStream & str, char ch)
{
str.write(&ch, 1);
}
// ---------- ROUTINES FOR SUMMARIZING CHUNK DATA
static void
display_djvu_info(ByteStream & out_str, IFFByteStream &iff,
GUTF8String, size_t size, DjVmInfo&, int)
{
GP<DjVuInfo> ginfo=DjVuInfo::create();
DjVuInfo &info=*ginfo;
info.decode(*iff.get_bytestream());
if (size >= 4)
out_str.format( "DjVu %dx%d", info.width, info.height);
if (size >= 5)
out_str.format( ", v%d", info.version);
if (size >= 8)
out_str.format( ", %d dpi", info.dpi);
if (size >= 8)
out_str.format( ", gamma=%3.1f", info.gamma);
}
static void
display_djbz(ByteStream & out_str, IFFByteStream &iff,
GUTF8String, size_t, DjVmInfo&, int)
{
out_str.format( "JB2 shared dictionary");
}
static void
display_fgbz(ByteStream & out_str, IFFByteStream &iff,
GUTF8String, size_t, DjVmInfo&, int)
{
out_str.format( "JB2 colors data");
}
static void
display_sjbz(ByteStream & out_str, IFFByteStream &iff,
GUTF8String, size_t, DjVmInfo&, int)
{
out_str.format( "JB2 bilevel data");
}
static void
display_smmr(ByteStream & out_str, IFFByteStream &iff,
GUTF8String, size_t, DjVmInfo&, int)
{
out_str.format( "G4/MMR stencil data");
}
static void
display_iw4(ByteStream & out_str, IFFByteStream &iff,
GUTF8String, size_t, DjVmInfo&, int)
{
GP<ByteStream> gbs = iff.get_bytestream();
unsigned char serial = gbs->read8();
unsigned char slices = gbs->read8();
out_str.format( "IW4 data #%d, %d slices", serial+1, slices);
if (serial == 0)
{
unsigned char major = gbs->read8();
unsigned char minor = gbs->read8();
unsigned char xhi = gbs->read8();
unsigned char xlo = gbs->read8();
unsigned char yhi = gbs->read8();
unsigned char ylo = gbs->read8();
out_str.format( ", v%d.%d (%s), %dx%d", major & 0x7f, minor,
(major & 0x80 ? "b&w" : "color"), (xhi<<8)+xlo, (yhi<<8)+ylo );
}
}
static void
display_djvm_dirm(ByteStream & out_str, IFFByteStream & iff,
GUTF8String head, size_t, DjVmInfo& djvminfo, int)
{
GP<DjVmDir> dir = DjVmDir::create();
dir->decode(iff.get_bytestream());
GPList<DjVmDir::File> list = dir->get_files_list();
if (dir->is_indirect())
{
out_str.format( "Document directory (indirect, %d files %d pages)",
dir->get_files_num(), dir->get_pages_num());
for (GPosition p=list; p; ++p)
out_str.format( "\n%s%s -> %s", (const char*)head,
(const char*)list[p]->get_load_name(), (const char*)list[p]->get_save_name() );
}
else
{
out_str.format( "Document directory (bundled, %d files %d pages)",
dir->get_files_num(), dir->get_pages_num());
djvminfo.dir = dir;
djvminfo.map.empty();
for (GPosition p=list; p; ++p)
djvminfo.map[list[p]->offset] = list[p];
}
}
static void
display_th44(ByteStream & out_str, IFFByteStream & iff,
GUTF8String, size_t, DjVmInfo & djvminfo, int counter)
{
int start_page=-1;
if (djvminfo.dir)
{
GPList<DjVmDir::File> files_list=djvminfo.dir->get_files_list();
for(GPosition pos=files_list;pos;++pos)
{
GP<DjVmDir::File> frec=files_list[pos];
if (iff.tell()>=frec->offset &&
iff.tell()<frec->offset+frec->size)
{
while(pos && !files_list[pos]->is_page())
++pos;
if (pos)
start_page=files_list[pos]->get_page_num();
break;
}
}
}
if (start_page>=0)
out_str.format( "Thumbnail icon for page %d", start_page+counter+1);
else
out_str.format( "Thumbnail icon");
}
static void
display_incl(ByteStream & out_str, IFFByteStream & iff,
GUTF8String, size_t, DjVmInfo&, int)
{
GUTF8String name;
char ch;
while(iff.read(&ch, 1) && ch!='\n')
name += ch;
out_str.format( "Indirection chunk --> {%s}", (const char *) name);
}
static void
display_anno(ByteStream & out_str, IFFByteStream &iff,
GUTF8String, size_t, DjVmInfo&, int)
{
out_str.format( "Page annotation");
GUTF8String id;
iff.short_id(id);
out_str.format( " (hyperlinks, etc.)");
}
static void
display_text(ByteStream & out_str, IFFByteStream &iff,
GUTF8String, size_t, DjVmInfo&, int)
{
out_str.format( "Hidden text");
GUTF8String id;
iff.short_id(id);
out_str.format( " (text, etc.)");
}
struct displaysubr
{
const char *id;
void (*subr)(ByteStream &, IFFByteStream &, GUTF8String,
size_t, DjVmInfo&, int counter);
};
static displaysubr disproutines[] =
{
{ "DJVU.INFO", display_djvu_info },
{ "DJVU.Smmr", display_smmr },
{ "DJVU.Sjbz", display_sjbz },
{ "DJVU.Djbz", display_djbz },
{ "DJVU.FG44", display_iw4 },
{ "DJVU.BG44", display_iw4 },
{ "DJVU.FGbz", display_fgbz },
{ "DJVI.Sjbz", display_sjbz },
{ "DJVI.Djbz", display_djbz },
{ "DJVI.FGbz", display_fgbz },
{ "DJVI.FG44", display_iw4 },
{ "DJVI.BG44", display_iw4 },
{ "BM44.BM44", display_iw4 },
{ "PM44.PM44", display_iw4 },
{ "DJVM.DIRM", display_djvm_dirm },
{ "THUM.TH44", display_th44 },
{ "INCL", display_incl },
{ "ANTa", display_anno },
{ "ANTz", display_anno },
{ "TXTa", display_text },
{ "TXTz", display_text },
{ 0, 0 },
};
// ---------- ROUTINES FOR DISPLAYING CHUNK STRUCTURE
static void
display_chunks(ByteStream & out_str, IFFByteStream &iff,
const GUTF8String &head, DjVmInfo djvminfo)
{
size_t size;
GUTF8String id, fullid;
GUTF8String head2 = head + " ";
GPMap<int,DjVmDir::File> djvmmap;
int rawoffset;
GMap<GUTF8String, int> counters;
while ((size = iff.get_chunk(id, &rawoffset)))
{
if (!counters.contains(id)) counters[id]=0;
else counters[id]++;
GUTF8String msg;
msg.format("%s%s [%d] ", (const char *)head, (const char *)id, size);
out_str.format( "%s", (const char *)msg);
// Display DJVM is when adequate
if (djvminfo.dir)
{
GP<DjVmDir::File> rec = djvminfo.map[rawoffset];
if (rec)
out_str.format( "{%s}", (const char*) rec->get_load_name());
}
// Test chunk type
iff.full_id(fullid);
for (int i=0; disproutines[i].id; i++)
if (fullid == disproutines[i].id || id == disproutines[i].id)
{
int n = msg.length();
while (n++ < 14+(int) head.length()) putchar(out_str, ' ');
if (!iff.composite()) out_str.format( " ");
(*disproutines[i].subr)(out_str, iff, head2,
size, djvminfo, counters[id]);
break;
}
// Default display of composite chunk
out_str.format( "\n");
if (iff.composite())
display_chunks(out_str, iff, head2, djvminfo);
// Terminate
iff.close_chunk();
}
}
GP<ByteStream>
DjVuDumpHelper::dump(const GP<DataPool> & pool)
{
return dump(pool->get_stream());
}
GP<ByteStream>
DjVuDumpHelper::dump(GP<ByteStream> gstr)
{
GP<ByteStream> out_str=ByteStream::create();
GUTF8String head=" ";
GP<IFFByteStream> iff=IFFByteStream::create(gstr);
DjVmInfo djvminfo;
display_chunks(*out_str, *iff, head, djvminfo);
return out_str;
}
#ifdef HAVE_NAMESPACES
}
# ifndef NOT_USING_DJVU_NAMESPACE
using namespace DJVU;
# endif
#endif