|
Packit |
3adb1e |
/* ====================================================================
|
|
Packit |
3adb1e |
* Licensed to the Apache Software Foundation (ASF) under one
|
|
Packit |
3adb1e |
* or more contributor license agreements. See the NOTICE file
|
|
Packit |
3adb1e |
* distributed with this work for additional information
|
|
Packit |
3adb1e |
* regarding copyright ownership. The ASF licenses this file
|
|
Packit |
3adb1e |
* to you under the Apache License, Version 2.0 (the
|
|
Packit |
3adb1e |
* "License"); you may not use this file except in compliance
|
|
Packit |
3adb1e |
* with the License. You may obtain a copy of the License at
|
|
Packit |
3adb1e |
*
|
|
Packit |
3adb1e |
* http://www.apache.org/licenses/LICENSE-2.0
|
|
Packit |
3adb1e |
*
|
|
Packit |
3adb1e |
* Unless required by applicable law or agreed to in writing,
|
|
Packit |
3adb1e |
* software distributed under the License is distributed on an
|
|
Packit |
3adb1e |
* "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
|
|
Packit |
3adb1e |
* KIND, either express or implied. See the License for the
|
|
Packit |
3adb1e |
* specific language governing permissions and limitations
|
|
Packit |
3adb1e |
* under the License.
|
|
Packit |
3adb1e |
* ====================================================================
|
|
Packit |
3adb1e |
*/
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
#include <stdlib.h>
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
#include <apr.h>
|
|
Packit |
3adb1e |
#include <apr_uri.h>
|
|
Packit |
3adb1e |
#include <apr_strings.h>
|
|
Packit |
3adb1e |
#include <apr_atomic.h>
|
|
Packit |
3adb1e |
#include <apr_base64.h>
|
|
Packit |
3adb1e |
#include <apr_getopt.h>
|
|
Packit |
3adb1e |
#include <apr_version.h>
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
#include "serf.h"
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
typedef struct {
|
|
Packit |
3adb1e |
int count;
|
|
Packit |
3adb1e |
int using_ssl;
|
|
Packit |
3adb1e |
serf_ssl_context_t *ssl_ctx;
|
|
Packit |
3adb1e |
serf_bucket_alloc_t *bkt_alloc;
|
|
Packit |
3adb1e |
} app_baton_t;
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
typedef struct {
|
|
Packit |
3adb1e |
#if APR_MAJOR_VERSION > 0
|
|
Packit |
3adb1e |
apr_uint32_t requests_outstanding;
|
|
Packit |
3adb1e |
#else
|
|
Packit |
3adb1e |
apr_atomic_t requests_outstanding;
|
|
Packit |
3adb1e |
#endif
|
|
Packit |
3adb1e |
int print_headers;
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
serf_response_acceptor_t acceptor;
|
|
Packit |
3adb1e |
app_baton_t *acceptor_baton;
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
serf_response_handler_t handler;
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
const char *host;
|
|
Packit |
3adb1e |
const char *method;
|
|
Packit |
3adb1e |
const char *path;
|
|
Packit |
3adb1e |
const char *req_body_path;
|
|
Packit |
3adb1e |
const char *authn;
|
|
Packit |
3adb1e |
} handler_baton_t;
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
/* Kludges for APR 0.9 support. */
|
|
Packit |
3adb1e |
#if APR_MAJOR_VERSION == 0
|
|
Packit |
3adb1e |
#define apr_atomic_inc32 apr_atomic_inc
|
|
Packit |
3adb1e |
#define apr_atomic_dec32 apr_atomic_dec
|
|
Packit |
3adb1e |
#define apr_atomic_read32 apr_atomic_read
|
|
Packit |
3adb1e |
#endif
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
static void closed_connection(serf_connection_t *conn,
|
|
Packit |
3adb1e |
void *closed_baton,
|
|
Packit |
3adb1e |
apr_status_t why,
|
|
Packit |
3adb1e |
apr_pool_t *pool)
|
|
Packit |
3adb1e |
{
|
|
Packit |
3adb1e |
if (why) {
|
|
Packit |
3adb1e |
abort();
|
|
Packit |
3adb1e |
}
|
|
Packit |
3adb1e |
}
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
static apr_status_t ignore_all_cert_errors(void *data, int failures,
|
|
Packit |
3adb1e |
const serf_ssl_certificate_t *cert)
|
|
Packit |
3adb1e |
{
|
|
Packit |
3adb1e |
/* In a real application, you would normally would not want to do this */
|
|
Packit |
3adb1e |
return APR_SUCCESS;
|
|
Packit |
3adb1e |
}
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
static apr_status_t conn_setup(apr_socket_t *skt,
|
|
Packit |
3adb1e |
serf_bucket_t **input_bkt,
|
|
Packit |
3adb1e |
serf_bucket_t **output_bkt,
|
|
Packit |
3adb1e |
void *setup_baton,
|
|
Packit |
3adb1e |
apr_pool_t *pool)
|
|
Packit |
3adb1e |
{
|
|
Packit |
3adb1e |
serf_bucket_t *c;
|
|
Packit |
3adb1e |
app_baton_t *ctx = setup_baton;
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
c = serf_bucket_socket_create(skt, ctx->bkt_alloc);
|
|
Packit |
3adb1e |
if (ctx->using_ssl) {
|
|
Packit |
3adb1e |
c = serf_bucket_ssl_decrypt_create(c, ctx->ssl_ctx, ctx->bkt_alloc);
|
|
Packit |
3adb1e |
if (!ctx->ssl_ctx) {
|
|
Packit |
3adb1e |
ctx->ssl_ctx = serf_bucket_ssl_decrypt_context_get(c);
|
|
Packit |
3adb1e |
}
|
|
Packit |
3adb1e |
serf_ssl_server_cert_callback_set(ctx->ssl_ctx, ignore_all_cert_errors, NULL);
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
*output_bkt = serf_bucket_ssl_encrypt_create(*output_bkt, ctx->ssl_ctx,
|
|
Packit |
3adb1e |
ctx->bkt_alloc);
|
|
Packit |
3adb1e |
}
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
*input_bkt = c;
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
return APR_SUCCESS;
|
|
Packit |
3adb1e |
}
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
static serf_bucket_t* accept_response(serf_request_t *request,
|
|
Packit |
3adb1e |
serf_bucket_t *stream,
|
|
Packit |
3adb1e |
void *acceptor_baton,
|
|
Packit |
3adb1e |
apr_pool_t *pool)
|
|
Packit |
3adb1e |
{
|
|
Packit |
3adb1e |
serf_bucket_t *c;
|
|
Packit |
3adb1e |
serf_bucket_alloc_t *bkt_alloc;
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
/* get the per-request bucket allocator */
|
|
Packit |
3adb1e |
bkt_alloc = serf_request_get_alloc(request);
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
/* Create a barrier so the response doesn't eat us! */
|
|
Packit |
3adb1e |
c = serf_bucket_barrier_create(stream, bkt_alloc);
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
return serf_bucket_response_create(c, bkt_alloc);
|
|
Packit |
3adb1e |
}
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
static serf_bucket_t* accept_bwtp(serf_request_t *request,
|
|
Packit |
3adb1e |
serf_bucket_t *stream,
|
|
Packit |
3adb1e |
void *acceptor_baton,
|
|
Packit |
3adb1e |
apr_pool_t *pool)
|
|
Packit |
3adb1e |
{
|
|
Packit |
3adb1e |
serf_bucket_t *c;
|
|
Packit |
3adb1e |
app_baton_t *app_ctx = acceptor_baton;
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
/* Create a barrier so the response doesn't eat us! */
|
|
Packit |
3adb1e |
c = serf_bucket_barrier_create(stream, app_ctx->bkt_alloc);
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
return serf_bucket_bwtp_incoming_frame_create(c, app_ctx->bkt_alloc);
|
|
Packit |
3adb1e |
}
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
/* fwd declare */
|
|
Packit |
3adb1e |
static apr_status_t handle_bwtp_upgrade(serf_request_t *request,
|
|
Packit |
3adb1e |
serf_bucket_t *response,
|
|
Packit |
3adb1e |
void *handler_baton,
|
|
Packit |
3adb1e |
apr_pool_t *pool);
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
static apr_status_t setup_request(serf_request_t *request,
|
|
Packit |
3adb1e |
void *setup_baton,
|
|
Packit |
3adb1e |
serf_bucket_t **req_bkt,
|
|
Packit |
3adb1e |
serf_response_acceptor_t *acceptor,
|
|
Packit |
3adb1e |
void **acceptor_baton,
|
|
Packit |
3adb1e |
serf_response_handler_t *handler,
|
|
Packit |
3adb1e |
void **handler_baton,
|
|
Packit |
3adb1e |
apr_pool_t *pool)
|
|
Packit |
3adb1e |
{
|
|
Packit |
3adb1e |
handler_baton_t *ctx = setup_baton;
|
|
Packit |
3adb1e |
serf_bucket_t *hdrs_bkt;
|
|
Packit |
3adb1e |
serf_bucket_t *body_bkt;
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
if (ctx->req_body_path) {
|
|
Packit |
3adb1e |
apr_file_t *file;
|
|
Packit |
3adb1e |
apr_status_t status;
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
status = apr_file_open(&file, ctx->req_body_path, APR_READ,
|
|
Packit |
3adb1e |
APR_OS_DEFAULT, pool);
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
if (status) {
|
|
Packit |
3adb1e |
printf("Error opening file (%s)\n", ctx->req_body_path);
|
|
Packit |
3adb1e |
return status;
|
|
Packit |
3adb1e |
}
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
body_bkt = serf_bucket_file_create(file,
|
|
Packit |
3adb1e |
serf_request_get_alloc(request));
|
|
Packit |
3adb1e |
}
|
|
Packit |
3adb1e |
else {
|
|
Packit |
3adb1e |
body_bkt = NULL;
|
|
Packit |
3adb1e |
}
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
/*
|
|
Packit |
3adb1e |
*req_bkt = serf_bucket_bwtp_message_create(0, body_bkt,
|
|
Packit |
3adb1e |
serf_request_get_alloc(request));
|
|
Packit |
3adb1e |
*/
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
*req_bkt = serf_bucket_bwtp_header_create(0, "MESSAGE",
|
|
Packit |
3adb1e |
serf_request_get_alloc(request));
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
hdrs_bkt = serf_bucket_bwtp_frame_get_headers(*req_bkt);
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
/* FIXME: Shouldn't we be able to figure out the host ourselves? */
|
|
Packit |
3adb1e |
serf_bucket_headers_setn(hdrs_bkt, "Host", ctx->host);
|
|
Packit |
3adb1e |
serf_bucket_headers_setn(hdrs_bkt, "User-Agent",
|
|
Packit |
3adb1e |
"Serf/" SERF_VERSION_STRING);
|
|
Packit |
3adb1e |
/* Shouldn't serf do this for us? */
|
|
Packit |
3adb1e |
serf_bucket_headers_setn(hdrs_bkt, "Accept-Encoding", "gzip");
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
if (ctx->authn != NULL) {
|
|
Packit |
3adb1e |
serf_bucket_headers_setn(hdrs_bkt, "Authorization", ctx->authn);
|
|
Packit |
3adb1e |
}
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
*acceptor = ctx->acceptor;
|
|
Packit |
3adb1e |
*acceptor_baton = ctx->acceptor_baton;
|
|
Packit |
3adb1e |
*handler = ctx->handler;
|
|
Packit |
3adb1e |
*handler_baton = ctx;
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
return APR_SUCCESS;
|
|
Packit |
3adb1e |
}
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
static apr_status_t setup_bwtp_upgrade(serf_request_t *request,
|
|
Packit |
3adb1e |
void *setup_baton,
|
|
Packit |
3adb1e |
serf_bucket_t **req_bkt,
|
|
Packit |
3adb1e |
serf_response_acceptor_t *acceptor,
|
|
Packit |
3adb1e |
void **acceptor_baton,
|
|
Packit |
3adb1e |
serf_response_handler_t *handler,
|
|
Packit |
3adb1e |
void **handler_baton,
|
|
Packit |
3adb1e |
apr_pool_t *pool)
|
|
Packit |
3adb1e |
{
|
|
Packit |
3adb1e |
serf_bucket_t *hdrs_bkt;
|
|
Packit |
3adb1e |
handler_baton_t *ctx = setup_baton;
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
*req_bkt = serf_bucket_request_create("OPTIONS", "*", NULL,
|
|
Packit |
3adb1e |
serf_request_get_alloc(request));
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
hdrs_bkt = serf_bucket_request_get_headers(*req_bkt);
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
serf_bucket_headers_setn(hdrs_bkt, "Upgrade", "BWTP/1.0");
|
|
Packit |
3adb1e |
serf_bucket_headers_setn(hdrs_bkt, "Connection", "Upgrade");
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
*acceptor = ctx->acceptor;
|
|
Packit |
3adb1e |
*acceptor_baton = ctx->acceptor_baton;
|
|
Packit |
3adb1e |
*handler = handle_bwtp_upgrade;
|
|
Packit |
3adb1e |
*handler_baton = ctx;
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
return APR_SUCCESS;
|
|
Packit |
3adb1e |
}
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
static apr_status_t setup_channel(serf_request_t *request,
|
|
Packit |
3adb1e |
void *setup_baton,
|
|
Packit |
3adb1e |
serf_bucket_t **req_bkt,
|
|
Packit |
3adb1e |
serf_response_acceptor_t *acceptor,
|
|
Packit |
3adb1e |
void **acceptor_baton,
|
|
Packit |
3adb1e |
serf_response_handler_t *handler,
|
|
Packit |
3adb1e |
void **handler_baton,
|
|
Packit |
3adb1e |
apr_pool_t *pool)
|
|
Packit |
3adb1e |
{
|
|
Packit |
3adb1e |
handler_baton_t *ctx = setup_baton;
|
|
Packit |
3adb1e |
serf_bucket_t *hdrs_bkt;
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
*req_bkt = serf_bucket_bwtp_channel_open(0, ctx->path,
|
|
Packit |
3adb1e |
serf_request_get_alloc(request));
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
hdrs_bkt = serf_bucket_bwtp_frame_get_headers(*req_bkt);
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
/* FIXME: Shouldn't we be able to figure out the host ourselves? */
|
|
Packit |
3adb1e |
serf_bucket_headers_setn(hdrs_bkt, "Host", ctx->host);
|
|
Packit |
3adb1e |
serf_bucket_headers_setn(hdrs_bkt, "User-Agent",
|
|
Packit |
3adb1e |
"Serf/" SERF_VERSION_STRING);
|
|
Packit |
3adb1e |
/* Shouldn't serf do this for us? */
|
|
Packit |
3adb1e |
serf_bucket_headers_setn(hdrs_bkt, "Accept-Encoding", "gzip");
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
if (ctx->authn != NULL) {
|
|
Packit |
3adb1e |
serf_bucket_headers_setn(hdrs_bkt, "Authorization", ctx->authn);
|
|
Packit |
3adb1e |
}
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
*acceptor = ctx->acceptor;
|
|
Packit |
3adb1e |
*acceptor_baton = ctx->acceptor_baton;
|
|
Packit |
3adb1e |
*handler = ctx->handler;
|
|
Packit |
3adb1e |
*handler_baton = ctx;
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
return APR_SUCCESS;
|
|
Packit |
3adb1e |
}
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
static apr_status_t setup_close(serf_request_t *request,
|
|
Packit |
3adb1e |
void *setup_baton,
|
|
Packit |
3adb1e |
serf_bucket_t **req_bkt,
|
|
Packit |
3adb1e |
serf_response_acceptor_t *acceptor,
|
|
Packit |
3adb1e |
void **acceptor_baton,
|
|
Packit |
3adb1e |
serf_response_handler_t *handler,
|
|
Packit |
3adb1e |
void **handler_baton,
|
|
Packit |
3adb1e |
apr_pool_t *pool)
|
|
Packit |
3adb1e |
{
|
|
Packit |
3adb1e |
handler_baton_t *ctx = setup_baton;
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
*req_bkt = serf_bucket_bwtp_channel_close(0, serf_request_get_alloc(request));
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
*acceptor = ctx->acceptor;
|
|
Packit |
3adb1e |
*acceptor_baton = ctx->acceptor_baton;
|
|
Packit |
3adb1e |
*handler = ctx->handler;
|
|
Packit |
3adb1e |
*handler_baton = ctx;
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
return APR_SUCCESS;
|
|
Packit |
3adb1e |
}
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
static apr_status_t handle_bwtp(serf_request_t *request,
|
|
Packit |
3adb1e |
serf_bucket_t *response,
|
|
Packit |
3adb1e |
void *handler_baton,
|
|
Packit |
3adb1e |
apr_pool_t *pool)
|
|
Packit |
3adb1e |
{
|
|
Packit |
3adb1e |
const char *data;
|
|
Packit |
3adb1e |
apr_size_t len;
|
|
Packit |
3adb1e |
apr_status_t status;
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
if (!response) {
|
|
Packit |
3adb1e |
/* A NULL response can come back if the request failed completely */
|
|
Packit |
3adb1e |
return APR_EGENERAL;
|
|
Packit |
3adb1e |
}
|
|
Packit |
3adb1e |
status = serf_bucket_bwtp_incoming_frame_wait_for_headers(response);
|
|
Packit |
3adb1e |
if (SERF_BUCKET_READ_ERROR(status) || APR_STATUS_IS_EAGAIN(status)) {
|
|
Packit |
3adb1e |
return status;
|
|
Packit |
3adb1e |
}
|
|
Packit |
3adb1e |
printf("BWTP %p frame: %d %d %s\n",
|
|
Packit |
3adb1e |
response, serf_bucket_bwtp_frame_get_channel(response),
|
|
Packit |
3adb1e |
serf_bucket_bwtp_frame_get_type(response),
|
|
Packit |
3adb1e |
serf_bucket_bwtp_frame_get_phrase(response));
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
while (1) {
|
|
Packit |
3adb1e |
status = serf_bucket_read(response, 2048, &data, &len;;
|
|
Packit |
3adb1e |
if (SERF_BUCKET_READ_ERROR(status))
|
|
Packit |
3adb1e |
return status;
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
/* got some data. print it out. */
|
|
Packit |
3adb1e |
if (len) {
|
|
Packit |
3adb1e |
puts("BWTP body:\n---");
|
|
Packit |
3adb1e |
fwrite(data, 1, len, stdout);
|
|
Packit |
3adb1e |
puts("\n---");
|
|
Packit |
3adb1e |
}
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
/* are we done yet? */
|
|
Packit |
3adb1e |
if (APR_STATUS_IS_EOF(status)) {
|
|
Packit |
3adb1e |
return APR_EOF;
|
|
Packit |
3adb1e |
}
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
/* have we drained the response so far? */
|
|
Packit |
3adb1e |
if (APR_STATUS_IS_EAGAIN(status))
|
|
Packit |
3adb1e |
return status;
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
/* loop to read some more. */
|
|
Packit |
3adb1e |
}
|
|
Packit |
3adb1e |
/* NOTREACHED */
|
|
Packit |
3adb1e |
}
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
static apr_status_t handle_bwtp_upgrade(serf_request_t *request,
|
|
Packit |
3adb1e |
serf_bucket_t *response,
|
|
Packit |
3adb1e |
void *handler_baton,
|
|
Packit |
3adb1e |
apr_pool_t *pool)
|
|
Packit |
3adb1e |
{
|
|
Packit |
3adb1e |
const char *data;
|
|
Packit |
3adb1e |
apr_size_t len;
|
|
Packit |
3adb1e |
serf_status_line sl;
|
|
Packit |
3adb1e |
apr_status_t status;
|
|
Packit |
3adb1e |
handler_baton_t *ctx = handler_baton;
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
if (!response) {
|
|
Packit |
3adb1e |
/* A NULL response can come back if the request failed completely */
|
|
Packit |
3adb1e |
return APR_EGENERAL;
|
|
Packit |
3adb1e |
}
|
|
Packit |
3adb1e |
status = serf_bucket_response_status(response, &sl);
|
|
Packit |
3adb1e |
if (status) {
|
|
Packit |
3adb1e |
return status;
|
|
Packit |
3adb1e |
}
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
while (1) {
|
|
Packit |
3adb1e |
status = serf_bucket_read(response, 2048, &data, &len;;
|
|
Packit |
3adb1e |
if (SERF_BUCKET_READ_ERROR(status))
|
|
Packit |
3adb1e |
return status;
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
/* got some data. print it out. */
|
|
Packit |
3adb1e |
fwrite(data, 1, len, stdout);
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
/* are we done yet? */
|
|
Packit |
3adb1e |
if (APR_STATUS_IS_EOF(status)) {
|
|
Packit |
3adb1e |
int i;
|
|
Packit |
3adb1e |
serf_connection_t *conn;
|
|
Packit |
3adb1e |
serf_request_t *new_req;
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
conn = serf_request_get_conn(request);
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
serf_connection_set_async_responses(conn,
|
|
Packit |
3adb1e |
accept_bwtp, ctx->acceptor_baton, handle_bwtp, NULL);
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
new_req = serf_connection_request_create(conn, setup_channel, ctx);
|
|
Packit |
3adb1e |
for (i = 0; i < ctx->acceptor_baton->count; i++) {
|
|
Packit |
3adb1e |
new_req = serf_connection_request_create(conn,
|
|
Packit |
3adb1e |
setup_request,
|
|
Packit |
3adb1e |
ctx);
|
|
Packit |
3adb1e |
}
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
return APR_EOF;
|
|
Packit |
3adb1e |
}
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
/* have we drained the response so far? */
|
|
Packit |
3adb1e |
if (APR_STATUS_IS_EAGAIN(status))
|
|
Packit |
3adb1e |
return status;
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
/* loop to read some more. */
|
|
Packit |
3adb1e |
}
|
|
Packit |
3adb1e |
/* NOTREACHED */
|
|
Packit |
3adb1e |
}
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
static apr_status_t handle_response(serf_request_t *request,
|
|
Packit |
3adb1e |
serf_bucket_t *response,
|
|
Packit |
3adb1e |
void *handler_baton,
|
|
Packit |
3adb1e |
apr_pool_t *pool)
|
|
Packit |
3adb1e |
{
|
|
Packit |
3adb1e |
const char *data;
|
|
Packit |
3adb1e |
apr_size_t len;
|
|
Packit |
3adb1e |
serf_status_line sl;
|
|
Packit |
3adb1e |
apr_status_t status;
|
|
Packit |
3adb1e |
handler_baton_t *ctx = handler_baton;
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
if (!response) {
|
|
Packit |
3adb1e |
/* A NULL response can come back if the request failed completely */
|
|
Packit |
3adb1e |
return APR_EGENERAL;
|
|
Packit |
3adb1e |
}
|
|
Packit |
3adb1e |
status = serf_bucket_response_status(response, &sl);
|
|
Packit |
3adb1e |
if (status) {
|
|
Packit |
3adb1e |
return status;
|
|
Packit |
3adb1e |
}
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
while (1) {
|
|
Packit |
3adb1e |
status = serf_bucket_read(response, 2048, &data, &len;;
|
|
Packit |
3adb1e |
if (SERF_BUCKET_READ_ERROR(status))
|
|
Packit |
3adb1e |
return status;
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
/* got some data. print it out. */
|
|
Packit |
3adb1e |
fwrite(data, 1, len, stdout);
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
/* are we done yet? */
|
|
Packit |
3adb1e |
if (APR_STATUS_IS_EOF(status)) {
|
|
Packit |
3adb1e |
if (ctx->print_headers) {
|
|
Packit |
3adb1e |
serf_bucket_t *hdrs;
|
|
Packit |
3adb1e |
hdrs = serf_bucket_response_get_headers(response);
|
|
Packit |
3adb1e |
while (1) {
|
|
Packit |
3adb1e |
status = serf_bucket_read(hdrs, 2048, &data, &len;;
|
|
Packit |
3adb1e |
if (SERF_BUCKET_READ_ERROR(status))
|
|
Packit |
3adb1e |
return status;
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
fwrite(data, 1, len, stdout);
|
|
Packit |
3adb1e |
if (APR_STATUS_IS_EOF(status)) {
|
|
Packit |
3adb1e |
break;
|
|
Packit |
3adb1e |
}
|
|
Packit |
3adb1e |
}
|
|
Packit |
3adb1e |
}
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
apr_atomic_dec32(&ctx->requests_outstanding);
|
|
Packit |
3adb1e |
if (!ctx->requests_outstanding) {
|
|
Packit |
3adb1e |
serf_connection_t *conn;
|
|
Packit |
3adb1e |
serf_request_t *new_req;
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
conn = serf_request_get_conn(request);
|
|
Packit |
3adb1e |
new_req =
|
|
Packit |
3adb1e |
serf_connection_request_create(conn, setup_close, ctx);
|
|
Packit |
3adb1e |
}
|
|
Packit |
3adb1e |
return APR_EOF;
|
|
Packit |
3adb1e |
}
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
/* have we drained the response so far? */
|
|
Packit |
3adb1e |
if (APR_STATUS_IS_EAGAIN(status))
|
|
Packit |
3adb1e |
return status;
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
/* loop to read some more. */
|
|
Packit |
3adb1e |
}
|
|
Packit |
3adb1e |
/* NOTREACHED */
|
|
Packit |
3adb1e |
}
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
static void print_usage(apr_pool_t *pool)
|
|
Packit |
3adb1e |
{
|
|
Packit |
3adb1e |
puts("serf_get [options] URL");
|
|
Packit |
3adb1e |
puts("-h\tDisplay this help");
|
|
Packit |
3adb1e |
puts("-v\tDisplay version");
|
|
Packit |
3adb1e |
puts("-H\tPrint response headers");
|
|
Packit |
3adb1e |
puts("-n <count> Fetch URL <count> times");
|
|
Packit |
3adb1e |
puts("-a <user:password> Present Basic authentication credentials");
|
|
Packit |
3adb1e |
puts("-m <method> Use the <method> HTTP Method");
|
|
Packit |
3adb1e |
puts("-f <file> Use the <file> as the request body");
|
|
Packit |
3adb1e |
}
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
int main(int argc, const char **argv)
|
|
Packit |
3adb1e |
{
|
|
Packit |
3adb1e |
apr_status_t status;
|
|
Packit |
3adb1e |
apr_pool_t *pool;
|
|
Packit |
3adb1e |
apr_sockaddr_t *address;
|
|
Packit |
3adb1e |
serf_context_t *context;
|
|
Packit |
3adb1e |
serf_connection_t *connection;
|
|
Packit |
3adb1e |
serf_request_t *request;
|
|
Packit |
3adb1e |
app_baton_t app_ctx;
|
|
Packit |
3adb1e |
handler_baton_t handler_ctx;
|
|
Packit |
3adb1e |
apr_uri_t url;
|
|
Packit |
3adb1e |
const char *raw_url, *method, *req_body_path = NULL;
|
|
Packit |
3adb1e |
int i;
|
|
Packit |
3adb1e |
int print_headers;
|
|
Packit |
3adb1e |
char *authn = NULL;
|
|
Packit |
3adb1e |
apr_getopt_t *opt;
|
|
Packit |
3adb1e |
char opt_c;
|
|
Packit |
3adb1e |
const char *opt_arg;
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
apr_initialize();
|
|
Packit |
3adb1e |
atexit(apr_terminate);
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
apr_pool_create(&pool, NULL);
|
|
Packit |
3adb1e |
/* serf_initialize(); */
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
/* Default to one round of fetching. */
|
|
Packit |
3adb1e |
app_ctx.count = 1;
|
|
Packit |
3adb1e |
/* Default to GET. */
|
|
Packit |
3adb1e |
method = "GET";
|
|
Packit |
3adb1e |
/* Do not print headers by default. */
|
|
Packit |
3adb1e |
print_headers = 0;
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
apr_getopt_init(&opt, pool, argc, argv);
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
while ((status = apr_getopt(opt, "a:f:hHm:n:v", &opt_c, &opt_arg)) ==
|
|
Packit |
3adb1e |
APR_SUCCESS) {
|
|
Packit |
3adb1e |
int srclen, enclen;
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
switch (opt_c) {
|
|
Packit |
3adb1e |
case 'a':
|
|
Packit |
3adb1e |
srclen = strlen(opt_arg);
|
|
Packit |
3adb1e |
enclen = apr_base64_encode_len(srclen);
|
|
Packit |
3adb1e |
authn = apr_palloc(pool, enclen + 6);
|
|
Packit |
3adb1e |
strcpy(authn, "Basic ");
|
|
Packit |
3adb1e |
(void) apr_base64_encode(&authn[6], opt_arg, srclen);
|
|
Packit |
3adb1e |
break;
|
|
Packit |
3adb1e |
case 'f':
|
|
Packit |
3adb1e |
req_body_path = opt_arg;
|
|
Packit |
3adb1e |
break;
|
|
Packit |
3adb1e |
case 'h':
|
|
Packit |
3adb1e |
print_usage(pool);
|
|
Packit |
3adb1e |
exit(0);
|
|
Packit |
3adb1e |
break;
|
|
Packit |
3adb1e |
case 'H':
|
|
Packit |
3adb1e |
print_headers = 1;
|
|
Packit |
3adb1e |
break;
|
|
Packit |
3adb1e |
case 'm':
|
|
Packit |
3adb1e |
method = opt_arg;
|
|
Packit |
3adb1e |
break;
|
|
Packit |
3adb1e |
case 'n':
|
|
Packit |
3adb1e |
errno = 0;
|
|
Packit |
3adb1e |
app_ctx.count = apr_strtoi64(opt_arg, NULL, 10);
|
|
Packit |
3adb1e |
if (errno) {
|
|
Packit |
3adb1e |
printf("Problem converting number of times to fetch URL (%d)\n",
|
|
Packit |
3adb1e |
errno);
|
|
Packit |
3adb1e |
return errno;
|
|
Packit |
3adb1e |
}
|
|
Packit |
3adb1e |
break;
|
|
Packit |
3adb1e |
case 'v':
|
|
Packit |
3adb1e |
puts("Serf version: " SERF_VERSION_STRING);
|
|
Packit |
3adb1e |
exit(0);
|
|
Packit |
3adb1e |
default:
|
|
Packit |
3adb1e |
break;
|
|
Packit |
3adb1e |
}
|
|
Packit |
3adb1e |
}
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
if (opt->ind != opt->argc - 1) {
|
|
Packit |
3adb1e |
print_usage(pool);
|
|
Packit |
3adb1e |
exit(-1);
|
|
Packit |
3adb1e |
}
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
raw_url = argv[opt->ind];
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
apr_uri_parse(pool, raw_url, &url;;
|
|
Packit |
3adb1e |
if (!url.port) {
|
|
Packit |
3adb1e |
url.port = apr_uri_port_of_scheme(url.scheme);
|
|
Packit |
3adb1e |
}
|
|
Packit |
3adb1e |
if (!url.path) {
|
|
Packit |
3adb1e |
url.path = "/";
|
|
Packit |
3adb1e |
}
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
if (strcasecmp(url.scheme, "https") == 0) {
|
|
Packit |
3adb1e |
app_ctx.using_ssl = 1;
|
|
Packit |
3adb1e |
}
|
|
Packit |
3adb1e |
else {
|
|
Packit |
3adb1e |
app_ctx.using_ssl = 0;
|
|
Packit |
3adb1e |
}
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
status = apr_sockaddr_info_get(&address,
|
|
Packit |
3adb1e |
url.hostname, APR_UNSPEC, url.port, 0,
|
|
Packit |
3adb1e |
pool);
|
|
Packit |
3adb1e |
if (status) {
|
|
Packit |
3adb1e |
printf("Error creating address: %d\n", status);
|
|
Packit |
3adb1e |
apr_pool_destroy(pool);
|
|
Packit |
3adb1e |
exit(1);
|
|
Packit |
3adb1e |
}
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
context = serf_context_create(pool);
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
/* ### Connection or Context should have an allocator? */
|
|
Packit |
3adb1e |
app_ctx.bkt_alloc = serf_bucket_allocator_create(pool, NULL, NULL);
|
|
Packit |
3adb1e |
app_ctx.ssl_ctx = NULL;
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
connection = serf_connection_create(context, address,
|
|
Packit |
3adb1e |
conn_setup, &app_ctx,
|
|
Packit |
3adb1e |
closed_connection, &app_ctx,
|
|
Packit |
3adb1e |
pool);
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
handler_ctx.requests_outstanding = 0;
|
|
Packit |
3adb1e |
handler_ctx.print_headers = print_headers;
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
handler_ctx.host = url.hostinfo;
|
|
Packit |
3adb1e |
handler_ctx.method = method;
|
|
Packit |
3adb1e |
handler_ctx.path = url.path;
|
|
Packit |
3adb1e |
handler_ctx.authn = authn;
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
handler_ctx.req_body_path = req_body_path;
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
handler_ctx.acceptor = accept_response;
|
|
Packit |
3adb1e |
handler_ctx.acceptor_baton = &app_ctx;
|
|
Packit |
3adb1e |
handler_ctx.handler = handle_response;
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
request = serf_connection_request_create(connection, setup_bwtp_upgrade,
|
|
Packit |
3adb1e |
&handler_ctx);
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
for (i = 0; i < app_ctx.count; i++) {
|
|
Packit |
3adb1e |
apr_atomic_inc32(&handler_ctx.requests_outstanding);
|
|
Packit |
3adb1e |
}
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
while (1) {
|
|
Packit |
3adb1e |
status = serf_context_run(context, SERF_DURATION_FOREVER, pool);
|
|
Packit |
3adb1e |
if (APR_STATUS_IS_TIMEUP(status))
|
|
Packit |
3adb1e |
continue;
|
|
Packit |
3adb1e |
if (status) {
|
|
Packit |
3adb1e |
char buf[200];
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
printf("Error running context: (%d) %s\n", status,
|
|
Packit |
3adb1e |
apr_strerror(status, buf, sizeof(buf)));
|
|
Packit |
3adb1e |
apr_pool_destroy(pool);
|
|
Packit |
3adb1e |
exit(1);
|
|
Packit |
3adb1e |
}
|
|
Packit |
3adb1e |
if (!apr_atomic_read32(&handler_ctx.requests_outstanding)) {
|
|
Packit |
3adb1e |
break;
|
|
Packit |
3adb1e |
}
|
|
Packit |
3adb1e |
/* Debugging purposes only! */
|
|
Packit |
3adb1e |
serf_debug__closed_conn(app_ctx.bkt_alloc);
|
|
Packit |
3adb1e |
}
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
serf_connection_close(connection);
|
|
Packit |
3adb1e |
|
|
Packit |
3adb1e |
apr_pool_destroy(pool);
|
|
Packit |
3adb1e |
return 0;
|
|
Packit |
3adb1e |
}
|