2000-07-21 13:43:26 +02:00
|
|
|
/*-------------------------------------------------------------------------
|
|
|
|
*
|
|
|
|
* pg_backup_tar.c
|
|
|
|
*
|
|
|
|
* This file is copied from the 'files' format file, but dumps data into
|
|
|
|
* one temp file then sends it to the output TAR archive.
|
2011-04-10 17:42:00 +02:00
|
|
|
*
|
2011-01-23 22:10:15 +01:00
|
|
|
* NOTE: If you untar the created 'tar' file, the resulting files are
|
|
|
|
* compatible with the 'directory' format. Please keep the two formats in
|
|
|
|
* sync.
|
2000-07-21 13:43:26 +02:00
|
|
|
*
|
|
|
|
* See the headers to pg_backup_files & pg_restore for more details.
|
|
|
|
*
|
|
|
|
* Copyright (c) 2000, Philip Warner
|
2001-03-22 05:01:46 +01:00
|
|
|
* Rights are granted to use this software in any way so long
|
|
|
|
* as this notice is not removed.
|
2000-07-21 13:43:26 +02:00
|
|
|
*
|
|
|
|
* The author is not responsible for loss or damages that may
|
|
|
|
* result from it's use.
|
|
|
|
*
|
|
|
|
*
|
|
|
|
* IDENTIFICATION
|
2010-09-20 22:08:53 +02:00
|
|
|
* src/bin/pg_dump/pg_backup_tar.c
|
2001-01-12 05:32:07 +01:00
|
|
|
*
|
2000-07-21 13:43:26 +02:00
|
|
|
*-------------------------------------------------------------------------
|
|
|
|
*/
|
|
|
|
|
2001-02-10 03:31:31 +01:00
|
|
|
#include "pg_backup.h"
|
|
|
|
#include "pg_backup_archiver.h"
|
|
|
|
#include "pg_backup_tar.h"
|
2011-11-27 04:34:36 +01:00
|
|
|
#include "dumpmem.h"
|
2012-02-16 17:49:20 +01:00
|
|
|
#include "dumputils.h"
|
2001-02-10 03:31:31 +01:00
|
|
|
|
2006-06-27 04:56:41 +02:00
|
|
|
#include <sys/stat.h>
|
2000-07-21 13:43:26 +02:00
|
|
|
#include <ctype.h>
|
2003-01-11 00:49:06 +01:00
|
|
|
#include <limits.h>
|
2000-07-21 13:43:26 +02:00
|
|
|
#include <unistd.h>
|
|
|
|
|
2001-03-22 05:01:46 +01:00
|
|
|
static void _ArchiveEntry(ArchiveHandle *AH, TocEntry *te);
|
|
|
|
static void _StartData(ArchiveHandle *AH, TocEntry *te);
|
2002-09-04 22:31:48 +02:00
|
|
|
static size_t _WriteData(ArchiveHandle *AH, const void *data, size_t dLen);
|
2001-03-22 05:01:46 +01:00
|
|
|
static void _EndData(ArchiveHandle *AH, TocEntry *te);
|
|
|
|
static int _WriteByte(ArchiveHandle *AH, const int i);
|
|
|
|
static int _ReadByte(ArchiveHandle *);
|
2002-09-04 22:31:48 +02:00
|
|
|
static size_t _WriteBuf(ArchiveHandle *AH, const void *buf, size_t len);
|
|
|
|
static size_t _ReadBuf(ArchiveHandle *AH, void *buf, size_t len);
|
2001-03-22 05:01:46 +01:00
|
|
|
static void _CloseArchive(ArchiveHandle *AH);
|
|
|
|
static void _PrintTocData(ArchiveHandle *AH, TocEntry *te, RestoreOptions *ropt);
|
|
|
|
static void _WriteExtraToc(ArchiveHandle *AH, TocEntry *te);
|
|
|
|
static void _ReadExtraToc(ArchiveHandle *AH, TocEntry *te);
|
|
|
|
static void _PrintExtraToc(ArchiveHandle *AH, TocEntry *te);
|
|
|
|
|
|
|
|
static void _StartBlobs(ArchiveHandle *AH, TocEntry *te);
|
2001-04-01 07:42:51 +02:00
|
|
|
static void _StartBlob(ArchiveHandle *AH, TocEntry *te, Oid oid);
|
|
|
|
static void _EndBlob(ArchiveHandle *AH, TocEntry *te, Oid oid);
|
2001-03-22 05:01:46 +01:00
|
|
|
static void _EndBlobs(ArchiveHandle *AH, TocEntry *te);
|
2000-07-21 13:43:26 +02:00
|
|
|
|
|
|
|
#define K_STD_BUF_SIZE 1024
|
|
|
|
|
|
|
|
|
2012-03-02 21:30:01 +01:00
|
|
|
typedef struct
|
|
|
|
{
|
2000-07-21 13:43:26 +02:00
|
|
|
#ifdef HAVE_LIBZ
|
2012-03-02 21:30:01 +01:00
|
|
|
gzFile zFH;
|
2000-07-21 13:43:26 +02:00
|
|
|
#else
|
2012-03-02 21:30:01 +01:00
|
|
|
FILE *zFH;
|
2000-07-21 13:43:26 +02:00
|
|
|
#endif
|
2001-03-22 05:01:46 +01:00
|
|
|
FILE *nFH;
|
|
|
|
FILE *tarFH;
|
|
|
|
FILE *tmpFH;
|
|
|
|
char *targetFile;
|
|
|
|
char mode;
|
2007-02-19 16:05:06 +01:00
|
|
|
pgoff_t pos;
|
|
|
|
pgoff_t fileLen;
|
2001-03-22 05:01:46 +01:00
|
|
|
ArchiveHandle *AH;
|
2000-07-21 13:43:26 +02:00
|
|
|
} TAR_MEMBER;
|
|
|
|
|
2002-09-06 23:58:36 +02:00
|
|
|
/*
|
|
|
|
* Maximum file size for a tar member: The limit inherent in the
|
|
|
|
* format is 2^33-1 bytes (nearly 8 GB). But we don't want to exceed
|
2010-01-07 05:53:35 +01:00
|
|
|
* what we can represent in pgoff_t.
|
2002-09-06 23:58:36 +02:00
|
|
|
*/
|
2007-02-19 16:05:06 +01:00
|
|
|
#define MAX_TAR_MEMBER_FILELEN (((int64) 1 << Min(33, sizeof(pgoff_t)*8 - 1)) - 1)
|
2002-09-06 23:58:36 +02:00
|
|
|
|
2001-03-22 05:01:46 +01:00
|
|
|
typedef struct
|
|
|
|
{
|
2000-07-21 13:43:26 +02:00
|
|
|
int hasSeek;
|
2007-02-19 16:05:06 +01:00
|
|
|
pgoff_t filePos;
|
2001-03-22 05:01:46 +01:00
|
|
|
TAR_MEMBER *blobToc;
|
|
|
|
FILE *tarFH;
|
2007-02-19 16:05:06 +01:00
|
|
|
pgoff_t tarFHpos;
|
|
|
|
pgoff_t tarNextMember;
|
2001-03-22 05:01:46 +01:00
|
|
|
TAR_MEMBER *FH;
|
2000-07-21 13:43:26 +02:00
|
|
|
int isSpecialScript;
|
2001-03-22 05:01:46 +01:00
|
|
|
TAR_MEMBER *scriptTH;
|
2000-07-21 13:43:26 +02:00
|
|
|
} lclContext;
|
|
|
|
|
2001-03-22 05:01:46 +01:00
|
|
|
typedef struct
|
|
|
|
{
|
|
|
|
TAR_MEMBER *TH;
|
|
|
|
char *filename;
|
2000-07-21 13:43:26 +02:00
|
|
|
} lclTocEntry;
|
|
|
|
|
2012-07-25 06:02:49 +02:00
|
|
|
/* translator: this is a module name */
|
2007-03-18 17:50:44 +01:00
|
|
|
static const char *modulename = gettext_noop("tar archiver");
|
2001-03-22 05:01:46 +01:00
|
|
|
|
|
|
|
static void _LoadBlobs(ArchiveHandle *AH, RestoreOptions *ropt);
|
2000-07-21 13:43:26 +02:00
|
|
|
|
2001-03-22 05:01:46 +01:00
|
|
|
static TAR_MEMBER *tarOpen(ArchiveHandle *AH, const char *filename, char mode);
|
|
|
|
static void tarClose(ArchiveHandle *AH, TAR_MEMBER *TH);
|
2000-07-21 13:43:26 +02:00
|
|
|
|
|
|
|
#ifdef __NOT_USED__
|
2002-08-20 19:54:45 +02:00
|
|
|
static char *tarGets(char *buf, size_t len, TAR_MEMBER *th);
|
2000-07-21 13:43:26 +02:00
|
|
|
#endif
|
2012-06-10 21:20:04 +02:00
|
|
|
static int tarPrintf(ArchiveHandle *AH, TAR_MEMBER *th, const char *fmt,...) __attribute__((format(PG_PRINTF_ATTRIBUTE, 3, 4)));
|
2000-07-21 13:43:26 +02:00
|
|
|
|
2001-03-22 05:01:46 +01:00
|
|
|
static void _tarAddFile(ArchiveHandle *AH, TAR_MEMBER *th);
|
|
|
|
static int _tarChecksum(char *th);
|
|
|
|
static TAR_MEMBER *_tarPositionTo(ArchiveHandle *AH, const char *filename);
|
2002-09-04 22:31:48 +02:00
|
|
|
static size_t tarRead(void *buf, size_t len, TAR_MEMBER *th);
|
|
|
|
static size_t tarWrite(const void *buf, size_t len, TAR_MEMBER *th);
|
2001-03-22 05:01:46 +01:00
|
|
|
static void _tarWriteHeader(TAR_MEMBER *th);
|
|
|
|
static int _tarGetHeader(ArchiveHandle *AH, TAR_MEMBER *th);
|
2002-09-04 22:31:48 +02:00
|
|
|
static size_t _tarReadRaw(ArchiveHandle *AH, void *buf, size_t len, TAR_MEMBER *th, FILE *fh);
|
2000-07-21 13:43:26 +02:00
|
|
|
|
2002-09-04 22:31:48 +02:00
|
|
|
static size_t _scriptOut(ArchiveHandle *AH, const void *buf, size_t len);
|
2000-07-21 13:43:26 +02:00
|
|
|
|
|
|
|
/*
|
2001-03-22 05:01:46 +01:00
|
|
|
* Initializer
|
2000-07-21 13:43:26 +02:00
|
|
|
*/
|
2001-03-22 05:01:46 +01:00
|
|
|
void
|
|
|
|
InitArchiveFmt_Tar(ArchiveHandle *AH)
|
2000-07-21 13:43:26 +02:00
|
|
|
{
|
2001-03-22 05:01:46 +01:00
|
|
|
lclContext *ctx;
|
|
|
|
|
|
|
|
/* Assuming static functions, this can be copied for each format. */
|
|
|
|
AH->ArchiveEntryPtr = _ArchiveEntry;
|
|
|
|
AH->StartDataPtr = _StartData;
|
|
|
|
AH->WriteDataPtr = _WriteData;
|
|
|
|
AH->EndDataPtr = _EndData;
|
|
|
|
AH->WriteBytePtr = _WriteByte;
|
|
|
|
AH->ReadBytePtr = _ReadByte;
|
|
|
|
AH->WriteBufPtr = _WriteBuf;
|
|
|
|
AH->ReadBufPtr = _ReadBuf;
|
|
|
|
AH->ClosePtr = _CloseArchive;
|
2009-02-02 21:07:37 +01:00
|
|
|
AH->ReopenPtr = NULL;
|
2001-03-22 05:01:46 +01:00
|
|
|
AH->PrintTocDataPtr = _PrintTocData;
|
|
|
|
AH->ReadExtraTocPtr = _ReadExtraToc;
|
|
|
|
AH->WriteExtraTocPtr = _WriteExtraToc;
|
|
|
|
AH->PrintExtraTocPtr = _PrintExtraToc;
|
|
|
|
|
|
|
|
AH->StartBlobsPtr = _StartBlobs;
|
|
|
|
AH->StartBlobPtr = _StartBlob;
|
|
|
|
AH->EndBlobPtr = _EndBlob;
|
|
|
|
AH->EndBlobsPtr = _EndBlobs;
|
2009-02-02 21:07:37 +01:00
|
|
|
AH->ClonePtr = NULL;
|
|
|
|
AH->DeClonePtr = NULL;
|
2001-03-22 05:01:46 +01:00
|
|
|
|
|
|
|
/*
|
|
|
|
* Set up some special context used in compressing data.
|
|
|
|
*/
|
2011-11-25 21:40:51 +01:00
|
|
|
ctx = (lclContext *) pg_calloc(1, sizeof(lclContext));
|
2001-03-22 05:01:46 +01:00
|
|
|
AH->formatData = (void *) ctx;
|
|
|
|
ctx->filePos = 0;
|
2003-10-08 05:52:32 +02:00
|
|
|
ctx->isSpecialScript = 0;
|
2004-08-29 07:07:03 +02:00
|
|
|
|
2002-04-24 04:21:04 +02:00
|
|
|
/* Initialize LO buffering */
|
|
|
|
AH->lo_buf_size = LOBBUFSIZE;
|
2011-11-25 21:40:51 +01:00
|
|
|
AH->lo_buf = (void *) pg_malloc(LOBBUFSIZE);
|
2001-03-22 05:01:46 +01:00
|
|
|
|
|
|
|
/*
|
2011-01-23 22:10:15 +01:00
|
|
|
* Now open the tar file, and load the TOC if we're in read mode.
|
2001-03-22 05:01:46 +01:00
|
|
|
*/
|
|
|
|
if (AH->mode == archModeWrite)
|
|
|
|
{
|
|
|
|
if (AH->fSpec && strcmp(AH->fSpec, "") != 0)
|
2007-10-28 22:55:52 +01:00
|
|
|
{
|
2000-07-21 13:43:26 +02:00
|
|
|
ctx->tarFH = fopen(AH->fSpec, PG_BINARY_W);
|
2007-10-28 22:55:52 +01:00
|
|
|
if (ctx->tarFH == NULL)
|
2012-02-16 17:49:20 +01:00
|
|
|
exit_horribly(modulename,
|
2012-06-10 21:20:04 +02:00
|
|
|
"could not open TOC file \"%s\" for output: %s\n",
|
2012-02-16 17:49:20 +01:00
|
|
|
AH->fSpec, strerror(errno));
|
2007-10-28 22:55:52 +01:00
|
|
|
}
|
2001-03-22 05:01:46 +01:00
|
|
|
else
|
2007-10-28 22:55:52 +01:00
|
|
|
{
|
2000-07-21 13:43:26 +02:00
|
|
|
ctx->tarFH = stdout;
|
2007-10-28 22:55:52 +01:00
|
|
|
if (ctx->tarFH == NULL)
|
2012-02-16 17:49:20 +01:00
|
|
|
exit_horribly(modulename,
|
|
|
|
"could not open TOC file for output: %s\n",
|
|
|
|
strerror(errno));
|
2007-10-28 22:55:52 +01:00
|
|
|
}
|
2001-01-12 05:32:07 +01:00
|
|
|
|
2000-07-21 13:43:26 +02:00
|
|
|
ctx->tarFHpos = 0;
|
|
|
|
|
2001-03-22 05:01:46 +01:00
|
|
|
/*
|
2005-10-15 04:49:52 +02:00
|
|
|
* Make unbuffered since we will dup() it, and the buffers screw each
|
|
|
|
* other
|
2001-03-22 05:01:46 +01:00
|
|
|
*/
|
2000-08-01 17:51:45 +02:00
|
|
|
/* setvbuf(ctx->tarFH, NULL, _IONBF, 0); */
|
2000-07-21 13:43:26 +02:00
|
|
|
|
2002-10-25 03:33:17 +02:00
|
|
|
ctx->hasSeek = checkSeek(ctx->tarFH);
|
2000-07-21 13:43:26 +02:00
|
|
|
|
2001-03-22 05:01:46 +01:00
|
|
|
if (AH->compression < 0 || AH->compression > 9)
|
2000-07-21 13:43:26 +02:00
|
|
|
AH->compression = Z_DEFAULT_COMPRESSION;
|
|
|
|
|
|
|
|
/* Don't compress into tar files unless asked to do so */
|
|
|
|
if (AH->compression == Z_DEFAULT_COMPRESSION)
|
|
|
|
AH->compression = 0;
|
|
|
|
|
2001-03-22 05:01:46 +01:00
|
|
|
/*
|
2005-10-15 04:49:52 +02:00
|
|
|
* We don't support compression because reading the files back is not
|
|
|
|
* possible since gzdopen uses buffered IO which totally screws file
|
|
|
|
* positioning.
|
2000-07-21 13:43:26 +02:00
|
|
|
*/
|
|
|
|
if (AH->compression != 0)
|
2012-02-16 17:49:20 +01:00
|
|
|
exit_horribly(modulename,
|
2012-06-10 21:20:04 +02:00
|
|
|
"compression is not supported by tar archive format\n");
|
2001-03-22 05:01:46 +01:00
|
|
|
}
|
|
|
|
else
|
|
|
|
{ /* Read Mode */
|
|
|
|
if (AH->fSpec && strcmp(AH->fSpec, "") != 0)
|
2007-10-28 22:55:52 +01:00
|
|
|
{
|
2000-07-21 13:43:26 +02:00
|
|
|
ctx->tarFH = fopen(AH->fSpec, PG_BINARY_R);
|
2007-10-28 22:55:52 +01:00
|
|
|
if (ctx->tarFH == NULL)
|
2012-02-16 17:49:20 +01:00
|
|
|
exit_horribly(modulename, "could not open TOC file \"%s\" for input: %s\n",
|
|
|
|
AH->fSpec, strerror(errno));
|
2007-10-28 22:55:52 +01:00
|
|
|
}
|
2001-03-22 05:01:46 +01:00
|
|
|
else
|
2007-10-28 22:55:52 +01:00
|
|
|
{
|
2000-07-21 13:43:26 +02:00
|
|
|
ctx->tarFH = stdin;
|
2007-10-28 22:55:52 +01:00
|
|
|
if (ctx->tarFH == NULL)
|
2012-02-16 17:49:20 +01:00
|
|
|
exit_horribly(modulename, "could not open TOC file for input: %s\n",
|
|
|
|
strerror(errno));
|
2007-10-28 22:55:52 +01:00
|
|
|
}
|
2001-01-12 05:32:07 +01:00
|
|
|
|
2001-03-22 05:01:46 +01:00
|
|
|
/*
|
2005-10-15 04:49:52 +02:00
|
|
|
* Make unbuffered since we will dup() it, and the buffers screw each
|
|
|
|
* other
|
2001-03-22 05:01:46 +01:00
|
|
|
*/
|
2000-08-01 17:51:45 +02:00
|
|
|
/* setvbuf(ctx->tarFH, NULL, _IONBF, 0); */
|
2000-07-21 13:43:26 +02:00
|
|
|
|
|
|
|
ctx->tarFHpos = 0;
|
|
|
|
|
2002-10-25 03:33:17 +02:00
|
|
|
ctx->hasSeek = checkSeek(ctx->tarFH);
|
2000-07-21 13:43:26 +02:00
|
|
|
|
2001-03-22 05:01:46 +01:00
|
|
|
/*
|
|
|
|
* Forcibly unmark the header as read since we use the lookahead
|
|
|
|
* buffer
|
|
|
|
*/
|
2000-07-21 13:43:26 +02:00
|
|
|
AH->readHeader = 0;
|
|
|
|
|
2001-03-22 05:01:46 +01:00
|
|
|
ctx->FH = (void *) tarOpen(AH, "toc.dat", 'r');
|
2000-07-21 13:43:26 +02:00
|
|
|
ReadHead(AH);
|
|
|
|
ReadToc(AH);
|
2001-03-22 05:01:46 +01:00
|
|
|
tarClose(AH, ctx->FH); /* Nothing else in the file... */
|
|
|
|
}
|
2000-07-21 13:43:26 +02:00
|
|
|
}
|
|
|
|
|
|
|
|
/*
|
|
|
|
* - Start a new TOC entry
|
2001-03-22 05:01:46 +01:00
|
|
|
* Setup the output file name.
|
2000-07-21 13:43:26 +02:00
|
|
|
*/
|
2001-03-22 05:01:46 +01:00
|
|
|
static void
|
|
|
|
_ArchiveEntry(ArchiveHandle *AH, TocEntry *te)
|
2000-07-21 13:43:26 +02:00
|
|
|
{
|
2001-03-22 05:01:46 +01:00
|
|
|
lclTocEntry *ctx;
|
|
|
|
char fn[K_STD_BUF_SIZE];
|
2000-07-21 13:43:26 +02:00
|
|
|
|
2011-11-25 21:40:51 +01:00
|
|
|
ctx = (lclTocEntry *) pg_calloc(1, sizeof(lclTocEntry));
|
2001-04-14 15:11:03 +02:00
|
|
|
if (te->dataDumper != NULL)
|
2001-03-22 05:01:46 +01:00
|
|
|
{
|
2000-07-21 13:43:26 +02:00
|
|
|
#ifdef HAVE_LIBZ
|
2001-03-22 05:01:46 +01:00
|
|
|
if (AH->compression == 0)
|
2003-12-06 04:00:16 +01:00
|
|
|
sprintf(fn, "%d.dat", te->dumpId);
|
2001-03-22 05:01:46 +01:00
|
|
|
else
|
2003-12-06 04:00:16 +01:00
|
|
|
sprintf(fn, "%d.dat.gz", te->dumpId);
|
2000-07-21 13:43:26 +02:00
|
|
|
#else
|
2003-12-06 04:00:16 +01:00
|
|
|
sprintf(fn, "%d.dat", te->dumpId);
|
2000-07-21 13:43:26 +02:00
|
|
|
#endif
|
2011-11-25 21:40:51 +01:00
|
|
|
ctx->filename = pg_strdup(fn);
|
2001-03-22 05:01:46 +01:00
|
|
|
}
|
|
|
|
else
|
|
|
|
{
|
2000-07-21 13:43:26 +02:00
|
|
|
ctx->filename = NULL;
|
|
|
|
ctx->TH = NULL;
|
2001-03-22 05:01:46 +01:00
|
|
|
}
|
|
|
|
te->formatData = (void *) ctx;
|
2000-07-21 13:43:26 +02:00
|
|
|
}
|
|
|
|
|
2001-03-22 05:01:46 +01:00
|
|
|
static void
|
|
|
|
_WriteExtraToc(ArchiveHandle *AH, TocEntry *te)
|
2000-07-21 13:43:26 +02:00
|
|
|
{
|
2001-03-22 05:01:46 +01:00
|
|
|
lclTocEntry *ctx = (lclTocEntry *) te->formatData;
|
2000-07-21 13:43:26 +02:00
|
|
|
|
2001-03-22 05:01:46 +01:00
|
|
|
if (ctx->filename)
|
2000-07-21 13:43:26 +02:00
|
|
|
WriteStr(AH, ctx->filename);
|
2001-03-22 05:01:46 +01:00
|
|
|
else
|
2000-07-21 13:43:26 +02:00
|
|
|
WriteStr(AH, "");
|
|
|
|
}
|
|
|
|
|
2001-03-22 05:01:46 +01:00
|
|
|
static void
|
|
|
|
_ReadExtraToc(ArchiveHandle *AH, TocEntry *te)
|
2000-07-21 13:43:26 +02:00
|
|
|
{
|
2001-03-22 05:01:46 +01:00
|
|
|
lclTocEntry *ctx = (lclTocEntry *) te->formatData;
|
2000-07-21 13:43:26 +02:00
|
|
|
|
2001-03-22 05:01:46 +01:00
|
|
|
if (ctx == NULL)
|
|
|
|
{
|
2011-11-25 21:40:51 +01:00
|
|
|
ctx = (lclTocEntry *) pg_calloc(1, sizeof(lclTocEntry));
|
2001-03-22 05:01:46 +01:00
|
|
|
te->formatData = (void *) ctx;
|
|
|
|
}
|
2000-07-21 13:43:26 +02:00
|
|
|
|
2001-03-22 05:01:46 +01:00
|
|
|
ctx->filename = ReadStr(AH);
|
|
|
|
if (strlen(ctx->filename) == 0)
|
|
|
|
{
|
2000-07-21 13:43:26 +02:00
|
|
|
free(ctx->filename);
|
|
|
|
ctx->filename = NULL;
|
2001-03-22 05:01:46 +01:00
|
|
|
}
|
|
|
|
ctx->TH = NULL;
|
2000-07-21 13:43:26 +02:00
|
|
|
}
|
|
|
|
|
2001-03-22 05:01:46 +01:00
|
|
|
static void
|
|
|
|
_PrintExtraToc(ArchiveHandle *AH, TocEntry *te)
|
2000-07-21 13:43:26 +02:00
|
|
|
{
|
2001-03-22 05:01:46 +01:00
|
|
|
lclTocEntry *ctx = (lclTocEntry *) te->formatData;
|
2000-07-21 13:43:26 +02:00
|
|
|
|
2004-03-03 22:28:55 +01:00
|
|
|
if (AH->public.verbose && ctx->filename != NULL)
|
2001-04-14 15:11:03 +02:00
|
|
|
ahprintf(AH, "-- File: %s\n", ctx->filename);
|
2000-07-21 13:43:26 +02:00
|
|
|
}
|
|
|
|
|
2001-03-22 05:01:46 +01:00
|
|
|
static void
|
|
|
|
_StartData(ArchiveHandle *AH, TocEntry *te)
|
2000-07-21 13:43:26 +02:00
|
|
|
{
|
2001-03-22 05:01:46 +01:00
|
|
|
lclTocEntry *tctx = (lclTocEntry *) te->formatData;
|
2000-07-21 13:43:26 +02:00
|
|
|
|
|
|
|
tctx->TH = tarOpen(AH, tctx->filename, 'w');
|
|
|
|
}
|
|
|
|
|
2001-03-22 05:01:46 +01:00
|
|
|
static TAR_MEMBER *
|
|
|
|
tarOpen(ArchiveHandle *AH, const char *filename, char mode)
|
2000-07-21 13:43:26 +02:00
|
|
|
{
|
2001-03-22 05:01:46 +01:00
|
|
|
lclContext *ctx = (lclContext *) AH->formatData;
|
|
|
|
TAR_MEMBER *tm;
|
|
|
|
|
2000-07-21 13:43:26 +02:00
|
|
|
#ifdef HAVE_LIBZ
|
2001-03-22 05:01:46 +01:00
|
|
|
char fmode[10];
|
2000-07-21 13:43:26 +02:00
|
|
|
#endif
|
|
|
|
|
|
|
|
if (mode == 'r')
|
|
|
|
{
|
|
|
|
tm = _tarPositionTo(AH, filename);
|
2001-03-22 05:01:46 +01:00
|
|
|
if (!tm) /* Not found */
|
2000-07-21 13:43:26 +02:00
|
|
|
{
|
2010-02-23 17:55:22 +01:00
|
|
|
if (filename)
|
|
|
|
{
|
|
|
|
/*
|
2010-02-26 03:01:40 +01:00
|
|
|
* Couldn't find the requested file. Future: do SEEK(0) and
|
|
|
|
* retry.
|
2010-02-23 17:55:22 +01:00
|
|
|
*/
|
2012-03-20 22:38:11 +01:00
|
|
|
exit_horribly(modulename, "could not find file \"%s\" in archive\n", filename);
|
2010-02-23 17:55:22 +01:00
|
|
|
}
|
2001-03-22 05:01:46 +01:00
|
|
|
else
|
2010-02-23 17:55:22 +01:00
|
|
|
{
|
|
|
|
/* Any file OK, none left, so return NULL */
|
2000-07-21 13:43:26 +02:00
|
|
|
return NULL;
|
2010-02-23 17:55:22 +01:00
|
|
|
}
|
2000-07-21 13:43:26 +02:00
|
|
|
}
|
|
|
|
|
|
|
|
#ifdef HAVE_LIBZ
|
|
|
|
|
|
|
|
if (AH->compression == 0)
|
|
|
|
tm->nFH = ctx->tarFH;
|
|
|
|
else
|
2012-03-20 22:38:11 +01:00
|
|
|
exit_horribly(modulename, "compression is not supported by tar archive format\n");
|
2001-03-22 05:01:46 +01:00
|
|
|
/* tm->zFH = gzdopen(dup(fileno(ctx->tarFH)), "rb"); */
|
2000-07-21 13:43:26 +02:00
|
|
|
#else
|
|
|
|
tm->nFH = ctx->tarFH;
|
|
|
|
#endif
|
2001-03-22 05:01:46 +01:00
|
|
|
}
|
|
|
|
else
|
|
|
|
{
|
2011-11-25 21:40:51 +01:00
|
|
|
tm = pg_calloc(1, sizeof(TAR_MEMBER));
|
2000-07-21 13:43:26 +02:00
|
|
|
|
2006-06-27 03:16:58 +02:00
|
|
|
#ifndef WIN32
|
2000-07-21 13:43:26 +02:00
|
|
|
tm->tmpFH = tmpfile();
|
2006-06-27 03:16:58 +02:00
|
|
|
#else
|
2006-10-04 02:30:14 +02:00
|
|
|
|
2006-06-27 03:16:58 +02:00
|
|
|
/*
|
2006-10-04 02:30:14 +02:00
|
|
|
* On WIN32, tmpfile() generates a filename in the root directory,
|
|
|
|
* which requires administrative permissions on certain systems. Loop
|
|
|
|
* until we find a unique file name we can create.
|
2006-06-27 03:16:58 +02:00
|
|
|
*/
|
|
|
|
while (1)
|
|
|
|
{
|
2006-10-04 02:30:14 +02:00
|
|
|
char *name;
|
|
|
|
int fd;
|
|
|
|
|
2006-06-27 03:16:58 +02:00
|
|
|
name = _tempnam(NULL, "pg_temp_");
|
|
|
|
if (name == NULL)
|
|
|
|
break;
|
|
|
|
fd = open(name, O_RDWR | O_CREAT | O_EXCL | O_BINARY |
|
2006-06-27 04:56:41 +02:00
|
|
|
O_TEMPORARY, S_IRUSR | S_IWUSR);
|
2006-06-27 03:16:58 +02:00
|
|
|
free(name);
|
|
|
|
|
2006-10-04 02:30:14 +02:00
|
|
|
if (fd != -1) /* created a file */
|
2006-06-27 03:16:58 +02:00
|
|
|
{
|
|
|
|
tm->tmpFH = fdopen(fd, "w+b");
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
else if (errno != EEXIST) /* failure other than file exists */
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
#endif
|
2000-07-21 13:43:26 +02:00
|
|
|
|
2001-03-22 05:01:46 +01:00
|
|
|
if (tm->tmpFH == NULL)
|
2012-03-20 22:38:11 +01:00
|
|
|
exit_horribly(modulename, "could not generate temporary file name: %s\n", strerror(errno));
|
2001-01-12 05:32:07 +01:00
|
|
|
|
2000-07-21 13:43:26 +02:00
|
|
|
#ifdef HAVE_LIBZ
|
|
|
|
|
|
|
|
if (AH->compression != 0)
|
|
|
|
{
|
|
|
|
sprintf(fmode, "wb%d", AH->compression);
|
|
|
|
tm->zFH = gzdopen(dup(fileno(tm->tmpFH)), fmode);
|
2001-01-12 05:32:07 +01:00
|
|
|
if (tm->zFH == NULL)
|
2012-03-20 22:38:11 +01:00
|
|
|
exit_horribly(modulename, "could not open temporary file\n");
|
2001-03-22 05:01:46 +01:00
|
|
|
}
|
|
|
|
else
|
2000-07-21 13:43:26 +02:00
|
|
|
tm->nFH = tm->tmpFH;
|
|
|
|
#else
|
|
|
|
|
|
|
|
tm->nFH = tm->tmpFH;
|
|
|
|
#endif
|
|
|
|
|
|
|
|
tm->AH = AH;
|
2011-11-25 21:40:51 +01:00
|
|
|
tm->targetFile = pg_strdup(filename);
|
2000-07-21 13:43:26 +02:00
|
|
|
}
|
|
|
|
|
|
|
|
tm->mode = mode;
|
|
|
|
tm->tarFH = ctx->tarFH;
|
|
|
|
|
|
|
|
return tm;
|
|
|
|
}
|
|
|
|
|
2001-03-22 05:01:46 +01:00
|
|
|
static void
|
|
|
|
tarClose(ArchiveHandle *AH, TAR_MEMBER *th)
|
2000-07-21 13:43:26 +02:00
|
|
|
{
|
|
|
|
/*
|
|
|
|
* Close the GZ file since we dup'd. This will flush the buffers.
|
|
|
|
*/
|
|
|
|
if (AH->compression != 0)
|
2001-01-12 05:32:07 +01:00
|
|
|
if (GZCLOSE(th->zFH) != 0)
|
2012-03-20 22:38:11 +01:00
|
|
|
exit_horribly(modulename, "could not close tar member\n");
|
2000-07-21 13:43:26 +02:00
|
|
|
|
|
|
|
if (th->mode == 'w')
|
2001-03-22 05:01:46 +01:00
|
|
|
_tarAddFile(AH, th); /* This will close the temp file */
|
|
|
|
|
|
|
|
/*
|
|
|
|
* else Nothing to do for normal read since we don't dup() normal file
|
|
|
|
* handle, and we don't use temp files.
|
2000-07-21 13:43:26 +02:00
|
|
|
*/
|
|
|
|
|
2001-03-22 05:01:46 +01:00
|
|
|
if (th->targetFile)
|
2000-07-21 13:43:26 +02:00
|
|
|
free(th->targetFile);
|
|
|
|
|
|
|
|
th->nFH = NULL;
|
|
|
|
th->zFH = NULL;
|
|
|
|
}
|
|
|
|
|
|
|
|
#ifdef __NOT_USED__
|
2001-03-22 05:01:46 +01:00
|
|
|
static char *
|
2002-08-20 19:54:45 +02:00
|
|
|
tarGets(char *buf, size_t len, TAR_MEMBER *th)
|
2000-07-21 13:43:26 +02:00
|
|
|
{
|
2001-03-22 05:01:46 +01:00
|
|
|
char *s;
|
2002-08-20 19:54:45 +02:00
|
|
|
size_t cnt = 0;
|
2001-03-22 05:01:46 +01:00
|
|
|
char c = ' ';
|
|
|
|
int eof = 0;
|
2000-07-21 13:43:26 +02:00
|
|
|
|
|
|
|
/* Can't read past logical EOF */
|
|
|
|
if (len > (th->fileLen - th->pos))
|
|
|
|
len = th->fileLen - th->pos;
|
|
|
|
|
|
|
|
while (cnt < len && c != '\n')
|
|
|
|
{
|
2001-03-22 05:01:46 +01:00
|
|
|
if (_tarReadRaw(th->AH, &c, 1, th, NULL) <= 0)
|
|
|
|
{
|
2000-07-21 13:43:26 +02:00
|
|
|
eof = 1;
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
buf[cnt++] = c;
|
|
|
|
}
|
|
|
|
|
|
|
|
if (eof && cnt == 0)
|
|
|
|
s = NULL;
|
|
|
|
else
|
|
|
|
{
|
|
|
|
buf[cnt++] = '\0';
|
|
|
|
s = buf;
|
|
|
|
}
|
|
|
|
|
|
|
|
if (s)
|
|
|
|
{
|
2001-03-22 05:01:46 +01:00
|
|
|
len = strlen(s);
|
2000-07-21 13:43:26 +02:00
|
|
|
th->pos += len;
|
|
|
|
}
|
|
|
|
|
|
|
|
return s;
|
|
|
|
}
|
|
|
|
#endif
|
|
|
|
|
2001-03-22 05:01:46 +01:00
|
|
|
/*
|
2000-07-21 13:43:26 +02:00
|
|
|
* Just read bytes from the archive. This is the low level read routine
|
|
|
|
* that is used for ALL reads on a tar file.
|
|
|
|
*/
|
2002-08-20 19:54:45 +02:00
|
|
|
static size_t
|
|
|
|
_tarReadRaw(ArchiveHandle *AH, void *buf, size_t len, TAR_MEMBER *th, FILE *fh)
|
2000-07-21 13:43:26 +02:00
|
|
|
{
|
2001-03-22 05:01:46 +01:00
|
|
|
lclContext *ctx = (lclContext *) AH->formatData;
|
2002-08-20 19:54:45 +02:00
|
|
|
size_t avail;
|
|
|
|
size_t used = 0;
|
|
|
|
size_t res = 0;
|
2000-07-21 13:43:26 +02:00
|
|
|
|
|
|
|
avail = AH->lookaheadLen - AH->lookaheadPos;
|
|
|
|
if (avail > 0)
|
|
|
|
{
|
|
|
|
/* We have some lookahead bytes to use */
|
2001-03-22 05:01:46 +01:00
|
|
|
if (avail >= len) /* Just use the lookahead buffer */
|
2000-07-21 13:43:26 +02:00
|
|
|
used = len;
|
|
|
|
else
|
|
|
|
used = avail;
|
|
|
|
|
|
|
|
/* Copy, and adjust buffer pos */
|
2007-08-06 03:38:15 +02:00
|
|
|
memcpy(buf, AH->lookahead + AH->lookaheadPos, used);
|
2000-07-21 13:43:26 +02:00
|
|
|
AH->lookaheadPos += used;
|
|
|
|
|
|
|
|
/* Adjust required length */
|
|
|
|
len -= used;
|
|
|
|
}
|
|
|
|
|
|
|
|
/* Read the file if len > 0 */
|
|
|
|
if (len > 0)
|
|
|
|
{
|
|
|
|
if (fh)
|
2001-03-22 05:01:46 +01:00
|
|
|
res = fread(&((char *) buf)[used], 1, len, fh);
|
2000-07-21 13:43:26 +02:00
|
|
|
else if (th)
|
|
|
|
{
|
|
|
|
if (th->zFH)
|
2001-03-22 05:01:46 +01:00
|
|
|
res = GZREAD(&((char *) buf)[used], 1, len, th->zFH);
|
2000-07-21 13:43:26 +02:00
|
|
|
else
|
2001-03-22 05:01:46 +01:00
|
|
|
res = fread(&((char *) buf)[used], 1, len, th->nFH);
|
|
|
|
}
|
2000-07-21 13:43:26 +02:00
|
|
|
else
|
2012-03-20 22:38:11 +01:00
|
|
|
exit_horribly(modulename, "internal error -- neither th nor fh specified in tarReadRaw()\n");
|
2000-07-21 13:43:26 +02:00
|
|
|
}
|
|
|
|
|
|
|
|
ctx->tarFHpos += res + used;
|
|
|
|
|
|
|
|
return (res + used);
|
|
|
|
}
|
2001-03-22 05:01:46 +01:00
|
|
|
|
2002-08-20 19:54:45 +02:00
|
|
|
static size_t
|
|
|
|
tarRead(void *buf, size_t len, TAR_MEMBER *th)
|
2000-07-21 13:43:26 +02:00
|
|
|
{
|
2002-08-20 19:54:45 +02:00
|
|
|
size_t res;
|
2000-07-21 13:43:26 +02:00
|
|
|
|
|
|
|
if (th->pos + len > th->fileLen)
|
|
|
|
len = th->fileLen - th->pos;
|
|
|
|
|
|
|
|
if (len <= 0)
|
|
|
|
return 0;
|
|
|
|
|
|
|
|
res = _tarReadRaw(th->AH, buf, len, th, NULL);
|
|
|
|
|
|
|
|
th->pos += res;
|
|
|
|
|
|
|
|
return res;
|
|
|
|
}
|
|
|
|
|
2002-08-20 19:54:45 +02:00
|
|
|
static size_t
|
|
|
|
tarWrite(const void *buf, size_t len, TAR_MEMBER *th)
|
2000-07-21 13:43:26 +02:00
|
|
|
{
|
2002-08-20 19:54:45 +02:00
|
|
|
size_t res;
|
2000-07-21 13:43:26 +02:00
|
|
|
|
2010-10-29 21:51:52 +02:00
|
|
|
if (th->zFH != NULL)
|
2011-09-11 20:54:32 +02:00
|
|
|
res = GZWRITE(buf, 1, len, th->zFH);
|
2000-07-21 13:43:26 +02:00
|
|
|
else
|
|
|
|
res = fwrite(buf, 1, len, th->nFH);
|
|
|
|
|
2001-01-12 05:32:07 +01:00
|
|
|
if (res != len)
|
2012-03-20 22:38:11 +01:00
|
|
|
exit_horribly(modulename,
|
2012-06-10 21:20:04 +02:00
|
|
|
"could not write to output file: %s\n", strerror(errno));
|
2001-01-12 05:32:07 +01:00
|
|
|
|
2000-07-21 13:43:26 +02:00
|
|
|
th->pos += res;
|
|
|
|
return res;
|
|
|
|
}
|
|
|
|
|
2002-08-20 19:54:45 +02:00
|
|
|
static size_t
|
|
|
|
_WriteData(ArchiveHandle *AH, const void *data, size_t dLen)
|
2000-07-21 13:43:26 +02:00
|
|
|
{
|
2001-03-22 05:01:46 +01:00
|
|
|
lclTocEntry *tctx = (lclTocEntry *) AH->currToc->formatData;
|
2000-07-21 13:43:26 +02:00
|
|
|
|
2011-09-11 20:54:32 +02:00
|
|
|
dLen = tarWrite(data, dLen, tctx->TH);
|
2000-07-21 13:43:26 +02:00
|
|
|
|
2001-03-22 05:01:46 +01:00
|
|
|
return dLen;
|
2000-07-21 13:43:26 +02:00
|
|
|
}
|
|
|
|
|
2001-03-22 05:01:46 +01:00
|
|
|
static void
|
|
|
|
_EndData(ArchiveHandle *AH, TocEntry *te)
|
2000-07-21 13:43:26 +02:00
|
|
|
{
|
2001-03-22 05:01:46 +01:00
|
|
|
lclTocEntry *tctx = (lclTocEntry *) te->formatData;
|
2000-07-21 13:43:26 +02:00
|
|
|
|
2001-03-22 05:01:46 +01:00
|
|
|
/* Close the file */
|
|
|
|
tarClose(AH, tctx->TH);
|
|
|
|
tctx->TH = NULL;
|
2000-07-21 13:43:26 +02:00
|
|
|
}
|
|
|
|
|
2001-03-22 05:01:46 +01:00
|
|
|
/*
|
|
|
|
* Print data for a given file
|
2000-07-21 13:43:26 +02:00
|
|
|
*/
|
2001-03-22 05:01:46 +01:00
|
|
|
static void
|
|
|
|
_PrintFileData(ArchiveHandle *AH, char *filename, RestoreOptions *ropt)
|
2000-07-21 13:43:26 +02:00
|
|
|
{
|
2001-03-22 05:01:46 +01:00
|
|
|
lclContext *ctx = (lclContext *) AH->formatData;
|
|
|
|
char buf[4096];
|
2002-08-20 19:54:45 +02:00
|
|
|
size_t cnt;
|
2001-03-22 05:01:46 +01:00
|
|
|
TAR_MEMBER *th;
|
2000-07-21 13:43:26 +02:00
|
|
|
|
2001-03-22 05:01:46 +01:00
|
|
|
if (!filename)
|
2000-07-21 13:43:26 +02:00
|
|
|
return;
|
|
|
|
|
|
|
|
th = tarOpen(AH, filename, 'r');
|
|
|
|
ctx->FH = th;
|
|
|
|
|
2001-03-22 05:01:46 +01:00
|
|
|
while ((cnt = tarRead(buf, 4095, th)) > 0)
|
|
|
|
{
|
2000-07-21 13:43:26 +02:00
|
|
|
buf[cnt] = '\0';
|
|
|
|
ahwrite(buf, 1, cnt, AH);
|
2001-03-22 05:01:46 +01:00
|
|
|
}
|
2000-07-21 13:43:26 +02:00
|
|
|
|
2001-03-22 05:01:46 +01:00
|
|
|
tarClose(AH, th);
|
2000-07-21 13:43:26 +02:00
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
/*
|
|
|
|
* Print data for a given TOC entry
|
|
|
|
*/
|
2001-03-22 05:01:46 +01:00
|
|
|
static void
|
|
|
|
_PrintTocData(ArchiveHandle *AH, TocEntry *te, RestoreOptions *ropt)
|
2000-07-21 13:43:26 +02:00
|
|
|
{
|
2001-03-22 05:01:46 +01:00
|
|
|
lclContext *ctx = (lclContext *) AH->formatData;
|
|
|
|
lclTocEntry *tctx = (lclTocEntry *) te->formatData;
|
|
|
|
char *tmpCopy;
|
2002-08-20 19:54:45 +02:00
|
|
|
size_t i,
|
2001-03-22 05:01:46 +01:00
|
|
|
pos1,
|
|
|
|
pos2;
|
|
|
|
|
|
|
|
if (!tctx->filename)
|
2000-07-21 13:43:26 +02:00
|
|
|
return;
|
|
|
|
|
|
|
|
if (ctx->isSpecialScript)
|
|
|
|
{
|
|
|
|
if (!te->copyStmt)
|
|
|
|
return;
|
|
|
|
|
|
|
|
/* Abort the default COPY */
|
|
|
|
ahprintf(AH, "\\.\n");
|
|
|
|
|
|
|
|
/* Get a copy of the COPY statement and clean it up */
|
2011-11-25 21:40:51 +01:00
|
|
|
tmpCopy = pg_strdup(te->copyStmt);
|
2001-03-22 05:01:46 +01:00
|
|
|
for (i = 0; i < strlen(tmpCopy); i++)
|
2004-05-07 02:24:59 +02:00
|
|
|
tmpCopy[i] = pg_tolower((unsigned char) tmpCopy[i]);
|
2000-07-21 13:43:26 +02:00
|
|
|
|
|
|
|
/*
|
2005-10-15 04:49:52 +02:00
|
|
|
* This is very nasty; we don't know if the archive used WITH OIDS, so
|
|
|
|
* we search the string for it in a paranoid sort of way.
|
2000-07-21 13:43:26 +02:00
|
|
|
*/
|
|
|
|
if (strncmp(tmpCopy, "copy ", 5) != 0)
|
2012-03-20 22:38:11 +01:00
|
|
|
exit_horribly(modulename,
|
|
|
|
"invalid COPY statement -- could not find \"copy\" in string \"%s\"\n", tmpCopy);
|
2000-07-21 13:43:26 +02:00
|
|
|
|
|
|
|
pos1 = 5;
|
|
|
|
for (pos1 = 5; pos1 < strlen(tmpCopy); pos1++)
|
|
|
|
if (tmpCopy[pos1] != ' ')
|
2001-03-22 05:01:46 +01:00
|
|
|
break;
|
2000-07-21 13:43:26 +02:00
|
|
|
|
|
|
|
if (tmpCopy[pos1] == '"')
|
|
|
|
pos1 += 2;
|
2001-03-22 05:01:46 +01:00
|
|
|
|
2002-07-04 17:35:07 +02:00
|
|
|
pos1 += strlen(te->tag);
|
2000-07-21 13:43:26 +02:00
|
|
|
|
2001-03-22 05:01:46 +01:00
|
|
|
for (pos2 = pos1; pos2 < strlen(tmpCopy); pos2++)
|
2000-07-21 13:43:26 +02:00
|
|
|
if (strncmp(&tmpCopy[pos2], "from stdin", 10) == 0)
|
|
|
|
break;
|
|
|
|
|
|
|
|
if (pos2 >= strlen(tmpCopy))
|
2012-03-20 22:38:11 +01:00
|
|
|
exit_horribly(modulename,
|
|
|
|
"invalid COPY statement -- could not find \"from stdin\" in string \"%s\" starting at position %lu\n",
|
|
|
|
tmpCopy, (unsigned long) pos1);
|
2000-07-21 13:43:26 +02:00
|
|
|
|
2001-03-22 05:01:46 +01:00
|
|
|
ahwrite(tmpCopy, 1, pos2, AH); /* 'copy "table" [with oids]' */
|
|
|
|
ahprintf(AH, " from '$$PATH$$/%s' %s", tctx->filename, &tmpCopy[pos2 + 10]);
|
2000-07-21 13:43:26 +02:00
|
|
|
|
|
|
|
return;
|
|
|
|
}
|
|
|
|
|
|
|
|
if (strcmp(te->desc, "BLOBS") == 0)
|
|
|
|
_LoadBlobs(AH, ropt);
|
|
|
|
else
|
|
|
|
_PrintFileData(AH, tctx->filename, ropt);
|
|
|
|
}
|
|
|
|
|
2001-03-22 05:01:46 +01:00
|
|
|
static void
|
|
|
|
_LoadBlobs(ArchiveHandle *AH, RestoreOptions *ropt)
|
2000-07-21 13:43:26 +02:00
|
|
|
{
|
2001-07-03 22:21:50 +02:00
|
|
|
Oid oid;
|
2001-03-22 05:01:46 +01:00
|
|
|
lclContext *ctx = (lclContext *) AH->formatData;
|
|
|
|
TAR_MEMBER *th;
|
2002-08-20 19:54:45 +02:00
|
|
|
size_t cnt;
|
2006-11-01 16:59:26 +01:00
|
|
|
bool foundBlob = false;
|
2001-03-22 05:01:46 +01:00
|
|
|
char buf[4096];
|
2000-07-21 13:43:26 +02:00
|
|
|
|
2000-10-31 15:20:30 +01:00
|
|
|
StartRestoreBlobs(AH);
|
|
|
|
|
2001-10-28 07:26:15 +01:00
|
|
|
th = tarOpen(AH, NULL, 'r'); /* Open next file */
|
2000-07-21 13:43:26 +02:00
|
|
|
while (th != NULL)
|
|
|
|
{
|
|
|
|
ctx->FH = th;
|
|
|
|
|
2002-05-29 03:38:56 +02:00
|
|
|
if (strncmp(th->targetFile, "blob_", 5) == 0)
|
2000-07-21 13:43:26 +02:00
|
|
|
{
|
2002-05-29 03:38:56 +02:00
|
|
|
oid = atooid(&th->targetFile[5]);
|
|
|
|
if (oid != 0)
|
|
|
|
{
|
2012-06-18 22:37:49 +02:00
|
|
|
ahlog(AH, 1, "restoring large object with OID %u\n", oid);
|
2000-07-21 13:43:26 +02:00
|
|
|
|
2009-07-21 23:46:10 +02:00
|
|
|
StartRestoreBlob(AH, oid, ropt->dropSchema);
|
2000-07-21 13:43:26 +02:00
|
|
|
|
2002-05-29 03:38:56 +02:00
|
|
|
while ((cnt = tarRead(buf, 4095, th)) > 0)
|
|
|
|
{
|
|
|
|
buf[cnt] = '\0';
|
|
|
|
ahwrite(buf, 1, cnt, AH);
|
|
|
|
}
|
|
|
|
EndRestoreBlob(AH, oid);
|
2006-11-01 16:59:26 +01:00
|
|
|
foundBlob = true;
|
2000-07-21 13:43:26 +02:00
|
|
|
}
|
2006-11-01 16:59:26 +01:00
|
|
|
tarClose(AH, th);
|
|
|
|
}
|
|
|
|
else
|
|
|
|
{
|
|
|
|
tarClose(AH, th);
|
2007-11-15 22:14:46 +01:00
|
|
|
|
2006-11-01 16:59:26 +01:00
|
|
|
/*
|
2007-11-15 22:14:46 +01:00
|
|
|
* Once we have found the first blob, stop at the first non-blob
|
|
|
|
* entry (which will be 'blobs.toc'). This coding would eat all
|
|
|
|
* the rest of the archive if there are no blobs ... but this
|
|
|
|
* function shouldn't be called at all in that case.
|
2006-11-01 16:59:26 +01:00
|
|
|
*/
|
|
|
|
if (foundBlob)
|
|
|
|
break;
|
2000-07-21 13:43:26 +02:00
|
|
|
}
|
|
|
|
|
|
|
|
th = tarOpen(AH, NULL, 'r');
|
|
|
|
}
|
2000-10-31 15:20:30 +01:00
|
|
|
EndRestoreBlobs(AH);
|
2000-07-21 13:43:26 +02:00
|
|
|
}
|
|
|
|
|
|
|
|
|
2001-03-22 05:01:46 +01:00
|
|
|
static int
|
|
|
|
_WriteByte(ArchiveHandle *AH, const int i)
|
2000-07-21 13:43:26 +02:00
|
|
|
{
|
2001-03-22 05:01:46 +01:00
|
|
|
lclContext *ctx = (lclContext *) AH->formatData;
|
|
|
|
int res;
|
|
|
|
char b = i; /* Avoid endian problems */
|
2000-07-21 13:43:26 +02:00
|
|
|
|
2001-03-22 05:01:46 +01:00
|
|
|
res = tarWrite(&b, 1, ctx->FH);
|
|
|
|
if (res != EOF)
|
2000-07-21 13:43:26 +02:00
|
|
|
ctx->filePos += res;
|
2001-03-22 05:01:46 +01:00
|
|
|
return res;
|
2000-07-21 13:43:26 +02:00
|
|
|
}
|
|
|
|
|
2001-03-22 05:01:46 +01:00
|
|
|
static int
|
|
|
|
_ReadByte(ArchiveHandle *AH)
|
2000-07-21 13:43:26 +02:00
|
|
|
{
|
2001-03-22 05:01:46 +01:00
|
|
|
lclContext *ctx = (lclContext *) AH->formatData;
|
2007-08-06 03:38:15 +02:00
|
|
|
size_t res;
|
|
|
|
unsigned char c;
|
2000-07-21 13:43:26 +02:00
|
|
|
|
2001-03-22 05:01:46 +01:00
|
|
|
res = tarRead(&c, 1, ctx->FH);
|
2007-08-06 03:38:15 +02:00
|
|
|
if (res != 1)
|
2012-03-20 22:38:11 +01:00
|
|
|
exit_horribly(modulename, "unexpected end of file\n");
|
2007-08-06 03:38:15 +02:00
|
|
|
ctx->filePos += 1;
|
2001-03-22 05:01:46 +01:00
|
|
|
return c;
|
2000-07-21 13:43:26 +02:00
|
|
|
}
|
|
|
|
|
2002-08-20 19:54:45 +02:00
|
|
|
static size_t
|
|
|
|
_WriteBuf(ArchiveHandle *AH, const void *buf, size_t len)
|
2000-07-21 13:43:26 +02:00
|
|
|
{
|
2001-03-22 05:01:46 +01:00
|
|
|
lclContext *ctx = (lclContext *) AH->formatData;
|
2002-08-20 19:54:45 +02:00
|
|
|
size_t res;
|
2000-07-21 13:43:26 +02:00
|
|
|
|
2011-09-11 20:54:32 +02:00
|
|
|
res = tarWrite(buf, len, ctx->FH);
|
2001-03-22 05:01:46 +01:00
|
|
|
ctx->filePos += res;
|
|
|
|
return res;
|
2000-07-21 13:43:26 +02:00
|
|
|
}
|
|
|
|
|
2002-08-20 19:54:45 +02:00
|
|
|
static size_t
|
|
|
|
_ReadBuf(ArchiveHandle *AH, void *buf, size_t len)
|
2000-07-21 13:43:26 +02:00
|
|
|
{
|
2001-03-22 05:01:46 +01:00
|
|
|
lclContext *ctx = (lclContext *) AH->formatData;
|
2002-08-20 19:54:45 +02:00
|
|
|
size_t res;
|
2000-07-21 13:43:26 +02:00
|
|
|
|
2001-03-22 05:01:46 +01:00
|
|
|
res = tarRead(buf, len, ctx->FH);
|
|
|
|
ctx->filePos += res;
|
|
|
|
return res;
|
2000-07-21 13:43:26 +02:00
|
|
|
}
|
|
|
|
|
2001-03-22 05:01:46 +01:00
|
|
|
static void
|
|
|
|
_CloseArchive(ArchiveHandle *AH)
|
2000-07-21 13:43:26 +02:00
|
|
|
{
|
2001-03-22 05:01:46 +01:00
|
|
|
lclContext *ctx = (lclContext *) AH->formatData;
|
|
|
|
TAR_MEMBER *th;
|
|
|
|
RestoreOptions *ropt;
|
Rewrite --section option to decouple it from --schema-only/--data-only.
The initial implementation of pg_dump's --section option supposed that the
existing --schema-only and --data-only options could be made equivalent to
--section settings. This is wrong, though, due to dubious but long since
set-in-stone decisions about where to dump SEQUENCE SET items, as seen in
bug report from Martin Pitt. (And I'm not totally convinced there weren't
other bugs, either.) Undo that coupling and instead drive --section
filtering off current-section state tracked as we scan through the TOC
list to call _tocEntryRequired().
To make sure those decisions don't shift around and hopefully save a few
cycles, run _tocEntryRequired() only once per TOC entry and save the result
in a new TOC field. This required minor rejiggering of ACL handling but
also allows a far cleaner implementation of inhibit_data_for_failed_table.
Also, to ensure that pg_dump and pg_restore have the same behavior with
respect to the --section switches, add _tocEntryRequired() filtering to
WriteToc() and WriteDataChunks(), rather than trying to implement section
filtering in an entirely orthogonal way in dumpDumpableObject(). This
required adjusting the handling of the special ENCODING and STDSTRINGS
items, but they were pretty weird before anyway.
Minor other code review for the patch, too.
2012-05-30 05:22:14 +02:00
|
|
|
RestoreOptions *savRopt;
|
2001-03-22 05:01:46 +01:00
|
|
|
int savVerbose,
|
|
|
|
i;
|
2000-07-21 13:43:26 +02:00
|
|
|
|
2001-03-22 05:01:46 +01:00
|
|
|
if (AH->mode == archModeWrite)
|
|
|
|
{
|
2000-07-21 13:43:26 +02:00
|
|
|
/*
|
|
|
|
* Write the Header & TOC to the archive FIRST
|
|
|
|
*/
|
|
|
|
th = tarOpen(AH, "toc.dat", 'w');
|
|
|
|
ctx->FH = th;
|
|
|
|
WriteHead(AH);
|
|
|
|
WriteToc(AH);
|
2001-03-22 05:01:46 +01:00
|
|
|
tarClose(AH, th); /* Not needed any more */
|
2000-07-21 13:43:26 +02:00
|
|
|
|
|
|
|
/*
|
|
|
|
* Now send the data (tables & blobs)
|
|
|
|
*/
|
|
|
|
WriteDataChunks(AH);
|
|
|
|
|
2001-03-22 05:01:46 +01:00
|
|
|
/*
|
2005-10-15 04:49:52 +02:00
|
|
|
* Now this format wants to append a script which does a full restore
|
|
|
|
* if the files have been extracted.
|
2000-07-21 13:43:26 +02:00
|
|
|
*/
|
|
|
|
th = tarOpen(AH, "restore.sql", 'w');
|
|
|
|
tarPrintf(AH, th, "create temporary table pgdump_restore_path(p text);\n");
|
2001-03-22 05:01:46 +01:00
|
|
|
tarPrintf(AH, th, "--\n"
|
|
|
|
"-- NOTE:\n"
|
|
|
|
"--\n"
|
2005-10-15 04:49:52 +02:00
|
|
|
"-- File paths need to be edited. Search for $$PATH$$ and\n"
|
|
|
|
"-- replace it with the path to the directory containing\n"
|
2001-03-22 05:01:46 +01:00
|
|
|
"-- the extracted data files.\n"
|
|
|
|
"--\n"
|
|
|
|
"-- Edit the following to match the path where the\n"
|
|
|
|
"-- tar archive has been extracted.\n"
|
|
|
|
"--\n");
|
2000-07-21 13:43:26 +02:00
|
|
|
tarPrintf(AH, th, "insert into pgdump_restore_path values('/tmp');\n\n");
|
|
|
|
|
|
|
|
AH->CustomOutPtr = _scriptOut;
|
2001-03-22 05:01:46 +01:00
|
|
|
|
2000-07-21 13:43:26 +02:00
|
|
|
ctx->isSpecialScript = 1;
|
|
|
|
ctx->scriptTH = th;
|
|
|
|
|
|
|
|
ropt = NewRestoreOptions();
|
Rewrite --section option to decouple it from --schema-only/--data-only.
The initial implementation of pg_dump's --section option supposed that the
existing --schema-only and --data-only options could be made equivalent to
--section settings. This is wrong, though, due to dubious but long since
set-in-stone decisions about where to dump SEQUENCE SET items, as seen in
bug report from Martin Pitt. (And I'm not totally convinced there weren't
other bugs, either.) Undo that coupling and instead drive --section
filtering off current-section state tracked as we scan through the TOC
list to call _tocEntryRequired().
To make sure those decisions don't shift around and hopefully save a few
cycles, run _tocEntryRequired() only once per TOC entry and save the result
in a new TOC field. This required minor rejiggering of ACL handling but
also allows a far cleaner implementation of inhibit_data_for_failed_table.
Also, to ensure that pg_dump and pg_restore have the same behavior with
respect to the --section switches, add _tocEntryRequired() filtering to
WriteToc() and WriteDataChunks(), rather than trying to implement section
filtering in an entirely orthogonal way in dumpDumpableObject(). This
required adjusting the handling of the special ENCODING and STDSTRINGS
items, but they were pretty weird before anyway.
Minor other code review for the patch, too.
2012-05-30 05:22:14 +02:00
|
|
|
memcpy(ropt, AH->ropt, sizeof(RestoreOptions));
|
2012-06-12 03:55:48 +02:00
|
|
|
ropt->filename = NULL;
|
2000-07-21 13:43:26 +02:00
|
|
|
ropt->dropSchema = 1;
|
|
|
|
ropt->compression = 0;
|
2002-05-11 00:36:27 +02:00
|
|
|
ropt->superuser = NULL;
|
2001-04-25 09:03:20 +02:00
|
|
|
ropt->suppressDumpWarnings = true;
|
2000-07-21 13:43:26 +02:00
|
|
|
|
Rewrite --section option to decouple it from --schema-only/--data-only.
The initial implementation of pg_dump's --section option supposed that the
existing --schema-only and --data-only options could be made equivalent to
--section settings. This is wrong, though, due to dubious but long since
set-in-stone decisions about where to dump SEQUENCE SET items, as seen in
bug report from Martin Pitt. (And I'm not totally convinced there weren't
other bugs, either.) Undo that coupling and instead drive --section
filtering off current-section state tracked as we scan through the TOC
list to call _tocEntryRequired().
To make sure those decisions don't shift around and hopefully save a few
cycles, run _tocEntryRequired() only once per TOC entry and save the result
in a new TOC field. This required minor rejiggering of ACL handling but
also allows a far cleaner implementation of inhibit_data_for_failed_table.
Also, to ensure that pg_dump and pg_restore have the same behavior with
respect to the --section switches, add _tocEntryRequired() filtering to
WriteToc() and WriteDataChunks(), rather than trying to implement section
filtering in an entirely orthogonal way in dumpDumpableObject(). This
required adjusting the handling of the special ENCODING and STDSTRINGS
items, but they were pretty weird before anyway.
Minor other code review for the patch, too.
2012-05-30 05:22:14 +02:00
|
|
|
savRopt = AH->ropt;
|
|
|
|
AH->ropt = ropt;
|
|
|
|
|
2000-07-21 13:43:26 +02:00
|
|
|
savVerbose = AH->public.verbose;
|
|
|
|
AH->public.verbose = 0;
|
|
|
|
|
Rewrite --section option to decouple it from --schema-only/--data-only.
The initial implementation of pg_dump's --section option supposed that the
existing --schema-only and --data-only options could be made equivalent to
--section settings. This is wrong, though, due to dubious but long since
set-in-stone decisions about where to dump SEQUENCE SET items, as seen in
bug report from Martin Pitt. (And I'm not totally convinced there weren't
other bugs, either.) Undo that coupling and instead drive --section
filtering off current-section state tracked as we scan through the TOC
list to call _tocEntryRequired().
To make sure those decisions don't shift around and hopefully save a few
cycles, run _tocEntryRequired() only once per TOC entry and save the result
in a new TOC field. This required minor rejiggering of ACL handling but
also allows a far cleaner implementation of inhibit_data_for_failed_table.
Also, to ensure that pg_dump and pg_restore have the same behavior with
respect to the --section switches, add _tocEntryRequired() filtering to
WriteToc() and WriteDataChunks(), rather than trying to implement section
filtering in an entirely orthogonal way in dumpDumpableObject(). This
required adjusting the handling of the special ENCODING and STDSTRINGS
items, but they were pretty weird before anyway.
Minor other code review for the patch, too.
2012-05-30 05:22:14 +02:00
|
|
|
RestoreArchive((Archive *) AH);
|
2000-07-21 13:43:26 +02:00
|
|
|
|
Rewrite --section option to decouple it from --schema-only/--data-only.
The initial implementation of pg_dump's --section option supposed that the
existing --schema-only and --data-only options could be made equivalent to
--section settings. This is wrong, though, due to dubious but long since
set-in-stone decisions about where to dump SEQUENCE SET items, as seen in
bug report from Martin Pitt. (And I'm not totally convinced there weren't
other bugs, either.) Undo that coupling and instead drive --section
filtering off current-section state tracked as we scan through the TOC
list to call _tocEntryRequired().
To make sure those decisions don't shift around and hopefully save a few
cycles, run _tocEntryRequired() only once per TOC entry and save the result
in a new TOC field. This required minor rejiggering of ACL handling but
also allows a far cleaner implementation of inhibit_data_for_failed_table.
Also, to ensure that pg_dump and pg_restore have the same behavior with
respect to the --section switches, add _tocEntryRequired() filtering to
WriteToc() and WriteDataChunks(), rather than trying to implement section
filtering in an entirely orthogonal way in dumpDumpableObject(). This
required adjusting the handling of the special ENCODING and STDSTRINGS
items, but they were pretty weird before anyway.
Minor other code review for the patch, too.
2012-05-30 05:22:14 +02:00
|
|
|
AH->ropt = savRopt;
|
2000-07-21 13:43:26 +02:00
|
|
|
AH->public.verbose = savVerbose;
|
|
|
|
|
|
|
|
tarClose(AH, th);
|
2000-10-25 12:21:38 +02:00
|
|
|
|
|
|
|
/* Add a block of NULLs since it's de-rigeur. */
|
2001-03-22 05:01:46 +01:00
|
|
|
for (i = 0; i < 512; i++)
|
2000-10-25 12:21:38 +02:00
|
|
|
{
|
2001-01-12 05:32:07 +01:00
|
|
|
if (fputc(0, ctx->tarFH) == EOF)
|
2012-03-20 22:38:11 +01:00
|
|
|
exit_horribly(modulename,
|
2005-10-15 04:49:52 +02:00
|
|
|
"could not write null block at end of tar archive\n");
|
2000-10-25 12:21:38 +02:00
|
|
|
}
|
2001-03-22 05:01:46 +01:00
|
|
|
}
|
2000-07-21 13:43:26 +02:00
|
|
|
|
2001-03-22 05:01:46 +01:00
|
|
|
AH->FH = NULL;
|
2000-07-21 13:43:26 +02:00
|
|
|
}
|
|
|
|
|
2002-08-20 19:54:45 +02:00
|
|
|
static size_t
|
|
|
|
_scriptOut(ArchiveHandle *AH, const void *buf, size_t len)
|
2000-07-21 13:43:26 +02:00
|
|
|
{
|
2001-03-22 05:01:46 +01:00
|
|
|
lclContext *ctx = (lclContext *) AH->formatData;
|
|
|
|
|
2000-07-21 13:43:26 +02:00
|
|
|
return tarWrite(buf, len, ctx->scriptTH);
|
|
|
|
}
|
|
|
|
|
|
|
|
/*
|
|
|
|
* BLOB support
|
|
|
|
*/
|
|
|
|
|
|
|
|
/*
|
2001-03-22 05:01:46 +01:00
|
|
|
* Called by the archiver when starting to save all BLOB DATA (not schema).
|
2000-07-21 13:43:26 +02:00
|
|
|
* This routine should save whatever format-specific information is needed
|
2001-03-22 05:01:46 +01:00
|
|
|
* to read the BLOBs back into memory.
|
2000-07-21 13:43:26 +02:00
|
|
|
*
|
|
|
|
* It is called just prior to the dumper's DataDumper routine.
|
|
|
|
*
|
|
|
|
* Optional, but strongly recommended.
|
|
|
|
*
|
|
|
|
*/
|
2001-03-22 05:01:46 +01:00
|
|
|
static void
|
|
|
|
_StartBlobs(ArchiveHandle *AH, TocEntry *te)
|
2000-07-21 13:43:26 +02:00
|
|
|
{
|
2001-03-22 05:01:46 +01:00
|
|
|
lclContext *ctx = (lclContext *) AH->formatData;
|
|
|
|
char fname[K_STD_BUF_SIZE];
|
2000-07-21 13:43:26 +02:00
|
|
|
|
|
|
|
sprintf(fname, "blobs.toc");
|
|
|
|
ctx->blobToc = tarOpen(AH, fname, 'w');
|
|
|
|
}
|
|
|
|
|
|
|
|
/*
|
|
|
|
* Called by the archiver when the dumper calls StartBlob.
|
|
|
|
*
|
|
|
|
* Mandatory.
|
|
|
|
*
|
|
|
|
* Must save the passed OID for retrieval at restore-time.
|
|
|
|
*/
|
2001-03-22 05:01:46 +01:00
|
|
|
static void
|
2001-04-01 07:42:51 +02:00
|
|
|
_StartBlob(ArchiveHandle *AH, TocEntry *te, Oid oid)
|
2000-07-21 13:43:26 +02:00
|
|
|
{
|
2001-03-22 05:01:46 +01:00
|
|
|
lclContext *ctx = (lclContext *) AH->formatData;
|
|
|
|
lclTocEntry *tctx = (lclTocEntry *) te->formatData;
|
|
|
|
char fname[255];
|
|
|
|
char *sfx;
|
2000-07-21 13:43:26 +02:00
|
|
|
|
2001-03-22 05:01:46 +01:00
|
|
|
if (oid == 0)
|
2012-03-20 22:38:11 +01:00
|
|
|
exit_horribly(modulename, "invalid OID for large object (%u)\n", oid);
|
2000-07-21 13:43:26 +02:00
|
|
|
|
|
|
|
if (AH->compression != 0)
|
|
|
|
sfx = ".gz";
|
|
|
|
else
|
|
|
|
sfx = "";
|
|
|
|
|
2002-05-29 03:38:56 +02:00
|
|
|
sprintf(fname, "blob_%u.dat%s", oid, sfx);
|
2000-07-21 13:43:26 +02:00
|
|
|
|
2002-05-29 03:38:56 +02:00
|
|
|
tarPrintf(AH, ctx->blobToc, "%u %s\n", oid, fname);
|
2000-07-21 13:43:26 +02:00
|
|
|
|
|
|
|
tctx->TH = tarOpen(AH, fname, 'w');
|
|
|
|
}
|
|
|
|
|
|
|
|
/*
|
|
|
|
* Called by the archiver when the dumper calls EndBlob.
|
|
|
|
*
|
|
|
|
* Optional.
|
|
|
|
*
|
|
|
|
*/
|
2001-03-22 05:01:46 +01:00
|
|
|
static void
|
2001-04-01 07:42:51 +02:00
|
|
|
_EndBlob(ArchiveHandle *AH, TocEntry *te, Oid oid)
|
2000-07-21 13:43:26 +02:00
|
|
|
{
|
2001-03-22 05:01:46 +01:00
|
|
|
lclTocEntry *tctx = (lclTocEntry *) te->formatData;
|
2000-07-21 13:43:26 +02:00
|
|
|
|
|
|
|
tarClose(AH, tctx->TH);
|
|
|
|
}
|
|
|
|
|
|
|
|
/*
|
2001-03-22 05:01:46 +01:00
|
|
|
* Called by the archiver when finishing saving all BLOB DATA.
|
2000-07-21 13:43:26 +02:00
|
|
|
*
|
|
|
|
* Optional.
|
|
|
|
*
|
|
|
|
*/
|
2001-03-22 05:01:46 +01:00
|
|
|
static void
|
|
|
|
_EndBlobs(ArchiveHandle *AH, TocEntry *te)
|
2000-07-21 13:43:26 +02:00
|
|
|
{
|
2001-03-22 05:01:46 +01:00
|
|
|
lclContext *ctx = (lclContext *) AH->formatData;
|
|
|
|
|
2000-07-21 13:43:26 +02:00
|
|
|
/* Write out a fake zero OID to mark end-of-blobs. */
|
2001-03-22 05:01:46 +01:00
|
|
|
/* WriteInt(AH, 0); */
|
2000-07-21 13:43:26 +02:00
|
|
|
|
|
|
|
tarClose(AH, ctx->blobToc);
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
/*------------
|
|
|
|
* TAR Support
|
|
|
|
*------------
|
|
|
|
*/
|
|
|
|
|
2001-03-22 05:01:46 +01:00
|
|
|
static int
|
|
|
|
tarPrintf(ArchiveHandle *AH, TAR_MEMBER *th, const char *fmt,...)
|
2000-07-21 13:43:26 +02:00
|
|
|
{
|
2001-03-22 05:01:46 +01:00
|
|
|
char *p = NULL;
|
2000-07-21 13:43:26 +02:00
|
|
|
va_list ap;
|
2002-08-20 19:54:45 +02:00
|
|
|
size_t bSize = strlen(fmt) + 256; /* Should be enough */
|
2000-07-21 13:43:26 +02:00
|
|
|
int cnt = -1;
|
|
|
|
|
2001-03-22 05:01:46 +01:00
|
|
|
/*
|
2005-10-15 04:49:52 +02:00
|
|
|
* This is paranoid: deal with the possibility that vsnprintf is willing
|
|
|
|
* to ignore trailing null
|
2001-03-22 05:01:46 +01:00
|
|
|
*/
|
|
|
|
|
|
|
|
/*
|
2005-10-15 04:49:52 +02:00
|
|
|
* or returns > 0 even if string does not fit. It may be the case that it
|
|
|
|
* returns cnt = bufsize
|
2001-03-22 05:01:46 +01:00
|
|
|
*/
|
|
|
|
while (cnt < 0 || cnt >= (bSize - 1))
|
2001-02-23 23:52:32 +01:00
|
|
|
{
|
2001-03-22 05:01:46 +01:00
|
|
|
if (p != NULL)
|
|
|
|
free(p);
|
2000-07-21 13:43:26 +02:00
|
|
|
bSize *= 2;
|
2011-11-25 21:40:51 +01:00
|
|
|
p = (char *) pg_malloc(bSize);
|
2001-02-23 23:52:32 +01:00
|
|
|
va_start(ap, fmt);
|
2000-07-21 13:43:26 +02:00
|
|
|
cnt = vsnprintf(p, bSize, fmt, ap);
|
2001-02-23 23:52:32 +01:00
|
|
|
va_end(ap);
|
2000-07-21 13:43:26 +02:00
|
|
|
}
|
|
|
|
cnt = tarWrite(p, cnt, th);
|
|
|
|
free(p);
|
|
|
|
return cnt;
|
|
|
|
}
|
|
|
|
|
2001-03-22 05:01:46 +01:00
|
|
|
static int
|
|
|
|
_tarChecksum(char *header)
|
2000-07-21 13:43:26 +02:00
|
|
|
{
|
2001-03-22 05:01:46 +01:00
|
|
|
int i,
|
|
|
|
sum;
|
|
|
|
|
2000-07-21 13:43:26 +02:00
|
|
|
sum = 0;
|
2001-03-22 05:01:46 +01:00
|
|
|
for (i = 0; i < 512; i++)
|
2000-07-21 13:43:26 +02:00
|
|
|
if (i < 148 || i >= 156)
|
|
|
|
sum += 0xFF & header[i];
|
2001-03-22 05:01:46 +01:00
|
|
|
return sum + 256; /* Assume 8 blanks in checksum field */
|
2000-07-21 13:43:26 +02:00
|
|
|
}
|
|
|
|
|
2003-02-01 20:29:16 +01:00
|
|
|
bool
|
2001-03-22 05:01:46 +01:00
|
|
|
isValidTarHeader(char *header)
|
2000-07-21 13:43:26 +02:00
|
|
|
{
|
2001-03-22 05:01:46 +01:00
|
|
|
int sum;
|
|
|
|
int chk = _tarChecksum(header);
|
2000-07-21 13:43:26 +02:00
|
|
|
|
|
|
|
sscanf(&header[148], "%8o", &sum);
|
|
|
|
|
2003-02-01 20:29:16 +01:00
|
|
|
if (sum != chk)
|
|
|
|
return false;
|
|
|
|
|
|
|
|
/* POSIX format */
|
|
|
|
if (strncmp(&header[257], "ustar00", 7) == 0)
|
|
|
|
return true;
|
|
|
|
/* older format */
|
|
|
|
if (strncmp(&header[257], "ustar ", 7) == 0)
|
|
|
|
return true;
|
|
|
|
|
|
|
|
return false;
|
2000-07-21 13:43:26 +02:00
|
|
|
}
|
|
|
|
|
|
|
|
/* Given the member, write the TAR header & copy the file */
|
2001-03-22 05:01:46 +01:00
|
|
|
static void
|
|
|
|
_tarAddFile(ArchiveHandle *AH, TAR_MEMBER *th)
|
2000-07-21 13:43:26 +02:00
|
|
|
{
|
2001-03-22 05:01:46 +01:00
|
|
|
lclContext *ctx = (lclContext *) AH->formatData;
|
2001-10-28 07:26:15 +01:00
|
|
|
FILE *tmp = th->tmpFH; /* Grab it for convenience */
|
2000-07-21 13:43:26 +02:00
|
|
|
char buf[32768];
|
2002-08-20 19:54:45 +02:00
|
|
|
size_t cnt;
|
2007-02-19 16:05:06 +01:00
|
|
|
pgoff_t len = 0;
|
2002-08-20 19:54:45 +02:00
|
|
|
size_t res;
|
|
|
|
size_t i,
|
2001-03-22 05:01:46 +01:00
|
|
|
pad;
|
2000-07-21 13:43:26 +02:00
|
|
|
|
|
|
|
/*
|
|
|
|
* Find file len & go back to start.
|
|
|
|
*/
|
2002-08-20 19:54:45 +02:00
|
|
|
fseeko(tmp, 0, SEEK_END);
|
|
|
|
th->fileLen = ftello(tmp);
|
2007-08-29 18:31:36 +02:00
|
|
|
fseeko(tmp, 0, SEEK_SET);
|
2005-10-15 04:49:52 +02:00
|
|
|
|
2004-11-29 04:01:54 +01:00
|
|
|
/*
|
2007-08-29 18:31:36 +02:00
|
|
|
* Some compilers will throw a warning knowing this test can never be true
|
|
|
|
* because pgoff_t can't exceed the compared maximum on their platform.
|
2004-11-29 04:01:54 +01:00
|
|
|
*/
|
2002-09-06 23:58:36 +02:00
|
|
|
if (th->fileLen > MAX_TAR_MEMBER_FILELEN)
|
2012-03-20 22:38:11 +01:00
|
|
|
exit_horribly(modulename, "archive member too large for tar format\n");
|
2000-07-21 13:43:26 +02:00
|
|
|
|
|
|
|
_tarWriteHeader(th);
|
|
|
|
|
2007-08-29 18:31:36 +02:00
|
|
|
while ((cnt = fread(buf, 1, sizeof(buf), tmp)) > 0)
|
2000-07-21 13:43:26 +02:00
|
|
|
{
|
2007-08-29 18:31:36 +02:00
|
|
|
res = fwrite(buf, 1, cnt, th->tarFH);
|
2001-03-22 05:01:46 +01:00
|
|
|
if (res != cnt)
|
2012-03-20 22:38:11 +01:00
|
|
|
exit_horribly(modulename,
|
|
|
|
"could not write to output file: %s\n",
|
|
|
|
strerror(errno));
|
2001-01-12 05:32:07 +01:00
|
|
|
len += res;
|
2000-07-21 13:43:26 +02:00
|
|
|
}
|
|
|
|
|
2001-03-22 05:01:46 +01:00
|
|
|
if (fclose(tmp) != 0) /* This *should* delete it... */
|
2012-03-20 22:38:11 +01:00
|
|
|
exit_horribly(modulename, "could not close temporary file: %s\n",
|
|
|
|
strerror(errno));
|
2000-07-21 13:43:26 +02:00
|
|
|
|
|
|
|
if (len != th->fileLen)
|
2002-09-03 20:50:54 +02:00
|
|
|
{
|
2007-08-29 18:31:36 +02:00
|
|
|
char buf1[32],
|
|
|
|
buf2[32];
|
2002-09-04 22:31:48 +02:00
|
|
|
|
2003-03-20 04:34:57 +01:00
|
|
|
snprintf(buf1, sizeof(buf1), INT64_FORMAT, (int64) len);
|
2007-08-29 18:31:36 +02:00
|
|
|
snprintf(buf2, sizeof(buf2), INT64_FORMAT, (int64) th->fileLen);
|
2012-03-20 22:38:11 +01:00
|
|
|
exit_horribly(modulename, "actual file length (%s) does not match expected (%s)\n",
|
|
|
|
buf1, buf2);
|
2002-09-03 20:50:54 +02:00
|
|
|
}
|
2000-07-21 13:43:26 +02:00
|
|
|
|
|
|
|
pad = ((len + 511) & ~511) - len;
|
2001-03-22 05:01:46 +01:00
|
|
|
for (i = 0; i < pad; i++)
|
2001-01-12 05:32:07 +01:00
|
|
|
{
|
2001-03-22 05:01:46 +01:00
|
|
|
if (fputc('\0', th->tarFH) == EOF)
|
2012-03-20 22:38:11 +01:00
|
|
|
exit_horribly(modulename, "could not output padding at end of tar member\n");
|
2001-03-22 05:01:46 +01:00
|
|
|
}
|
2000-07-21 13:43:26 +02:00
|
|
|
|
|
|
|
ctx->tarFHpos += len + pad;
|
|
|
|
}
|
|
|
|
|
|
|
|
/* Locate the file in the archive, read header and position to data */
|
2001-03-22 05:01:46 +01:00
|
|
|
static TAR_MEMBER *
|
|
|
|
_tarPositionTo(ArchiveHandle *AH, const char *filename)
|
2000-07-21 13:43:26 +02:00
|
|
|
{
|
2001-03-22 05:01:46 +01:00
|
|
|
lclContext *ctx = (lclContext *) AH->formatData;
|
2011-11-25 21:40:51 +01:00
|
|
|
TAR_MEMBER *th = pg_calloc(1, sizeof(TAR_MEMBER));
|
2001-03-22 05:01:46 +01:00
|
|
|
char c;
|
|
|
|
char header[512];
|
2002-08-20 19:54:45 +02:00
|
|
|
size_t i,
|
2001-03-22 05:01:46 +01:00
|
|
|
len,
|
2002-08-20 19:54:45 +02:00
|
|
|
blks;
|
|
|
|
int id;
|
2000-07-21 13:43:26 +02:00
|
|
|
|
|
|
|
th->AH = AH;
|
|
|
|
|
|
|
|
/* Go to end of current file, if any */
|
|
|
|
if (ctx->tarFHpos != 0)
|
|
|
|
{
|
2002-09-04 22:31:48 +02:00
|
|
|
char buf1[100],
|
|
|
|
buf2[100];
|
|
|
|
|
2003-03-20 04:34:57 +01:00
|
|
|
snprintf(buf1, sizeof(buf1), INT64_FORMAT, (int64) ctx->tarFHpos);
|
|
|
|
snprintf(buf2, sizeof(buf2), INT64_FORMAT, (int64) ctx->tarNextMember);
|
2002-09-03 20:50:54 +02:00
|
|
|
ahlog(AH, 4, "moving from position %s to next member at file position %s\n",
|
|
|
|
buf1, buf2);
|
2000-07-21 13:43:26 +02:00
|
|
|
|
|
|
|
while (ctx->tarFHpos < ctx->tarNextMember)
|
|
|
|
_tarReadRaw(AH, &c, 1, NULL, ctx->tarFH);
|
|
|
|
}
|
|
|
|
|
2002-09-03 20:50:54 +02:00
|
|
|
{
|
2002-09-04 22:31:48 +02:00
|
|
|
char buf[100];
|
|
|
|
|
2003-03-20 04:34:57 +01:00
|
|
|
snprintf(buf, sizeof(buf), INT64_FORMAT, (int64) ctx->tarFHpos);
|
2002-09-03 20:50:54 +02:00
|
|
|
ahlog(AH, 4, "now at file position %s\n", buf);
|
|
|
|
}
|
2000-07-21 13:43:26 +02:00
|
|
|
|
2010-02-23 17:55:22 +01:00
|
|
|
/* We are at the start of the file, or at the next member */
|
2000-07-21 13:43:26 +02:00
|
|
|
|
|
|
|
/* Get the header */
|
|
|
|
if (!_tarGetHeader(AH, th))
|
|
|
|
{
|
|
|
|
if (filename)
|
2012-03-20 22:38:11 +01:00
|
|
|
exit_horribly(modulename, "could not find header for file \"%s\" in tar archive\n", filename);
|
2001-03-22 05:01:46 +01:00
|
|
|
else
|
2010-02-23 17:55:22 +01:00
|
|
|
{
|
2005-10-15 04:49:52 +02:00
|
|
|
/*
|
2010-02-23 17:55:22 +01:00
|
|
|
* We're just scanning the archive for the next file, so return
|
2005-10-15 04:49:52 +02:00
|
|
|
* null
|
|
|
|
*/
|
2000-07-21 13:43:26 +02:00
|
|
|
free(th);
|
|
|
|
return NULL;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
2001-03-22 05:01:46 +01:00
|
|
|
while (filename != NULL && strcmp(th->targetFile, filename) != 0)
|
2000-07-21 13:43:26 +02:00
|
|
|
{
|
2001-07-03 22:21:50 +02:00
|
|
|
ahlog(AH, 4, "skipping tar member %s\n", th->targetFile);
|
2000-07-21 13:43:26 +02:00
|
|
|
|
|
|
|
id = atoi(th->targetFile);
|
Rewrite --section option to decouple it from --schema-only/--data-only.
The initial implementation of pg_dump's --section option supposed that the
existing --schema-only and --data-only options could be made equivalent to
--section settings. This is wrong, though, due to dubious but long since
set-in-stone decisions about where to dump SEQUENCE SET items, as seen in
bug report from Martin Pitt. (And I'm not totally convinced there weren't
other bugs, either.) Undo that coupling and instead drive --section
filtering off current-section state tracked as we scan through the TOC
list to call _tocEntryRequired().
To make sure those decisions don't shift around and hopefully save a few
cycles, run _tocEntryRequired() only once per TOC entry and save the result
in a new TOC field. This required minor rejiggering of ACL handling but
also allows a far cleaner implementation of inhibit_data_for_failed_table.
Also, to ensure that pg_dump and pg_restore have the same behavior with
respect to the --section switches, add _tocEntryRequired() filtering to
WriteToc() and WriteDataChunks(), rather than trying to implement section
filtering in an entirely orthogonal way in dumpDumpableObject(). This
required adjusting the handling of the special ENCODING and STDSTRINGS
items, but they were pretty weird before anyway.
Minor other code review for the patch, too.
2012-05-30 05:22:14 +02:00
|
|
|
if ((TocIDRequired(AH, id) & REQ_DATA) != 0)
|
2012-03-20 22:38:11 +01:00
|
|
|
exit_horribly(modulename, "restoring data out of order is not supported in this archive format: "
|
|
|
|
"\"%s\" is required, but comes before \"%s\" in the archive file.\n",
|
|
|
|
th->targetFile, filename);
|
2000-07-21 13:43:26 +02:00
|
|
|
|
|
|
|
/* Header doesn't match, so read to next header */
|
2001-03-22 05:01:46 +01:00
|
|
|
len = ((th->fileLen + 511) & ~511); /* Padded length */
|
|
|
|
blks = len >> 9; /* # of 512 byte blocks */
|
2000-07-21 13:43:26 +02:00
|
|
|
|
2001-03-22 05:01:46 +01:00
|
|
|
for (i = 0; i < blks; i++)
|
2000-07-21 13:43:26 +02:00
|
|
|
_tarReadRaw(AH, &header[0], 512, NULL, ctx->tarFH);
|
|
|
|
|
|
|
|
if (!_tarGetHeader(AH, th))
|
2012-03-20 22:38:11 +01:00
|
|
|
exit_horribly(modulename, "could not find header for file \"%s\" in tar archive\n", filename);
|
2000-07-21 13:43:26 +02:00
|
|
|
}
|
|
|
|
|
|
|
|
ctx->tarNextMember = ctx->tarFHpos + ((th->fileLen + 511) & ~511);
|
|
|
|
th->pos = 0;
|
|
|
|
|
|
|
|
return th;
|
|
|
|
}
|
|
|
|
|
|
|
|
/* Read & verify a header */
|
2001-03-22 05:01:46 +01:00
|
|
|
static int
|
|
|
|
_tarGetHeader(ArchiveHandle *AH, TAR_MEMBER *th)
|
2000-07-21 13:43:26 +02:00
|
|
|
{
|
2001-03-22 05:01:46 +01:00
|
|
|
lclContext *ctx = (lclContext *) AH->formatData;
|
|
|
|
char h[512];
|
2002-07-04 17:35:07 +02:00
|
|
|
char tag[100];
|
2001-03-22 05:01:46 +01:00
|
|
|
int sum,
|
|
|
|
chk;
|
2002-08-20 19:54:45 +02:00
|
|
|
size_t len;
|
2003-08-04 02:43:34 +02:00
|
|
|
unsigned long ullen;
|
2007-02-19 16:05:06 +01:00
|
|
|
pgoff_t hPos;
|
2001-03-22 05:01:46 +01:00
|
|
|
bool gotBlock = false;
|
2000-07-21 13:43:26 +02:00
|
|
|
|
2001-02-13 02:31:54 +01:00
|
|
|
while (!gotBlock)
|
|
|
|
{
|
2001-06-27 23:21:37 +02:00
|
|
|
#if 0
|
2002-08-20 19:54:45 +02:00
|
|
|
if (ftello(ctx->tarFH) != ctx->tarFHpos)
|
2002-09-03 20:50:54 +02:00
|
|
|
{
|
2002-09-04 22:31:48 +02:00
|
|
|
char buf1[100],
|
|
|
|
buf2[100];
|
|
|
|
|
2003-03-20 04:34:57 +01:00
|
|
|
snprintf(buf1, sizeof(buf1), INT64_FORMAT, (int64) ftello(ctx->tarFH));
|
|
|
|
snprintf(buf2, sizeof(buf2), INT64_FORMAT, (int64) ftello(ctx->tarFHpos));
|
2012-03-20 22:38:11 +01:00
|
|
|
exit_horribly(modulename,
|
2005-10-15 04:49:52 +02:00
|
|
|
"mismatch in actual vs. predicted file position (%s vs. %s)\n",
|
2012-06-10 21:20:04 +02:00
|
|
|
buf1, buf2);
|
2002-09-03 20:50:54 +02:00
|
|
|
}
|
2001-06-27 23:21:37 +02:00
|
|
|
#endif
|
2000-07-21 13:43:26 +02:00
|
|
|
|
2001-02-13 02:31:54 +01:00
|
|
|
/* Save the pos for reporting purposes */
|
|
|
|
hPos = ctx->tarFHpos;
|
2000-07-21 13:43:26 +02:00
|
|
|
|
2001-02-13 02:31:54 +01:00
|
|
|
/* Read a 512 byte block, return EOF, exit if short */
|
2005-06-22 04:00:47 +02:00
|
|
|
len = _tarReadRaw(AH, h, 512, NULL, ctx->tarFH);
|
2001-03-22 05:01:46 +01:00
|
|
|
if (len == 0) /* EOF */
|
2001-02-13 02:31:54 +01:00
|
|
|
return 0;
|
|
|
|
|
|
|
|
if (len != 512)
|
2012-03-20 22:38:11 +01:00
|
|
|
exit_horribly(modulename,
|
|
|
|
ngettext("incomplete tar header found (%lu byte)\n",
|
2012-06-10 21:20:04 +02:00
|
|
|
"incomplete tar header found (%lu bytes)\n",
|
2012-03-20 22:38:11 +01:00
|
|
|
len),
|
|
|
|
(unsigned long) len);
|
2001-02-13 02:31:54 +01:00
|
|
|
|
|
|
|
/* Calc checksum */
|
2005-06-22 04:00:47 +02:00
|
|
|
chk = _tarChecksum(h);
|
|
|
|
sscanf(&h[148], "%8o", &sum);
|
2000-07-21 13:43:26 +02:00
|
|
|
|
2001-02-13 02:31:54 +01:00
|
|
|
/*
|
2005-10-15 04:49:52 +02:00
|
|
|
* If the checksum failed, see if it is a null block. If so, silently
|
|
|
|
* continue to the next block.
|
2001-02-13 02:31:54 +01:00
|
|
|
*/
|
2001-03-22 05:01:46 +01:00
|
|
|
if (chk == sum)
|
2001-02-13 02:31:54 +01:00
|
|
|
gotBlock = true;
|
2001-03-22 05:01:46 +01:00
|
|
|
else
|
|
|
|
{
|
2005-06-22 04:00:47 +02:00
|
|
|
int i;
|
|
|
|
|
2001-03-22 05:01:46 +01:00
|
|
|
for (i = 0; i < 512; i++)
|
2001-02-13 02:31:54 +01:00
|
|
|
{
|
2005-06-22 04:00:47 +02:00
|
|
|
if (h[i] != 0)
|
2001-02-13 02:31:54 +01:00
|
|
|
{
|
2001-03-22 05:01:46 +01:00
|
|
|
gotBlock = true;
|
2001-02-13 02:31:54 +01:00
|
|
|
break;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
}
|
|
|
|
}
|
2000-07-21 13:43:26 +02:00
|
|
|
|
2002-09-10 20:25:13 +02:00
|
|
|
sscanf(&h[0], "%99s", tag);
|
|
|
|
sscanf(&h[124], "%12lo", &ullen);
|
|
|
|
len = (size_t) ullen;
|
2000-07-21 13:43:26 +02:00
|
|
|
|
2002-09-03 20:50:54 +02:00
|
|
|
{
|
2002-09-04 22:31:48 +02:00
|
|
|
char buf[100];
|
|
|
|
|
2003-03-20 04:34:57 +01:00
|
|
|
snprintf(buf, sizeof(buf), INT64_FORMAT, (int64) hPos);
|
2002-09-03 20:50:54 +02:00
|
|
|
ahlog(AH, 3, "TOC Entry %s at %s (length %lu, checksum %d)\n",
|
2002-09-10 20:25:13 +02:00
|
|
|
tag, buf, (unsigned long) len, sum);
|
2002-09-03 20:50:54 +02:00
|
|
|
}
|
2000-07-21 13:43:26 +02:00
|
|
|
|
|
|
|
if (chk != sum)
|
2002-09-03 20:50:54 +02:00
|
|
|
{
|
2002-09-04 22:31:48 +02:00
|
|
|
char buf[100];
|
|
|
|
|
2003-03-20 04:34:57 +01:00
|
|
|
snprintf(buf, sizeof(buf), INT64_FORMAT, (int64) ftello(ctx->tarFH));
|
2012-03-20 22:38:11 +01:00
|
|
|
exit_horribly(modulename,
|
|
|
|
"corrupt tar header found in %s "
|
|
|
|
"(expected %d, computed %d) file position %s\n",
|
|
|
|
tag, sum, chk, buf);
|
2002-09-03 20:50:54 +02:00
|
|
|
}
|
2000-07-21 13:43:26 +02:00
|
|
|
|
2011-11-25 21:40:51 +01:00
|
|
|
th->targetFile = pg_strdup(tag);
|
2000-07-21 13:43:26 +02:00
|
|
|
th->fileLen = len;
|
|
|
|
|
|
|
|
return 1;
|
|
|
|
}
|
|
|
|
|
2002-09-06 23:58:36 +02:00
|
|
|
|
|
|
|
/*
|
|
|
|
* Utility routine to print possibly larger than 32 bit integers in a
|
|
|
|
* portable fashion. Filled with zeros.
|
|
|
|
*/
|
2003-08-04 02:43:34 +02:00
|
|
|
static void
|
|
|
|
print_val(char *s, uint64 val, unsigned int base, size_t len)
|
2002-09-06 23:58:36 +02:00
|
|
|
{
|
2003-08-04 02:43:34 +02:00
|
|
|
int i;
|
|
|
|
|
|
|
|
for (i = len; i > 0; i--)
|
|
|
|
{
|
|
|
|
int digit = val % base;
|
|
|
|
|
|
|
|
s[i - 1] = '0' + digit;
|
|
|
|
val = val / base;
|
|
|
|
}
|
2002-09-06 23:58:36 +02:00
|
|
|
}
|
|
|
|
|
|
|
|
|
2001-03-22 05:01:46 +01:00
|
|
|
static void
|
|
|
|
_tarWriteHeader(TAR_MEMBER *th)
|
2000-07-21 13:43:26 +02:00
|
|
|
{
|
|
|
|
char h[512];
|
|
|
|
int lastSum = 0;
|
|
|
|
int sum;
|
|
|
|
|
2002-08-28 22:46:24 +02:00
|
|
|
memset(h, 0, sizeof(h));
|
2000-07-21 13:43:26 +02:00
|
|
|
|
|
|
|
/* Name 100 */
|
|
|
|
sprintf(&h[0], "%.99s", th->targetFile);
|
|
|
|
|
|
|
|
/* Mode 8 */
|
|
|
|
sprintf(&h[100], "100600 ");
|
|
|
|
|
|
|
|
/* User ID 8 */
|
2002-09-06 23:58:36 +02:00
|
|
|
sprintf(&h[108], "004000 ");
|
2000-07-21 13:43:26 +02:00
|
|
|
|
|
|
|
/* Group 8 */
|
2002-09-06 23:58:36 +02:00
|
|
|
sprintf(&h[116], "002000 ");
|
2000-07-21 13:43:26 +02:00
|
|
|
|
2002-09-06 23:58:36 +02:00
|
|
|
/* File size 12 - 11 digits, 1 space, no NUL */
|
|
|
|
print_val(&h[124], th->fileLen, 8, 11);
|
|
|
|
sprintf(&h[135], " ");
|
2000-07-21 13:43:26 +02:00
|
|
|
|
|
|
|
/* Mod Time 12 */
|
2002-09-06 23:58:36 +02:00
|
|
|
sprintf(&h[136], "%011o ", (int) time(NULL));
|
2000-07-21 13:43:26 +02:00
|
|
|
|
|
|
|
/* Checksum 8 */
|
2002-09-06 23:58:36 +02:00
|
|
|
sprintf(&h[148], "%06o ", lastSum);
|
2000-07-21 13:43:26 +02:00
|
|
|
|
2002-09-06 23:58:36 +02:00
|
|
|
/* Type - regular file */
|
2000-10-24 15:24:30 +02:00
|
|
|
sprintf(&h[156], "0");
|
2000-07-21 13:43:26 +02:00
|
|
|
|
2002-07-04 17:35:07 +02:00
|
|
|
/* Link tag 100 (NULL) */
|
2000-07-21 13:43:26 +02:00
|
|
|
|
2002-09-06 23:58:36 +02:00
|
|
|
/* Magic 6 + Version 2 */
|
|
|
|
sprintf(&h[257], "ustar00");
|
2000-10-24 15:24:30 +02:00
|
|
|
|
2002-09-06 23:58:36 +02:00
|
|
|
#if 0
|
2000-07-21 13:43:26 +02:00
|
|
|
/* User 32 */
|
2005-10-15 04:49:52 +02:00
|
|
|
sprintf(&h[265], "%.31s", ""); /* How do I get username reliably? Do
|
|
|
|
* I need to? */
|
2000-07-21 13:43:26 +02:00
|
|
|
|
|
|
|
/* Group 32 */
|
2005-10-15 04:49:52 +02:00
|
|
|
sprintf(&h[297], "%.31s", ""); /* How do I get group reliably? Do I
|
|
|
|
* need to? */
|
2000-07-21 13:43:26 +02:00
|
|
|
|
|
|
|
/* Maj Dev 8 */
|
2002-09-06 23:58:36 +02:00
|
|
|
sprintf(&h[329], "%6o ", 0);
|
2000-07-21 13:43:26 +02:00
|
|
|
|
2002-09-06 23:58:36 +02:00
|
|
|
/* Min Dev 8 */
|
|
|
|
sprintf(&h[337], "%6o ", 0);
|
|
|
|
#endif
|
2000-07-21 13:43:26 +02:00
|
|
|
|
2001-03-22 05:01:46 +01:00
|
|
|
while ((sum = _tarChecksum(h)) != lastSum)
|
2000-07-21 13:43:26 +02:00
|
|
|
{
|
2002-09-06 23:58:36 +02:00
|
|
|
sprintf(&h[148], "%06o ", sum);
|
2000-07-21 13:43:26 +02:00
|
|
|
lastSum = sum;
|
|
|
|
}
|
|
|
|
|
2001-03-22 05:01:46 +01:00
|
|
|
if (fwrite(h, 1, 512, th->tarFH) != 512)
|
2012-03-20 22:38:11 +01:00
|
|
|
exit_horribly(modulename, "could not write to output file: %s\n", strerror(errno));
|
2000-07-21 13:43:26 +02:00
|
|
|
}
|