aboutsummaryrefslogtreecommitdiff
path: root/db2/log/log_archive.c
diff options
context:
space:
mode:
Diffstat (limited to 'db2/log/log_archive.c')
-rw-r--r--db2/log/log_archive.c413
1 files changed, 413 insertions, 0 deletions
diff --git a/db2/log/log_archive.c b/db2/log/log_archive.c
new file mode 100644
index 0000000000..d70d4c64c0
--- /dev/null
+++ b/db2/log/log_archive.c
@@ -0,0 +1,413 @@
+/*-
+ * See the file LICENSE for redistribution information.
+ *
+ * Copyright (c) 1997
+ * Sleepycat Software. All rights reserved.
+ */
+
+#include "config.h"
+
+#ifndef lint
+static const char sccsid[] = "@(#)log_archive.c 10.23 (Sleepycat) 8/23/97";
+#endif /* not lint */
+
+#ifndef NO_SYSTEM_INCLUDES
+#include <sys/types.h>
+
+#include <errno.h>
+#include <stdlib.h>
+#include <string.h>
+#include <unistd.h>
+#endif
+
+#include "db_int.h"
+#include "db_dispatch.h"
+#include "shqueue.h"
+#include "log.h"
+#include "clib_ext.h"
+#include "common_ext.h"
+
+static int absname __P((char *, char *, char **));
+static int build_data __P((DB_LOG *, char *, char ***, void *(*)(size_t)));
+static int cmpfunc __P((const void *, const void *));
+static int usermem __P((char ***, void *(*)(size_t)));
+
+/*
+ * log_archive --
+ * Supporting function for db_archive(1).
+ */
+int
+log_archive(logp, listp, flags, db_malloc)
+ DB_LOG *logp;
+ char ***listp;
+ int flags;
+ void *(*db_malloc) __P((size_t));
+{
+ DBT rec;
+ DB_LSN stable_lsn;
+ u_int32_t fnum;
+ int array_size, n, ret;
+ char **array, **arrayp, *name, *p, *pref, buf[MAXPATHLEN];
+
+ fnum = 0; /* XXX: Shut the compiler up. */
+
+#define OKFLAGS (DB_ARCH_ABS | DB_ARCH_DATA | DB_ARCH_LOG)
+ if (flags != 0) {
+ if ((ret =
+ __db_fchk(logp->dbenv, "log_archive", flags, OKFLAGS)) != 0)
+ return (ret);
+ if ((ret =
+ __db_fcchk(logp->dbenv,
+ "log_archive", flags, DB_ARCH_DATA, DB_ARCH_LOG)) != 0)
+ return (ret);
+ }
+
+ /*
+ * Get the absolute pathname of the current directory. It would
+ * be nice to get the shortest pathname of the database directory,
+ * but that's just not possible.
+ */
+ if (LF_ISSET(DB_ARCH_ABS)) {
+ errno = 0;
+ if ((pref = getcwd(buf, sizeof(buf))) == NULL)
+ return (errno == 0 ? ENOMEM : errno);
+ } else
+ pref = NULL;
+
+ switch (LF_ISSET(~DB_ARCH_ABS)) {
+ case DB_ARCH_DATA:
+ return (build_data(logp, pref, listp, db_malloc));
+ case DB_ARCH_LOG:
+ memset(&rec, 0, sizeof(rec));
+ if (F_ISSET(logp, DB_AM_THREAD))
+ F_SET(&rec, DB_DBT_MALLOC);
+ if ((ret = log_get(logp, &stable_lsn, &rec, DB_LAST)) != 0)
+ return (ret);
+ if (F_ISSET(logp, DB_AM_THREAD))
+ free(rec.data);
+ fnum = stable_lsn.file;
+ break;
+ case 0:
+ if ((ret = __log_findckp(logp, &stable_lsn)) != 0) {
+ if (ret != DB_NOTFOUND)
+ return (ret);
+ *listp = NULL;
+ return (0);
+ }
+ /* Remove any log files before the last stable LSN. */
+ fnum = stable_lsn.file - 1;
+ break;
+ }
+
+#define LIST_INCREMENT 64
+ /* Get some initial space. */
+ if ((array =
+ (char **)malloc(sizeof(char *) * (array_size = 10))) == NULL)
+ return (ENOMEM);
+ array[0] = NULL;
+
+ /* Build an array of the file names. */
+ for (n = 0; fnum > 0; --fnum) {
+ if ((ret = __log_name(logp->dbenv, fnum, &name)) != 0)
+ goto err;
+ if (__db_exists(name, NULL) != 0)
+ break;
+
+ if (n >= array_size - 1) {
+ array_size += LIST_INCREMENT;
+ if ((array = (char **)realloc(array,
+ sizeof(char *) * array_size)) == NULL) {
+ ret = ENOMEM;
+ goto err;
+ }
+ }
+
+ if (LF_ISSET(DB_ARCH_ABS)) {
+ if ((ret = absname(pref, name, &array[n])) != 0)
+ goto err;
+ FREES(name);
+ } else if ((p = __db_rpath(name)) != NULL) {
+ if ((array[n] = (char *)strdup(p + 1)) == NULL) {
+ ret = ENOMEM;
+ goto err;
+ }
+ FREES(name);
+ } else
+ array[n] = name;
+
+ array[++n] = NULL;
+ }
+
+ /* If there's nothing to return, we're done. */
+ if (n == 0) {
+ *listp = NULL;
+ ret = 0;
+ goto err;
+ }
+
+ /* Sort the list. */
+ qsort(array, (size_t)n, sizeof(char *), cmpfunc);
+
+ /* Rework the memory. */
+ if ((ret = usermem(&array, db_malloc)) != 0)
+ goto err;
+
+ *listp = array;
+ return (0);
+
+err: if (array != NULL) {
+ for (arrayp = array; *arrayp != NULL; ++arrayp)
+ FREES(*arrayp);
+ free(array);
+ }
+ return (ret);
+}
+
+/*
+ * build_data --
+ * Build a list of datafiles for return.
+ */
+static int
+build_data(logp, pref, listp, db_malloc)
+ DB_LOG *logp;
+ char *pref, ***listp;
+ void *(*db_malloc) __P((size_t));
+{
+ DBT rec;
+ DB_LSN lsn;
+ __log_register_args *argp;
+ u_int32_t rectype;
+ int array_size, last, n, nxt, ret;
+ char **array, **arrayp, *p, *real_name;
+
+ /* Get some initial space. */
+ if ((array =
+ (char **)malloc(sizeof(char *) * (array_size = 10))) == NULL)
+ return (ENOMEM);
+ array[0] = NULL;
+
+ memset(&rec, 0, sizeof(rec));
+ if (F_ISSET(logp, DB_AM_THREAD))
+ F_SET(&rec, DB_DBT_MALLOC);
+ for (n = 0, ret = log_get(logp, &lsn, &rec, DB_FIRST);
+ ret == 0; ret = log_get(logp, &lsn, &rec, DB_NEXT)) {
+ if (rec.size < sizeof(rectype)) {
+ ret = EINVAL;
+ __db_err(logp->dbenv, "log_archive: bad log record");
+ goto lg_free;
+ }
+
+ memcpy(&rectype, rec.data, sizeof(rectype));
+ if (rectype != DB_log_register) {
+ if (F_ISSET(logp, DB_AM_THREAD)) {
+ free(rec.data);
+ rec.data = NULL;
+ }
+ continue;
+ }
+ if ((ret = __log_register_read(rec.data, &argp)) != 0) {
+ ret = EINVAL;
+ __db_err(logp->dbenv,
+ "log_archive: unable to read log record");
+ goto lg_free;
+ }
+
+ if (n >= array_size - 1) {
+ array_size += LIST_INCREMENT;
+ if ((array = (char **)realloc(array,
+ sizeof(char *) * array_size)) == NULL) {
+ ret = ENOMEM;
+ goto lg_free;
+ }
+ }
+
+ if ((array[n] = (char *)strdup(argp->name.data)) == NULL) {
+ ret = ENOMEM;
+lg_free: if (F_ISSET(&rec, DB_DBT_MALLOC) && rec.data != NULL)
+ free(rec.data);
+ goto err1;
+ }
+
+ array[++n] = NULL;
+ free(argp);
+
+ if (F_ISSET(logp, DB_AM_THREAD)) {
+ free(rec.data);
+ rec.data = NULL;
+ }
+ }
+
+ /* If there's nothing to return, we're done. */
+ if (n == 0) {
+ ret = 0;
+ *listp = NULL;
+ goto err1;
+ }
+
+ /* Sort the list. */
+ qsort(array, (size_t)n, sizeof(char *), cmpfunc);
+
+ /*
+ * Build the real pathnames, discarding nonexistent files and
+ * duplicates.
+ */
+ for (last = nxt = 0; nxt < n;) {
+ /*
+ * Discard duplicates. Last is the next slot we're going
+ * to return to the user, nxt is the next slot that we're
+ * going to consider.
+ */
+ if (last != nxt) {
+ array[last] = array[nxt];
+ array[nxt] = NULL;
+ }
+ for (++nxt; nxt < n &&
+ strcmp(array[last], array[nxt]) == 0; ++nxt) {
+ FREES(array[nxt]);
+ array[nxt] = NULL;
+ }
+
+ /* Get the real name. */
+ if ((ret = __db_appname(logp->dbenv,
+ DB_APP_DATA, NULL, array[last], NULL, &real_name)) != 0)
+ goto err2;
+
+ /* If the file doesn't exist, ignore it. */
+ if (__db_exists(real_name, NULL) != 0) {
+ FREES(real_name);
+ FREES(array[last]);
+ array[last] = NULL;
+ continue;
+ }
+
+ /* Rework the name as requested by the user. */
+ FREES(array[last]);
+ array[last] = NULL;
+ if (pref != NULL) {
+ ret = absname(pref, real_name, &array[last]);
+ FREES(real_name);
+ if (ret != 0)
+ goto err2;
+ } else if ((p = __db_rpath(real_name)) != NULL) {
+ array[last] = (char *)strdup(p + 1);
+ FREES(real_name);
+ if (array[last] == NULL)
+ goto err2;
+ } else
+ array[last] = real_name;
+ ++last;
+ }
+
+ /* NULL-terminate the list. */
+ array[last] = NULL;
+
+ /* Rework the memory. */
+ if ((ret = usermem(&array, db_malloc)) != 0)
+ goto err1;
+
+ *listp = array;
+ return (0);
+
+err2: /*
+ * XXX
+ * We've possibly inserted NULLs into the array list, so clean up a
+ * bit so that the other error processing works.
+ */
+ if (array != NULL)
+ for (; nxt < n; ++nxt)
+ FREES(array[nxt]);
+ /* FALLTHROUGH */
+
+err1: if (array != NULL) {
+ for (arrayp = array; *arrayp != NULL; ++arrayp)
+ FREES(*arrayp);
+ free(array);
+ }
+ return (ret);
+}
+
+/*
+ * absname --
+ * Return an absolute path name for the file.
+ */
+static int
+absname(pref, name, newnamep)
+ char *pref, *name, **newnamep;
+{
+ size_t l_pref, l_name;
+ char *newname;
+
+ l_pref = strlen(pref);
+ l_name = strlen(name);
+
+ /* Malloc space for concatenating the two. */
+ if ((newname = (char *)malloc(l_pref + l_name + 2)) == NULL)
+ return (ENOMEM);
+
+ /* Build the name. */
+ memcpy(newname, pref, l_pref);
+ if (strchr(PATH_SEPARATOR, newname[l_pref - 1]) == NULL)
+ newname[l_pref++] = PATH_SEPARATOR[0];
+ memcpy(newname + l_pref, name, l_name + 1);
+ *newnamep = newname;
+
+ return (0);
+}
+
+/*
+ * usermem --
+ * Create a single chunk of memory that holds the returned information.
+ * If the user has their own malloc routine, use it.
+ */
+static int
+usermem(listp, func)
+ char ***listp;
+ void *(*func) __P((size_t));
+{
+ size_t len;
+ char **array, **arrayp, **orig, *strp;
+
+ /* Find out how much space we need. */
+ for (len = 0, orig = *listp; *orig != NULL; ++orig)
+ len += sizeof(char *) + strlen(*orig) + 1;
+ len += sizeof(char *);
+
+ /*
+ * Allocate it and set up the pointers.
+ *
+ * XXX
+ * Don't simplify this expression, SunOS compilers don't like it.
+ */
+ if (func == NULL)
+ array = (char **)malloc(len);
+ else
+ array = (char **)func(len);
+ if (array == NULL)
+ return (ENOMEM);
+ strp = (char *)(array + (orig - *listp) + 1);
+
+ /* Copy the original information into the new memory. */
+ for (orig = *listp, arrayp = array; *orig != NULL; ++orig, ++arrayp) {
+ len = strlen(*orig);
+ memcpy(strp, *orig, len + 1);
+ *arrayp = strp;
+ strp += len + 1;
+
+ FREES(*orig);
+ }
+
+ /* NULL-terminate the list. */
+ *arrayp = NULL;
+
+ free(*listp);
+ *listp = array;
+
+ return (0);
+}
+
+static int
+cmpfunc(p1, p2)
+ const void *p1, *p2;
+{
+ return (strcmp(*((char **)p1), *((char **)p2)));
+}