Home | History | Annotate | Line # | Download | only in httpd
dir-index-bozo.c revision 1.25.14.3
      1  1.25.14.3  pgoyette /*	$NetBSD: dir-index-bozo.c,v 1.25.14.3 2019/01/18 08:50:11 pgoyette Exp $	*/
      2        1.2       tls 
      3       1.13       mrg /*	$eterna: dir-index-bozo.c,v 1.20 2011/11/18 09:21:15 mrg Exp $	*/
      4        1.1       tls 
      5        1.1       tls /*
      6  1.25.14.1  pgoyette  * Copyright (c) 1997-2018 Matthew R. Green
      7        1.1       tls  * All rights reserved.
      8        1.1       tls  *
      9        1.1       tls  * Redistribution and use in source and binary forms, with or without
     10        1.1       tls  * modification, are permitted provided that the following conditions
     11        1.1       tls  * are met:
     12        1.1       tls  * 1. Redistributions of source code must retain the above copyright
     13        1.1       tls  *    notice, this list of conditions and the following disclaimer.
     14        1.1       tls  * 2. Redistributions in binary form must reproduce the above copyright
     15        1.1       tls  *    notice, this list of conditions and the following disclaimer and
     16        1.1       tls  *    dedication in the documentation and/or other materials provided
     17        1.1       tls  *    with the distribution.
     18        1.1       tls  *
     19        1.1       tls  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
     20        1.1       tls  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
     21        1.1       tls  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
     22        1.1       tls  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
     23        1.1       tls  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING,
     24        1.1       tls  * BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
     25        1.1       tls  * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED
     26        1.1       tls  * AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
     27        1.1       tls  * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     28        1.1       tls  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     29        1.1       tls  * SUCH DAMAGE.
     30        1.1       tls  *
     31        1.1       tls  */
     32        1.1       tls 
     33        1.1       tls /* this code implements directory index generation for bozohttpd */
     34        1.1       tls 
     35        1.1       tls #ifndef NO_DIRINDEX_SUPPORT
     36        1.1       tls 
     37        1.1       tls #include <sys/param.h>
     38        1.1       tls 
     39        1.1       tls #include <dirent.h>
     40        1.1       tls #include <errno.h>
     41        1.1       tls #include <string.h>
     42        1.6       mrg #include <stdlib.h>
     43        1.1       tls #include <time.h>
     44        1.1       tls #include <assert.h>
     45        1.1       tls 
     46        1.1       tls #include "bozohttpd.h"
     47        1.1       tls 
     48        1.1       tls /*
     49        1.1       tls  * output a directory index.  return 1 if it actually did something..
     50        1.1       tls  */
     51        1.1       tls int
     52       1.21       mrg bozo_dir_index(bozo_httpreq_t *request, const char *dirpath, int isindex)
     53        1.1       tls {
     54        1.8       mrg 	bozohttpd_t *httpd = request->hr_httpd;
     55        1.1       tls 	struct stat sb;
     56       1.10    dogcow 	struct dirent **de, **deo;
     57        1.1       tls 	DIR *dp;
     58        1.1       tls 	char buf[MAXPATHLEN];
     59  1.25.14.3  pgoyette 	char *file = NULL, *printname = NULL, *p;
     60  1.25.14.3  pgoyette 	int k, j;
     61        1.1       tls 
     62        1.8       mrg 	if (!isindex || !httpd->dir_indexing)
     63        1.1       tls 		return 0;
     64        1.1       tls 
     65       1.21       mrg 	if (strlen(dirpath) <= strlen(httpd->index_html))
     66       1.21       mrg 		dirpath = ".";
     67        1.1       tls 	else {
     68       1.23       mrg 		file = bozostrdup(httpd, request, dirpath);
     69        1.1       tls 
     70        1.8       mrg 		file[strlen(file) - strlen(httpd->index_html)] = '\0';
     71       1.21       mrg 		dirpath = file;
     72        1.1       tls 	}
     73  1.25.14.1  pgoyette 	debug((httpd, DEBUG_FAT, "bozo_dir_index: dirpath '%s'", dirpath));
     74       1.21       mrg 	if (stat(dirpath, &sb) < 0 ||
     75       1.21       mrg 	    (dp = opendir(dirpath)) == NULL) {
     76        1.1       tls 		if (errno == EPERM)
     77  1.25.14.1  pgoyette 			bozo_http_error(httpd, 403, request,
     78  1.25.14.1  pgoyette 					"no permission to open directory");
     79        1.1       tls 		else if (errno == ENOENT)
     80  1.25.14.1  pgoyette 			bozo_http_error(httpd, 404, request, "no file");
     81        1.1       tls 		else
     82  1.25.14.1  pgoyette 			bozo_http_error(httpd, 500, request, "open directory");
     83        1.6       mrg 		goto done;
     84        1.1       tls 		/* NOTREACHED */
     85        1.1       tls 	}
     86        1.1       tls 
     87        1.8       mrg 	bozo_printf(httpd, "%s 200 OK\r\n", request->hr_proto);
     88        1.1       tls 
     89        1.8       mrg 	if (request->hr_proto != httpd->consts.http_09) {
     90        1.8       mrg 		bozo_print_header(request, NULL, "text/html", "");
     91        1.8       mrg 		bozo_printf(httpd, "\r\n");
     92        1.1       tls 	}
     93        1.8       mrg 	bozo_flush(httpd, stdout);
     94        1.1       tls 
     95        1.1       tls 	if (request->hr_method == HTTP_HEAD) {
     96        1.1       tls 		closedir(dp);
     97        1.6       mrg 		goto done;
     98        1.1       tls 	}
     99        1.1       tls 
    100       1.22       shm #ifndef NO_USER_SUPPORT
    101       1.22       shm 	if (request->hr_user) {
    102       1.25       mrg 		bozoasprintf(httpd, &printname, "~%s/%s",
    103       1.25       mrg 			     request->hr_user, request->hr_file);
    104       1.22       shm 	} else
    105       1.23       mrg 		printname = bozostrdup(httpd, request, request->hr_file);
    106       1.22       shm #else
    107       1.23       mrg 	printname = bozostrdup(httpd, request, request->hr_file);
    108       1.22       shm #endif /* !NO_USER_SUPPORT */
    109  1.25.14.3  pgoyette 	if ((p = strstr(printname, httpd->index_html)) != NULL) {
    110  1.25.14.3  pgoyette 		if (strcmp(printname, httpd->index_html) == 0)
    111  1.25.14.3  pgoyette 			strcpy(printname, "/");	/* is ``slashdir'' */
    112  1.25.14.3  pgoyette 		else
    113  1.25.14.3  pgoyette 			*p = '\0';		/* strip unwanted ``index_html'' */
    114  1.25.14.3  pgoyette 	}
    115  1.25.14.3  pgoyette 	if ((p = bozo_escape_html(httpd, printname)) != NULL) {
    116  1.25.14.3  pgoyette 		free(printname);
    117  1.25.14.3  pgoyette 		printname = p;
    118  1.25.14.3  pgoyette 	}
    119       1.22       shm 
    120  1.25.14.3  pgoyette 	bozo_printf(httpd,
    121  1.25.14.3  pgoyette 		"<!DOCTYPE html>\r\n"
    122  1.25.14.3  pgoyette 		"<html><head><meta charset=\"utf-8\"/>\r\n"
    123  1.25.14.3  pgoyette 		"<style type=\"text/css\">\r\n"
    124  1.25.14.3  pgoyette 		"table {\r\n"
    125  1.25.14.3  pgoyette 		"\tborder-top: 1px solid black;\r\n"
    126  1.25.14.3  pgoyette 		"\tborder-bottom: 1px solid black;\r\n"
    127  1.25.14.3  pgoyette 		"}\r\n"
    128  1.25.14.3  pgoyette 		"th { background: aquamarine; }\r\n"
    129  1.25.14.3  pgoyette 		"tr:nth-child(even) { background: lavender; }\r\n"
    130  1.25.14.3  pgoyette 		"</style>\r\n");
    131  1.25.14.2  pgoyette 	bozo_printf(httpd, "<title>Index of %s</title></head>\r\n",
    132       1.22       shm 		printname);
    133        1.8       mrg 	bozo_printf(httpd, "<body><h1>Index of %s</h1>\r\n",
    134       1.22       shm 		printname);
    135  1.25.14.3  pgoyette 	bozo_printf(httpd,
    136  1.25.14.3  pgoyette 		"<table cols=3>\r\n<thead>\r\n"
    137  1.25.14.3  pgoyette 		"<tr><th>Name<th>Last modified<th align=right>Size\r\n"
    138  1.25.14.3  pgoyette 		"<tbody>\r\n");
    139        1.1       tls 
    140  1.25.14.3  pgoyette 	for (j = k = scandir(dirpath, &de, NULL, alphasort), deo = de;
    141  1.25.14.3  pgoyette 	    j--; de++) {
    142        1.1       tls 		int nostat = 0;
    143        1.9    dogcow 		char *name = (*de)->d_name;
    144       1.16       mrg 		char *urlname, *htmlname;
    145        1.1       tls 
    146        1.9    dogcow 		if (strcmp(name, ".") == 0 ||
    147        1.8       mrg 		    (strcmp(name, "..") != 0 &&
    148        1.8       mrg 		     httpd->hide_dots && name[0] == '.'))
    149        1.1       tls 			continue;
    150        1.1       tls 
    151       1.21       mrg 		snprintf(buf, sizeof buf, "%s/%s", dirpath, name);
    152        1.1       tls 		if (stat(buf, &sb))
    153        1.1       tls 			nostat = 1;
    154        1.1       tls 
    155       1.22       shm 		urlname = bozo_escape_rfc3986(httpd, name, 0);
    156       1.16       mrg 		htmlname = bozo_escape_html(httpd, name);
    157       1.16       mrg 		if (htmlname == NULL)
    158       1.16       mrg 			htmlname = name;
    159  1.25.14.3  pgoyette 		bozo_printf(httpd, "<tr><td>");
    160        1.1       tls 		if (strcmp(name, "..") == 0) {
    161        1.8       mrg 			bozo_printf(httpd, "<a href=\"../\">");
    162  1.25.14.2  pgoyette 			bozo_printf(httpd, "Parent Directory");
    163  1.25.14.1  pgoyette 		} else if (!nostat && S_ISDIR(sb.st_mode)) {
    164       1.15       mrg 			bozo_printf(httpd, "<a href=\"%s/\">", urlname);
    165  1.25.14.2  pgoyette 			bozo_printf(httpd, "%s/", htmlname);
    166       1.12      reed 		} else if (strchr(name, ':') != NULL) {
    167       1.12      reed 			/* RFC 3986 4.2 */
    168       1.15       mrg 			bozo_printf(httpd, "<a href=\"./%s\">", urlname);
    169  1.25.14.2  pgoyette 			bozo_printf(httpd, "%s", htmlname);
    170        1.1       tls 		} else {
    171       1.15       mrg 			bozo_printf(httpd, "<a href=\"%s\">", urlname);
    172  1.25.14.2  pgoyette 			bozo_printf(httpd, "%s", htmlname);
    173        1.1       tls 		}
    174       1.16       mrg 		if (htmlname != name)
    175       1.16       mrg 			free(htmlname);
    176        1.8       mrg 		bozo_printf(httpd, "</a>");
    177        1.1       tls 
    178        1.1       tls 		if (nostat)
    179  1.25.14.2  pgoyette 			bozo_printf(httpd, "<td>?<td>?\r\n");
    180        1.1       tls 		else {
    181  1.25.14.1  pgoyette 			unsigned long long len;
    182  1.25.14.1  pgoyette 
    183  1.25.14.2  pgoyette 			strftime(buf, sizeof buf, "%d-%b-%Y %R", gmtime(&sb.st_mtime));
    184  1.25.14.2  pgoyette 			bozo_printf(httpd, "<td>%s", buf);
    185        1.1       tls 
    186  1.25.14.2  pgoyette 			len = ((unsigned long long)sb.st_size + 1023) / 1024;
    187  1.25.14.2  pgoyette 			bozo_printf(httpd, "<td align=right>%llukB", len);
    188        1.1       tls 		}
    189        1.8       mrg 		bozo_printf(httpd, "\r\n");
    190        1.1       tls 	}
    191        1.1       tls 
    192        1.1       tls 	closedir(dp);
    193       1.10    dogcow 	while (k--)
    194       1.10    dogcow         	free(deo[k]);
    195       1.10    dogcow 	free(deo);
    196  1.25.14.2  pgoyette 	bozo_printf(httpd, "</table>\r\n");
    197        1.8       mrg 	bozo_printf(httpd, "</body></html>\r\n\r\n");
    198        1.8       mrg 	bozo_flush(httpd, stdout);
    199        1.9    dogcow 
    200        1.6       mrg done:
    201       1.18   mbalmer 	free(file);
    202       1.22       shm 	free(printname);
    203        1.1       tls 	return 1;
    204        1.1       tls }
    205        1.1       tls #endif /* NO_DIRINDEX_SUPPORT */
    206