/*
Run the web client to retrieve a URI
This will create the MPR and Http service on demand. As such, it is not the most
efficient way to run a web request.
@return HTTP status code or negative MPR error code. Returns a malloc string in response.
*/
PUBLIC int maRunWebClient(cchar *method, cchar *uri, cchar *data, char **response, char **err)
{
Mpr *mpr;
HttpConn *conn;
int status;
if (err) {
*err = 0;
}
if (response) {
*response = 0;
}
if ((mpr = mprCreate(0, NULL, 0)) == 0) {
mprLog("error appweb", 0, "Cannot create the MPR runtime");
return MPR_ERR_CANT_CREATE;
}
if (mprStart() < 0) {
mprLog("error appweb", 0, "Cannot start the web server runtime");
return MPR_ERR_CANT_INITIALIZE;
}
httpCreate(HTTP_CLIENT_SIDE);
conn = httpRequest(method, uri, data, err);
status = httpGetStatus(conn);
if (response) {
*response = httpReadString(conn);
}
mprDestroy();
return status;
}
bool simpleGet(MprTestGroup *gp, cchar *uri, int expectStatus)
{
HttpConn *conn;
int status;
if (expectStatus <= 0) {
expectStatus = 200;
}
if (startRequest(gp, "GET", uri) < 0) {
return 0;
}
conn = getConn(gp);
httpFinalizeOutput(conn);
if (httpWait(conn, HTTP_STATE_COMPLETE, -1) < 0) {
return MPR_ERR_CANT_READ;
}
status = httpGetStatus(gp->conn);
tassert(status == expectStatus);
if (status != expectStatus) {
mprLog("appweb test get", 0, "HTTP response code %d, expected %d", status, expectStatus);
return 0;
}
tassert(httpGetError(gp->conn) != 0);
gp->content = httpReadString(gp->conn);
tassert(gp->content != NULL);
httpDestroyConn(gp->conn);
gp->conn = 0;
return 1;
}
MAIN(simpleClient, int argc, char** argv)
{
Mpr *mpr;
App *app;
cchar *content;
int code;
/*
Create the Multithreaded Portable Runtime
*/
mpr = mprCreate(argc, argv, MPR_USER_EVENTS_THREAD);
if ((app = mprAllocObj(App, manageApp)) == 0) {
return MPR_ERR_MEMORY;
}
mprAddRoot(app);
mprAddStandardSignals(app);
/*
Start the Multithreaded Portable Runtime
*/
mprStart();
/*
Create an Http service object
*/
app->http = httpCreate(mpr);
/*
Get a client http object to work with. We can issue multiple requests with this one object.
*/
app->conn = httpCreateConn(app->http, NULL, NULL);
/*
Get a URL
*/
if (httpConnect(app->conn, "GET", "http://www.embedthis.com/index.html") < 0) {
mprError("Can't get URL");
exit(2);
}
/*
Examine the HTTP response HTTP code. 200 is success.
*/
code = httpGetStatus(app->conn);
if (code != 200) {
mprError("Server responded with code %d\n", code);
exit(1);
}
/*
Get the actual response content
*/
content = httpReadString(app->conn);
if (content) {
mprPrintf("Server responded with: %s\n", content);
}
mprDestroy(MPR_EXIT_DEFAULT);
return 0;
}
static int reportResponse(HttpConn *conn, cchar *url, MprTime elapsed)
{
HttpRx *rx;
MprOff bytesRead;
char *responseHeaders;
int status;
if (mprShouldAbortRequests(conn)) {
return 0;
}
app->status = status = httpGetStatus(conn);
bytesRead = httpGetContentLength(conn);
if (bytesRead < 0 && conn->rx) {
bytesRead = conn->rx->bytesRead;
}
mprLog(6, "Response status %d, elapsed %Ld", status, elapsed);
if (conn->error) {
app->success = 0;
}
if (conn->rx && bytesRead > 0) {
if (!app->noout) {
mprPrintf("\n");
}
if (app->showHeaders) {
responseHeaders = httpGetHeaders(conn);
rx = conn->rx;
mprPrintf("%s %d %s\n", conn->protocol, status, rx->statusMessage);
if (responseHeaders) {
mprPrintf("%s\n", responseHeaders);
}
} else if (app->showStatus) {
mprPrintf("%d\n", status);
}
}
if (status < 0) {
mprError("Can't process request for \"%s\" %s", url, httpGetError(conn));
return MPR_ERR_CANT_READ;
} else if (status == 0 && conn->protocol == 0) {
/* Ignore */;
} else if (!(200 <= status && status <= 206) && !(301 <= status && status <= 304)) {
if (!app->zeroOnErrors) {
app->success = 0;
}
if (!app->showStatus) {
mprError("Can't process request for \"%s\" (%d) %s", url, status, httpGetError(conn));
return MPR_ERR_CANT_READ;
}
}
mprLock(app->mutex);
if (app->verbose && app->noout) {
trace(conn, url, app->fetchCount, app->method, status, bytesRead);
}
mprUnlock(app->mutex);
return 0;
}
MAIN(simpleClient, int argc, char **argv, char **envp)
{
Http *http;
HttpConn *conn;
cchar *content;
int code;
/*
Create the Multithreaded Portable Runtime and start it.
*/
mprCreate(argc, argv, 0);
mprStart();
/*
Get a client http object to work with. We can issue multiple requests with this one object.
Add the conn as a root object so the GC won't collect it while we are using it.
*/
http = httpCreate(HTTP_CLIENT_SIDE);
conn = httpCreateConn(http, NULL, NULL);
mprAddRoot(conn);
/*
Open a connection to issue the GET. Then finalize the request output - this forces the request out.
*/
if (httpConnect(conn, "GET", "http://www.embedthis.com/index.html", NULL) < 0) {
mprError("Can't get URL");
exit(2);
}
httpFinalizeOutput(conn);
/*
Wait for a response
*/
if (httpWait(conn, HTTP_STATE_PARSED, 10000) < 0) {
mprError("No response");
exit(2);
}
/*
Examine the HTTP response HTTP code. 200 is success.
*/
code = httpGetStatus(conn);
if (code != 200) {
mprError("Server responded with code %d\n", code);
exit(1);
}
/*
Get the actual response content
*/
content = httpReadString(conn);
if (content) {
mprPrintf("Server responded with: %s\n", content);
}
mprDestroy(MPR_EXIT_DEFAULT);
return 0;
}
/*
function get status(): Number
*/
static EjsNumber *http_status(Ejs *ejs, EjsHttp *hp, int argc, EjsObj **argv)
{
int code;
if (!waitForResponseHeaders(hp)) {
return 0;
}
code = httpGetStatus(hp->conn);
if (code <= 0) {
return ESV(null);
}
return ejsCreateNumber(ejs, code);
}
bool simpleForm(MprTestGroup *gp, char *uri, char *formData, int expectStatus)
{
HttpConn *conn;
MprOff contentLen;
ssize len;
int status;
contentLen = 0;
if (expectStatus <= 0) {
expectStatus = 200;
}
if (startRequest(gp, "POST", uri) < 0) {
return 0;
}
conn = getConn(gp);
if (formData) {
httpSetHeader(conn, "Content-Type", "application/x-www-form-urlencoded");
len = slen(formData);
if (httpWrite(conn->writeq, formData, len) != len) {
return MPR_ERR_CANT_WRITE;
}
}
httpFinalizeOutput(conn);
if (httpWait(conn, HTTP_STATE_COMPLETE, -1) < 0) {
return MPR_ERR_CANT_READ;
}
status = httpGetStatus(conn);
if (status != expectStatus) {
mprLog("appweb test form", 0, "Client failed for %s, response code: %d, msg %s",
uri, status, httpGetStatusMessage(conn));
return 0;
}
gp->content = httpReadString(conn);
contentLen = httpGetContentLength(conn);
if (! tassert(gp->content != 0 && contentLen > 0)) {
return 0;
}
return 1;
}
bool simplePost(MprTestGroup *gp, char *uri, char *bodyData, ssize len, int expectStatus)
{
HttpConn *conn;
MprOff contentLen;
int status;
contentLen = 0;
conn = getConn(gp);
if (expectStatus <= 0) {
expectStatus = 200;
}
if (startRequest(gp, "POST", uri) < 0) {
return 0;
}
if (bodyData) {
if (httpWrite(conn->writeq, bodyData, len) != len) {
return MPR_ERR_CANT_WRITE;
}
}
httpFinalizeOutput(conn);
if (httpWait(conn, HTTP_STATE_COMPLETE, -1) < 0) {
return MPR_ERR_CANT_READ;
}
status = httpGetStatus(conn);
if (status != expectStatus) {
mprLog("appweb test post", 0, "Client failed for %s, response code: %d, msg %s",
uri, status, httpGetStatusMessage(conn));
return 0;
}
gp->content = httpReadString(conn);
contentLen = httpGetContentLength(conn);
if (! tassert(gp->content != 0 && contentLen > 0)) {
return 0;
}
return 1;
}
ipp_t * /* O - Response data */
cupsDoIORequest(http_t *http, /* I - Connection to server or @code CUPS_HTTP_DEFAULT@ */
ipp_t *request, /* I - IPP request */
const char *resource, /* I - HTTP resource for POST */
int infile, /* I - File to read from or -1 for none */
int outfile) /* I - File to write to or -1 for none */
{
ipp_t *response = NULL; /* IPP response data */
size_t length = 0; /* Content-Length value */
http_status_t status; /* Status of HTTP request */
struct stat fileinfo; /* File information */
int bytes; /* Number of bytes read/written */
char buffer[32768]; /* Output buffer */
DEBUG_printf(("cupsDoIORequest(http=%p, request=%p(%s), resource=\"%s\", "
"infile=%d, outfile=%d)", http, request,
request ? ippOpString(request->request.op.operation_id) : "?",
resource, infile, outfile));
/*
* Range check input...
*/
if (!request || !resource)
{
ippDelete(request);
_cupsSetError(IPP_STATUS_ERROR_INTERNAL, strerror(EINVAL), 0);
return (NULL);
}
/*
* Get the default connection as needed...
*/
if (!http)
if ((http = _cupsConnect()) == NULL)
{
ippDelete(request);
return (NULL);
}
/*
* See if we have a file to send...
*/
if (infile >= 0)
{
if (fstat(infile, &fileinfo))
{
/*
* Can't get file information!
*/
_cupsSetError(errno == EBADF ? IPP_STATUS_ERROR_NOT_FOUND : IPP_STATUS_ERROR_NOT_AUTHORIZED,
NULL, 0);
ippDelete(request);
return (NULL);
}
#ifdef WIN32
if (fileinfo.st_mode & _S_IFDIR)
#else
if (S_ISDIR(fileinfo.st_mode))
#endif /* WIN32 */
{
/*
* Can't send a directory...
*/
ippDelete(request);
_cupsSetError(IPP_STATUS_ERROR_NOT_POSSIBLE, strerror(EISDIR), 0);
return (NULL);
}
#ifndef WIN32
if (!S_ISREG(fileinfo.st_mode))
length = 0; /* Chunk when piping */
else
#endif /* !WIN32 */
length = ippLength(request) + fileinfo.st_size;
}
else
length = ippLength(request);
DEBUG_printf(("2cupsDoIORequest: Request length=%ld, total length=%ld",
(long)ippLength(request), (long)length));
/*
* Clear any "Local" authentication data since it is probably stale...
*/
if (http->authstring && !strncmp(http->authstring, "Local ", 6))
httpSetAuthString(http, NULL, NULL);
/*
* Loop until we can send the request without authorization problems.
*/
while (response == NULL)
{
DEBUG_puts("2cupsDoIORequest: setup...");
/*
* Send the request...
*/
status = cupsSendRequest(http, request, resource, length);
DEBUG_printf(("2cupsDoIORequest: status=%d", status));
if (status == HTTP_STATUS_CONTINUE && request->state == IPP_STATE_DATA && infile >= 0)
{
DEBUG_puts("2cupsDoIORequest: file write...");
/*
* Send the file with the request...
*/
#ifndef WIN32
if (S_ISREG(fileinfo.st_mode))
#endif /* WIN32 */
lseek(infile, 0, SEEK_SET);
while ((bytes = (int)read(infile, buffer, sizeof(buffer))) > 0)
{
if ((status = cupsWriteRequestData(http, buffer, bytes))
!= HTTP_STATUS_CONTINUE)
break;
}
}
/*
* Get the server's response...
*/
if (status != HTTP_STATUS_ERROR)
{
response = cupsGetResponse(http, resource);
status = httpGetStatus(http);
}
DEBUG_printf(("2cupsDoIORequest: status=%d", status));
if (status == HTTP_STATUS_ERROR ||
(status >= HTTP_STATUS_BAD_REQUEST && status != HTTP_STATUS_UNAUTHORIZED &&
status != HTTP_STATUS_UPGRADE_REQUIRED))
{
_cupsSetHTTPError(status);
break;
}
if (response && outfile >= 0)
{
/*
* Write trailing data to file...
*/
while ((bytes = (int)httpRead2(http, buffer, sizeof(buffer))) > 0)
if (write(outfile, buffer, bytes) < bytes)
break;
}
if (http->state != HTTP_STATE_WAITING)
{
/*
* Flush any remaining data...
*/
httpFlush(http);
}
}
/*
* Delete the original request and return the response...
*/
ippDelete(request);
return (response);
}
int espGetStatus(HttpConn *conn)
{
return httpGetStatus(conn);
}