daemon/src/net/HTTPConvergenceLayer.cpp

Go to the documentation of this file.

#include "net/HTTPConvergenceLayer.h"
#include <ibrdtn/data/ScopeControlHopLimitBlock.h>
#include <ibrcommon/AutoDelete.h>

namespace dtn
{
        namespace net
        {

        const int TIMEOUT = 1000;
        const int CONN_TIMEOUT = 5000;

        const int HTTP_OK = 200;
        const int HTTP_NO_DATA = 410;

        const int CURL_CONN_OK = 0;
        const int CURL_PARTIAL_FILE = 18;

        /* CURL DEBUG SECTION START */

        struct data {
                char trace_ascii;
        };

        static void dump(const char *text,
                                                FILE *stream, unsigned char *ptr, size_t size,
                                                char nohex)
        {
                  size_t i;
                  size_t c;

                  unsigned int width=0x10;

                  if(nohex)

                        // without the hex output, we can fit more on screen

                        width = 0x40;

                  fprintf(stream, "%s, %10.10ld bytes (0x%8.8lx)\n",
                                  text, (long)size, (long)size);

                  for(i=0; i<size; i+= width) {

                        fprintf(stream, "%4.4lx: ", (long)i);

                        if(!nohex) {

                          // hex not disabled, show it

              for(c = 0; c < width; c++)
                                if(i+c < size)
                                  fprintf(stream, "%02x ", ptr[i+c]);
                                else
                                  fputs("   ", stream);
                        }

                        for(c = 0; (c < width) && (i+c < size); c++) {

                          // check for 0D0A; if found, skip past and start a new line of output

                   if (nohex && (i+c+1 < size) && ptr[i+c]==0x0D && ptr[i+c+1]==0x0A) {
                                i+=(c+2-width);
                                break;
                          }
                          fprintf(stream, "%c",
                                          (ptr[i+c]>=0x20) && (ptr[i+c]<0x80)?ptr[i+c]:'.');

                          // check again for 0D0A, to avoid an extra \n if it's at width

                          if (nohex && (i+c+2 < size) && ptr[i+c+1]==0x0D && ptr[i+c+2]==0x0A) {
                                i+=(c+3-width);
                                break;
                          }
                        }


                        fputc('\n', stream);
                  }
                  fflush(stream);
        }


        static int my_trace(CURL *handle, curl_infotype type,
                     char *data, size_t size, void *userp)
        {
                  struct data *config = (struct data *)userp;
                  const char *text;
                  (void)handle; // prevent compiler warning

                  switch (type) {
                          case CURLINFO_TEXT:
                                fprintf(stderr, "== Info: %s", data);
                          default: // in case a new one is introduced to shock us
                                return 0;

                          case CURLINFO_HEADER_IN:
                                text = "<= Recv header";
                                break;
                          case CURLINFO_DATA_IN:
                                text = "<= Recv data";
                                break;
                  }

                  dump(text, stderr, (unsigned char *)data, size, config->trace_ascii);
                  return 0;
         }

        /* CURL DEBUG SECTION END */


                static size_t HTTPConvergenceLayer_callback_read(void *ptr, size_t size, size_t nmemb, void *s)
                {
                        size_t retcode = 0;
                        std::istream *stream = static_cast<std::istream*>(s);

                        if (stream->eof()) return 0;

                        char *buffer = static_cast<char*>(ptr);

                        stream->read(buffer, (size * nmemb));
                        retcode = stream->gcount();

                        return retcode;
                }

                static size_t HTTPConvergenceLayer_callback_write(void *ptr, size_t size, size_t nmemb, void *s)
                {
                        std::ostream *stream = static_cast<std::ostream*>(s);
                        char *buffer = static_cast<char*>(ptr);

                        if (!stream->good()) return 0;

                        stream->write(buffer, (size * nmemb));
                        stream->flush();

                        return (size * nmemb);
                }

                HTTPConvergenceLayer::HTTPConvergenceLayer(const std::string &server)
                 : _server(server), _push_iob(NULL), _running(true)
                {
                        curl_global_init(CURL_GLOBAL_ALL);
                }


                HTTPConvergenceLayer::~HTTPConvergenceLayer()
                {
                        curl_global_cleanup();
                }

                DownloadThread::DownloadThread(ibrcommon::iobuffer &buf)
                 : _stream(&buf)
                {
                }

                DownloadThread::~DownloadThread()
                {
                        join();
                }

