Home | History | Annotate | Line # | Download | only in httpd
dir-index-bozo.c revision 1.2
      1 /*	$NetBSD: dir-index-bozo.c,v 1.2 2007/10/17 18:48:01 tls Exp $	*/
      2 
      3 /*	$eterna: dir-index-bozo.c,v 1.7 2006/05/17 08:18:44 mrg Exp $	*/
      4 
      5 /*
      6  * Copyright (c) 1997-2006 Matthew R. Green
      7  * All rights reserved.
      8  *
      9  * Redistribution and use in source and binary forms, with or without
     10  * modification, are permitted provided that the following conditions
     11  * are met:
     12  * 1. Redistributions of source code must retain the above copyright
     13  *    notice, this list of conditions and the following disclaimer.
     14  * 2. Redistributions in binary form must reproduce the above copyright
     15  *    notice, this list of conditions and the following disclaimer and
     16  *    dedication in the documentation and/or other materials provided
     17  *    with the distribution.
     18  * 3. The name of the author may not be used to endorse or promote products
     19  *    derived from this software without specific prior written permission.
     20  *
     21  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
     22  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
     23  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
     24  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
     25  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING,
     26  * BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
     27  * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED
     28  * AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
     29  * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     30  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     31  * SUCH DAMAGE.
     32  *
     33  */
     34 
     35 /* this code implements directory index generation for bozohttpd */
     36 
     37 #ifndef NO_DIRINDEX_SUPPORT
     38 
     39 #include <sys/param.h>
     40 
     41 #include <dirent.h>
     42 #include <errno.h>
     43 #include <string.h>
     44 #include <time.h>
     45 #include <assert.h>
     46 
     47 #include "bozohttpd.h"
     48 
     49 	int	Xflag;		/* do directory indexing */
     50 	int	Hflag;		/* hide .* */
     51 
     52 /*
     53  * output a directory index.  return 1 if it actually did something..
     54  */
     55 int
     56 directory_index(http_req *request, const char *dirname, int isindex)
     57 {
     58 	struct stat sb;
     59 	struct dirent *de;
     60 	struct tm *tm;
     61 	DIR *dp;
     62 	char buf[MAXPATHLEN];
     63 	char spacebuf[48];
     64 	int l, i;
     65 
     66 	dp = NULL;	/* XXX */
     67 
     68 	if (!isindex || !Xflag)
     69 		return 0;
     70 
     71 	if (strlen(dirname) <= strlen(index_html))
     72 		dirname = ".";
     73 	else {
     74 		char *file = bozostrdup(dirname);
     75 
     76 		file[strlen(file) - strlen(index_html)] = '\0';
     77 		dirname = file;
     78 	}
     79 	debug((DEBUG_FAT, "directory_index: dirname ``%s''", dirname));
     80 	if (stat(dirname, &sb) < 0 ||
     81 	    (dp = opendir(dirname)) == NULL) {
     82 		if (errno == EPERM)
     83 			http_error(403, request,
     84 			    "no permission to open directory");
     85 		else if (errno == ENOENT)
     86 			http_error(404, request, "no file");
     87 		else
     88 			http_error(500, request, "open directory");
     89 		/* NOTREACHED */
     90 	}
     91 
     92 	bozoprintf("%s 200 OK\r\n", request->hr_proto);
     93 
     94 	if (request->hr_proto != http_09) {
     95 		print_header(request, NULL, "text/html", "");
     96 		bozoprintf("\r\n");
     97 	}
     98 	bozoflush(stdout);
     99 
    100 	if (request->hr_method == HTTP_HEAD) {
    101 		closedir(dp);
    102 		return 1;
    103 	}
    104 
    105 	bozoprintf("<html><head><title>Index of %s</title></head>\r\n",
    106 	    request->hr_url);
    107 	bozoprintf("<body><h1>Index of %s</h1>\r\n", request->hr_url);
    108 	bozoprintf("<pre>\r\n");
    109 #define NAMELEN 40
    110 #define LMODLEN 19
    111 	bozoprintf("Name                                     "
    112 	    "Last modified          "
    113 	    "Size\n");
    114 	bozoprintf("<hr noshade align=\"left\" width=\"80%%\">\r\n\r\n");
    115 
    116 	while ((de = readdir(dp)) != NULL) {
    117 		int nostat = 0;
    118 		char *name = de->d_name;
    119 
    120 		if (strcmp(name, ".") == 0 ||
    121 		    (strcmp(name, "..") != 0 && Hflag && name[0] == '.'))
    122 			continue;
    123 
    124 		snprintf(buf, sizeof buf, "%s/%s", dirname, name);
    125 		if (stat(buf, &sb))
    126 			nostat = 1;
    127 
    128 		l = 0;
    129 
    130 		if (strcmp(name, "..") == 0) {
    131 			bozoprintf("<a href=\"../\">");
    132 			l += bozoprintf("Parent Directory");
    133 		} else if (S_ISDIR(sb.st_mode)) {
    134 			bozoprintf("<a href=\"%s/\">", name);
    135 			l += bozoprintf("%s/", name);
    136 		} else {
    137 			bozoprintf("<a href=\"%s\">", name);
    138 			l += bozoprintf("%s", name);
    139 		}
    140 		bozoprintf("</a>");
    141 
    142 		/* NAMELEN spaces */
    143 		assert(sizeof(spacebuf) > NAMELEN);
    144 		i = (l < NAMELEN) ? (NAMELEN - l) : 0;
    145 		i++;
    146 		memset(spacebuf, ' ', i);
    147 		spacebuf[i] = '\0';
    148 		bozoprintf(spacebuf);
    149 		l += i;
    150 
    151 		if (nostat)
    152 			bozoprintf("?                         ?");
    153 		else {
    154 			tm = gmtime(&sb.st_mtime);
    155 			strftime(buf, sizeof buf, "%d-%b-%Y %R", tm);
    156 			l += bozoprintf("%s", buf);
    157 
    158 			/* LMODLEN spaces */
    159 			assert(sizeof(spacebuf) > LMODLEN);
    160 			i = (l < (LMODLEN+NAMELEN+1)) ? ((LMODLEN+NAMELEN+1) - l) : 0;
    161 			i++;
    162 			memset(spacebuf, ' ', i);
    163 			spacebuf[i] = '\0';
    164 			bozoprintf(spacebuf);
    165 
    166 			bozoprintf("%7ukB",
    167 			    ((unsigned int)(sb.st_size >> 10)));
    168 		}
    169 		bozoprintf("\r\n");
    170 	}
    171 
    172 	closedir(dp);
    173 	bozoprintf("</pre><hr></body></html>\r\n");
    174 	bozoflush(stdout);
    175 
    176 	return 1;
    177 }
    178 #endif /* NO_DIRINDEX_SUPPORT */
    179