123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292 |
- /*
- * 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 ... */
|