freeswitch/libs/xmlrpc-c/lib/abyss/src/main.c

253 lines
5.6 KiB
C

/******************************************************************************
**
** main.c
**
** This file is part of the ABYSS Web server project.
**
** Copyright (C) 2000 by Moez Mahfoudh <mmoez@bigfoot.com>.
** 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 AND CONTRIBUTORS ``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 OR CONTRIBUTORS 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.
**
******************************************************************************/
#include <stdio.h>
#include <stdlib.h>
#include <time.h>
#include <fcntl.h>
#ifdef WIN32
#include <io.h>
#endif /* WIN32 */
#ifdef _UNIX
#include <signal.h>
#include <sys/wait.h>
#endif
#include "xmlrpc-c/abyss.h"
void Answer(TSession *r, uint16_t statuscode, char *buffer)
{
ResponseChunked(r);
ResponseStatus(r,statuscode);
ResponseContentType(r,"text/html");
ResponseWriteStart(r);
HTTPWrite(r,"<HTML><BODY>",12);
HTTPWrite(r,buffer,strlen(buffer));
HTTPWrite(r,"</BODY></HTML>",14);
HTTPWriteEnd(r);
}
abyss_bool HandleTime(TSession *r)
{
char z[50];
time_t ltime;
TDate date;
const char * dateString;
const char * answer;
if (!xmlrpc_streq(r->uri,"/time"))
return FALSE;
if (!RequestAuth(r,"Mot de passe","moez","hello"))
return TRUE;
time(&ltime);
DateFromGMT(&date, ltime);
DateToString(&date, &dateString);
xmlrpc_asprintf(&answer, "The time is %s", dateString);
Answer(r, 200, answer);
xmlrpc_strfree(dateString);
xmlrpc_strfree(answer);
return TRUE;
}
abyss_bool HandleDump(TSession *r)
{
char z[50];
if (!xmlrpc_streq(r->uri,"/name"))
return FALSE;
sprintf(z,"Server name is %s", (r->server)->name );
Answer(r,200,z);
return TRUE;
}
abyss_bool HandleStatus(TSession *r)
{
uint32_t status;
if (sscanf(r->uri,"/status/%d",&status)<=0)
return FALSE;
ResponseStatus(r,(uint16_t)status);
return TRUE;
}
abyss_bool HandleMIMEType(TSession *r)
{
char *m;
if (!xmlrpc_strneq(r->uri, "/mime/", 6))
return FALSE;
m=MIMETypeFromExt(r->uri+6);
if (!m)
m="(none)";
Answer(r,200,m);
return TRUE;
}
#ifdef _UNIX
static void sigterm(int sig)
{
TraceExit("Signal %d received. Exiting...\n",sig);
}
static void
sigchld(int const signalClass) {
bool childrenLeft;
bool error;
childrenLeft = true;
error = false;
/* Reap defunct children until there aren't any more. */
while (childrenLeft && !error) {
int status;
pid_t rc;
rc = waitpid((pid_t) -1, &status, WNOHANG);
if (rc == 0)
childrenLeft = false;
else if (rc < 0) {
/* because of ptrace */
if (errno == EINTR) {
/* ptrace causes this */
} else
error = true;
} else {
/* We reaped a child. */
pid_t const pid = rc;
ThreadHandleSigchld(pid);
}
}
}
#endif _UNIX
int main(int argc,char **argv)
{
const char * const name = argv[0];
TServer srv;
char * p;
const char * conffile;
bool err;
conffile = DEFAULT_CONF_FILE; /* initial value */
err = FALSE; /* initial value */
while (p=*(++argv))
{
if ((*p=='-') && (*(p+1)))
if (*(p+2)=='\0')
switch (*(p+1))
{
case 'c':
argv++;
if (*argv)
conffile=*argv;
else
err=TRUE;
break;
default:
err=TRUE;
}
else
err=TRUE;
else
err=TRUE;
};
if (err)
{
help(name);
exit(1);
};
DateInit();
MIMETypeInit();
ServerCreate(&srv,"HTTPServer",80,DEFAULT_DOCS,NULL);
ConfReadServerFile(conffile,&srv);
ServerAddHandler(&srv,HandleTime);
ServerAddHandler(&srv,HandleDump);
ServerAddHandler(&srv,HandleStatus);
ServerAddHandler(&srv,HandleMIMEType);
ServerInit(&srv);
#ifdef _UNIX
/* Catch various termination signals. */
signal(SIGTERM,sigterm);
signal(SIGINT,sigterm);
signal(SIGHUP,sigterm);
signal(SIGUSR1,sigterm);
/* Catch defunct children. */
signal(SIGCHLD,sigchld);
#endif
ServerDaemonize(srv);
ServerRun(&srv);
return 0;
}