Subversion Repositories Tewi

Rev

Rev 257 | Rev 312 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
4 nishi 1
/* $Id: config.c 311 2024-10-13 01:23:22Z nishi $ */
2
 
16 nishi 3
#define SOURCE
4
 
4 nishi 5
#include "tw_config.h"
17 nishi 6
#include "tw_module.h"
4 nishi 7
 
8
#include <stdio.h>
7 nishi 9
#include <stdint.h>
4 nishi 10
#include <stdlib.h>
11
#include <string.h>
257 nishi 12
#include <sys/stat.h>
212 nishi 13
 
215 nishi 14
#if !defined(_MSC_VER) && !defined(__BORLANDC__)
12 nishi 15
#include <unistd.h>
212 nishi 16
#endif
4 nishi 17
 
311 nishi 18
#if defined(__MINGW32__) || defined(_MSC_VER) || defined(__BORLANDC__) || (defined(__WATCOMC__) && !defined(__OS2__))
240 nishi 19
#ifdef USE_WINSOCK1
20
#include <winsock.h>
21
#else
20 nishi 22
#include <winsock2.h>
23
#endif
240 nishi 24
#endif
20 nishi 25
 
4 nishi 26
#include <cm_string.h>
27
#include <cm_log.h>
28
 
6 nishi 29
struct tw_config config;
30
 
12 nishi 31
struct tw_config_entry* tw_vhost_match(const char* name, int port) {
32
	int i;
33
	for(i = 0; i < config.vhost_count; i++) {
13 nishi 34
		if(strcmp(config.vhosts[i].name, name) == 0 && (config.vhosts[i].port == -1 ? 1 : config.vhosts[i].port == port)) {
12 nishi 35
			return &config.vhosts[i];
36
		}
37
	}
38
	return &config.root;
39
}
40
 
22 nishi 41
bool tw_permission_allowed(const char* path, SOCKADDR addr, struct tw_http_request req, struct tw_config_entry* vhost) {
21 nishi 42
	int i;
43
	bool found = false;
44
	bool pathstart = false;
45
	bool perm = false;
46
again:
22 nishi 47
	for(i = 0; i < vhost->dir_count; i++) {
212 nishi 48
		char* noslash;
21 nishi 49
		struct tw_dir_entry* e = &vhost->dirs[i];
50
		pathstart = false;
22 nishi 51
		if(strlen(path) >= strlen(e->dir)) {
212 nishi 52
			int j;
21 nishi 53
			pathstart = true;
22 nishi 54
			for(j = 0; path[j] != 0 && e->dir[j] != 0; j++) {
55
				if(path[j] != e->dir[j]) {
21 nishi 56
					pathstart = false;
57
					break;
58
				}
59
			}
60
		}
212 nishi 61
		noslash = cm_strdup(e->dir);
21 nishi 62
		noslash[strlen(noslash) - 1] = 0;
22 nishi 63
		if(strcmp(e->dir, path) == 0 || strcmp(noslash, path) == 0 || pathstart) {
21 nishi 64
			found = true;
22 nishi 65
			if(strcmp(e->name, "all") == 0) {
21 nishi 66
				perm = e->type == TW_DIR_ALLOW;
67
			}
68
		}
69
		free(noslash);
70
	}
22 nishi 71
	if(!found && vhost != &config.root) {
21 nishi 72
		vhost = &config.root;
73
		goto again;
74
	}
75
	return perm;
76
}
77
 
