static void upload(MaQueue *q)
{
MaConn *conn;
char *sw;
char *newLocation;
int responseStatus;
conn = q->conn;
newLocation = 0;
responseStatus = 0;
sw = (char*) strstr(maGetFormVar(conn, "QUERY_STRING", ""), "SWITCHES=");
if (sw) {
sw = mprStrdup(q, sw + 9);
mprUrlDecode(sw, (int) strlen(sw) + 1, sw);
if (*sw == '-') {
if (sw[1] == 'l') {
newLocation = sw + 3;
} else if (sw[1] == 's') {
responseStatus = atoi(sw + 3);
}
}
}
maSetResponseCode(conn, 200);
maSetResponseMimeType(conn, "text/html");
maDontCacheResponse(conn);
/*
* Test writing headers. The Server header overwrote the "Server" header
*
* maSetHeader(conn, "MyCustomHeader: true");
* maSetHeader(conn, "Server: private");
*/
if (maGetCookies(conn) == 0) {
maSetCookie(conn, "appwebTest", "Testing can be fun", 43200, "/", 0);
}
if (newLocation) {
maRedirect(conn, 302, newLocation);
} else if (responseStatus) {
maFailRequest(conn, responseStatus, "Custom Status");
} else {
maWrite(q, "<HTML><TITLE>egiProgram: EGI Output</TITLE><BODY>\r\n");
printRequestHeaders(q);
printQueryData(q);
printBodyData(q);
maWrite(q, "</BODY></HTML>\r\n");
}
if (sw) {
mprFree(sw);
}
}
static void myEgi(MaQueue *q)
{
MaConn *conn;
conn = q->conn;
maSetResponseCode(conn, 200);
maWrite(q, "<HTML><TITLE>simpleEgi</TITLE><BODY>\r\n");
maWrite(q, "<p>Name: %s</p>\n", maGetFormVar(conn, "name", "-"));
maWrite(q, "<p>Address: %s</p>\n", maGetFormVar(conn, "address", "-"));
maWrite(q, "</BODY></HTML>\r\n");
#if POSSIBLE
/*
* Useful things to do in egi forms
*/
maSetResponseCode(conn, 200);
maSetResponseMimeType(conn, "text/plain");
maDontCacheResponse(conn);
maRedirect(conn, 302, "/myURl");
maFailRequest(conn, 409, "My message : %d", 5);
#endif
}
static void simpleTest(MaQueue *q)
{
maWrite(q, "Hello %s\r\n", maGetFormVar(q->conn, "name", "unknown"));
}