void ts_http_fetcher_launch(http_fetcher *fch) { int64_t hdr_len; // post body , content-length TSIOBufferWrite(fch->req_buffer, "\r\n", sizeof("\r\n")-1); hdr_len = TSIOBufferReaderAvail(fch->req_reader); fch->http_vc = TSHttpConnect(&(fch->aip)); fch->hdr_buffer = TSIOBufferSizedCreate(TS_IOBUFFER_SIZE_INDEX_8K); fch->hdr_reader = TSIOBufferReaderAlloc(fch->hdr_buffer); fch->hdr_bufp = TSMBufferCreate(); fch->hdr_loc = TSHttpHdrCreate(fch->hdr_bufp); fch->resp_buffer = TSIOBufferCreate(); fch->resp_reader = TSIOBufferReaderAlloc(fch->resp_buffer); fch->http_parser = TSHttpParserCreate(); fch->fetch_contp = TSContCreate(ts_http_fetch_handler, fch->mutexp); TSContDataSet(fch->fetch_contp, fch); fch->read_vio = TSVConnRead(fch->http_vc, fch->fetch_contp, fch->resp_buffer, INT64_MAX); if (fch->method == TS_FETCH_METHOD_POST && fch->post_cl >= 0) { fch->write_vio = TSVConnWrite(fch->http_vc, fch->fetch_contp, fch->req_reader, hdr_len + fch->post_cl); } else { fch->write_vio = TSVConnWrite(fch->http_vc, fch->fetch_contp, fch->req_reader, hdr_len); } fch->launched = 1; }
static int handle_output(TSCont contp, JCrusherData * data) { const char *output; int64_t written_bytes; /* Check to see if we need to initiate the output operation. */ TSDebug("jcrusher", "Start of handle_output()"); if (!data->downstream_vio) { TSVConn output_conn; /* Get the json_object as string and write it into buffer */ output = json_object_to_json_string_ext(data->json_obj, JSON_C_TO_STRING_PLAIN); written_bytes = TSIOBufferWrite(data->downstream_buffer, output, (int64_t)(strlen(output))); TSDebug("jcrusher", "handle_output - Just write %" PRId64 " bytes to ouput", written_bytes); /* Get the output connection where we'll write data to. */ output_conn = TSTransformOutputVConnGet(contp); data->downstream_vio = TSVConnWrite(output_conn, contp, data->downstream_reader, TSIOBufferReaderAvail(data->downstream_reader)); TSAssert(data->downstream_vio); } TSDebug("jcrusher", "End of handle_output()"); return 1; }
static void ts_lua_http_intercept_setup_write(ts_lua_http_intercept_ctx *ictx) { ictx->output.buffer = TSIOBufferCreate(); ictx->output.reader = TSIOBufferReaderAlloc(ictx->output.buffer); ictx->output.vio = TSVConnWrite(ictx->net_vc, ictx->contp, ictx->output.reader, INT64_MAX); }
static int transform_bypass(TSCont contp, TransformData *data) { data->state = STATE_BYPASS; if (data->server_vc) { TSVConnAbort(data->server_vc, 1); data->server_vc = NULL; data->server_vio = NULL; } if (data->output_buf) { TSIOBufferDestroy(data->output_buf); data->output_buf = NULL; data->output_reader = NULL; } TSIOBufferReaderConsume(data->input_reader, sizeof(int)); data->output_vc = TSTransformOutputVConnGet((TSVConn)contp); if (data->output_vc == NULL) { TSError("[%s] TSTransformOutputVConnGet returns NULL", PLUGIN_NAME); } else { data->output_vio = TSVConnWrite(data->output_vc, contp, data->input_reader, TSIOBufferReaderAvail(data->input_reader)); if (data->output_vio == NULL) { TSError("[%s] TSVConnWrite returns NULL", PLUGIN_NAME); } } return 1; }
static int transform_write(TSCont contp, TransformData *data) { int content_length; data->state = STATE_WRITE; content_length = TSIOBufferReaderAvail(data->input_reader); if (content_length >= 0) { data->server_vio = TSVConnWrite(data->server_vc, contp, TSIOBufferReaderClone(data->input_reader), content_length); } else { TSError("[%s] TSIOBufferReaderAvail returns TS_ERROR", PLUGIN_NAME); } return 0; }
static int handle_output(TSCont contp, MyData *data) { /* Check to see if we need to initiate the output operation. */ if (!data->output_vio) { TSVConn output_conn; /* Get the output connection where we'll write data to. */ output_conn = TSTransformOutputVConnGet(contp); data->output_vio = TSVConnWrite(output_conn, contp, data->output_reader, TSIOBufferReaderAvail(data->output_reader)); TSAssert(data->output_vio); } return 1; }
static void stats_process_read(TSCont contp, TSEvent event, stats_state * my_state) { TSDebug("istats", "stats_process_read(%d)", event); if (event == TS_EVENT_VCONN_READ_READY) { my_state->output_bytes = stats_add_resp_header(my_state); TSVConnShutdown(my_state->net_vc, 1, 0); my_state->write_vio = TSVConnWrite(my_state->net_vc, contp, my_state->resp_reader, INT64_MAX); } else if (event == TS_EVENT_ERROR) { TSError("stats_process_read: Received TS_EVENT_ERROR\n"); } else if (event == TS_EVENT_VCONN_EOS) { /* client may end the connection, simply return */ return; } else if (event == TS_EVENT_NET_ACCEPT_FAILED) { TSError("stats_process_read: Received TS_EVENT_NET_ACCEPT_FAILED\n"); } else { printf("Unexpected Event %d\n", event); TSReleaseAssert(!"Unexpected Event"); } }
/* Process a read event from the SM */ static void acme_process_read(TSCont contp, TSEvent event, AcmeState *my_state) { if (event == TS_EVENT_VCONN_READ_READY) { if (-1 == my_state->fd) { my_state->output_bytes = add_data_to_resp(ACME_DENIED_RESP, strlen(ACME_DENIED_RESP), my_state); } else { my_state->output_bytes = add_data_to_resp(ACME_OK_RESP, strlen(ACME_OK_RESP), my_state); } TSVConnShutdown(my_state->net_vc, 1, 0); my_state->write_vio = TSVConnWrite(my_state->net_vc, contp, my_state->resp_reader, INT64_MAX); } else if (event == TS_EVENT_ERROR) { TSError("[%s] acme_process_read: Received TS_EVENT_ERROR", PLUGIN_NAME); } else if (event == TS_EVENT_VCONN_EOS) { /* client may end the connection, simply return */ return; } else if (event == TS_EVENT_NET_ACCEPT_FAILED) { TSError("[%s] acme_process_read: Received TS_EVENT_NET_ACCEPT_FAILED", PLUGIN_NAME); } else { TSReleaseAssert(!"Unexpected Event"); } }
static int transform_read(TSCont contp, TransformData *data) { data->state = STATE_READ; TSIOBufferDestroy(data->input_buf); data->input_buf = NULL; data->input_reader = NULL; data->server_vio = TSVConnRead(data->server_vc, contp, data->output_buf, data->content_length); data->output_vc = TSTransformOutputVConnGet((TSVConn)contp); if (data->output_vc == NULL) { TSError("[%s] TSTransformOutputVConnGet returns NULL", PLUGIN_NAME); } else { data->output_vio = TSVConnWrite(data->output_vc, contp, data->output_reader, data->content_length); if (data->output_vio == NULL) { TSError("[%s] TSVConnWrite returns NULL", PLUGIN_NAME); } } return 0; }
/* Process a read event from the SM */ static void hc_process_read(TSCont contp, TSEvent event, HCState *my_state) { if (event == TS_EVENT_VCONN_READ_READY) { if (my_state->data->exists) { TSDebug(PLUGIN_NAME, "Setting OK response header"); my_state->output_bytes = add_data_to_resp(my_state->info->ok, my_state->info->o_len, my_state); } else { TSDebug(PLUGIN_NAME, "Setting MISS response header"); my_state->output_bytes = add_data_to_resp(my_state->info->miss, my_state->info->m_len, my_state); } TSVConnShutdown(my_state->net_vc, 1, 0); my_state->write_vio = TSVConnWrite(my_state->net_vc, contp, my_state->resp_reader, INT64_MAX); } else if (event == TS_EVENT_ERROR) { TSError("hc_process_read: Received TS_EVENT_ERROR\n"); } else if (event == TS_EVENT_VCONN_EOS) { /* client may end the connection, simply return */ return; } else if (event == TS_EVENT_NET_ACCEPT_FAILED) { TSError("hc_process_read: Received TS_EVENT_NET_ACCEPT_FAILED\n"); } else { TSReleaseAssert(!"Unexpected Event"); } }
static int ts_lua_cache_write(lua_State *L) { int64_t length, n; const char *data; size_t dlen; ts_lua_cont_info *ci; ts_lua_cache_info *info; ci = ts_lua_get_cont_info(L); if (ci == NULL) return 0; n = lua_gettop(L); if (n < 2) { return luaL_error(L, "'ts.cache_write' requires parameter"); } /* data */ if (!lua_isstring(L, 2)) { return luaL_error(L, "'ts.cache_write' second param is not string"); } data = luaL_checklstring(L, 2, &dlen); /* length */ length = dlen; if (n >= 3) { if (!lua_isnumber(L, 3)) { return luaL_error(L, "'ts.cache_write' third param is not number"); } length = lua_tonumber(L, 3); if (length <= 0) { return luaL_error(L, "'ts.cache_write' third param is a not valid number"); } if (length > dlen) length = dlen; } /* table */ if (!lua_istable(L, 1)) { return luaL_error(L, "'ts.cache_write' first param is not valid"); } lua_pushlstring(L, "info", sizeof("info") - 1); lua_gettable(L, 1); if (!lua_islightuserdata(L, -1)) { return luaL_error(L, "'ts.cache_write' first param is not valid"); } info = (ts_lua_cache_info*)lua_touserdata(L, -1); lua_pop(L, 1); if (info->optype != TS_LUA_CACHE_WRITE) { return luaL_error(L, "'ts.cache_write' is writing to invalid vc"); } if (info->err) { lua_pushnil(L); return 1; } info->need += length; info->current_handler = &ts_lua_cache_handle_write; TSIOBufferWrite(info->ioh.buffer, data, length); if (info->ioh.vio == NULL) { info->ioh.vio = TSVConnWrite(info->cache_vc, info->contp, info->ioh.reader, INT64_MAX); } else { TSVIOReenable(info->ioh.vio); } info->wait = 1; return lua_yield(L, 0); }
static void process_data(TSCont contp, ibd_ctx* ibd) { TSVConn output_conn; TSIOBuffer buf_test; TSVIO input_vio; ib_txn_ctx *data; int64_t towrite; int64_t avail; int first_time = 0; char *bufp = NULL; TSDebug("ironbee", "Entering process_data()"); /* Get the output (downstream) vconnection where we'll write data to. */ output_conn = TSTransformOutputVConnGet(contp); /* Get the write VIO for the write operation that was performed on * ourself. This VIO contains the buffer that we are to read from * as well as the continuation we are to call when the buffer is * empty. This is the input VIO (the write VIO for the upstream * vconnection). */ input_vio = TSVConnWriteVIOGet(contp); data = TSContDataGet(contp); if (!ibd->data->output_buffer) { first_time = 1; ibd->data->output_buffer = TSIOBufferCreate(); ibd->data->output_reader = TSIOBufferReaderAlloc(ibd->data->output_buffer); TSDebug("ironbee", "\tWriting %d bytes on VConn", TSVIONBytesGet(input_vio)); ibd->data->output_vio = TSVConnWrite(output_conn, contp, ibd->data->output_reader, INT64_MAX); } if (ibd->data->buf) { /* this is the second call to us, and we have data buffered. * Feed buffered data to ironbee */ ib_conndata_t icdata; icdata.ib = ironbee; icdata.mp = data->ssn->iconn->mp; icdata.conn = data->ssn->iconn; icdata.dalloc = ibd->data->buflen; icdata.dlen = ibd->data->buflen; icdata.data = (uint8_t *)ibd->data->buf; (*ibd->ibd->ib_notify)(ironbee, &icdata); TSfree(ibd->data->buf); ibd->data->buf = NULL; ibd->data->buflen = 0; } /* test for input data */ buf_test = TSVIOBufferGet(input_vio); if (!buf_test) { TSDebug("ironbee", "No more data, finishing"); TSVIONBytesSet(ibd->data->output_vio, TSVIONDoneGet(input_vio)); TSVIOReenable(ibd->data->output_vio); /* FIXME - is this right here - can conn data be kept across reqs? */ ibd->data->output_buffer = NULL; ibd->data->output_reader = NULL; ibd->data->output_vio = NULL; return; } /* Determine how much data we have left to read. For this null * transform plugin this is also the amount of data we have left * to write to the output connection. */ towrite = TSVIONTodoGet(input_vio); TSDebug("ironbee", "\ttoWrite is %" PRId64 "", towrite); if (towrite > 0) { /* The amount of data left to read needs to be truncated by * the amount of data actually in the read buffer. */ /* first time through, we have to buffer the data until * after the headers have been sent. Ugh! */ if (first_time) { bufp = ibd->data->buf = TSmalloc(towrite); ibd->data->buflen = towrite; } avail = TSIOBufferReaderAvail(TSVIOReaderGet(input_vio)); TSDebug("ironbee", "\tavail is %" PRId64 "", avail); if (towrite > avail) { towrite = avail; } if (towrite > 0) { int btowrite = towrite; /* Copy the data from the read buffer to the output buffer. */ TSIOBufferCopy(TSVIOBufferGet(ibd->data->output_vio), TSVIOReaderGet(input_vio), towrite, 0); /* feed the data to ironbee, and consume them */ while (btowrite > 0) { ib_conndata_t icdata; int64_t ilength; TSIOBufferReader input_reader = TSVIOReaderGet(input_vio); TSIOBufferBlock blkp = TSIOBufferReaderStart(input_reader); const char *ibuf = TSIOBufferBlockReadStart(blkp, input_reader, &ilength); /* feed it to ironbee or to buffer */ if (first_time) { memcpy(bufp, ibuf, ilength); bufp += ilength; } else { icdata.ib = ironbee; icdata.mp = data->ssn->iconn->mp; icdata.conn = data->ssn->iconn; icdata.dalloc = ilength; icdata.dlen = ilength; icdata.data = (uint8_t *)ibuf; (*ibd->ibd->ib_notify)(ironbee, &icdata); } //"response", TSHttpTxnClientRespGet, ib_state_notify_conn_data_out // ib_state_notify_conn_data_out(ironbee, &icdata); /* and mark it as all consumed */ btowrite -= ilength; TSIOBufferReaderConsume(input_reader, ilength); TSVIONDoneSet(input_vio, TSVIONDoneGet(input_vio) + ilength); } } } /* Now we check the input VIO to see if there is data left to * read. */ if (TSVIONTodoGet(input_vio) > 0) { if (towrite > 0) { /* If there is data left to read, then we reenable the output * connection by reenabling the output VIO. This will wake up * the output connection and allow it to consume data from the * output buffer. */ TSVIOReenable(ibd->data->output_vio); /* Call back the input VIO continuation to let it know that we * are ready for more data. */ TSContCall(TSVIOContGet(input_vio), TS_EVENT_VCONN_WRITE_READY, input_vio); } } else { /* If there is no data left to read, then we modify the output * VIO to reflect how much data the output connection should * expect. This allows the output connection to know when it * is done reading. We then reenable the output connection so * that it can consume the data we just gave it. */ TSVIONBytesSet(ibd->data->output_vio, TSVIONDoneGet(input_vio)); TSVIOReenable(ibd->data->output_vio); /* Call back the input VIO continuation to let it know that we * have completed the write operation. */ TSContCall(TSVIOContGet(input_vio), TS_EVENT_VCONN_WRITE_COMPLETE, input_vio); } }
static int ts_lua_transform_handler(TSCont contp, ts_lua_http_transform_ctx *transform_ctx, TSEvent event, int n) { TSVConn output_conn; TSVIO input_vio; TSIOBufferReader input_reader; TSIOBufferBlock blk; int64_t toread, towrite, blk_len, upstream_done, input_avail, input_wm_bytes, l; const char *start; const char *res; size_t res_len; int ret, eos, write_down, rc, top, empty_input; ts_lua_coroutine *crt; ts_lua_cont_info *ci; lua_State *L; TSMutex mtxp; ci = &transform_ctx->cinfo; crt = &ci->routine; mtxp = crt->mctx->mutexp; L = crt->lua; output_conn = TSTransformOutputVConnGet(contp); input_vio = TSVConnWriteVIOGet(contp); empty_input = 0; if (!TSVIOBufferGet(input_vio)) { if (transform_ctx->output.vio) { TSDebug(TS_LUA_DEBUG_TAG, "[%s] reenabling output VIO after input VIO does not exist", __FUNCTION__); TSVIONBytesSet(transform_ctx->output.vio, transform_ctx->total); TSVIOReenable(transform_ctx->output.vio); return 0; } else { TSDebug(TS_LUA_DEBUG_TAG, "[%s] no input VIO and output VIO", __FUNCTION__); empty_input = 1; } } else { // input VIO exists input_wm_bytes = TSIOBufferWaterMarkGet(TSVIOBufferGet(input_vio)); if (transform_ctx->upstream_watermark_bytes >= 0 && transform_ctx->upstream_watermark_bytes != input_wm_bytes) { TSDebug(TS_LUA_DEBUG_TAG, "[%s] Setting input_vio watermark to %" PRId64 " bytes", __FUNCTION__, transform_ctx->upstream_watermark_bytes); TSIOBufferWaterMarkSet(TSVIOBufferGet(input_vio), transform_ctx->upstream_watermark_bytes); } } if (empty_input == 0) { input_reader = TSVIOReaderGet(input_vio); } if (!transform_ctx->output.buffer) { transform_ctx->output.buffer = TSIOBufferCreate(); transform_ctx->output.reader = TSIOBufferReaderAlloc(transform_ctx->output.buffer); transform_ctx->reserved.buffer = TSIOBufferCreate(); transform_ctx->reserved.reader = TSIOBufferReaderAlloc(transform_ctx->reserved.buffer); if (empty_input == 0) { transform_ctx->upstream_bytes = TSVIONBytesGet(input_vio); } else { transform_ctx->upstream_bytes = 0; } transform_ctx->downstream_bytes = INT64_MAX; } if (empty_input == 0) { input_avail = TSIOBufferReaderAvail(input_reader); upstream_done = TSVIONDoneGet(input_vio); toread = TSVIONTodoGet(input_vio); if (toread <= input_avail) { // upstream finished eos = 1; } else { eos = 0; } } else { input_avail = 0; toread = 0; eos = 1; } if (input_avail > 0) { // move to the reserved.buffer TSIOBufferCopy(transform_ctx->reserved.buffer, input_reader, input_avail, 0); // reset input TSIOBufferReaderConsume(input_reader, input_avail); TSVIONDoneSet(input_vio, upstream_done + input_avail); } write_down = 0; if (empty_input == 0) { towrite = TSIOBufferReaderAvail(transform_ctx->reserved.reader); } else { towrite = 0; } TSMutexLock(mtxp); ts_lua_set_cont_info(L, ci); do { if (event == TS_LUA_EVENT_COROUTINE_CONT) { event = 0; goto launch; } else { n = 2; } if (towrite == 0 && empty_input == 0) { break; } if (empty_input == 0) { blk = TSIOBufferReaderStart(transform_ctx->reserved.reader); start = TSIOBufferBlockReadStart(blk, transform_ctx->reserved.reader, &blk_len); lua_pushlightuserdata(L, transform_ctx); lua_rawget(L, LUA_GLOBALSINDEX); /* push function */ if (towrite > blk_len) { lua_pushlstring(L, start, (size_t)blk_len); towrite -= blk_len; TSIOBufferReaderConsume(transform_ctx->reserved.reader, blk_len); } else { lua_pushlstring(L, start, (size_t)towrite); TSIOBufferReaderConsume(transform_ctx->reserved.reader, towrite); towrite = 0; } if (!towrite && eos) { lua_pushinteger(L, 1); /* second param, data finished */ } else { lua_pushinteger(L, 0); /* second param, data not finish */ } } else { lua_pushlightuserdata(L, transform_ctx); lua_rawget(L, LUA_GLOBALSINDEX); /* push function */ lua_pushlstring(L, "", 0); lua_pushinteger(L, 1); /* second param, data finished */ } launch: rc = lua_resume(L, n); top = lua_gettop(L); switch (rc) { case LUA_YIELD: // coroutine yield TSMutexUnlock(mtxp); return 0; case 0: // coroutine success if (top == 2) { ret = lua_tointeger(L, -1); /* 0 is not finished, 1 is finished */ res = lua_tolstring(L, -2, &res_len); } else { // what hells code are you writing ? ret = 0; res = NULL; res_len = 0; } break; default: // coroutine failed TSError("[ts_lua] lua_resume failed: %s", lua_tostring(L, -1)); ret = 1; res = NULL; res_len = 0; break; } if (res && res_len > 0) { if (!transform_ctx->output.vio) { l = transform_ctx->downstream_bytes; if (ret) { l = res_len; } transform_ctx->output.vio = TSVConnWrite(output_conn, contp, transform_ctx->output.reader, l); // HttpSM go on } TSIOBufferWrite(transform_ctx->output.buffer, res, res_len); transform_ctx->total += res_len; write_down = 1; } lua_pop(L, top); if (ret || (eos && !towrite)) { // EOS eos = 1; break; } } while (towrite > 0); TSMutexUnlock(mtxp); if (eos && !transform_ctx->output.vio) { transform_ctx->output.vio = TSVConnWrite(output_conn, contp, transform_ctx->output.reader, 0); } if (write_down || eos) { TSVIOReenable(transform_ctx->output.vio); } if (toread > input_avail) { // upstream not finished. if (eos) { TSVIONBytesSet(transform_ctx->output.vio, transform_ctx->total); if (empty_input == 0) { TSContCall(TSVIOContGet(input_vio), TS_EVENT_VCONN_EOS, input_vio); } } else { if (empty_input == 0) { TSContCall(TSVIOContGet(input_vio), TS_EVENT_VCONN_WRITE_READY, input_vio); } } } else { // upstream is finished. TSVIONBytesSet(transform_ctx->output.vio, transform_ctx->total); if (empty_input == 0) { TSContCall(TSVIOContGet(input_vio), TS_EVENT_VCONN_WRITE_COMPLETE, input_vio); } } return 0; }
static int ts_dechunk_transform_handler(TSCont contp, ts_dechunk_transform_ctx *tc) { TSVConn output_conn; TSVIO input_vio; TSIOBufferReader input_reader; int64_t towrite, upstream_done, avail; int ret, eos; output_conn = TSTransformOutputVConnGet(contp); input_vio = TSVConnWriteVIOGet(contp); input_reader = TSVIOReaderGet(input_vio); if (!tc->output_buffer) { tc->output_buffer = TSIOBufferCreate(); tc->output_reader = TSIOBufferReaderAlloc(tc->output_buffer); tc->output_vio = TSVConnWrite(output_conn, contp, tc->output_reader, INT64_MAX); } if (!TSVIOBufferGet(input_vio)) { TSVIONBytesSet(tc->output_vio, tc->total); TSVIOReenable(tc->output_vio); return 1; } towrite = TSVIONTodoGet(input_vio); upstream_done = TSVIONDoneGet(input_vio); avail = TSIOBufferReaderAvail(input_reader); if (towrite > avail) { towrite = avail; eos = 0; } else { eos = 1; } ret = ts_dechunk_process(tc->info, input_reader, tc->output_buffer, eos); if (ret < 0) { tc->total = TSVIONDoneGet(tc->output_vio) + TSIOBufferReaderAvail(tc->output_reader); TSVIONBytesSet(tc->output_vio, tc->total); TSVIOReenable(tc->output_vio); TSContCall(TSVIOContGet(input_vio), TS_EVENT_ERROR, input_vio); return ret; } if (!ret) { TSVIOReenable(tc->output_vio); TSContCall(TSVIOContGet(input_vio), TS_EVENT_VCONN_WRITE_READY, input_vio); } else { tc->total = TSVIONDoneGet(tc->output_vio) + TSIOBufferReaderAvail(tc->output_reader); TSVIONBytesSet(tc->output_vio, tc->total); TSVIOReenable(tc->output_vio); TSContCall(TSVIOContGet(input_vio), TS_EVENT_VCONN_WRITE_COMPLETE, input_vio); } return 1; }
static int ts_lua_transform_handler(TSCont contp, ts_lua_transform_ctx *transform_ctx) { TSVConn output_conn; TSVIO input_vio; TSIOBufferReader input_reader; TSIOBufferBlock blk; int64_t towrite, blk_len, upstream_done, avail, left; const char *start; const char *res; size_t res_len; int ret, eos; lua_State *L; TSMutex mtxp; L = transform_ctx->hctx->lua; mtxp = transform_ctx->hctx->mctx->mutexp; output_conn = TSTransformOutputVConnGet(contp); input_vio = TSVConnWriteVIOGet(contp); input_reader = TSVIOReaderGet(input_vio); if (!transform_ctx->output_buffer) { transform_ctx->output_buffer = TSIOBufferCreate(); transform_ctx->output_reader = TSIOBufferReaderAlloc(transform_ctx->output_buffer); transform_ctx->output_vio = TSVConnWrite(output_conn, contp, transform_ctx->output_reader, INT64_MAX); } if (!TSVIOBufferGet(input_vio)) { TSVIONBytesSet(transform_ctx->output_vio, transform_ctx->total); TSVIOReenable(transform_ctx->output_vio); return 1; } if (transform_ctx->eos) { return 1; } left = towrite = TSVIONTodoGet(input_vio); upstream_done = TSVIONDoneGet(input_vio); avail = TSIOBufferReaderAvail(input_reader); eos = 0; if (left <= avail) eos = 1; if (towrite > avail) towrite = avail; TSMutexLock(mtxp); blk = TSIOBufferReaderStart(input_reader); do { start = TSIOBufferBlockReadStart(blk, input_reader, &blk_len); lua_pushlightuserdata(L, transform_ctx); lua_rawget(L, LUA_GLOBALSINDEX); /* push function */ if (towrite > blk_len) { lua_pushlstring(L, start, (size_t)blk_len); towrite -= blk_len; } else { lua_pushlstring(L, start, (size_t)towrite); towrite = 0; } if (!towrite && eos) { lua_pushinteger(L, 1); /* second param, not finish */ } else { lua_pushinteger(L, 0); /* second param, not finish */ } if (lua_pcall(L, 2, 2, 0)) { fprintf(stderr, "lua_pcall failed: %s\n", lua_tostring(L, -1)); } ret = lua_tointeger(L, -1); /* 0 is not finished, 1 is finished */ res = lua_tolstring(L, -2, &res_len); if (res && res_len) { TSIOBufferWrite(transform_ctx->output_buffer, res, res_len); transform_ctx->total += res_len; } lua_pop(L, 2); if (ret || (eos && !towrite)) { // EOS eos = 1; break; } blk = TSIOBufferBlockNext(blk); } while (blk && towrite > 0); TSMutexUnlock(mtxp); TSIOBufferReaderConsume(input_reader, avail); TSVIONDoneSet(input_vio, upstream_done + avail); if (eos) { transform_ctx->eos = 1; TSVIONBytesSet(transform_ctx->output_vio, transform_ctx->total); TSVIOReenable(transform_ctx->output_vio); TSContCall(TSVIOContGet(input_vio), TS_EVENT_VCONN_WRITE_COMPLETE, input_vio); } else { TSVIOReenable(transform_ctx->output_vio); TSContCall(TSVIOContGet(input_vio), TS_EVENT_VCONN_WRITE_READY, input_vio); } return 1; }
static void handle_transform(TSCont contp) { TSVConn output_conn; TSVIO write_vio; MyData *data; int64_t towrite; /* Get the output connection where we'll write data to. */ output_conn = TSTransformOutputVConnGet(contp); /* Get the write VIO for the write operation that was performed on ourself. This VIO contains the buffer that we are to read from as well as the continuation we are to call when the buffer is empty. */ write_vio = TSVConnWriteVIOGet(contp); /* Get our data structure for this operation. The private data structure contains the output VIO and output buffer. If the private data structure pointer is NULL, then we'll create it and initialize its internals. */ data = TSContDataGet(contp); if (!data) { towrite = TSVIONBytesGet(write_vio); if (towrite != INT64_MAX) { towrite += append_buffer_length; } data = my_data_alloc(); data->output_buffer = TSIOBufferCreate(); data->output_reader = TSIOBufferReaderAlloc(data->output_buffer); data->output_vio = TSVConnWrite(output_conn, contp, data->output_reader, towrite); TSContDataSet(contp, data); } /* We also check to see if the write VIO's buffer is non-NULL. A NULL buffer indicates that the write operation has been shutdown and that the continuation does not want us to send any more WRITE_READY or WRITE_COMPLETE events. For this simplistic transformation that means we're done. In a more complex transformation we might have to finish writing the transformed data to our output connection. */ if (!TSVIOBufferGet(write_vio)) { if (data->append_needed) { data->append_needed = 0; TSIOBufferCopy(TSVIOBufferGet(data->output_vio), append_buffer_reader, append_buffer_length, 0); } TSVIONBytesSet(data->output_vio, TSVIONDoneGet(write_vio) + append_buffer_length); TSVIOReenable(data->output_vio); return; } /* Determine how much data we have left to read. For this append transform plugin this is also the amount of data we have left to write to the output connection. */ towrite = TSVIONTodoGet(write_vio); if (towrite > 0) { /* The amount of data left to read needs to be truncated by the amount of data actually in the read buffer. */ int64_t avail = TSIOBufferReaderAvail(TSVIOReaderGet(write_vio)); if (towrite > avail) { towrite = avail; } if (towrite > 0) { /* Copy the data from the read buffer to the output buffer. */ TSIOBufferCopy(TSVIOBufferGet(data->output_vio), TSVIOReaderGet(write_vio), towrite, 0); /* Tell the read buffer that we have read the data and are no longer interested in it. */ TSIOBufferReaderConsume(TSVIOReaderGet(write_vio), towrite); /* Modify the write VIO to reflect how much data we've completed. */ TSVIONDoneSet(write_vio, TSVIONDoneGet(write_vio) + towrite); } } /* Now we check the write VIO to see if there is data left to read. */ if (TSVIONTodoGet(write_vio) > 0) { if (towrite > 0) { /* If there is data left to read, then we reenable the output connection by reenabling the output VIO. This will wakeup the output connection and allow it to consume data from the output buffer. */ TSVIOReenable(data->output_vio); /* Call back the write VIO continuation to let it know that we are ready for more data. */ TSContCall(TSVIOContGet(write_vio), TS_EVENT_VCONN_WRITE_READY, write_vio); } } else { if (data->append_needed) { data->append_needed = 0; TSIOBufferCopy(TSVIOBufferGet(data->output_vio), append_buffer_reader, append_buffer_length, 0); } /* If there is no data left to read, then we modify the output VIO to reflect how much data the output connection should expect. This allows the output connection to know when it is done reading. We then reenable the output connection so that it can consume the data we just gave it. */ TSVIONBytesSet(data->output_vio, TSVIONDoneGet(write_vio) + append_buffer_length); TSVIOReenable(data->output_vio); /* Call back the write VIO continuation to let it know that we have completed the write operation. */ TSContCall(TSVIOContGet(write_vio), TS_EVENT_VCONN_WRITE_COMPLETE, write_vio); } }
static void handle_transform(TSCont contp) { TSVConn output_conn; TSIOBuffer buf_test; TSVIO input_vio; MyData *data; int64_t towrite; int64_t avail; TSDebug("null-transform", "Entering handle_transform()"); /* Get the output (downstream) vconnection where we'll write data to. */ output_conn = TSTransformOutputVConnGet(contp); /* Get the write VIO for the write operation that was performed on * ourself. This VIO contains the buffer that we are to read from * as well as the continuation we are to call when the buffer is * empty. This is the input VIO (the write VIO for the upstream * vconnection). */ input_vio = TSVConnWriteVIOGet(contp); /* Get our data structure for this operation. The private data * structure contains the output VIO and output buffer. If the * private data structure pointer is NULL, then we'll create it * and initialize its internals. */ data = TSContDataGet(contp); if (!data) { data = my_data_alloc(); data->output_buffer = TSIOBufferCreate(); data->output_reader = TSIOBufferReaderAlloc(data->output_buffer); TSDebug("null-transform", "\tWriting %" PRId64 " bytes on VConn", TSVIONBytesGet(input_vio)); // data->output_vio = TSVConnWrite(output_conn, contp, data->output_reader, INT32_MAX); data->output_vio = TSVConnWrite(output_conn, contp, data->output_reader, INT64_MAX); // data->output_vio = TSVConnWrite(output_conn, contp, data->output_reader, TSVIONBytesGet(input_vio)); TSContDataSet(contp, data); } /* We also check to see if the input VIO's buffer is non-NULL. A * NULL buffer indicates that the write operation has been * shutdown and that the upstream continuation does not want us to send any * more WRITE_READY or WRITE_COMPLETE events. For this simplistic * transformation that means we're done. In a more complex * transformation we might have to finish writing the transformed * data to our output connection. */ buf_test = TSVIOBufferGet(input_vio); if (!buf_test) { TSVIONBytesSet(data->output_vio, TSVIONDoneGet(input_vio)); TSVIOReenable(data->output_vio); return; } /* Determine how much data we have left to read. For this null * transform plugin this is also the amount of data we have left * to write to the output connection. */ towrite = TSVIONTodoGet(input_vio); TSDebug("null-transform", "\ttoWrite is %" PRId64 "", towrite); if (towrite > 0) { /* The amount of data left to read needs to be truncated by * the amount of data actually in the read buffer. */ avail = TSIOBufferReaderAvail(TSVIOReaderGet(input_vio)); TSDebug("null-transform", "\tavail is %" PRId64 "", avail); if (towrite > avail) { towrite = avail; } if (towrite > 0) { /* Copy the data from the read buffer to the output buffer. */ TSIOBufferCopy(TSVIOBufferGet(data->output_vio), TSVIOReaderGet(input_vio), towrite, 0); /* Tell the read buffer that we have read the data and are no * longer interested in it. */ TSIOBufferReaderConsume(TSVIOReaderGet(input_vio), towrite); /* Modify the input VIO to reflect how much data we've * completed. */ TSVIONDoneSet(input_vio, TSVIONDoneGet(input_vio) + towrite); } } /* Now we check the input VIO to see if there is data left to * read. */ if (TSVIONTodoGet(input_vio) > 0) { if (towrite > 0) { /* If there is data left to read, then we reenable the output * connection by reenabling the output VIO. This will wake up * the output connection and allow it to consume data from the * output buffer. */ TSVIOReenable(data->output_vio); /* Call back the input VIO continuation to let it know that we * are ready for more data. */ TSContCall(TSVIOContGet(input_vio), TS_EVENT_VCONN_WRITE_READY, input_vio); } } else { /* If there is no data left to read, then we modify the output * VIO to reflect how much data the output connection should * expect. This allows the output connection to know when it * is done reading. We then reenable the output connection so * that it can consume the data we just gave it. */ TSVIONBytesSet(data->output_vio, TSVIONDoneGet(input_vio)); TSVIOReenable(data->output_vio); /* Call back the input VIO continuation to let it know that we * have completed the write operation. */ TSContCall(TSVIOContGet(input_vio), TS_EVENT_VCONN_WRITE_COMPLETE, input_vio); } }
/*------------------------------------------------------------------------- handle_transform Get data from upstream vconn. Parse it. Include file if include tags found. Copy data to downstream vconn. Wake up upstream to get more data. Input: contp continuation for the current transaction Output : Return Value: 0 if failure 1 if success -------------------------------------------------------------------------*/ static int handle_transform(TSCont contp) { TSVConn output_conn; TSVIO input_vio; ContData *data; TSIOBufferReader input_reader; int toread, avail, psi, toconsume, towrite; /* Get the output (downstream) vconnection where we'll write data to. */ output_conn = TSTransformOutputVConnGet(contp); /* Get upstream vio */ input_vio = TSVConnWriteVIOGet(contp); data = TSContDataGet(contp); TSAssert(data->magic == MAGIC_ALIVE); if (!data->output_buffer) { data->output_buffer = TSIOBufferCreate(); data->output_reader = TSIOBufferReaderAlloc(data->output_buffer); /* INT64_MAX because we don't know yet how much bytes we'll produce */ data->output_vio = TSVConnWrite(output_conn, contp, data->output_reader, INT64_MAX); } /* If the input VIO's buffer is NULL, the transformation is over */ if (!TSVIOBufferGet(input_vio)) { TSDebug(DBG_TAG, "input_vio NULL, terminating transformation"); TSVIONBytesSet(data->output_vio, data->transform_bytes); TSVIOReenable(data->output_vio); return 1; } /* Determine how much data we have left to read. */ toread = TSVIONTodoGet(input_vio); if (toread > 0) { input_reader = TSVIOReaderGet(input_vio); avail = TSIOBufferReaderAvail(input_reader); /* There are some data available for reading. Let's parse it */ if (avail > 0) { /* No need to parse data if there are too few bytes left to contain an include command... */ if (toread > (PSI_START_TAG_LEN + PSI_END_TAG_LEN)) { psi = parse_data(contp, input_reader, avail, &toconsume, &towrite); } else { towrite = avail; toconsume = avail; psi = 0; } if (towrite > 0) { /* Update the total size of the doc so far */ data->transform_bytes += towrite; /* Copy the data from the read buffer to the output buffer. */ /* TODO: Should we check the return value of TSIOBufferCopy() ? */ TSIOBufferCopy(TSVIOBufferGet(data->output_vio), TSVIOReaderGet(input_vio), towrite, 0); /* Reenable the output connection so it can read the data we've produced. */ TSVIOReenable(data->output_vio); } if (toconsume > 0) { /* Consume data we've processed an we are no longer interested in */ TSIOBufferReaderConsume(input_reader, toconsume); /* Modify the input VIO to reflect how much data we've completed. */ TSVIONDoneSet(input_vio, TSVIONDoneGet(input_vio) + toconsume); } /* Did we find a psi filename to execute in the data ? */ if (psi) { Job *new_job; /* Add a request to include a file into the jobs queue.. */ /* We'll be called back once it's done with an EVENT_IMMEDIATE */ TSDebug(DBG_TAG, "Psi filename extracted. Adding an include job to thread queue."); data->state = STATE_READ_PSI; /* Create a new job request and add it to the queue */ new_job = job_create(contp, &psi_include, NULL); add_to_queue(&job_queue, new_job); /* Signal to the threads there is a new job */ thread_signal_job(); return 1; } } } /* Wake up upstream and downstream vconnections */ wake_up_streams(contp); return 1; }
/** * Process data from ATS. * * Process data from one of the ATS events. * * @param[in,out] contp - the continuation * @param[in,out] ibd - the filter descriptor */ static void process_data(TSCont contp, ibd_ctx *ibd) { int64_t ntodo; int64_t navail; TSIOBufferReader input_reader, output_reader; TSIOBufferBlock block; const char *buf; int64_t nbytes; ib_status_t rc; tsib_filter_ctx *fctx = ibd->data; tsib_txn_ctx *txndata = TSContDataGet(contp); TSVIO input_vio = TSVConnWriteVIOGet(contp); TSIOBuffer in_buf = TSVIOBufferGet(input_vio); /* Test whether we're going into an errordoc */ if (HTTP_CODE(txndata->status)) { /* We're going to an error document, * so we discard all this data */ ib_log_debug2_tx(txndata->tx, "Status is %d, discarding", txndata->status); ibd->data->buffering = IOBUF_DISCARD; } /* Test for EOS */ if (in_buf == NULL) { if (fctx->output_buffer != NULL) { /* flush anything we have buffered. This is final! */ rc = flush_data(fctx, -1, 1); switch(rc) { case IB_OK: break; case IB_EBADVAL: ib_log_error_tx(txndata->tx, "Bad/Inconsistent stream edit(s) ignored."); break; default: /* Can't happen unless a new status is introduced */ ib_log_error_tx(txndata->tx, "Unhandled return value %d", rc); break; } } else { /* I guess NULL input may mean something other than EOS. * This appears to be possible when * processing an HTTP error from the backend. */ ib_log_debug2_tx(txndata->tx, "Filter input was null. No filtering."); /* RNS-1268: seems we may have to go through all the motions * of creating and enabling an output_vio with no data. */ fctx->output_buffer = TSIOBufferCreate(); ib_mm_register_cleanup(txndata->tx->mm, (ib_mm_cleanup_fn_t) TSIOBufferDestroy, (void*) fctx->output_buffer); output_reader = TSIOBufferReaderAlloc(fctx->output_buffer); fctx->output_vio = TSVConnWrite(TSTransformOutputVConnGet(contp), contp, output_reader, 0); TSVIOReenable(fctx->output_vio); } return; } /* Test for first time, and initialise. */ if (!fctx->output_buffer) { // FIXME - What to choose here and why? int64_t output_vio_sz = TSVIONBytesGet(input_vio); // NOTE: Using INT64_MAX asserts on 4.2.2: InkAPI.cc:6261: failed assert `sdk_sanity_check_iocore_structure(connp) == TS_SUCCESS` //int64_t output_vio_sz = INT64_MAX; // NOTE: Does it matter that this is only INT32_MAX as in the examples? // int64_t output_vio_sz = INT32_MAX; //int64_t output_vio_sz = fctx->have_edits // ? INT64_MAX // : TSVIONBytesGet(input_vio); fctx->output_buffer = TSIOBufferCreate(); ib_mm_register_cleanup(txndata->tx->mm, (ib_mm_cleanup_fn_t) TSIOBufferDestroy, (void*) fctx->output_buffer); // FIXME - Where is TSIOBufferReaderFree()? output_reader = TSIOBufferReaderAlloc(fctx->output_buffer); fctx->output_vio = TSVConnWrite(TSTransformOutputVConnGet(contp), contp, output_reader, output_vio_sz); fctx->buffer = TSIOBufferCreate(); ib_mm_register_cleanup(txndata->tx->mm, (ib_mm_cleanup_fn_t) TSIOBufferDestroy, (void*) fctx->buffer); // FIXME - Where is TSIOBufferReaderFree()? fctx->reader = TSIOBufferReaderAlloc(fctx->buffer); /* Get the buffering config */ if (!HTTP_CODE(txndata->status)) { buffer_init(ibd, txndata->tx); } } /* Get any unprocessed bytes. */ ntodo = TSVIONTodoGet(input_vio); /* Test for EOS */ if (ntodo == 0) { ib_log_debug2_tx(txndata->tx, "ntodo zero before consuming data"); flush_data(fctx, -1, 1); /* Call back the input VIO continuation to let it know that we * have completed the write operation. */ TSContCall(TSVIOContGet(input_vio), TS_EVENT_VCONN_WRITE_COMPLETE, input_vio); return; } /* OK, there's some input awaiting our attention */ input_reader = TSVIOReaderGet(input_vio); while (navail = TSIOBufferReaderAvail(input_reader), navail > 0) { block = TSIOBufferReaderStart(input_reader); buf = TSIOBufferBlockReadStart(block, input_reader, &nbytes); rc = (*ibd->ibd->ib_notify_body)(txndata->tx->ib, txndata->tx, buf, nbytes); if (rc != IB_OK) { ib_log_error_tx(txndata->tx, "Error %d notifying body data.", rc); } rc = buffer_data_chunk(fctx, input_reader, nbytes); switch (rc) { case IB_EAGAIN: case IB_OK: break; case IB_EBADVAL: ib_log_error_tx(txndata->tx, "Bad/Inconsistent stream edit(s) ignored."); break; default: /* Can't happen unless a new status is introduced */ ib_log_error_tx(txndata->tx, "Unhandled return value %d", rc); break; } TSIOBufferReaderConsume(input_reader, nbytes); TSVIONDoneSet(input_vio, TSVIONDoneGet(input_vio) + nbytes); } ntodo = TSVIONTodoGet(input_vio); if (ntodo == 0) { ib_log_debug2_tx(txndata->tx, "ntodo zero after consuming data"); flush_data(fctx, -1, 1); /* Call back the input VIO continuation to let it know that we * have completed the write operation. */ TSContCall(TSVIOContGet(input_vio), TS_EVENT_VCONN_WRITE_COMPLETE, input_vio); } else { /* Call back the input VIO continuation to let it know that we * are ready for more data. */ TSContCall(TSVIOContGet(input_vio), TS_EVENT_VCONN_WRITE_READY, input_vio); } }
/** * Process data from ATS. * * Process data from one of the ATS events. * * @param[in,out] contp - the continuation * @param[in,out] ibd - the filter descriptor */ static void process_data(TSCont contp, ibd_ctx *ibd) { int64_t ntodo; int64_t navail; TSIOBufferReader input_reader, output_reader; TSIOBufferBlock block; const char *buf; int64_t nbytes; ib_status_t rc; ib_filter_ctx *fctx = ibd->data; ib_txn_ctx *data = TSContDataGet(contp); TSVIO input_vio = TSVConnWriteVIOGet(contp); TSIOBuffer in_buf = TSVIOBufferGet(input_vio); /* Test whether we're going into an errordoc */ if (IB_HTTP_CODE(data->status)) { /* We're going to an error document, * so we discard all this data */ TSDebug("ironbee", "Status is %d, discarding", data->status); ibd->data->buffering = IOBUF_DISCARD; } /* Test for EOS */ if (in_buf == NULL) { /* flush anything we have buffered. This is final! */ flush_data(fctx, -1, 1); return; } ntodo = TSVIONTodoGet(input_vio); /* Test for first time, and initialise. */ if (!fctx->output_buffer) { fctx->output_buffer = TSIOBufferCreate(); ib_mm_register_cleanup(data->tx->mm, (ib_mm_cleanup_fn_t) TSIOBufferDestroy, (void*) fctx->output_buffer); output_reader = TSIOBufferReaderAlloc(fctx->output_buffer); fctx->output_vio = TSVConnWrite(TSTransformOutputVConnGet(contp), contp, output_reader, TSVIONBytesGet(input_vio)); fctx->buffer = TSIOBufferCreate(); ib_mm_register_cleanup(data->tx->mm, (ib_mm_cleanup_fn_t) TSIOBufferDestroy, (void*) fctx->buffer); fctx->reader = TSIOBufferReaderAlloc(fctx->buffer); /* Get the buffering config */ if (!IB_HTTP_CODE(data->status)) { buffer_init(ibd, data->tx); } /* Do we still have to delay feeding the first data to Ironbee * to keep the IB events in their proper order? * * Appears maybe not, so let's do nothing until it shows signs of breakage. */ #if BUFFER_FIRST /* First time through we can only buffer data until headers are sent. */ fctx->first_time = 1; input_reader = TSVIOReaderGet(input_vio); fctx->buffered = TSIOBufferCopy(fctx->buffer, TSVIOReaderGet(input_vio), ntodo, 0); TSIOBufferReaderConsume(input_reader, fctx->buffered); /* Do we need to request more input or just continue? */ TSVIONDoneSet(input_vio, fctx->buffu`ered + fctx->bytes_done); TSContCall(TSVIOContGet(input_vio), TS_EVENT_VCONN_WRITE_READY, input_vio); return; #endif } /* second time through we have to feed already-buffered data through * ironbee while retaining it in buffer. Regardless of what else happens. */ #if BUFFER_FIRST if (fctx->first_time) { fctx->first_time = 0; for (block = TSIOBufferStart(fctx->buffer); block != NULL; block = TSIOBufferBlockNext(block)) { //nbytes = TSIOBufferBlockDataSizeGet(block); /* FIXME - do this without a reader ? */ buf = TSIOBufferBlockReadStart(block, fctx->reader, &nbytes); //rc = examine_data_chunk(ibd->ibd, data->tx, buf, nbytes); rc = (*ibd->ibd->ib_notify_body)(data->tx->ib, data->tx, buf, nbytes); if (rc != IB_OK) { // FIXME ??? } } } #endif /* Test for EOS */ if (ntodo == 0) { TSDebug("[ironbee]", "ntodo zero before consuming data"); /* Call back the input VIO continuation to let it know that we * have completed the write operation. */ TSContCall(TSVIOContGet(input_vio), TS_EVENT_VCONN_WRITE_COMPLETE, input_vio); return; } /* OK, there's some input awaiting our attention */ input_reader = TSVIOReaderGet(input_vio); while (navail = TSIOBufferReaderAvail(input_reader), navail > 0) { block = TSIOBufferReaderStart(input_reader); buf = TSIOBufferBlockReadStart(block, input_reader, &nbytes); rc = (*ibd->ibd->ib_notify_body)(data->tx->ib, data->tx, buf, nbytes); if (rc != IB_OK) { // FIXME ??? } rc = buffer_data_chunk(fctx, input_reader, nbytes); if (rc != IB_OK) { // FIXME ??? } TSIOBufferReaderConsume(input_reader, nbytes); TSVIONDoneSet(input_vio, TSVIONDoneGet(input_vio) + nbytes); } ntodo = TSVIONTodoGet(input_vio); if (ntodo == 0) { TSDebug("[ironbee]", "ntodo zero after consuming data"); /* Call back the input VIO continuation to let it know that we * have completed the write operation. */ TSContCall(TSVIOContGet(input_vio), TS_EVENT_VCONN_WRITE_COMPLETE, input_vio); } else { /* Call back the input VIO continuation to let it know that we * are ready for more data. */ TSContCall(TSVIOContGet(input_vio), TS_EVENT_VCONN_WRITE_READY, input_vio); } }