#include #include inherit NET_PATH "http/fetch"; int buffer_content(string data) { P2(("%O got data:\n%O\n", ME, data)) mixed *waiter; foreach (waiter : qToArray(ME)) { funcall(waiter[0], data, waiter[1] ? fheaders : copy(fheaders), http_status, 1); } next_input_to(#'buffer_content); //' return 1; } #if 0 disconnected(string data) { P2(("%O got disconnected:\n%O\n", ME, data)) headers["_fetchtime"] = isotime(ctime(time()), 1); if (headers["last-modified"]) rheaders["if-modified-since"] = headers["last-modified"]; //if (headers["etag"]) // rheaders["if-none-match"] = headers["etag"]; // heise does not work with etag fheaders = headers; buffer = headers = 0; switch (http_status) { default: mixed *waiter; while (qSize(ME)) { waiter = shift(ME); P2(("%O calls back.. body is %O\n", ME, data)) funcall(waiter[0], data, waiter[1] ? fheaders : copy(fheaders), http_status, 0); } if (http_status == R_OK) break; // doesn't seem to get here when HTTP returns 301 or 302. strange. // fall thru case R_NOTMODIFIED: qDel(ME); qInit(ME, 150, 5); } fetching = 0; return 1; // presume this disc was expected } #endif