/*
- * Bacula Catalog Database interface routines
- *
- * Almost generic set of SQL database interface routines
- * (with a little more work)
- *
- * Kern Sibbald, March 2000
- *
- * Version $Id$
- */
+ Bacula® - The Network Backup Solution
-/*
- Copyright (C) 2000-2004 Kern Sibbald and John Walker
+ Copyright (C) 2000-2007 Free Software Foundation Europe e.V.
- This program is free software; you can redistribute it and/or
- modify it under the terms of the GNU General Public License as
- published by the Free Software Foundation; either version 2 of
- the License, or (at your option) any later version.
+ The main author of Bacula is Kern Sibbald, with contributions from
+ many others, a complete list can be found in the file AUTHORS.
+ This program is Free Software; you can redistribute it and/or
+ modify it under the terms of version two of the GNU General Public
+ License as published by the Free Software Foundation and included
+ in the file LICENSE.
- This program is distributed in the hope that it will be useful,
- but WITHOUT ANY WARRANTY; without even the implied warranty of
+ 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., 59 Temple Place - Suite 330, Boston,
- MA 02111-1307, USA.
+ 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 Street, Fifth Floor, Boston, MA
+ 02110-1301, USA.
+ Bacula® is a registered trademark of John Walker.
+ The licensor of Bacula is the Free Software Foundation Europe
+ (FSFE), Fiduciary Program, Sumatrastrasse 25, 8006 Zürich,
+ Switzerland, email:ftf@fsfeurope.org.
+*/
+/*
+ * Bacula Catalog Database interface routines
+ *
+ * Almost generic set of SQL database interface routines
+ * (with a little more work)
+ *
+ * Kern Sibbald, March 2000
+ *
+ * Version $Id$
*/
/* The following is necessary so that we do not include
* the dummy external definition of B_DB.
*/
-#define __SQL_C /* indicate that this is sql.c */
+#define __SQL_C /* indicate that this is sql.c */
#include "bacula.h"
#include "cats.h"
-#if HAVE_MYSQL || HAVE_SQLITE || HAVE_POSTGRESQL
+#if HAVE_SQLITE3 || HAVE_MYSQL || HAVE_SQLITE || HAVE_POSTGRESQL
uint32_t bacula_db_version = 0;
void print_dashes(B_DB *mdb);
void print_result(B_DB *mdb);
+dbid_list::dbid_list()
+{
+ memset(this, 0, sizeof(dbid_list));
+ max_ids = 1000;
+ DBId = (DBId_t *)malloc(max_ids * sizeof(DBId_t));
+ num_ids = num_seen = tot_ids = 0;
+ PurgedFiles = NULL;
+}
+
+dbid_list::~dbid_list()
+{
+ free(DBId);
+}
+
+
/*
* Called here to retrieve an integer from the database
*/
if (row[0]) {
Dmsg1(800, "int_handler finds '%s'\n", row[0]);
- *val = atoi(row[0]);
+ *val = str_to_int64(row[0]);
} else {
Dmsg0(800, "int_handler finds zero\n");
*val = 0;
return 0;
}
+/*
+ * Called here to retrieve a 32/64 bit integer from the database.
+ * The returned integer will be extended to 64 bit.
+ */
+int db_int64_handler(void *ctx, int num_fields, char **row)
+{
+ db_int64_ctx *lctx = (db_int64_ctx *)ctx;
+
+ if (row[0]) {
+ lctx->value = str_to_int64(row[0]);
+ lctx->count++;
+ }
+ return 0;
+}
+
/* NOTE!!! The following routines expect that the
*/
/* Check that the tables correspond to the version we want */
-int check_tables_version(JCR *jcr, B_DB *mdb)
+bool check_tables_version(JCR *jcr, B_DB *mdb)
{
const char *query = "SELECT VersionId FROM Version";
bacula_db_version = 0;
- db_sql_query(mdb, query, int_handler, (void *)&bacula_db_version);
+ if (!db_sql_query(mdb, query, int_handler, (void *)&bacula_db_version)) {
+ Mmsg(mdb->errmsg, "Database not created or server not running.\n");
+ Jmsg(jcr, M_FATAL, 0, "%s", mdb->errmsg);
+ return false;
+ }
if (bacula_db_version != BDB_VERSION) {
Mmsg(mdb->errmsg, "Version error for database \"%s\". Wanted %d, got %d\n",
- mdb->db_name, BDB_VERSION, bacula_db_version);
+ mdb->db_name, BDB_VERSION, bacula_db_version);
Jmsg(jcr, M_FATAL, 0, "%s", mdb->errmsg);
- return 0;
+ return false;
}
- return 1;
+ return true;
}
/* Utility routine for queries. The database MUST be locked before calling here. */
QueryDB(const char *file, int line, JCR *jcr, B_DB *mdb, char *cmd)
{
int status;
+
+ sql_free_result(mdb);
if ((status=sql_query(mdb, cmd)) != 0) {
m_msg(file, line, &mdb->errmsg, _("query %s failed:\n%s\n"), cmd, sql_strerror(mdb));
j_msg(file, line, jcr, M_FATAL, 0, "%s", mdb->errmsg);
if (verbose) {
- j_msg(file, line, jcr, M_INFO, 0, "%s\n", cmd);
+ j_msg(file, line, jcr, M_INFO, 0, "%s\n", cmd);
}
return 0;
}
/*
* Utility routine to do inserts
* Returns: 0 on failure
- * 1 on success
+ * 1 on success
*/
int
InsertDB(const char *file, int line, JCR *jcr, B_DB *mdb, char *cmd)
m_msg(file, line, &mdb->errmsg, _("insert %s failed:\n%s\n"), cmd, sql_strerror(mdb));
j_msg(file, line, jcr, M_FATAL, 0, "%s", mdb->errmsg);
if (verbose) {
- j_msg(file, line, jcr, M_INFO, 0, "%s\n", cmd);
+ j_msg(file, line, jcr, M_INFO, 0, "%s\n", cmd);
}
return 0;
}
if (mdb->num_rows != 1) {
char ed1[30];
m_msg(file, line, &mdb->errmsg, _("Insertion problem: affected_rows=%s\n"),
- edit_uint64(mdb->num_rows, ed1));
+ edit_uint64(mdb->num_rows, ed1));
if (verbose) {
- j_msg(file, line, jcr, M_INFO, 0, "%s\n", cmd);
+ j_msg(file, line, jcr, M_INFO, 0, "%s\n", cmd);
}
return 0;
}
/* Utility routine for updates.
* Returns: 0 on failure
- * 1 on success
+ * 1 on success
*/
int
UpdateDB(const char *file, int line, JCR *jcr, B_DB *mdb, char *cmd)
m_msg(file, line, &mdb->errmsg, _("update %s failed:\n%s\n"), cmd, sql_strerror(mdb));
j_msg(file, line, jcr, M_ERROR, 0, "%s", mdb->errmsg);
if (verbose) {
- j_msg(file, line, jcr, M_INFO, 0, "%s\n", cmd);
+ j_msg(file, line, jcr, M_INFO, 0, "%s\n", cmd);
}
return 0;
}
mdb->num_rows = sql_affected_rows(mdb);
if (mdb->num_rows < 1) {
char ed1[30];
- m_msg(file, line, &mdb->errmsg, _("Update problem: affected_rows=%s\n"),
- edit_uint64(mdb->num_rows, ed1));
+ m_msg(file, line, &mdb->errmsg, _("Update failed: affected_rows=%s for %s\n"),
+ edit_uint64(mdb->num_rows, ed1), cmd);
if (verbose) {
// j_msg(file, line, jcr, M_INFO, 0, "%s\n", cmd);
}
/* Utility routine for deletes
*
* Returns: -1 on error
- * n number of rows affected
+ * n number of rows affected
*/
int
DeleteDB(const char *file, int line, JCR *jcr, B_DB *mdb, char *cmd)
m_msg(file, line, &mdb->errmsg, _("delete %s failed:\n%s\n"), cmd, sql_strerror(mdb));
j_msg(file, line, jcr, M_ERROR, 0, "%s", mdb->errmsg);
if (verbose) {
- j_msg(file, line, jcr, M_INFO, 0, "%s\n", cmd);
+ j_msg(file, line, jcr, M_INFO, 0, "%s\n", cmd);
}
return -1;
}
* No locking done
*
* Returns: -1 on failure
- * count on success
+ * count on success
*/
int get_sql_record_max(JCR *jcr, B_DB *mdb)
{
if (QUERY_DB(jcr, mdb, mdb->cmd)) {
if ((row = sql_fetch_row(mdb)) == NULL) {
- Mmsg1(&mdb->errmsg, _("error fetching row: %s\n"), sql_strerror(mdb));
- stat = -1;
+ Mmsg1(&mdb->errmsg, _("error fetching row: %s\n"), sql_strerror(mdb));
+ stat = -1;
} else {
- stat = atoi(row[0]);
+ stat = str_to_int64(row[0]);
}
sql_free_result(mdb);
} else {
int errstat;
if ((errstat=rwl_writelock(&mdb->lock)) != 0) {
berrno be;
- e_msg(file, line, M_ABORT, 0, "rwl_writelock failure. ERR=%s\n",
- be.strerror(errstat));
+ e_msg(file, line, M_FATAL, 0, "rwl_writelock failure. stat=%d: ERR=%s\n",
+ errstat, be.bstrerror(errstat));
}
}
int errstat;
if ((errstat=rwl_writeunlock(&mdb->lock)) != 0) {
berrno be;
- e_msg(file, line, M_ABORT, 0, "rwl_writeunlock failure. ERR=%s\n",
- be.strerror(errstat));
+ e_msg(file, line, M_FATAL, 0, "rwl_writeunlock failure. stat=%d: ERR=%s\n",
+ errstat, be.bstrerror(errstat));
}
}
*/
void db_start_transaction(JCR *jcr, B_DB *mdb)
{
+ if (!jcr->attr) {
+ jcr->attr = get_pool_memory(PM_FNAME);
+ }
+ if (!jcr->ar) {
+ jcr->ar = (ATTR_DBR *)malloc(sizeof(ATTR_DBR));
+ }
+
#ifdef HAVE_SQLITE
if (!mdb->allow_transactions) {
return;
{
/*
* This can be called during thread cleanup and
- * the db may already be closed. So simply return.
+ * the db may already be closed. So simply return.
*/
if (!mdb) {
return;
}
+
+ if (jcr && jcr->cached_attribute) {
+ Dmsg0(400, "Flush last cached attribute.\n");
+ if (!db_create_file_attributes_record(jcr, mdb, jcr->ar)) {
+ Jmsg1(jcr, M_FATAL, 0, _("Attribute create error. %s"), db_strerror(jcr->db));
+ }
+ jcr->cached_attribute = false;
+ }
+
#ifdef HAVE_SQLITE
if (!mdb->allow_transactions) {
return;
* must be a path name (e.g. c:).
*/
for (p=f=fname; *p; p++) {
- if (*p == '/') {
- f = p; /* set pos of last slash */
+ if (IsPathSeparator(*p)) {
+ f = p; /* set pos of last slash */
}
}
- if (*f == '/') { /* did we find a slash? */
- f++; /* yes, point to filename */
- } else { /* no, whole thing must be path name */
+ if (IsPathSeparator(*f)) { /* did we find a slash? */
+ f++; /* yes, point to filename */
+ } else { /* no, whole thing must be path name */
f = p;
}
mdb->fnl = p - f;
if (mdb->fnl > 0) {
mdb->fname = check_pool_memory_size(mdb->fname, mdb->fnl+1);
- memcpy(mdb->fname, f, mdb->fnl); /* copy filename */
+ memcpy(mdb->fname, f, mdb->fnl); /* copy filename */
mdb->fname[mdb->fnl] = 0;
} else {
mdb->fname[0] = 0;
for (i = 0; i < sql_num_fields(mdb); i++) {
field = sql_fetch_field(mdb);
for (j = 0; j < (int)field->max_length + 2; j++) {
- send(ctx, "-");
+ send(ctx, "-");
}
send(ctx, "+");
}
for (i = 0; i < sql_num_fields(mdb); i++) {
Dmsg1(800, "list_result processing field %d\n", i);
field = sql_fetch_field(mdb);
- col_len = strlen(field->name);
+ col_len = cstrlen(field->name);
if (type == VERT_LIST) {
- if (col_len > max_len) {
- max_len = col_len;
- }
+ if (col_len > max_len) {
+ max_len = col_len;
+ }
} else {
- if (IS_NUM(field->type) && (int)field->max_length > 0) { /* fixup for commas */
- field->max_length += (field->max_length - 1) / 3;
- }
- if (col_len < (int)field->max_length) {
- col_len = field->max_length;
- }
- if (col_len < 4 && !IS_NOT_NULL(field->flags)) {
- col_len = 4; /* 4 = length of the word "NULL" */
- }
- field->max_length = col_len; /* reset column info */
+ if (IS_NUM(field->type) && (int)field->max_length > 0) { /* fixup for commas */
+ field->max_length += (field->max_length - 1) / 3;
+ }
+ if (col_len < (int)field->max_length) {
+ col_len = field->max_length;
+ }
+ if (col_len < 4 && !IS_NOT_NULL(field->flags)) {
+ col_len = 4; /* 4 = length of the word "NULL" */
+ }
+ field->max_length = col_len; /* reset column info */
}
}
sql_field_seek(mdb, 0);
send(ctx, "|");
for (i = 0; i < sql_num_fields(mdb); i++) {
- field = sql_fetch_field(mdb);
- if (row[i] == NULL) {
- bsnprintf(buf, sizeof(buf), " %-*s |", (int)field->max_length, "NULL");
- } else if (IS_NUM(field->type) && !jcr->gui && is_an_integer(row[i])) {
- bsnprintf(buf, sizeof(buf), " %*s |", (int)field->max_length,
- add_commas(row[i], ewc));
- } else {
- bsnprintf(buf, sizeof(buf), " %-*s |", (int)field->max_length, row[i]);
- }
- send(ctx, buf);
+ field = sql_fetch_field(mdb);
+ if (row[i] == NULL) {
+ bsnprintf(buf, sizeof(buf), " %-*s |", (int)field->max_length, "NULL");
+ } else if (IS_NUM(field->type) && !jcr->gui && is_an_integer(row[i])) {
+ bsnprintf(buf, sizeof(buf), " %*s |", (int)field->max_length,
+ add_commas(row[i], ewc));
+ } else {
+ bsnprintf(buf, sizeof(buf), " %-*s |", (int)field->max_length, row[i]);
+ }
+ send(ctx, buf);
}
send(ctx, "\n");
}
while ((row = sql_fetch_row(mdb)) != NULL) {
sql_field_seek(mdb, 0);
for (i = 0; i < sql_num_fields(mdb); i++) {
- field = sql_fetch_field(mdb);
- if (row[i] == NULL) {
- bsnprintf(buf, sizeof(buf), " %*s: %s\n", max_len, field->name, "NULL");
- } else if (IS_NUM(field->type) && !jcr->gui && is_an_integer(row[i])) {
- bsnprintf(buf, sizeof(buf), " %*s: %s\n", max_len, field->name,
- add_commas(row[i], ewc));
- } else {
- bsnprintf(buf, sizeof(buf), " %*s: %s\n", max_len, field->name, row[i]);
- }
- send(ctx, buf);
+ field = sql_fetch_field(mdb);
+ if (row[i] == NULL) {
+ bsnprintf(buf, sizeof(buf), " %*s: %s\n", max_len, field->name, "NULL");
+ } else if (IS_NUM(field->type) && !jcr->gui && is_an_integer(row[i])) {
+ bsnprintf(buf, sizeof(buf), " %*s: %s\n", max_len, field->name,
+ add_commas(row[i], ewc));
+ } else {
+ bsnprintf(buf, sizeof(buf), " %*s: %s\n", max_len, field->name, row[i]);
+ }
+ send(ctx, buf);
}
send(ctx, "\n");
}
}
-#endif /* HAVE_MYSQL || HAVE_SQLITE || HAVE_POSTGRESQL */
+#endif /* HAVE_SQLITE3 || HAVE_MYSQL || HAVE_SQLITE || HAVE_POSTGRESQL*/