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
|
#include <sys/stat.h>
#include <sys/types.h>
#include <unistd.h>
#include "dbmi.h"
#include "dbstubs.h"
static char *rfind();
static int make_parent_dir();
static int make_dir();
/*!
\fn
\brief
\return
\param
*/
db_driver_mkdir (path, mode, parentdirs)
char *path;
int mode;
int parentdirs;
{
if (parentdirs)
{
if (make_parent_dir (path, mode) != DB_OK)
return DB_FAILED;
}
return make_dir (path, mode);
}
/* make a directory if it doesn't exist */
/* this routine could be made more intelligent as to why it failed */
static int
make_dir (path, mode)
char *path;
int mode;
{
if (db_isdir(path) == DB_OK)
return DB_OK;
if (mkdir (path, mode) == 0)
return DB_OK;
db_syserror(path);
return DB_FAILED;
}
static
make_parent_dir(path, mode)
char *path;
int mode;
{
char *slash;
int stat;
slash = rfind(path,'/');
if (slash == NULL || slash == path)
return DB_OK; /* no parent dir to make. return ok */
*slash = 0; /* add NULL to terminate parentdir string */
if (access(path,0) == 0) /* path exists, good enough */
{
stat = DB_OK;
}
else if (make_parent_dir (path, mode) != DB_OK)
{
stat = DB_FAILED;
}
else if(make_dir (path, mode) == DB_OK)
{
stat = DB_OK;
}
else
{
stat = DB_FAILED;
}
*slash = '/'; /* put the slash back into the path */
return stat;
}
static
char *rfind(string, c)
char *string;
char c;
{
char *found;
found = NULL;
while (*string)
{
if (*string == c)
found = string;
string++;
}
return found;
}
|
