[netwatch.git] / net / http / fs.c

/*
 * Copyright (c) 2001-2003 Swedish Institute of Computer Science.
 * All rights reserved. 
 * 
 * Redistribution and use in source and binary forms, with or without modification, 
 * are permitted provided that the following conditions are met:
 *
 * 1. Redistributions of source code must retain the above copyright notice,
 *    this list of conditions and the following disclaimer.
 * 2. Redistributions in binary form must reproduce the above copyright notice,
 *    this list of conditions and the following disclaimer in the documentation
 *    and/or other materials provided with the distribution.
 * 3. The name of the author may not be used to endorse or promote products
 *    derived from this software without specific prior written permission. 
 *
 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR IMPLIED 
 * WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF 
 * MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT 
 * SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, 
 * EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT 
 * OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS 
 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN 
 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING 
 * IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY 
 * OF SUCH DAMAGE.
 *
 * This file is part of the lwIP TCP/IP stack.
 * 
 * Author: Adam Dunkels <adam@sics.se>
 *
 */
#include "lwip/def.h"
#include "fs.h"
#include "fsdata.h"
#include "fsdata.c"
#include <io.h>
#include <minilib.h>
#include <paging.h>
#include <output.h>

static char http_output_buffer[1024];

/*-----------------------------------------------------------------------------------*/

void handle_regs(struct fs_file *file)
{
  file->len = snprintf(http_output_buffer, sizeof(http_output_buffer),
    "<html><head><title>Registers</title></head><body>"
    "<p>At the time you requested this page, the system's registers were:</p>"
    "<tt><pre>"
    "%%eax: 0x%08x    %%ebx: 0x%08x    %%ecx: 0x%08x    %%edx: 0x%08x\n"
    "%%ebp: 0x%08x    %%esi: 0x%08x    %%edi: 0x%08x    %%esp: 0x%08x\n"
    "%%cr0: 0x%08x    %%cr3: 0x%08x    %%eip: 0x%08x    %%eflags: 0x%08x\n"
    "</pre></tt></body></html>",
    *(unsigned long*)0xAFFD0,
    *(unsigned long*)0xAFFDC,
    *(unsigned long*)0xAFFD4,
    *(unsigned long*)0xAFFD8,
    *(unsigned long*)0xAFFE4,
    *(unsigned long*)0xAFFE8,
    *(unsigned long*)0xAFFEC,
    *(unsigned long*)0xAFFE0,
    *(unsigned long*)0xAFFFC,
    *(unsigned long*)0xAFFF8,
    *(unsigned long*)0xAFFF0,
    *(unsigned long*)0xAFFF4);
  
  file->data = http_output_buffer;
}

#define LEFT (sizeof(http_output_buffer) - len)

void handle_backtrace(struct fs_file *file)
{
  int i = 10;
  int len;
  unsigned long *pebp, *peip;
  unsigned long ebp;
  unsigned long cr3;

  char * buf = http_output_buffer;
  
  strcpy(buf, "<html><head><title>Backtrace</title></head><body><tt><pre>");
  len = strlen(buf);
  ebp = *(unsigned long *)0xAFFE4;
  cr3 = *(unsigned long *)0xAFFF8;
  
  len += snprintf(buf + len, LEFT, "0x%08x, from\n", *(unsigned long*)0xAFFF0);
  
  /* I never thought I'd do this again. */
  while ((peip = demap(cr3, ebp+4)) != 0x0 && i--)
  {
    len += snprintf(buf + len, LEFT, "0x%08x, from\n", *peip);

    pebp = demap(cr3, ebp);
    if (!pebp)
    {
      len += snprintf(buf + len, LEFT, "&lt;unreadable %ebp&gt;\n");
      break;
    }
    if (ebp >= *pebp && *pebp)
    {
      len += snprintf(buf + len, LEFT, "&lt;recursive %ebp&gt;\n");
      break;
    }
    ebp = *pebp;
  }

  if (i == -1)
    len += snprintf(buf + len, LEFT, "...\n");
  else
    len += snprintf(buf + len, LEFT, "&lt;root&gt;");

  len += snprintf(buf + len, LEFT, "</pre></tt></body></html>");
  
  file->data = buf;
  file->len = len;
}

