config.c@ 318

Visit:

Last change on this file since 318 was 318, checked in by Nishi, on Oct 14, 2024 at 9:25:36 PM
fix
Property svn:keywords set to `Id`
File size: 16.0 KB

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

Note: See TracBrowser for help on using the repository browser.

source: Main/trunk/Server/config.c@ 318

Download in other formats: