config.c@ 182

Visit:

Last change on this file since 182 was 182, checked in by Nishi, on Sep 27, 2024 at 9:55:12 PM
psp
Property svn:keywords set to `Id`
File size: 13.0 KB

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

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

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

Download in other formats: