//C-  -*- C++ -*-

//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, either Version 2 of the license,

//C- or (at your option) any later version. 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 from

//C- Lizardtech Software.  Lizardtech Software has authorized us to

//C- replace the original DjVu(r) Reference Library notice by the following

//C- text (see doc/lizard2002.djvu and doc/lizardtech2007.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, either Version 2 of the license,

//C- | or (at your option) any later version. 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- +------------------------------------------------------------------

#ifdef HAVE_CONFIG_H

# include "config.h"

#endif

#if NEED_GNUG_PRAGMAS

# pragma implementation

#endif

/** @name djvuinfo

    {\bf Synopsis}

    \begin{verbatim}

        djvudump <... iff_file_names ...>

    \end{verbatim}

    {\bf Description} --- File #"djvudump.cpp"# uses the facilities

    provided by \Ref{IFFByteStream.h} to display an indented

    representation of the chunk structure of an ``EA IFF 85'' file.

    Each line represent contains a chunk ID followed by the chunk

    size.  Additional information about the chunk is provided when

    program #djvuinfo.cpp# recognizes the chunk name and knows how to

    summarize the chunk data.  Furthermore, page identifiers are

    printed between curly braces when #djvudump# recognizes a bundled

    multipage document.  Lines are indented in order to reflect the

    hierarchical structure of the IFF files.

    {\bf Example}

    \begin{verbatim}

    % djvuinfo graham1.djvu 

    graham1.djvu:

      FORM:DJVU [32553] 

        INFO [5]            2325x3156, version 20, 300 dpi, gamma 2.2

	ANTa [34]	    Page annotation

	INCL [11]	    Indirection chunk (document.dir)

        Sjbz [17692]        JB2 data, no header

        BG44 [2570]         #1 - 74 slices - v1.2 (color) - 775x1052

        FG44 [1035]         #1 - 100 slices - v1.2 (color) - 194x263

        BG44 [3048]         #2 - 10 slices 

        BG44 [894]          #3 - 4 slices 

        BG44 [7247]         #4 - 9 slices 

    \end{verbatim}

    {\bf References} ---

    EA IFF 85 file format specification:\\

    \URL{http://www.cica.indiana.edu/graphics/image_specs/ilbm.format.txt}

    or \URL{http://www.tnt.uni-hannover.de/soft/compgraph/fileformats/docs/iff.pre}

    @memo

    Prints the structure of an IFF file.

xxx

    @author

    L\'eon Bottou <leonb@research.att.com>

*/

//@{

//@}

#include "DjVuDumpHelper.h"

#include "ByteStream.h"

#include "GException.h"

#include "GOS.h"

#include "GString.h"

#include "GURL.h"

#include "DjVuMessage.h"

#include "common.h"

const char *outputfile = 0;

FILE *outputf = stdout;

void

display(const GURL &url)

{

   DjVuDumpHelper helper;

   GP<ByteStream> ibs = ByteStream::create(url, "rb");

   GP<ByteStream> obs = helper.dump(ibs);

   GUTF8String str;

   size_t size = obs->size();

   char *buf = str.getbuf(obs->size());

   obs->seek(0);

   obs->readall(buf, size);

   GNativeString ns = str;

   fputs((const char*)ns, outputf);

}

void

usage()

{

  DjVuPrintErrorUTF8(

#ifdef DJVULIBRE_VERSION

          "DJVUDUMP --- DjVuLibre-" DJVULIBRE_VERSION "\n"

#endif

          "Describes DjVu and IFF85 files\n\n"

          "Usage: djvudump [-o outputfile] <iff_filenames>\n" );

  exit(1);

}

int 

main(int argc, char **argv)

{

  DJVU_LOCALE;

  // get output file name

  if (argc>2 && !strcmp(argv[1],"-o"))

    {

      outputfile = argv[2];

      argv += 2;

      argc -= 2;

    }

  // convert iff file name

  GArray<GUTF8String> dargv(0, argc-1);

  for(int i=0;i

    dargv[i]=GNativeString(argv[i]);

  if (argc <= 1)

    usage();

  if (outputfile && !(outputf = fopen(outputfile,"w")))

    {

      DjVuPrintErrorUTF8("djvudump: Cannot open output file.\n");

      exit(1);

    }

  G_TRY

    {

      for (int i=1; i

        {

        const GURL::Filename::UTF8 url(dargv[i]);

        display(url);

        }

    }

  G_CATCH(ex)

  {

      ex.perror();

      exit(1);

  }

  G_ENDCATCH;

  return 0;

}