mirror of https://github.com/nealey/eris.git
56 lines
1.4 KiB
C
56 lines
1.4 KiB
C
|
#include <stdlib.h>
|
||
|
|
#include <write12.h>
|
||
|
|
|
||
|
|
int main() {
|
||
|
|
char* method=getenv("REQUEST_METHOD");
|
||
|
|
if (!method) {
|
||
|
|
__write1("Content-Type: text/plain\r\n\r\nFatal: $REQUEST_METHOD not set!\n");
|
||
|
|
return 1;
|
||
|
|
}
|
||
|
|
if (!strcmp(method,"GET")) {
|
||
|
|
char* c=getenv("QUERY_STRING");
|
||
|
|
__write1("Content-Type: text/plain\r\n\r\n");
|
||
|
|
if (c)
|
||
|
|
write(1,c,strlen(c));
|
||
|
|
else {
|
||
|
|
__write1("Fatal: $QUERY_STRING not set!\n");
|
||
|
|
return 1;
|
||
|
|
}
|
||
|
|
} else if (!strcmp(method,"POST")) {
|
||
|
|
char* c=getenv("CONTENT_TYPE");
|
||
|
|
char* d=getenv("CONTENT_LENGTH");
|
||
|
|
int l;
|
||
|
|
if (!c) {
|
||
|
|
__write1("Content-Type: text/plain\r\n\r\nFatal: $CONTENT_TYPE not set!\n");
|
||
|
|
return 1;
|
||
|
|
}
|
||
|
|
if (!d) {
|
||
|
|
__write1("Content-Type: text/plain\r\n\r\nFatal: $CONTENT_LENGTH not set!\n");
|
||
|
|
return 1;
|
||
|
|
}
|
||
|
|
{
|
||
|
|
char* e;
|
||
|
|
l=strtoul(d,&e,10);
|
||
|
|
if (e==d || *e) {
|
||
|
|
__write1("Content-Type: text/plain\r\n\r\nFatal: $CONTENT_LENGTH not a number: ");
|
||
|
|
__write1(d);
|
||
|
|
__write1("\n");
|
||
|
|
return 1;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
__write1("Content-Type: "); __write1(c); __write1("\r\n");
|
||
|
|
__write1("Content-Length: "); __write1(d); __write1("\r\n\r\n");
|
||
|
|
while (l>0) {
|
||
|
|
char buf[2048];
|
||
|
|
int r;
|
||
|
|
r=read(0,buf,sizeof(buf));
|
||
|
|
if (r==-1) return 1;
|
||
|
|
if (r==0) break;
|
||
|
|
l-=r;
|
||
|
|
write(1,buf,r);
|
||
|
|
}
|
||
|
|
} else {
|
||
|
|
puts("Content-Type: text/plain\r\n\r\nFatal: $REQUEST_METHOD is neither GET nor POST!\n");
|
||
|
|
}
|
||
|
|
}
|