void handle_reboot(struct fs_file *file)
{
  outb(0xCF9, 0x4);
  file->data = "So long!";
  file->len = 8;
}


/*-----------------------------------------------------------------------------------*/
int
fs_open(const char *name, struct fs_file *file)
{
  const struct fsdata_file *f;
  
  /* /registers.html is CGI */
  if (!strcmp(name, "/registers.html"))
  {
    handle_regs(file);
    return 1;
  }
  if (!strcmp(name, "/backtrace.html"))
  {
    handle_backtrace(file);
    return 1;
  }
  if (!strcmp(name, "/reboot"))
  {
    handle_reboot(file);
    return 1;
  }

  for(f = FS_ROOT;
      f != NULL;
      f = f->next) {
    if (!strcmp(name, (const char*)f->name)) {
      file->data = f->data;
      file->len = f->len-1;
      return 1;
    }
  }
  file->data = "You clown...";
  file->len = 9;
  return 0;
}
/*-----------------------------------------------------------------------------------*/
Commit	Line	Data
6f9272bd JW	1	/*
	2	* Copyright (c) 2001-2003 Swedish Institute of Computer Science.
	3	* All rights reserved.
	4	*
	5	* Redistribution and use in source and binary forms, with or without modification,
	6	* are permitted provided that the following conditions are met:
	7	*
	8	* 1. Redistributions of source code must retain the above copyright notice,
	9	* this list of conditions and the following disclaimer.
	10	* 2. Redistributions in binary form must reproduce the above copyright notice,
	11	* this list of conditions and the following disclaimer in the documentation
	12	* and/or other materials provided with the distribution.
	13	* 3. The name of the author may not be used to endorse or promote products
	14	* derived from this software without specific prior written permission.
	15	*
	16	* THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR IMPLIED
	17	* WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
	18	* MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT
	19	* SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
	20	* EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT
	21	* OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
	22	* INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
	23	* CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING
	24	* IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY
	25	* OF SUCH DAMAGE.
	26	*
	27	* This file is part of the lwIP TCP/IP stack.
	28	*
	29	* Author: Adam Dunkels <adam@sics.se>
	30	*
	31	*/
	32	#include "lwip/def.h"
	33	#include "fs.h"
	34	#include "fsdata.h"
	35	#include "fsdata.c"
923ea2c2	36	#include <io.h>
9343e933 JW	37	#include <minilib.h>
	38	#include <paging.h>
	39	#include <output.h>
