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.
165 lines
4.0 KiB
165 lines
4.0 KiB
/* Generic support functions for Xcftools
|
|
*
|
|
* Copyright (C) 2006 Henning Makholm
|
|
*
|
|
* This program is free software; you can redistribute it and/or modify
|
|
* it under the terms of version 2 of the GNU General Public License as
|
|
* published by the Free Software Foundation.
|
|
*
|
|
* This program is distributed in the hope that it will be useful,
|
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
* GNU General Public License for more details.
|
|
*
|
|
* You should have received a copy of the GNU General Public License
|
|
* along with this program; if not, write to the Free Software
|
|
* Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
|
|
*/
|
|
|
|
#include "xcftools.h"
|
|
#include <string.h>
|
|
#include <stdarg.h>
|
|
#include <stdlib.h>
|
|
#include <errno.h>
|
|
|
|
const char *progname = "$0" ;
|
|
int verboseFlag = 0 ;
|
|
|
|
|
|
static void __ATTRIBUTE__((noreturn))
|
|
vFatalGeneric(int status,const char *format,va_list args)
|
|
{
|
|
if( format ) {
|
|
if( *format == '!' ) {
|
|
vfprintf(stderr,format+1,args);
|
|
fprintf(stderr,": %s\n",strerror(errno));
|
|
} else {
|
|
vfprintf(stderr,format,args);
|
|
fputc('\n',stderr);
|
|
}
|
|
}
|
|
exit(status);
|
|
}
|
|
|
|
void
|
|
FatalGeneric(int status,const char* format,...)
|
|
{
|
|
va_list v; va_start(v,format);
|
|
if( format ) fprintf(stderr,"%s: ",progname);
|
|
vFatalGeneric(status,format,v);
|
|
}
|
|
|
|
void
|
|
FatalUnexpected(const char* format,...)
|
|
{
|
|
va_list v; va_start(v,format);
|
|
fprintf(stderr,"%s: ",progname);
|
|
vFatalGeneric(127,format,v) ;
|
|
}
|
|
|
|
void
|
|
FatalBadXCF(const char* format,...)
|
|
{
|
|
va_list v; va_start(v,format);
|
|
fprintf(stderr,"%s: %s:\n ",progname,_("Corrupted or malformed XCF file"));
|
|
vFatalGeneric(125,format,v) ;
|
|
}
|
|
|
|
void
|
|
xcfCheckspace(uint32_t addr,int spaceafter,const char *format,...)
|
|
{
|
|
if( xcf_length < spaceafter || addr > xcf_length - spaceafter ) {
|
|
va_list v; va_start(v,format);
|
|
fprintf(stderr,"%s: %s\n ",progname,_("Corrupted or truncated XCF file"));
|
|
fprintf(stderr,"(0x%" PRIXPTR " bytes): ",(uintptr_t)xcf_length);
|
|
vFatalGeneric(125,format,v) ;
|
|
}
|
|
}
|
|
|
|
|
|
void
|
|
FatalUnsupportedXCF(const char* format,...)
|
|
{
|
|
va_list v; va_start(v,format);
|
|
fprintf(stderr,"%s: %s\n ",progname,
|
|
_("The image contains features not understood by this program:"));
|
|
vFatalGeneric(123,format,v) ;
|
|
}
|
|
|
|
void
|
|
gpl_blurb(void)
|
|
{
|
|
fprintf(stderr,PACKAGE_STRING "\n");
|
|
fprintf(stderr,
|
|
_("This program is free software; you can modify and distribute it\n"
|
|
"under the terms of the GNU General Public License, version 2.\n"
|
|
"There is no warranty for %s.\n\n"),
|
|
PACKAGE_NAME);
|
|
fprintf(stderr,
|
|
_("Type \"%s -h\" to get an option summary.\n"),progname);
|
|
exit(1) ;
|
|
}
|
|
|
|
/* ******************************************************* */
|
|
|
|
void *
|
|
xcfmalloc(size_t size)
|
|
{
|
|
void *ptr = malloc(size);
|
|
if( !ptr )
|
|
FatalUnexpected(_("Out of memory"));
|
|
return ptr ;
|
|
}
|
|
|
|
void
|
|
xcffree(void *block)
|
|
{
|
|
if( xcf_file &&
|
|
(uint8_t*)block >= xcf_file &&
|
|
(uint8_t*)block < xcf_file + xcf_length )
|
|
;
|
|
else
|
|
free(block);
|
|
}
|
|
|
|
/* ******************************************************* */
|
|
|
|
FILE *
|
|
openout(const char *name)
|
|
{
|
|
FILE *newfile ;
|
|
if( strcmp(name,"-") == 0 )
|
|
return stdout ;
|
|
newfile = fopen(name,"wb") ;
|
|
if( newfile == NULL )
|
|
FatalUnexpected(_("!Cannot create file %s"),name);
|
|
return newfile ;
|
|
}
|
|
|
|
void
|
|
closeout(FILE *f,const char *name)
|
|
{
|
|
if( f == NULL )
|
|
return ;
|
|
if( fflush(f) == 0 ) {
|
|
errno = 0 ;
|
|
if( !ferror(f) ) {
|
|
if( fclose(f) == 0 )
|
|
return ;
|
|
} else if( errno == 0 ) {
|
|
/* Attempt to coax a valid errno out of the standard library,
|
|
* following an idea by Bruno Haible
|
|
* http://lists.gnu.org/archive/html/bug-gnulib/2003-09/msg00157.html
|
|
*/
|
|
if( fputc('\0', f) != EOF &&
|
|
fflush(f) == 0 )
|
|
errno = EIO ; /* Argh, everything succeds. Just call it an I/O error */
|
|
}
|
|
}
|
|
FatalUnexpected(_("!Error writing file %s"),name);
|
|
}
|
|
|
|
|
|
|
|
|