root / linux-user / path.c @ 79f85c3a
History | View | Annotate | Download (3.8 kB)
1 |
/* Code to mangle pathnames into those matching a given prefix.
|
---|---|
2 |
eg. open("/lib/foo.so") => open("/usr/gnemul/i386-linux/lib/foo.so");
|
3 |
|
4 |
The assumption is that this area does not change.
|
5 |
*/
|
6 |
#include <sys/types.h> |
7 |
#include <dirent.h> |
8 |
#include <unistd.h> |
9 |
#include <stdlib.h> |
10 |
#include <string.h> |
11 |
#include <errno.h> |
12 |
#include <stdio.h> |
13 |
#include "qemu.h" |
14 |
|
15 |
struct pathelem
|
16 |
{ |
17 |
/* Name of this, eg. lib */
|
18 |
char *name;
|
19 |
/* Full path name, eg. /usr/gnemul/x86-linux/lib. */
|
20 |
char *pathname;
|
21 |
struct pathelem *parent;
|
22 |
/* Children */
|
23 |
unsigned int num_entries; |
24 |
struct pathelem *entries[0]; |
25 |
}; |
26 |
|
27 |
static struct pathelem *base; |
28 |
|
29 |
/* First N chars of S1 match S2, and S2 is N chars long. */
|
30 |
static int strneq(const char *s1, unsigned int n, const char *s2) |
31 |
{ |
32 |
unsigned int i; |
33 |
|
34 |
for (i = 0; i < n; i++) |
35 |
if (s1[i] != s2[i])
|
36 |
return 0; |
37 |
return s2[i] == 0; |
38 |
} |
39 |
|
40 |
static struct pathelem *add_entry(struct pathelem *root, const char *name); |
41 |
|
42 |
static struct pathelem *new_entry(const char *root, |
43 |
struct pathelem *parent,
|
44 |
const char *name) |
45 |
{ |
46 |
struct pathelem *new = malloc(sizeof(*new)); |
47 |
new->name = strdup(name); |
48 |
asprintf(&new->pathname, "%s/%s", root, name);
|
49 |
new->num_entries = 0;
|
50 |
return new;
|
51 |
} |
52 |
|
53 |
#define streq(a,b) (strcmp((a), (b)) == 0) |
54 |
|
55 |
static struct pathelem *add_dir_maybe(struct pathelem *path) |
56 |
{ |
57 |
DIR *dir; |
58 |
|
59 |
if ((dir = opendir(path->pathname)) != NULL) { |
60 |
struct dirent *dirent;
|
61 |
|
62 |
while ((dirent = readdir(dir)) != NULL) { |
63 |
if (!streq(dirent->d_name,".") && !streq(dirent->d_name,"..")){ |
64 |
path = add_entry(path, dirent->d_name); |
65 |
} |
66 |
} |
67 |
closedir(dir); |
68 |
} |
69 |
return path;
|
70 |
} |
71 |
|
72 |
static struct pathelem *add_entry(struct pathelem *root, const char *name) |
73 |
{ |
74 |
root->num_entries++; |
75 |
|
76 |
root = realloc(root, sizeof(*root)
|
77 |
+ sizeof(root->entries[0])*root->num_entries); |
78 |
|
79 |
root->entries[root->num_entries-1] = new_entry(root->pathname, root, name);
|
80 |
root->entries[root->num_entries-1]
|
81 |
= add_dir_maybe(root->entries[root->num_entries-1]);
|
82 |
return root;
|
83 |
} |
84 |
|
85 |
/* This needs to be done after tree is stabilized (ie. no more reallocs!). */
|
86 |
static void set_parents(struct pathelem *child, struct pathelem *parent) |
87 |
{ |
88 |
unsigned int i; |
89 |
|
90 |
child->parent = parent; |
91 |
for (i = 0; i < child->num_entries; i++) |
92 |
set_parents(child->entries[i], child); |
93 |
} |
94 |
|
95 |
/* FIXME: Doesn't handle DIR/.. where DIR is not in emulated dir. */
|
96 |
static const char * |
97 |
follow_path(const struct pathelem *cursor, const char *name) |
98 |
{ |
99 |
unsigned int i, namelen; |
100 |
|
101 |
name += strspn(name, "/");
|
102 |
namelen = strcspn(name, "/");
|
103 |
|
104 |
if (namelen == 0) |
105 |
return cursor->pathname;
|
106 |
|
107 |
if (strneq(name, namelen, "..")) |
108 |
return follow_path(cursor->parent, name + namelen);
|
109 |
|
110 |
if (strneq(name, namelen, ".")) |
111 |
return follow_path(cursor, name + namelen);
|
112 |
|
113 |
for (i = 0; i < cursor->num_entries; i++) |
114 |
if (strneq(name, namelen, cursor->entries[i]->name))
|
115 |
return follow_path(cursor->entries[i], name + namelen);
|
116 |
|
117 |
/* Not found */
|
118 |
return NULL; |
119 |
} |
120 |
|
121 |
void init_paths(const char *prefix) |
122 |
{ |
123 |
char pref_buf[PATH_MAX];
|
124 |
|
125 |
if (prefix[0] == '\0' || |
126 |
!strcmp(prefix, "/"))
|
127 |
return;
|
128 |
|
129 |
if (prefix[0] != '/') { |
130 |
char *cwd = get_current_dir_name();
|
131 |
if (!cwd)
|
132 |
abort(); |
133 |
strcpy(pref_buf, cwd); |
134 |
strcat(pref_buf, "/");
|
135 |
strcat(pref_buf, prefix); |
136 |
free(cwd); |
137 |
} else
|
138 |
strcpy(pref_buf,prefix + 1);
|
139 |
|
140 |
base = new_entry("", NULL, pref_buf); |
141 |
base = add_dir_maybe(base); |
142 |
if (base->num_entries == 0) { |
143 |
free (base); |
144 |
base = NULL;
|
145 |
} else {
|
146 |
set_parents(base, base); |
147 |
} |
148 |
} |
149 |
|
150 |
/* Look for path in emulation dir, otherwise return name. */
|
151 |
const char *path(const char *name) |
152 |
{ |
153 |
/* Only do absolute paths: quick and dirty, but should mostly be OK.
|
154 |
Could do relative by tracking cwd. */
|
155 |
if (!base || name[0] != '/') |
156 |
return name;
|
157 |
|
158 |
return follow_path(base, name) ?: name;
|
159 |
} |