6f9272bd	40
db9fad13 JAW	41	static char http_output_buffer[1024];
db9fad13 JAW	42
6f9272bd JW	43	/-----------------------------------------------------------------------------------/
6f9272bd JW	44
923ea2c2	45	void handle_regs(struct fs_file *file)
6f9272bd	46	{
db9fad13	47	file->len = snprintf(http_output_buffer, sizeof(http_output_buffer),
6f9272bd JW	48	"<html><head><title>Registers</title></head><body>"
	49	"<p>At the time you requested this page, the system's registers were:</p>"
	50	"<tt><pre>"
	51	"%%eax: 0x%08x %%ebx: 0x%08x %%ecx: 0x%08x %%edx: 0x%08x\n"
	52	"%%ebp: 0x%08x %%esi: 0x%08x %%edi: 0x%08x %%esp: 0x%08x\n"
	53	"%%cr0: 0x%08x %%cr3: 0x%08x %%eip: 0x%08x %%eflags: 0x%08x\n"
	54	"</pre></tt></body></html>",
	55	(unsigned long)0xAFFD0,
	56	(unsigned long)0xAFFDC,
	57	(unsigned long)0xAFFD4,
	58	(unsigned long)0xAFFD8,
	59	(unsigned long)0xAFFE4,
	60	(unsigned long)0xAFFE8,
	61	(unsigned long)0xAFFEC,
	62	(unsigned long)0xAFFE0,
	63	(unsigned long)0xAFFFC,
	64	(unsigned long)0xAFFF8,
	65	(unsigned long)0xAFFF0,
	66	(unsigned long)0xAFFF4);
6f9272bd	67
db9fad13	68	file->data = http_output_buffer;
923ea2c2 JW	69	}
923ea2c2 JW	70
db9fad13 JAW	71	#define LEFT (sizeof(http_output_buffer) - len)
db9fad13 JAW	72
9343e933 JW	73	void handle_backtrace(struct fs_file *file)
9343e933 JW	74	{
9343e933	75	int i = 10;
db9fad13	76	int len;
9343e933 JW	77	unsigned long pebp, peip;
	78	unsigned long ebp;
	79	unsigned long cr3;
db9fad13 JAW	80
db9fad13 JAW	81	char * buf = http_output_buffer;
9343e933 JW	82
9343e933 JW	83	strcpy(buf, "<html><head><title>Backtrace</title></head><body><tt><pre>");
db9fad13	84	len = strlen(buf);
9343e933 JW	85	ebp = (unsigned long )0xAFFE4;
	86	cr3 = (unsigned long )0xAFFF8;
	87
db9fad13	88	len += snprintf(buf + len, LEFT, "0x%08x, from\n", (unsigned long)0xAFFF0);
9343e933 JW	89
	90	/* I never thought I'd do this again. */
	91	while ((peip = demap(cr3, ebp+4)) != 0x0 && i--)
	92	{
db9fad13 JAW	93	len += snprintf(buf + len, LEFT, "0x%08x, from\n", *peip);
db9fad13 JAW	94
9343e933 JW	95	pebp = demap(cr3, ebp);
	96	if (!pebp)
	97	{
db9fad13	98	len += snprintf(buf + len, LEFT, "<unreadable %ebp>\n");
9343e933 JW	99	break;
	100	}
	101	if (ebp >= pebp && pebp)
	102	{
db9fad13	103	len += snprintf(buf + len, LEFT, "<recursive %ebp>\n");
9343e933 JW	104	break;
	105	}
	106	ebp = *pebp;
	107	}
db9fad13	108
9343e933	109	if (i == -1)
db9fad13	110	len += snprintf(buf + len, LEFT, "...\n");
9343e933	111	else
db9fad13 JAW	112	len += snprintf(buf + len, LEFT, "<root>");
	113
	114	len += snprintf(buf + len, LEFT, "</pre></tt></body></html>");
9343e933 JW	115
9343e933 JW	116	file->data = buf;
db9fad13	117	file->len = len;
9343e933 JW	118	}
9343e933 JW	119
923ea2c2 JW	120	void handle_reboot(struct fs_file *file)
	121	{
	122	outb(0xCF9, 0x4);
	123	file->data = "So long!";
	124	file->len = 8;
6f9272bd JW	125	}
	126
	127
	128	/-----------------------------------------------------------------------------------/
	129	int
	130	fs_open(const char name, struct fs_file file)
	131	{
	132	const struct fsdata_file *f;
	133
	134	/* /registers.html is CGI */
	135	if (!strcmp(name, "/registers.html"))
	136	{
923ea2c2 JW	137	handle_regs(file);
	138	return 1;
	139	}
9343e933 JW	140	if (!strcmp(name, "/backtrace.html"))
	141	{
	142	handle_backtrace(file);
	143	return 1;
	144	}
923ea2c2 JW	145	if (!strcmp(name, "/reboot"))
	146	{
	147	handle_reboot(file);
6f9272bd JW	148	return 1;
	149	}
	150
	151	for(f = FS_ROOT;
	152	f != NULL;
	153	f = f->next) {
	154	if (!strcmp(name, (const char*)f->name)) {
	155	file->data = f->data;
923ea2c2	156	file->len = f->len-1;
6f9272bd JW	157	return 1;
	158	}
	159	}
	160	file->data = "You clown...";
	161	file->len = 9;
	162	return 0;
	163	}
	164	/-----------------------------------------------------------------------------------/