|
|
|
//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, 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: DjVuErrorList.cpp,v 1.8 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 "DjVuErrorList.h"
|
|
|
|
#include "DjVmDoc.h"
|
|
|
|
#include "GException.h"
|
|
|
|
#include "GContainer.h"
|
|
|
|
#include "GOS.h"
|
|
|
|
#include "DataPool.h"
|
|
|
|
#include <string.h>
|
|
|
|
|
|
|
|
|
|
|
|
#ifdef HAVE_NAMESPACES
|
|
|
|
namespace DJVU {
|
|
|
|
# ifdef NOT_DEFINED // Just to fool emacs c++ mode
|
|
|
|
}
|
|
|
|
#endif
|
|
|
|
#endif
|
|
|
|
|
|
|
|
|
|
|
|
DjVuErrorList::DjVuErrorList() {}
|
|
|
|
|
|
|
|
GURL
|
|
|
|
DjVuErrorList::set_stream(GP<ByteStream> xibs)
|
|
|
|
{
|
|
|
|
GUTF8String name;
|
|
|
|
static unsigned long serial=0;
|
|
|
|
pool=DataPool::create(xibs);
|
|
|
|
name.format("data://%08lx/%08lx.djvu",
|
|
|
|
++serial,(unsigned long)(size_t)((const ByteStream *)xibs));
|
|
|
|
pool_url=GURL::UTF8(name);
|
|
|
|
return pool_url;
|
|
|
|
}
|
|
|
|
|
|
|
|
bool
|
|
|
|
DjVuErrorList::notify_error(const DjVuPort * source, const GUTF8String & msg)
|
|
|
|
{
|
|
|
|
Errors.append(msg);
|
|
|
|
return 1;
|
|
|
|
}
|
|
|
|
|
|
|
|
bool
|
|
|
|
DjVuErrorList::notify_status(const DjVuPort * source, const GUTF8String &msg)
|
|
|
|
{
|
|
|
|
tqStatus.append(msg);
|
|
|
|
return 1;
|
|
|
|
}
|
|
|
|
|
|
|
|
GUTF8String
|
|
|
|
DjVuErrorList::GetError(void)
|
|
|
|
{
|
|
|
|
GUTF8String PrevError;
|
|
|
|
GPosition pos;
|
|
|
|
if((pos=Errors))
|
|
|
|
{
|
|
|
|
PrevError=Errors[pos];
|
|
|
|
Errors.del(pos);
|
|
|
|
}
|
|
|
|
return PrevError;
|
|
|
|
}
|
|
|
|
|
|
|
|
GUTF8String
|
|
|
|
DjVuErrorList::GettqStatus(void)
|
|
|
|
{
|
|
|
|
GUTF8String PrevtqStatus;
|
|
|
|
GPosition pos;
|
|
|
|
if((pos=tqStatus))
|
|
|
|
{
|
|
|
|
PrevtqStatus=tqStatus[pos];
|
|
|
|
tqStatus.del(pos);
|
|
|
|
}
|
|
|
|
return PrevtqStatus;
|
|
|
|
}
|
|
|
|
|
|
|
|
GP<DataPool>
|
|
|
|
DjVuErrorList::request_data(const DjVuPort * source, const GURL & url)
|
|
|
|
{
|
|
|
|
GP<DataPool> retval;
|
|
|
|
G_TRY
|
|
|
|
{
|
|
|
|
if (pool && url.protocol().downcase() == "data")
|
|
|
|
{
|
|
|
|
if(url == pool_url)
|
|
|
|
{
|
|
|
|
retval=pool;
|
|
|
|
}else if(url.base() == pool_url)
|
|
|
|
{
|
|
|
|
GUTF8String name=url.fname();
|
|
|
|
GP<DjVmDoc> doc=DjVmDoc::create();
|
|
|
|
GP<ByteStream> bs=pool->get_stream();
|
|
|
|
doc->read(*bs);
|
|
|
|
retval=doc->get_data(name);
|
|
|
|
}
|
|
|
|
}else if (url.is_local_file_url())
|
|
|
|
{
|
|
|
|
// GUTF8String fname=GOS::url_to_filename(url);
|
|
|
|
// if (GOS::basename(fname)=="-") fname="-";
|
|
|
|
retval=DataPool::create(url);
|
|
|
|
}
|
|
|
|
}
|
|
|
|
G_CATCH_ALL
|
|
|
|
{
|
|
|
|
retval=0;
|
|
|
|
} G_ENDCATCH;
|
|
|
|
return retval;
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
#ifdef HAVE_NAMESPACES
|
|
|
|
}
|
|
|
|
# ifndef NOT_USING_DJVU_NAMESPACE
|
|
|
|
using namespace DJVU;
|
|
|
|
# endif
|
|
|
|
#endif
|