gtk2_ardour/video_image_frame.cc

   1 /*
   2     Copyright (C) 2010 Paul Davis
   3     Author: Robin Gareus <robin@gareus.org>
   4
   5     This program is free software; you can redistribute it and/or modify
   6     it under the terms of the GNU General Public License as published by
   7     the Free Software Foundation; either version 2 of the License, or
   8     (at your option) any later version.
   9
  10     This program is distributed in the hope that it will be useful,
  11     but WITHOUT ANY WARRANTY; without even the implied warranty of
  12     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  13     GNU General Public License for more details.
  14
  15     You should have received a copy of the GNU General Public License
  16     along with this program; if not, write to the Free Software
  17     Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  18
  19 */
  20 #include <sigc++/bind.h>
  21 #include "ardour/tempo.h"
  22
  23 #include "ardour_ui.h"
  24 #include "video_image_frame.h"
  25 #include "public_editor.h"
  26 #include "utils.h"
  27 #include "canvas/group.h"
  28 #include "rgb_macros.h"
  29 #include "utils_videotl.h"
  30
  31 #include <gtkmm2ext/utils.h>
  32 #include <pthread.h>
  33
  34 #include "i18n.h"
  35
  36 using namespace std;
  37 using namespace ARDOUR;
  38
  39 VideoImageFrame::VideoImageFrame (PublicEditor& ed, ArdourCanvas::Group& parent, int w, int h, std::string vsurl, std::string vfn)
  40         : editor (ed)
  41         , _parent(&parent)
  42         , clip_width(w)
  43         , clip_height(h)
  44         , video_server_url(vsurl)
  45         , video_filename(vfn)
  46 {
  47         pthread_mutex_init(&request_lock, NULL);
  48         pthread_mutex_init(&queue_lock, NULL);
  49         queued_request=false;
  50         video_frame_number = -1;
  51         rightend = -1;
  52         frame_position = 0;
  53         thread_active=false;
  54
  55 #if 0 /* DEBUG */
  56         printf("New VideoImageFrame (%ix%i) %s - %s\n", w, h, vsurl.c_str(), vfn.c_str());
  57 #endif
  58
  59         unit_position = editor.frame_to_unit (frame_position);
  60         group = new ArdourCanvas::Group (_parent, ArdourCanvas::Duple(unit_position, 1.0));
  61         img_pixbuf = new ArdourCanvas::Pixbuf(group);
  62
  63         Glib::RefPtr<Gdk::Pixbuf> img;
  64
  65         img = Gdk::Pixbuf::create(Gdk::COLORSPACE_RGB, true, 8, clip_width, clip_height);
  66         img->fill(RGBA_TO_UINT(0,0,0,255));
  67         img_pixbuf->set(img);
  68
  69         draw_line();
  70         video_draw_cross(img_pixbuf->pixbuf());
  71         img_pixbuf->set(img_pixbuf->pixbuf());
  72
  73         group->Event.connect (sigc::bind (sigc::mem_fun (editor, &PublicEditor::canvas_videotl_bar_event), _parent));
  74 }
  75
  76 VideoImageFrame::~VideoImageFrame ()
  77 {
  78         if (thread_active) pthread_join(thread_id_tt, NULL);
  79         delete img_pixbuf;
  80         delete group;
  81         pthread_mutex_destroy(&request_lock);
  82         pthread_mutex_destroy(&queue_lock);
  83 }
  84
  85 void
  86 VideoImageFrame::set_position (framepos_t frame)
  87 {
  88         double new_unit_position = editor.frame_to_unit (frame);
  89         group->move (ArdourCanvas::Duple (new_unit_position - unit_position, 0.0));
  90         frame_position = frame;
  91         unit_position = new_unit_position;
  92 }
  93
  94 void
  95 VideoImageFrame::reposition ()
  96 {
  97         set_position (frame_position);
  98 }
  99
 100 void
 101 VideoImageFrame::exposeimg ()
 102 {
 103         img_pixbuf->show();
 104         /* Note: we can not use this thread to update the window
 105          * it needs to be done from the Editor's thread idle_update */
 106         ImgChanged(); /* EMIT SIGNAL */
 107 }
 108
 109 void
 110 VideoImageFrame::set_videoframe (framepos_t videoframenumber, int re)
 111 {
 112         if (video_frame_number == videoframenumber && rightend == re) return;
 113
 114         video_frame_number = videoframenumber;
 115         rightend = re;
 116 #if 0 /* dummy mode: print framenumber */
 117         gchar buf[16];
 118         snprintf (buf, sizeof(buf), "%li", (long int) videoframenumber);
 119         img_pixbuf->pixbuf() = pixbuf_from_ustring(g_strdup (buf), get_font_for_style (N_("MarkerText")), 80, 60, Gdk::Color ("#C0C0C0"));
 120         return;
 121 #endif
 122 #if 1 /* draw "empty frame" while we request the data */
 123         Glib::RefPtr<Gdk::Pixbuf> img;
 124         img = img_pixbuf->pixbuf();
 125         img->fill(RGBA_TO_UINT(0,0,0,255));
 126         video_draw_cross(img_pixbuf->pixbuf());
 127         draw_line();
 128         cut_rightend();
 129         img_pixbuf->set(img);
 130         exposeimg();
 131 #endif
 132         /* request video-frame from decoder in background thread */
 133         http_get(video_frame_number);
 134 }
 135
 136 void
 137 VideoImageFrame::draw_line ()
 138 {
 139         Glib::RefPtr<Gdk::Pixbuf> img;
 140         img = img_pixbuf->pixbuf();
 141
 142         int rowstride = img->get_rowstride();
 143         int clip_height = img->get_height();
 144         int n_channels = img->get_n_channels();
 145         guchar *pixels, *p;
 146         pixels = img->get_pixels();
 147
 148         int y;
 149         for (y=0;y<clip_height;y++) {
 150                 p = pixels + y * rowstride;
 151                 p[0] = 255; p[1] = 255; p[2] = 255;
 152                 if (n_channels>3) p[3] = 255;
 153         }
 154 }
 155
 156 void
 157 VideoImageFrame::cut_rightend ()
 158 {
 159         if (rightend < 0 ) { return; }
 160         Glib::RefPtr<Gdk::Pixbuf> img;
 161         img = img_pixbuf->pixbuf();
 162
 163         int rowstride = img->get_rowstride();
 164         int clip_height = img->get_height();
 165         int clip_width = img->get_width();
 166         int n_channels = img->get_n_channels();
 167         guchar *pixels, *p;
 168         pixels = img->get_pixels();
 169         if (rightend > clip_width) { return; }
 170
 171         int x,y;
 172         for (y=0;y<clip_height;++y) {
 173                 p = pixels + y * rowstride + rightend * n_channels;
 174                 p[0] = 192; p[1] = 127; p[2] = 127;
 175                 if (n_channels>3) p[3] = 255;
 176                 for (x=rightend+1; x<clip_width; ++x) {
 177                         p = pixels + y * rowstride + x * n_channels;
 178                         p[0] = 0; p[1] = 0; p[2] = 0;
 179                         if (n_channels>3) p[3] = 0;
 180                 }
 181         }
 182 }
 183
 184 void *
 185 http_get_thread (void *arg) {
 186         VideoImageFrame *vif = static_cast<VideoImageFrame *>(arg);
 187         char url[2048];
 188         pthread_setcancelstate(PTHREAD_CANCEL_ENABLE, NULL);
 189         pthread_setcanceltype(PTHREAD_CANCEL_ASYNCHRONOUS, NULL);
 190         snprintf(url, sizeof(url), "%s?frame=%li&w=%d&h=%di&file=%s&format=rgb",
 191           vif->get_video_server_url().c_str(),
 192           (long int) vif->get_req_frame(), vif->get_width(), vif->get_height(),
 193           vif->get_video_filename().c_str()
 194         );
 195         int status = 0;
 196         int timeout = 1000; // * 5ms -> 5sec
 197         char *res = NULL;
 198         do {
 199                 res=curl_http_get(url, &status);
 200                 if (status == 503) usleep(5000); // try-again
 201         } while (status == 503 && --timeout > 0);
 202
 203         if (status != 200 || !res) {
 204                 printf("no-video frame: video-server returned http-status: %d\n", status);
 205         }
 206
 207         pthread_setcancelstate(PTHREAD_CANCEL_DISABLE, NULL);
 208         vif->http_download_done(res);
 209         pthread_exit(0);
 210         return 0;
 211 }
 212
 213 void
 214 VideoImageFrame::http_download_done (char *data){
 215         if (queued_request) {
 216                 http_get_again(want_video_frame_number);
 217                 return;
 218         }
 219
 220         if (!data) {
 221                 /* Image request failed (HTTP error or timeout) */
 222                 Glib::RefPtr<Gdk::Pixbuf> img;
 223                 img = img_pixbuf->pixbuf();
 224                 img->fill(RGBA_TO_UINT(128,0,0,255));
 225                 video_draw_cross(img_pixbuf->pixbuf());
 226                 cut_rightend();
 227                 draw_line();
 228                 cut_rightend();
 229                 img_pixbuf->set(img);
 230                 /* TODO: mark as invalid:
 231                  * video_frame_number = -1;
 232                  * TODO: but prevent live-loops when calling update again
 233                  */
 234         } else {
 235                 Glib::RefPtr<Gdk::Pixbuf> tmp, img;
 236 #if 0 // RGBA
 237                 tmp = Gdk::Pixbuf::create_from_data ((guint8*) data, Gdk::COLORSPACE_RGB, true, 8, clip_width, clip_height, clip_width*4);
 238 #else // RGB
 239                 tmp = Gdk::Pixbuf::create_from_data ((guint8*) data, Gdk::COLORSPACE_RGB, false, 8, clip_width, clip_height, clip_width*3);
 240 #endif
 241                 img = img_pixbuf->pixbuf();
 242                 tmp->copy_area (0, 0, clip_width, clip_height, img, 0, 0);
 243                 free(data);
 244                 draw_line();
 245                 cut_rightend();
 246                 img_pixbuf->set(img);
 247         }
 248
 249         exposeimg();
 250         /* don't request frames too quickly, wait after user has zoomed */
 251         usleep(40000);
 252
 253         if (queued_request) {
 254                 http_get_again(want_video_frame_number);
 255         }
 256         pthread_mutex_unlock(&request_lock);
 257 }
 258
 259
 260 void
 261 VideoImageFrame::http_get(framepos_t fn) {
 262         if (pthread_mutex_trylock(&request_lock)) {
 263                 /* remember last request and schedule after the lock has been released. */
 264                 pthread_mutex_lock(&queue_lock);
 265                 queued_request=true;
 266                 want_video_frame_number=fn;
 267                 pthread_mutex_unlock(&queue_lock);
 268 #if 0
 269                 /* TODO: cancel request and start a new one
 270                  *  but only if we're waiting for curl request.
 271                  *  don't interrupt http_download_done()
 272                  *
 273                  *  This should work, but requires testing:
 274                  */
 275                 if (!pthread_cancel(thread_id_tt)) {
 276                         pthread_mutex_unlock(&request_lock);
 277                 } else return;
 278 #else
 279                 return;
 280 #endif
 281         }
 282         if (thread_active) pthread_join(thread_id_tt, NULL);
 283         pthread_mutex_lock(&queue_lock);
 284         queued_request=false;
 285         req_video_frame_number=fn;
 286         pthread_mutex_unlock(&queue_lock);
 287         int rv = pthread_create(&thread_id_tt, NULL, http_get_thread, this);
 288         thread_active=true;
 289         if (rv) {
 290                 thread_active=false;
 291                 printf("thread creation failed. %i\n",rv);
 292                 http_download_done(NULL);
 293         }
 294 }
 295
 296 void
 297 VideoImageFrame::http_get_again(framepos_t fn) {
 298         pthread_mutex_lock(&queue_lock);
 299         queued_request=false;
 300         req_video_frame_number=want_video_frame_number;
 301         pthread_mutex_unlock(&queue_lock);
 302
 303         http_get_thread(this);
 304 }
 305
 306
 307 extern "C" {
 308 #include <curl/curl.h>
 309
 310         struct MemoryStruct {
 311                 char *data;
 312                 size_t size;
 313         };
 314
 315         static size_t
 316         WriteMemoryCallback(void *ptr, size_t size, size_t nmemb, void *data) {
 317                 size_t realsize = size * nmemb;
 318                 struct MemoryStruct *mem = (struct MemoryStruct *)data;
 319
 320                 mem->data = (char *)realloc(mem->data, mem->size + realsize + 1);
 321                 if (mem->data) {
 322                         memcpy(&(mem->data[mem->size]), ptr, realsize);
 323                         mem->size += realsize;
 324                         mem->data[mem->size] = 0;
 325                 }
 326                 return realsize;
 327         }
 328
 329         char *curl_http_get (const char *u, int *status) {
 330                 CURL *curl;
 331                 CURLcode res;
 332                 struct MemoryStruct chunk;
 333                 long int httpstatus;
 334                 if (status) *status = 0;
 335                 //usleep(500000); return NULL; // TEST & DEBUG
 336                 if (strncmp("http://", u, 7)) return NULL;
 337
 338                 chunk.data=NULL;
 339                 chunk.size=0;
 340
 341                 curl = curl_easy_init();
 342                 if(!curl) return NULL;
 343                 curl_easy_setopt(curl, CURLOPT_URL, u);
 344
 345                 curl_easy_setopt(curl, CURLOPT_WRITEDATA, (void *)&chunk);
 346                 curl_easy_setopt(curl, CURLOPT_WRITEFUNCTION, WriteMemoryCallback);
 347                 curl_easy_setopt(curl, CURLOPT_USERAGENT, ARDOUR_USER_AGENT);
 348                 curl_easy_setopt(curl, CURLOPT_TIMEOUT, ARDOUR_CURL_TIMEOUT);
 349                 curl_easy_setopt(curl, CURLOPT_NOSIGNAL, 1);
 350 #ifdef CURLERRORDEBUG
 351                 char curlerror[CURL_ERROR_SIZE] = "";
 352                 curl_easy_setopt(curl, CURLOPT_ERRORBUFFER, curlerror);
 353 #endif
 354
 355                 res = curl_easy_perform(curl);
 356                 curl_easy_getinfo(curl, CURLINFO_RESPONSE_CODE, &httpstatus);
 357                 curl_easy_cleanup(curl);
 358                 if (status) *status = httpstatus;
 359                 if (res) {
 360 #ifdef CURLERRORDEBUG
 361                         printf("curl_http_get() failed: %s\n", curlerror);
 362 #endif
 363                         return NULL;
 364                 }
 365                 if (httpstatus != 200) {
 366                         free (chunk.data);
 367                         chunk.data = NULL;
 368                 }
 369                 return (chunk.data);
 370         }
 371
 372 } /* end extern "C" */