                void DownloadThread::run()
                {
                        try  {
                                while(_stream.good())
                                {
                                        try  {
                                                dtn::data::Bundle bundle;
                                                dtn::data::DefaultDeserializer(_stream) >> bundle;

                                                // increment value in the scope control hop limit block
                                                try {
                                                        dtn::data::ScopeControlHopLimitBlock &schl = bundle.getBlock<dtn::data::ScopeControlHopLimitBlock>();
                                                        schl.increment();
                                                } catch (const dtn::data::Bundle::NoSuchBlockFoundException&) { };

                                                // raise default bundle received event
                                                dtn::net::BundleReceivedEvent::raise(dtn::data::EID(), bundle);
                                        } catch (const ibrcommon::Exception &ex) {
                                                        IBRCOMMON_LOGGER_DEBUG(10) << "http error: " << ex.what() << IBRCOMMON_LOGGER_ENDL;
                                        }

                                        yield();
                                }
                        } catch (const ibrcommon::ThreadException &e)  {
                                std::cerr << "error: " << e.what() << std::endl;
                        }
                }


                void HTTPConvergenceLayer::queue(const dtn::core::Node &node, const ConvergenceLayer::Job &job)
                {
                        dtn::core::BundleStorage &storage = dtn::core::BundleCore::getInstance().getStorage();
                        std::string url_send;

                        long http_code = 0;
                        //double upload_size = 0;

                        try {
                                // read the bundle out of the storage
                                const dtn::data::Bundle bundle = storage.get(job._bundle);

                                ibrcommon::BLOB::Reference ref = ibrcommon::BLOB::create();
                                {
                                        ibrcommon::BLOB::iostream io = ref.iostream();
                                        dtn::data::DefaultSerializer(*io) << bundle;
                                }

                                ibrcommon::BLOB::iostream io = ref.iostream();
                                size_t length = io.size();
                                CURLcode res;
                                CURL *curl_up;

                                url_send = _server + "?eid=" + dtn::core::BundleCore::local.getString();
                                                                                 //+ "&dst-eid=dtn://experthe-laptop/filetransfer";
                                                                                 //+ "&priority=2";
                                                                                 //+ "&ttl=3600";

                                //if (job._bundle.source.getString() == (dtn::core::BundleCore::local.getString() + "/echo-client"))
                                //{
                                //      url_send = _server + "?eid=" + dtn::core::BundleCore::local.getString() + "&dst-eid=echo-client";
                                //}

                                curl_up = curl_easy_init();
                                if(curl_up)
                                {
                                        /* we want to use our own read function */
                                        curl_easy_setopt(curl_up, CURLOPT_READFUNCTION, HTTPConvergenceLayer_callback_read);

                                        /* enable uploading */
                                        curl_easy_setopt(curl_up, CURLOPT_UPLOAD, 1L);

                                        /* HTTP PUT please */
                                        curl_easy_setopt(curl_up, CURLOPT_PUT, 1L);

                                        /* disable connection timeout */
                                        curl_easy_setopt(curl_up, CURLOPT_CONNECTTIMEOUT, 0);

                                        /* specify target URL, and note that this URL should include a file
                                           name, not only a directory */
                                        curl_easy_setopt(curl_up, CURLOPT_URL, url_send.c_str());

                                        /* now specify which file to upload */
                                        curl_easy_setopt(curl_up, CURLOPT_READDATA, &(*io));

                                        /* provide the size of the upload, we specicially typecast the value
                                           to curl_off_t since we must be sure to use the correct data size */
                                        curl_easy_setopt(curl_up, CURLOPT_INFILESIZE_LARGE,
                                                                         (curl_off_t)length);

                                        /* Now run off and do what you've been told! */
                                        res = curl_easy_perform(curl_up);

                                        if(res == CURL_CONN_OK)
                                        {
                                                /* get HTTP Header StatusCode */
                                                curl_easy_getinfo (curl_up, CURLINFO_RESPONSE_CODE, &http_code);
                                                //curl_easy_getinfo (curl, CURLINFO_SIZE_UPLOAD, &upload_size);

                                                /* DEBUG OUTPUT INFORMATION */
                                                //std::cout << "CURL CODE    : " << res << std::endl;
                                                //std::cout << "HTTP CODE    : " << http_code << std::endl;
                                                //std::cout << "UPLOAD_SIZE: " << upload_size << " Bytes" << std::endl;
                                                /* DEBUG OUTPUT INFORMATION */

                                                if(http_code == HTTP_OK)
                                                {
                                                        dtn::net::TransferCompletedEvent::raise(job._destination, bundle);
                                                        dtn::core::BundleEvent::raise(bundle, dtn::core::BUNDLE_FORWARDED);
                                                }
                                        }

                                        curl_easy_cleanup(curl_up);
                                }
                        } catch (const dtn::core::BundleStorage::NoBundleFoundException&) {
                                // send transfer aborted event
                                dtn::net::TransferAbortedEvent::raise(node.getEID(), job._bundle, dtn::net::TransferAbortedEvent::REASON_BUNDLE_DELETED);
                        }

                }

                dtn::core::Node::Protocol HTTPConvergenceLayer::getDiscoveryProtocol() const
                {
                        return dtn::core::Node::CONN_HTTP;
                }

                void HTTPConvergenceLayer::componentUp()
                {
                }

                void HTTPConvergenceLayer::componentRun()
                {

                        std::string url = _server + "?eid=" + dtn::core::BundleCore::local.getString();

                        CURL *curl_down;
                        CURLcode res;

                        /* CURL DEBUG */
            //struct data config;
                        //config.trace_ascii = 1; /* enable ascii tracing */


                        //long http_code = 0;
                        //double download_size = 0;
                        //long connects = 0;

                        while (_running)
                        {
                                curl_down = curl_easy_init();

                                while(curl_down)
                                {
                                        curl_easy_setopt(curl_down, CURLOPT_URL, url.c_str());

                                        /* disable connection timeout */
                                        curl_easy_setopt(curl_down, CURLOPT_CONNECTTIMEOUT, 0);

                                        /* no progress meter please */
                                        curl_easy_setopt(curl_down, CURLOPT_NOPROGRESS, 1L);

                                        /* cURL DEBUG options */
                                        //curl_easy_setopt(curl_down, CURLOPT_DEBUGFUNCTION, my_trace);
                                    //curl_easy_setopt(curl_down, CURLOPT_DEBUGDATA, &config);

                                    //curl_easy_setopt(curl_down, CURLOPT_DEBUGFUNCTION, my_trace);
                                        //curl_easy_setopt(curl_down, CURLOPT_VERBOSE, 1);

                                        // create a receiver thread
                                        {
                                                ibrcommon::MutexLock l(_push_iob_mutex);
                                                _push_iob = new ibrcommon::iobuffer();
                                        }

                                        ibrcommon::AutoDelete<ibrcommon::iobuffer> auto_kill(_push_iob);
                                        std::ostream os(_push_iob);
                                        DownloadThread receiver(*_push_iob);

                                        /* send all data to this function  */
                                        curl_easy_setopt(curl_down, CURLOPT_WRITEFUNCTION, HTTPConvergenceLayer_callback_write);

                                        /* now specify where to write data */
                                        curl_easy_setopt(curl_down, CURLOPT_WRITEDATA, &os);

                                        /* do curl */
                                        receiver.start();
                                        res = curl_easy_perform(curl_down);

                                        {
                                                ibrcommon::MutexLock l(_push_iob_mutex);
                                                /* finalize iobuffer */
                                                _push_iob->finalize();
                                                receiver.join();
                                                _push_iob = NULL;
                                        }

                                        /* get HTTP Header StatusCode */
                                        //curl_easy_getinfo (curl_down, CURLINFO_RESPONSE_CODE, &http_code);
                                        //curl_easy_getinfo (curl, CURLINFO_SIZE_DOWNLOAD, &download_size);
                                        //curl_easy_getinfo (curl, CURLINFO_NUM_CONNECTS, &connects);

                                        /* DEBUG OUTPUT INFORMATION */
                                        //std::cout << "CURL CODE    : " << res << std::endl;
                                        //std::cerr << "HTTP CODE    : " << http_code << std::endl;
                                        //std::cout << "DOWNLOAD_SIZE: " << download_size << " Bytes" << std::endl;
                                        //std::cout << "NUM_CONNECTS : " << connects << " Connects" << std::endl;
                                        /* DEBUG OUTPUT INFORMATION */

                                        /* Wait some time an retry to connect */
                                        sleep(CONN_TIMEOUT);  // Wenn Verbindung nicht hergestellt werden konnte warte 5 sec.
                                        IBRCOMMON_LOGGER_DEBUG(10) << "http error: " << "Couldn't connect to server ... wait " << CONN_TIMEOUT/1000 << "s until retry" << IBRCOMMON_LOGGER_ENDL;

                                }

                                /* always cleanup */
                                curl_easy_cleanup(curl_down);
                        }
                        yield();
                }

                void HTTPConvergenceLayer::componentDown()
                {

                        _running = false;

                        ibrcommon::MutexLock l(_push_iob_mutex);
                        if (_push_iob != NULL)
                        {
                                _push_iob->finalize();
                                _push_iob = NULL;
                        }

                }

                bool HTTPConvergenceLayer::__cancellation()
                {
                        // since this is an receiving thread we have to cancel the hard way
                        return false;
                }

                const std::string HTTPConvergenceLayer::getName() const
                {
                        return "HTTPConvergenceLayer";
                }
        }
}