net/http/fs.c

   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"
  36 #include <io.h>
  37 #include <minilib.h>
  38 #include <paging.h>
  39 #include <output.h>
  40
  41 static char http_output_buffer[1024];
  42
  43 /*-----------------------------------------------------------------------------------*/
  44
  45 void handle_regs(struct fs_file *file)
  46 {
  47   file->len = snprintf(http_output_buffer, sizeof(http_output_buffer),
  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   file->data = http_output_buffer;
  69 }
  70
  71 #define LEFT (sizeof(http_output_buffer) - len)
  72
  73 void handle_backtrace(struct fs_file *file)
  74 {
  75   int i = 10;
  76   int len;
  77   unsigned long *pebp, *peip;
  78   unsigned long ebp;
  79   unsigned long cr3;
  80
  81   char * buf = http_output_buffer;
  82
  83   strcpy(buf, "<html><head><title>Backtrace</title></head><body><tt><pre>");
  84   len = strlen(buf);
  85   ebp = *(unsigned long *)0xAFFE4;
  86   cr3 = *(unsigned long *)0xAFFF8;
  87
  88   len += snprintf(buf + len, LEFT, "0x%08x, from\n", *(unsigned long*)0xAFFF0);
  89
  90   /* I never thought I'd do this again. */
  91   while ((peip = demap(cr3, ebp+4)) != 0x0 && i--)
  92   {
  93     len += snprintf(buf + len, LEFT, "0x%08x, from\n", *peip);
  94
  95     pebp = demap(cr3, ebp);
  96     if (!pebp)
  97     {
  98       len += snprintf(buf + len, LEFT, "&lt;unreadable %ebp&gt;\n");
  99       break;
 100     }
 101     if (ebp >= *pebp && *pebp)
 102     {
 103       len += snprintf(buf + len, LEFT, "&lt;recursive %ebp&gt;\n");
 104       break;
 105     }
 106     ebp = *pebp;
 107   }
 108
 109   if (i == -1)
 110     len += snprintf(buf + len, LEFT, "...\n");
 111   else
 112     len += snprintf(buf + len, LEFT, "&lt;root&gt;");
 113
 114   len += snprintf(buf + len, LEFT, "</pre></tt></body></html>");
 115
 116   file->data = buf;
 117   file->len = len;
 118 }
 119
 120 void handle_reboot(struct fs_file *file)
 121 {
 122   outb(0xCF9, 0x4);
 123   file->data = "So long!";
 124   file->len = 8;
 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   {
 137     handle_regs(file);
 138     return 1;
 139   }
 140   if (!strcmp(name, "/backtrace.html"))
 141   {
 142     handle_backtrace(file);
 143     return 1;
 144   }
 145   if (!strcmp(name, "/reboot"))
 146   {
 147     handle_reboot(file);
 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;
 156       file->len = f->len-1;
 157       return 1;
 158     }
 159   }
 160   file->data = "You clown...";
 161   file->len = 9;
 162   return 0;
 163 }
 164 /*-----------------------------------------------------------------------------------*/