292 lines
7.5 KiB
C
292 lines
7.5 KiB
C
|
/*
|
||
|
|
* This is a quick and dirty HTTP server that uses PhysicsFS to retrieve
|
||
|
|
* files. It is not robust at all, probably buggy, and definitely poorly
|
||
|
|
* designed. It's just meant to show that it can be done.
|
||
|
|
*
|
||
|
|
* Basically, you compile this code, and run it:
|
||
|
|
* ./physfshttpd archive1.zip archive2.zip /path/to/a/real/dir etc...
|
||
|
|
*
|
||
|
|
* The files are appended in order to the PhysicsFS search path, and when
|
||
|
|
* a client request comes it, it looks for the file in said search path.
|
||
|
|
*
|
||
|
|
* My goal was to make this work in less than 300 lines of C, so again, it's
|
||
|
|
* not to be used for any serious purpose. Patches to make this application
|
||
|
|
* suck less will be readily and gratefully accepted.
|
||
|
|
*
|
||
|
|
* Command line I used to build this on Linux:
|
||
|
|
* gcc -Wall -Werror -g -o bin/physfshttpd extras/physfshttpd.c -lphysfs
|
||
|
|
*
|
||
|
|
* License: this code is public domain. I make no warranty that it is useful,
|
||
|
|
* correct, harmless, or environmentally safe.
|
||
|
|
*
|
||
|
|
* This particular file may be used however you like, including copying it
|
||
|
|
* verbatim into a closed-source project, exploiting it commercially, and
|
||
|
|
* removing any trace of my name from the source (although I hope you won't
|
||
|
|
* do that). I welcome enhancements and corrections to this file, but I do
|
||
|
|
* not require you to send me patches if you make changes. This code has
|
||
|
|
* NO WARRANTY.
|
||
|
|
*
|
||
|
|
* Unless otherwise stated, the rest of PhysicsFS falls under the zlib license.
|
||
|
|
* Please see LICENSE.txt in the root of the source tree.
|
||
|
|
*
|
||
|
|
* This file was written by Ryan C. Gordon. (icculus@icculus.org).
|
||
|
|
*/
|
||
|
|
|
||
|
|
#include <stdio.h>
|
||
|
|
#include <stdlib.h>
|
||
|
|
#include <string.h>
|
||
|
|
#include <unistd.h>
|
||
|
|
#include <errno.h>
|
||
|
|
#include <ctype.h>
|
||
|
|
#include <sys/types.h>
|
||
|
|
#include <sys/socket.h>
|
||
|
|
#include <netinet/in.h>
|
||
|
|
#include <arpa/inet.h>
|
||
|
|
|
||
|
|
#ifndef LACKING_SIGNALS
|
||
|
|
#include <signal.h>
|
||
|
|
#endif
|
||
|
|
|
||
|
|
#ifndef LACKING_PROTOENT
|
||
|
|
#include <netdb.h>
|
||
|
|
#endif
|
||
|
|
|
||
|
|
#include "physfs.h"
|
||
|
|
|
||
|
|
|
||
|
|
#define DEFAULT_PORTNUM 6667
|
||
|
|
|
||
|
|
typedef struct
|
||
|
|
{
|
||
|
|
int sock;
|
||
|
|
struct sockaddr *addr;
|
||
|
|
socklen_t addrlen;
|
||
|
|
} http_args;
|
||
|
|
|
||
|
|
|
||
|
|
static char *txt404 =
|
||
|
|
"HTTP/1.0 404 Not Found\n"
|
||
|
|
"Connection: close\n"
|
||
|
|
"Content-Type: text/html; charset=utf-8\n"
|
||
|
|
"\n"
|
||
|
|
"<html><head><title>404 Not Found</title></head>\n"
|
||
|
|
"<body>Can't find that.</body></html>\n\n";
|
||
|
|
|
||
|
|
|
||
|
|
static void feed_file_http(const char *ipstr, int sock, const char *fname)
|
||
|
|
{
|
||
|
|
PHYSFS_File *in = PHYSFS_openRead(fname);
|
||
|
|
char buffer[1024];
|
||
|
|
printf("%s: requested [%s].\n", ipstr, fname);
|
||
|
|
if (in == NULL)
|
||
|
|
{
|
||
|
|
printf("%s: Can't open [%s]: %s.\n",
|
||
|
|
ipstr, fname, PHYSFS_getLastError());
|
||
|
|
write(sock, txt404, strlen(txt404)); /* !!! FIXME: Check retval */
|
||
|
|
} /* if */
|
||
|
|
else
|
||
|
|
{
|
||
|
|
do
|
||
|
|
{
|
||
|
|
PHYSFS_sint64 br = PHYSFS_read(in, buffer, 1, sizeof (buffer));
|
||
|
|
if (br == -1)
|
||
|
|
{
|
||
|
|
printf("%s: Read error: %s.\n", ipstr, PHYSFS_getLastError());
|
||
|
|
break;
|
||
|
|
} /* if */
|
||
|
|
|
||
|
|
write(sock, buffer, (int) br); /* !!! FIXME: CHECK THIS RETVAL! */
|
||
|
|
} while (!PHYSFS_eof(in));
|
||
|
|
|
||
|
|
PHYSFS_close(in);
|
||
|
|
} /* else */
|
||
|
|
} /* feed_file_http */
|
||
|
|
|
||
|
|
|
||
|
|
static void *do_http(void *_args)
|
||
|
|
{
|
||
|
|
http_args *args = (http_args *) _args;
|
||
|
|
char ipstr[128];
|
||
|
|
char buffer[512];
|
||
|
|
char *ptr;
|
||
|
|
strncpy(ipstr, inet_ntoa(((struct sockaddr_in *) args->addr)->sin_addr),
|
||
|
|
sizeof (ipstr));
|
||
|
|
ipstr[sizeof (ipstr) - 1] = '\0';
|
||
|
|
|
||
|
|
printf("%s: connected.\n", ipstr);
|
||
|
|
read(args->sock, buffer, sizeof (buffer));
|
||
|
|
buffer[sizeof (buffer) - 1] = '\0';
|
||
|
|
ptr = strchr(buffer, '\n');
|
||
|
|
if (!ptr)
|
||
|
|
printf("%s: potentially bogus request.\n", ipstr);
|
||
|
|
else
|
||
|
|
{
|
||
|
|
*ptr = '\0';
|
||
|
|
ptr = strchr(buffer, '\r');
|
||
|
|
if (ptr != NULL)
|
||
|
|
*ptr = '\0';
|
||
|
|
|
||
|
|
if ((toupper(buffer[0]) == 'G') &&
|
||
|
|
(toupper(buffer[1]) == 'E') &&
|
||
|
|
(toupper(buffer[2]) == 'T') &&
|
||
|
|
(toupper(buffer[3]) == ' ') &&
|
||
|
|
(toupper(buffer[4]) == '/'))
|
||
|
|
{
|
||
|
|
ptr = strchr(buffer + 5, ' ');
|
||
|
|
if (ptr != NULL)
|
||
|
|
*ptr = '\0';
|
||
|
|
feed_file_http(ipstr, args->sock, buffer + 4);
|
||
|
|
} /* if */
|
||
|
|
} /* else */
|
||
|
|
|
||
|
|
/* !!! FIXME: Time the transfer. */
|
||
|
|
printf("%s: closing connection.\n", ipstr);
|
||
|
|
close(args->sock);
|
||
|
|
free(args->addr);
|
||
|
|
free(args);
|
||
|
|
return(NULL);
|
||
|
|
} /* do_http */
|
||
|
|
|
||
|
|
|
||
|
|
static void serve_http_request(int sock, struct sockaddr *addr,
|
||
|
|
socklen_t addrlen)
|
||
|
|
{
|
||
|
|
http_args *args = (http_args *) malloc(sizeof (http_args));
|
||
|
|
if (args == NULL)
|
||
|
|
{
|
||
|
|
printf("out of memory.\n");
|
||
|
|
return;
|
||
|
|
} /* if */
|
||
|
|
args->addr = (struct sockaddr *) malloc(addrlen);
|
||
|
|
if (args->addr == NULL)
|
||
|
|
{
|
||
|
|
free(args);
|
||
|
|
printf("out of memory.\n");
|
||
|
|
return;
|
||
|
|
} /* if */
|
||
|
|
|
||
|
|
args->sock = sock;
|
||
|
|
args->addrlen = addrlen;
|
||
|
|
memcpy(args->addr, addr, addrlen);
|
||
|
|
|
||
|
|
/* !!! FIXME: optionally spin a thread... */
|
||
|
|
do_http((void *) args);
|
||
|
|
} /* server_http_request */
|
||
|
|
|
||
|
|
|
||
|
|
static int create_listen_socket(short portnum)
|
||
|
|
{
|
||
|
|
int retval = -1;
|
||
|
|
int protocol = 0; /* pray this is right. */
|
||
|
|
|
||
|
|
#ifndef LACKING_PROTOENT
|
||
|
|
struct protoent *prot;
|
||
|
|
setprotoent(0);
|
||
|
|
prot = getprotobyname("tcp");
|
||
|
|
if (prot != NULL)
|
||
|
|
protocol = prot->p_proto;
|
||
|
|
#endif
|
||
|
|
|
||
|
|
retval = socket(PF_INET, SOCK_STREAM, protocol);
|
||
|
|
if (retval >= 0)
|
||
|
|
{
|
||
|
|
struct sockaddr_in addr;
|
||
|
|
addr.sin_family = AF_INET;
|
||
|
|
addr.sin_port = htons(portnum);
|
||
|
|
addr.sin_addr.s_addr = INADDR_ANY;
|
||
|
|
if ((bind(retval, &addr, (socklen_t) sizeof (addr)) == -1) ||
|
||
|
|
(listen(retval, 5) == -1))
|
||
|
|
{
|
||
|
|
close(retval);
|
||
|
|
retval = -1;
|
||
|
|
} /* if */
|
||
|
|
} /* if */
|
||
|
|
|
||
|
|
return(retval);
|
||
|
|
} /* create_listen_socket */
|
||
|
|
|
||
|
|
|
||
|
|
static int listensocket = -1;
|
||
|
|
|
||
|
|
void at_exit_cleanup(void)
|
||
|
|
{
|
||
|
|
/*
|
||
|
|
* !!! FIXME: If thread support, signal threads to terminate and
|
||
|
|
* !!! FIXME: wait for them to clean up.
|
||
|
|
*/
|
||
|
|
|
||
|
|
if (listensocket >= 0)
|
||
|
|
close(listensocket);
|
||
|
|
|
||
|
|
if (!PHYSFS_deinit())
|
||
|
|
printf("PHYSFS_deinit() failed: %s\n", PHYSFS_getLastError());
|
||
|
|
} /* at_exit_cleanup */
|
||
|
|
|
||
|
|
|
||
|
|
int main(int argc, char **argv)
|
||
|
|
{
|
||
|
|
int i;
|
||
|
|
int portnum = DEFAULT_PORTNUM;
|
||
|
|
|
||
|
|
setbuf(stdout, NULL);
|
||
|
|
setbuf(stderr, NULL);
|
||
|
|
|
||
|
|
#ifndef LACKING_SIGNALS
|
||
|
|
/* I'm not sure if this qualifies as a cheap trick... */
|
||
|
|
signal(SIGTERM, exit);
|
||
|
|
signal(SIGINT, exit);
|
||
|
|
signal(SIGFPE, exit);
|
||
|
|
signal(SIGSEGV, exit);
|
||
|
|
signal(SIGPIPE, exit);
|
||
|
|
signal(SIGILL, exit);
|
||
|
|
#endif
|
||
|
|
|
||
|
|
if (argc == 1)
|
||
|
|
{
|
||
|
|
printf("USAGE: %s <archive1> [archive2 [... archiveN]]\n", argv[0]);
|
||
|
|
return(42);
|
||
|
|
} /* if */
|
||
|
|
|
||
|
|
if (!PHYSFS_init(argv[0]))
|
||
|
|
{
|
||
|
|
printf("PHYSFS_init() failed: %s\n", PHYSFS_getLastError());
|
||
|
|
return(42);
|
||
|
|
} /* if */
|
||
|
|
|
||
|
|
/* normally, this is bad practice, but oh well. */
|
||
|
|
atexit(at_exit_cleanup);
|
||
|
|
|
||
|
|
for (i = 1; i < argc; i++)
|
||
|
|
{
|
||
|
|
if (!PHYSFS_addToSearchPath(argv[i], 1))
|
||
|
|
printf(" WARNING: failed to add [%s] to search path.\n", argv[i]);
|
||
|
|
} /* else */
|
||
|
|
|
||
|
|
listensocket = create_listen_socket(portnum);
|
||
|
|
if (listensocket < 0)
|
||
|
|
{
|
||
|
|
printf("listen socket failed to create.\n");
|
||
|
|
return(42);
|
||
|
|
} /* if */
|
||
|
|
|
||
|
|
while (1) /* infinite loop for now. */
|
||
|
|
{
|
||
|
|
struct sockaddr addr;
|
||
|
|
socklen_t len;
|
||
|
|
int s = accept(listensocket, &addr, &len);
|
||
|
|
if (s < 0)
|
||
|
|
{
|
||
|
|
printf("accept() failed: %s\n", strerror(errno));
|
||
|
|
close(listensocket);
|
||
|
|
return(42);
|
||
|
|
} /* if */
|
||
|
|
|
||
|
|
serve_http_request(s, &addr, len);
|
||
|
|
} /* while */
|
||
|
|
|
||
|
|
return(0);
|
||
|
|
} /* main */
|
||
|
|
|
||
|
|
/* end of physfshttpd.c ... */
|
||
|
|
|