7 nishi 78
void tw_config_init(void) {
79
	int i;
80
	for(i = 0; i < MAX_PORTS + 1; i++) {
81
		config.ports[i] = -1;
82
	}
12 nishi 83
	for(i = 0; i < MAX_VHOSTS; i++) {
156 nishi 84
#ifndef NO_SSL
12 nishi 85
		config.vhosts[i].sslkey = NULL;
86
		config.vhosts[i].sslcert = NULL;
156 nishi 87
#endif
19 nishi 88
		config.vhosts[i].root = NULL;
156 nishi 89
#ifdef HAS_CHROOT
90
		config.vhosts[i].chroot_path = NULL;
91
#endif
12 nishi 92
	}
156 nishi 93
#ifndef NO_SSL
12 nishi 94
	config.root.sslkey = NULL;
95
	config.root.sslcert = NULL;
156 nishi 96
#endif
19 nishi 97
	config.root.root = NULL;
21 nishi 98
	config.root.mime_count = 0;
99
	config.root.dir_count = 0;
22 nishi 100
	config.root.icon_count = 0;
24 nishi 101
	config.root.index_count = 0;
33 nishi 102
	config.root.readme_count = 0;
123 nishi 103
	config.root.hideport = 0;
156 nishi 104
#ifdef HAS_CHROOT
105
	config.root.chroot_path = NULL;
106
#endif
12 nishi 107
	config.vhost_count = 0;
18 nishi 108
	config.module_count = 0;
109
	config.extension = NULL;
17 nishi 110
	config.server_root = cm_strdup(PREFIX);
128 nishi 111
	config.server_admin = cm_strdup(SERVER_ADMIN);
156 nishi 112
	config.defined[0] = NULL;
187 nishi 113
#if defined(_PSP)
182 nishi 114
	strcpy(config.hostname, "psp");
187 nishi 115
#elif defined(__PPU__)
116
	strcpy(config.hostname, "ps3");
189 nishi 117
#elif defined(__ps2sdk__)
118
	strcpy(config.hostname, "ps2");
182 nishi 119
#else
12 nishi 120
	gethostname(config.hostname, 1024);
182 nishi 121
#endif
161 nishi 122
#ifdef HAS_CHROOT
123
	tw_add_define("HAS_CHROOT");
124
#endif
174 nishi 125
#ifndef NO_SSL
126
	tw_add_define("HAS_SSL");
127
#endif
7 nishi 128
}
6 nishi 129
 
