[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>

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

void handle_regs(struct fs_file *file)
{
  static char buf[2048];
  
  sprintf(buf,
    "<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 = buf;
  file->len = strlen(buf)-1;
}

void handle_backtrace(struct fs_file *file)
{
  static char buf[2048];
  static char buf2[64];
  int i = 10;
  unsigned long *pebp, *peip;
  unsigned long ebp;
  unsigned long cr3;
  
  strcpy(buf, "<html><head><title>Backtrace</title></head><body><tt><pre>");
  ebp = *(unsigned long *)0xAFFE4;
  cr3 = *(unsigned long *)0xAFFF8;
  
  sprintf(buf2, "0x%08x, from\n", *(unsigned long*)0xAFFF0);
  strcat(buf, buf2);
  
  /* I never thought I'd do this again. */
  while ((peip = demap(cr3, ebp+4)) != 0x0 && i--)
  {
    sprintf(buf2, "0x%08x, from\n", *peip);
    strcat(buf, buf2);
    pebp = demap(cr3, ebp);
    if (!pebp)
    {
      strcat(buf, "&lt;unreadable %ebp&gt;\n");
      break;
    }
    if (ebp >= *pebp && *pebp)
    {
      strcat(buf, "&lt;recursive %ebp&gt;\n");
      break;
    }
    ebp = *pebp;
  }
  if (i == -1)
    strcat(buf, "...\n");
  else
    strcat(buf, "&lt;root&gt;");
  strcat(buf, "</pre></tt></body></html>");
  
  file->data = buf;
  file->len = strlen(buf)-1;
}

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 JW	40
	41	/-----------------------------------------------------------------------------------/
	42
923ea2c2	43	void handle_regs(struct fs_file *file)
6f9272bd	44	{
8ba7e5b2	45	static char buf[2048];
6f9272bd JW	46
	47	sprintf(buf,
	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);
	67
	68
	69	file->data = buf;
923ea2c2 JW	70	file->len = strlen(buf)-1;
	71	}
	72
9343e933 JW	73	void handle_backtrace(struct fs_file *file)
9343e933 JW	74	{
8ba7e5b2 JP	75	static char buf[2048];
8ba7e5b2 JP	76	static char buf2[64];
9343e933 JW	77	int i = 10;
	78	unsigned long pebp, peip;
	79	unsigned long ebp;
	80	unsigned long cr3;
	81
	82	strcpy(buf, "<html><head><title>Backtrace</title></head><body><tt><pre>");
	83	ebp = (unsigned long )0xAFFE4;
	84	cr3 = (unsigned long )0xAFFF8;
	85
	86	sprintf(buf2, "0x%08x, from\n", (unsigned long)0xAFFF0);
	87	strcat(buf, buf2);
	88
	89	/* I never thought I'd do this again. */
	90	while ((peip = demap(cr3, ebp+4)) != 0x0 && i--)
	91	{
	92	sprintf(buf2, "0x%08x, from\n", *peip);
	93	strcat(buf, buf2);
	94	pebp = demap(cr3, ebp);
	95	if (!pebp)
	96	{
	97	strcat(buf, "<unreadable %ebp>\n");
	98	break;
	99	}
	100	if (ebp >= pebp && pebp)
	101	{
	102	strcat(buf, "<recursive %ebp>\n");
	103	break;
	104	}
	105	ebp = *pebp;
	106	}
	107	if (i == -1)
	108	strcat(buf, "...\n");
	109	else
	110	strcat(buf, "<root>");
	111	strcat(buf, "</pre></tt></body></html>");
	112
	113	file->data = buf;
	114	file->len = strlen(buf)-1;
	115	}
	116
923ea2c2 JW	117	void handle_reboot(struct fs_file *file)
	118	{
	119	outb(0xCF9, 0x4);
	120	file->data = "So long!";
	121	file->len = 8;
6f9272bd JW	122	}
	123
	124
	125	/-----------------------------------------------------------------------------------/
	126	int
	127	fs_open(const char name, struct fs_file file)
	128	{
	129	const struct fsdata_file *f;
	130
	131	/* /registers.html is CGI */
	132	if (!strcmp(name, "/registers.html"))
	133	{
923ea2c2 JW	134	handle_regs(file);
	135	return 1;
	136	}
9343e933 JW	137	if (!strcmp(name, "/backtrace.html"))
	138	{
	139	handle_backtrace(file);
	140	return 1;
	141	}
923ea2c2 JW	142	if (!strcmp(name, "/reboot"))
	143	{
	144	handle_reboot(file);
6f9272bd JW	145	return 1;
	146	}
	147
	148	for(f = FS_ROOT;
	149	f != NULL;
	150	f = f->next) {
	151	if (!strcmp(name, (const char*)f->name)) {
	152	file->data = f->data;
923ea2c2	153	file->len = f->len-1;
6f9272bd JW	154	return 1;
	155	}
	156	}
	157	file->data = "You clown...";
	158	file->len = 9;
	159	return 0;
	160	}
	161	/-----------------------------------------------------------------------------------/