1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
|
/* gdbmexp.c - Export a GDBM database. */
/* This file is part of GDBM, the GNU data base manager.
Copyright (C) 2007, 2011 Free Software Foundation, Inc.
GDBM 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 3, or (at your option)
any later version.
GDBM 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 GDBM. If not, see <http://www.gnu.org/licenses/>. */
/* Include system configuration before all else. */
# include "autoconf.h"
# include <arpa/inet.h>
# include "gdbmdefs.h"
# include "gdbm.h"
int
gdbm_export_to_file (GDBM_FILE dbf, FILE *fp)
{
unsigned long size;
datum key, nextkey, data;
const char *header1 = "!\r\n! GDBM FLAT FILE DUMP -- THIS IS NOT A TEXT FILE\r\n! ";
const char *header2 = "\r\n!\r\n";
int count = 0;
/* Write out the text header. */
if (fwrite (header1, strlen (header1), 1, fp) != 1)
goto write_fail;
if (fwrite (gdbm_version, strlen (gdbm_version), 1, fp) != 1)
goto write_fail;
if (fwrite (header2, strlen (header2), 1, fp) != 1)
goto write_fail;
/* For each item in the database, write out a record to the file. */
key = gdbm_firstkey (dbf);
while (key.dptr != NULL)
{
data = gdbm_fetch (dbf, key);
if (data.dptr != NULL)
{
/* Add the data to the new file. */
size = htonl (key.dsize);
if (fwrite (&size, sizeof (size), 1, fp) != 1)
goto write_fail;
if (fwrite (key.dptr, key.dsize, 1, fp) != 1)
goto write_fail;
size = htonl (data.dsize);
if (fwrite (&size, sizeof (size), 1, fp) != 1)
goto write_fail;
if (fwrite (data.dptr, data.dsize, 1, fp) != 1)
goto write_fail;
}
nextkey = gdbm_nextkey (dbf, key);
free (key.dptr);
free (data.dptr);
key = nextkey;
count++;
}
return count;
write_fail:
gdbm_errno = GDBM_FILE_WRITE_ERROR;
return -1;
}
int
gdbm_export (GDBM_FILE dbf, const char *exportfile, int flags, int mode)
{
int nfd, rc;
FILE *fp;
/* Only support GDBM_WCREAT or GDBM_NEWDB */
switch (flags)
{
case GDBM_WRCREAT:
nfd = open (exportfile, O_WRONLY | O_CREAT | O_EXCL, mode);
if (nfd == -1)
{
gdbm_errno = GDBM_FILE_OPEN_ERROR;
return -1;
}
break;
case GDBM_NEWDB:
nfd = open (exportfile, O_WRONLY | O_CREAT | O_TRUNC, mode);
if (nfd == -1)
{
gdbm_errno = GDBM_FILE_OPEN_ERROR;
return -1;
}
break;
default:
#ifdef GDBM_BAD_OPEN_FLAGS
gdbm_errno = GDBM_BAD_OPEN_FLAGS;
#else
gdbm_errno = GDBM_FILE_OPEN_ERROR;
#endif
return -1;
}
fp = fdopen (nfd, "w");
if (!fp)
{
close (nfd);
gdbm_errno = GDBM_FILE_OPEN_ERROR;
return -1;
}
rc = gdbm_export_to_file (dbf, fp);
fclose (fp);
return rc;
}
|