130
int tw_config_read(const char* path) {
4 nishi 131
	char cbuf[2];
6 nishi 132
	int ln = 0;
156 nishi 133
	int ifbr = 0;
134
	int ignore = -1;
253 nishi 135
	int portcount;
212 nishi 136
	FILE* f;
137
	cm_log("Config", "Reading %s", path);
138
	f = fopen(path, "r");
139
	cbuf[1] = 0;
6 nishi 140
	if(f != NULL) {
4 nishi 141
		char* line = malloc(1);
6 nishi 142
		int stop = 0;
12 nishi 143
		struct tw_config_entry* current = &config.root;
6 nishi 144
		char* vhost = NULL;
21 nishi 145
		char* dir = NULL;
212 nishi 146
		line[0] = 0;
6 nishi 147
		while(stop == 0) {
4 nishi 148
			int c = fread(cbuf, 1, 1, f);
6 nishi 149
			if(cbuf[0] == '\n' || c <= 0) {
212 nishi 150
				char* l = cm_trim(line);
6 nishi 151
				ln++;
152
				if(strlen(l) > 0 && l[0] != '#') {
5 nishi 153
					char** r = cm_split(l, " \t");
154
					int i;
156 nishi 155
					if(ignore != -1 && ifbr >= ignore) {
156
						if(cm_strcaseequ(r[0], "EndIf")) ifbr--;
157
						if(ifbr == 0) {
158
							ignore = -1;
159
						}
160
					} else if(cm_strcaseequ(r[0], "Include") || cm_strcaseequ(r[0], "IncludeOptional")) {
6 nishi 161
						for(i = 1; r[i] != NULL; i++) {
162
							if(tw_config_read(r[i]) != 0 && cm_strcaseequ(r[0], "Include")) {
163
								stop = 1;
164
								break;
5 nishi 165
							}
166
						}
156 nishi 167
					} else if(cm_strcaseequ(r[0], "Define")) {
168
						if(r[1] == NULL) {
169
							cm_log("Config", "Missing name at line %d", ln);
170
							stop = 1;
171
						} else {
172
							tw_add_define(r[1]);
173
						}
174
					} else if(cm_strcaseequ(r[0], "Undefine")) {
175
						if(r[1] == NULL) {
176
							cm_log("Config", "Missing name at line %d", ln);
177
							stop = 1;
178
						} else {
179
							tw_delete_define(r[1]);
180
						}
21 nishi 181
					} else if(cm_strcaseequ(r[0], "BeginDirectory")) {
182
						if(dir != NULL) {
183
							cm_log("Config", "Already in directory section at line %d", ln);
184
							stop = 1;
185
						} else {
186
							if(r[1] == NULL) {
187
								cm_log("Config", "Missing directory at line %d", ln);
188
								stop = 1;
189
							} else {
190
								dir = cm_strcat(r[1], r[1][strlen(r[1]) - 1] == '/' ? "" : "/");
191
							}
192
						}
193
					} else if(cm_strcaseequ(r[0], "EndDirectory")) {
194
						if(dir == NULL) {
195
							cm_log("Config", "Not in directory section at line %d", ln);
196
							stop = 1;
197
						} else {
198
							free(dir);
199
							dir = NULL;
200
						}
201
					} else if(cm_strcaseequ(r[0], "Allow")) {
202
						if(dir == NULL) {
203
							cm_log("Config", "Not in directory section at line %d", ln);
204
							stop = 1;
205
						} else {
206
							if(r[1] == NULL) {
207
								cm_log("Config", "Missing argument at line %d", ln);
208
								stop = 1;
209
							} else {
210
								struct tw_dir_entry* e = &current->dirs[current->dir_count++];
211
								e->name = cm_strdup(r[1]);
212
								e->dir = cm_strdup(dir);
213
								e->type = TW_DIR_ALLOW;
214
							}
215
						}
216
					} else if(cm_strcaseequ(r[0], "Deny")) {
217
						if(dir == NULL) {
218
							cm_log("Config", "Not in directory section at line %d", ln);
219
							stop = 1;
220
						} else {
221
							if(r[1] == NULL) {
222
								cm_log("Config", "Missing argument at line %d", ln);
223
								stop = 1;
224
							} else {
225
								struct tw_dir_entry* e = &current->dirs[current->dir_count++];
226
								e->name = cm_strdup(r[1]);
227
								e->dir = cm_strdup(dir);
228
								e->type = TW_DIR_DENY;
229
							}
230
						}
6 nishi 231
					} else if(cm_strcaseequ(r[0], "BeginVirtualHost")) {
232
						if(vhost != NULL) {
12 nishi 233
							cm_log("Config", "Already in virtual host section at line %d", ln);
6 nishi 234
							stop = 1;
235
						} else {
236
							if(r[1] == NULL) {
12 nishi 237
								cm_log("Config", "Missing virtual host at line %d", ln);
6 nishi 238
								stop = 1;
239
							} else {
212 nishi 240
								int i;
6 nishi 241
								vhost = cm_strdup(r[1]);
12 nishi 242
								current = &config.vhosts[config.vhost_count++];
21 nishi 243
								current->dir_count = 0;
244
								current->mime_count = 0;
22 nishi 245
								current->icon_count = 0;
24 nishi 246
								current->index_count = 0;
33 nishi 247
								current->readme_count = 0;
123 nishi 248
								current->hideport = -1;
12 nishi 249
								current->name = cm_strdup(vhost);
13 nishi 250
								current->port = -1;
12 nishi 251
								for(i = 0; vhost[i] != 0; i++) {
252
									if(vhost[i] == ':') {
253
										current->name[i] = 0;
254
										current->port = atoi(current->name + i + 1);
255
										break;
256
									}
257
								}
6 nishi 258
							}
259
						}
260
					} else if(cm_strcaseequ(r[0], "EndVirtualHost")) {
261
						if(vhost == NULL) {
12 nishi 262
							cm_log("Config", "Not in virtual host section at line %d", ln);
6 nishi 263
							stop = 1;
264
						} else {
265
							free(vhost);
266
							vhost = NULL;
12 nishi 267
							current = &config.root;
6 nishi 268
						}
174 nishi 269
					} else if(cm_strcaseequ(r[0], "Listen")
270
#ifndef NO_SSL
271
						  || cm_strcaseequ(r[0], "ListenSSL")
272
#endif
273
					) {
7 nishi 274
						for(i = 1; r[i] != NULL; i++) {
215 nishi 275
#if defined(_MSC_VER) || defined(__BORLANDC__)
212 nishi 276
							uint32_t port = atoi(r[i]);
277
#else
7 nishi 278
							uint64_t port = atoi(r[i]);
212 nishi 279
#endif
280
							int j;
7 nishi 281
							cm_log("Config", "Going to listen at port %d%s", (int)port, cm_strcaseequ(r[0], "ListenSSL") ? " with SSL" : "");
215 nishi 282
#if defined(_MSC_VER) || defined(__BORLANDC__)
212 nishi 283
							if(cm_strcaseequ(r[0], "ListenSSL")) port |= (1UL << 31);
284
#else
285
							if(cm_strcaseequ(r[0], "ListenSSL")) port |= (1ULL << 31);
286
#endif
7 nishi 287
							for(j = 0; config.ports[j] != -1; j++)
288
								;
289
							config.ports[j] = port;
290
						}
123 nishi 291
					} else if(cm_strcaseequ(r[0], "HidePort")) {
292
						current->hideport = 1;
293
					} else if(cm_strcaseequ(r[0], "ShowPort")) {
294
						current->hideport = 0;
156 nishi 295
#ifndef NO_SSL
12 nishi 296
					} else if(cm_strcaseequ(r[0], "SSLKey")) {
297
						if(r[1] == NULL) {
298
							cm_log("Config", "Missing path at line %d", ln);
299
							stop = 1;
300
						} else {
301
							if(current->sslkey != NULL) free(current->sslkey);
302
							current->sslkey = cm_strdup(r[1]);
303
						}
304
					} else if(cm_strcaseequ(r[0], "SSLCertificate")) {
305
						if(r[1] == NULL) {
306
							cm_log("Config", "Missing path at line %d", ln);
307
							stop = 1;
308
						} else {
309
							if(current->sslcert != NULL) free(current->sslcert);
310
							current->sslcert = cm_strdup(r[1]);
311
						}
156 nishi 312
#endif
161 nishi 313
#ifdef HAS_CHROOT
314
					} else if(cm_strcaseequ(r[0], "ChrootDirectory")) {
315
						if(r[1] == NULL) {
316
							cm_log("Config", "Missing path at line %d", ln);
317
							stop = 1;
318
						} else {
319
							if(current->chroot_path != NULL) free(current->chroot_path);
320
							current->chroot_path = cm_strdup(r[1]);
321
						}
322
#endif
156 nishi 323
					} else if(cm_strcaseequ(r[0], "ForceLog")) {
324
						if(r[1] == NULL) {
325
							cm_log("Config", "Missing log at line %d", ln);
326
							stop = 1;
327
						} else {
328
							cm_force_log(r[1]);
329
						}
330
					} else if(cm_strcaseequ(r[0], "EndIf")) {
331
						if(ifbr == 0) {
332
							cm_log("Config", "Missing BeginIf at line %d", ln);
333
							stop = 1;
334
						}
335
						ifbr--;
336
					} else if(cm_strcaseequ(r[0], "BeginIf") || cm_strcaseequ(r[0], "BeginIfNot")) {
337
						if(r[1] == NULL) {
338
							cm_log("Config", "Missing condition type at line %d", ln);
339
						} else {
212 nishi 340
							bool ign = false;
156 nishi 341
							ifbr++;
342
							if(cm_strcaseequ(r[1], "False")) {
343
								ign = true;
344
							} else if(cm_strcaseequ(r[1], "True")) {
345
							} else if(cm_strcaseequ(r[1], "Defined")) {
346
								if(r[2] == NULL) {
347
									cm_log("Config", "Missing name at line %d", ln);
348
									stop = 1;
349
								} else {
350
									int i;
351
									bool fndit = false;
352
									for(i = 0; config.defined[i] != NULL; i++) {
353
										if(strcmp(config.defined[i], r[2]) == 0) {
354
											fndit = true;
355
											break;
356
										}
357
									}
358
									if(!fndit) {
359
										ign = true;
360
									}
361
								}
362
							} else {
363
								cm_log("Config", "Unknown condition type at line %d", ln);
364
								stop = 1;
365
							}
366
							if(cm_strcaseequ(r[0], "BeginIfNot")) ign = !ign;
367
							if(ign) {
368
								ignore = ifbr - 1;
369
							}
370
						}
61 nishi 371
					} else if(cm_strcaseequ(r[0], "ServerRoot")) {
372
						if(r[1] == NULL) {
373
							cm_log("Config", "Missing path at line %d", ln);
374
							stop = 1;
375
						} else {
376
							chdir(r[1]);
127 nishi 377
							free(config.server_root);
378
							config.server_root = cm_strdup(r[1]);
61 nishi 379
						}
128 nishi 380
					} else if(cm_strcaseequ(r[0], "ServerAdmin")) {
381
						if(r[1] == NULL) {
382
							cm_log("Config", "Missing email at line %d", ln);
383
							stop = 1;
384
						} else {
385
							free(config.server_admin);
386
							config.server_admin = cm_strdup(r[1]);
387
						}
19 nishi 388
					} else if(cm_strcaseequ(r[0], "DocumentRoot")) {
389
						if(r[1] == NULL) {
390
							cm_log("Config", "Missing path at line %d", ln);
391
							stop = 1;
392
						} else {
393
							if(current->root != NULL) free(current->root);
21 nishi 394
							current->root = cm_strdup(strcmp(r[1], "/") == 0 ? "" : r[1]);
19 nishi 395
						}
21 nishi 396
					} else if(cm_strcaseequ(r[0], "MIMEType")) {
397
						if(r[1] == NULL) {
398
							cm_log("Config", "Missing extension at line %d", ln);
399
							stop = 1;
22 nishi 400
						} else if(r[2] == NULL) {
21 nishi 401
							cm_log("Config", "Missing MIME at line %d", ln);
402
							stop = 1;
403
						} else {
404
							struct tw_mime_entry* e = &current->mimes[current->mime_count++];
405
							e->ext = cm_strdup(r[1]);
406
							e->mime = cm_strdup(r[2]);
407
						}
257 nishi 408
					} else if(cm_strcaseequ(r[0], "MIMEFile")) {
409
						if(r[1] == NULL) {
410
							cm_log("Config", "Missing path at line %d", ln);
411
							stop = 1;
412
						} else {
413
							FILE* mimefile = fopen(r[1], "r");
414
							if(mimefile == NULL) {
415
								cm_log("Config", "Could not load the file at line %d", ln);
416
								stop = 1;
417
							} else {
418
								char* line = malloc(1);
419
								int i;
420
								struct stat st;
421
								char* buf;
422
								int incr = 0;
423
								stat(r[1], &st);
424
 
425
								buf = malloc(st.st_size + 1);
426
								fread(buf, st.st_size, 1, mimefile);
427
 
428
								for(i = 0;; i++) {
429
									if(buf[i] == '\n' || buf[i] == 0) {
430
										char oldc = buf[i];
431
										char* line;
432
										buf[i] = 0;
433
 
434
										line = buf + incr;
435
 
436
										if(strlen(line) > 0 && line[0] != '#') {
437
											int j;
438
											for(j = 0; line[j] != 0; j++) {
439
												if(line[j] == ' ' || line[j] == '\t') {
440
													line[j] = 0;
441
													j++;
442
													for(; line[j] != 0; j++) {
443
														if(line[j] != ' ' && line[j] != '\t') {
444
															char* name = line;
445
															char* mimes = line + j;
446
															int k = 0;
447
															int incr2 = 0;
448
															for(k = 0;; k++) {
449
																if(mimes[k] == ' ' || mimes[k] == 0) {
450
																	char oldc2 = mimes[k];
451
																	struct tw_mime_entry* e;
452
																	mimes[k] = 0;
453
 
454
																	e = &current->mimes[current->mime_count++];
455
																	e->ext = cm_strcat(".", mimes + incr2);
456
																	e->mime = cm_strdup(name);
457
																	if(current->mime_count == MAX_MIME) {
458
																		cm_log("Config", "Too many MIME types, cannot handle");
459
																		stop = 1;
460
																		break;
461
																	}
462
 
463
																	incr2 = k + 1;
464
																	if(oldc2 == 0) break;
465
																}
466
															}
467
															break;
468
														}
469
													}
470
													break;
471
												}
472
												if(stop) break;
473
											}
474
										}
475
 
476
										incr = i + 1;
477
										if(oldc == 0) break;
478
									}
479
								}
480
 
481
								free(buf);
482
 
483
								fclose(mimefile);
484
							}
485
						}
22 nishi 486
					} else if(cm_strcaseequ(r[0], "Icon")) {
487
						if(r[1] == NULL) {
488
							cm_log("Config", "Missing MIME at line %d", ln);
489
							stop = 1;
490
						} else if(r[2] == NULL) {
491
							cm_log("Config", "Missing path at line %d", ln);
492
							stop = 1;
493
						} else {
494
							struct tw_icon_entry* e = &current->icons[current->icon_count++];
495
							e->mime = cm_strdup(r[1]);
496
							e->icon = cm_strdup(r[2]);
497
						}
17 nishi 498
					} else if(cm_strcaseequ(r[0], "LoadModule")) {
499
						for(i = 1; r[i] != NULL; i++) {
500
							void* mod = tw_module_load(r[i]);
501
							if(mod != NULL) {
18 nishi 502
								config.modules[config.module_count++] = mod;
17 nishi 503
								if(tw_module_init(mod) != 0) {
504
									stop = 1;
505
									break;
506
								}
507
							} else {
127 nishi 508
								cm_log("Config", "Could not load the module at line %d", ln);
17 nishi 509
								stop = 1;
510
								break;
511
							}
512
						}
24 nishi 513
					} else if(cm_strcaseequ(r[0], "DirectoryIndex")) {
514
						for(i = 1; r[i] != NULL; i++) {
515
							current->indexes[current->index_count++] = cm_strdup(r[i]);
516
						}
178 nishi 517
					} else if(cm_strcaseequ(r[0], "ReadmeFile") || cm_strcaseequ(r[0], "Readme")) {
182 nishi 518
						if(cm_strcaseequ(r[0], "Readme")) {
178 nishi 519
							cm_force_log("NOTE: Readme directive is deprecated.");
520
						}
33 nishi 521
						for(i = 1; r[i] != NULL; i++) {
522
							current->readmes[current->readme_count++] = cm_strdup(r[i]);
523
						}
6 nishi 524
					} else {
39 nishi 525
						stop = 1;
6 nishi 526
						if(r[0] != NULL) {
39 nishi 527
							int argc;
212 nishi 528
							int i;
529
							bool called = false;
530
							struct tw_tool tools;
39 nishi 531
							for(argc = 0; r[argc] != NULL; argc++)
532
								;
533
							stop = 0;
534
							tw_init_tools(&tools);
535
							for(i = 0; i < config.module_count; i++) {
536
								tw_mod_config_t mod_config = (tw_mod_config_t)tw_module_symbol(config.modules[i], "mod_config");
537
								int resp;
538
								if(mod_config != NULL && (resp = mod_config(&tools, r, argc)) == TW_CONFIG_PARSED) {
539
									called = true;
540
									break;
541
								}
542
								if(resp == TW_CONFIG_ERROR) {
543
									stop = 1;
544
									called = true;
545
									break;
546
								}
547
							}
548
							if(!called) {
549
								cm_log("Config", "Unknown directive `%s' at line %d", r[0], ln);
550
								stop = 1;
551
							}
6 nishi 552
						}
5 nishi 553
					}
554
					for(i = 0; r[i] != NULL; i++) free(r[i]);
555
					free(r);
4 nishi 556
				}
557
				free(l);
558
				free(line);
559
				line = malloc(1);
560
				line[0] = 0;
561
				if(c <= 0) break;
6 nishi 562
			} else if(cbuf[0] != '\r') {
4 nishi 563
				char* tmp = line;
564
				line = cm_strcat(tmp, cbuf);
565
				free(tmp);
566
			}
567
		}
568
		free(line);
569
		fclose(f);
255 nishi 570
		for(portcount = 0; config.ports[portcount] != -1; portcount++)
571
			;
572
		if(portcount == 0) {
253 nishi 573
			return 1;
255 nishi 574
		} else {
253 nishi 575
			return stop;
576
		}
6 nishi 577
	} else {
5 nishi 578
		cm_log("Config", "Could not open the file");
4 nishi 579
		return 1;
580
	}
581
}