test/swfdec_test_test.c

   1 /* Swfdec
   2  * Copyright (C) 2007 Benjamin Otte <otte@gnome.org>
   3  *
   4  * This library is free software; you can redistribute it and/or
   5  * modify it under the terms of the GNU Lesser General Public
   6  * License as published by the Free Software Foundation; either
   7  * version 2.1 of the License, or (at your option) any later version.
   8  *
   9  * This library is distributed in the hope that it will be useful,
  10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  12  * Lesser General Public License for more details.
  13  *
  14  * You should have received a copy of the GNU Lesser General Public
  15  * License along with this library; if not, write to the Free Software
  16  * Foundation, Inc., 51 Franklin Street, Fifth Floor,
  17  * Boston, MA  02110-1301  USA
  18  */
  19
  20 #ifdef HAVE_CONFIG_H
  21 #include "config.h"
  22 #endif
  23
  24 #include <string.h>
  25 #include <unistd.h>
  26
  27 #include "swfdec_test_test.h"
  28 #include "swfdec_test_buffer.h"
  29 #include "swfdec_test_function.h"
  30 #include "swfdec_test_image.h"
  31 #include "swfdec_test_socket.h"
  32 #include "swfdec_test_utils.h"
  33
  34 /*** PLUGIN HANDLING ***/
  35
  36 #define SWFDEC_TEST_TEST_FROM_PLUGIN(x) \
  37   SWFDEC_TEST_TEST ((gpointer) ((guint8 *) (x) - G_STRUCT_OFFSET (SwfdecTestTest, plugin)))
  38
  39 char *swfdec_test_plugin_name = NULL;
  40
  41 static void
  42 swfdec_test_test_quit (SwfdecTestPlugin *plugin)
  43 {
  44   SwfdecTestTest *test = SWFDEC_TEST_TEST_FROM_PLUGIN (plugin);
  45
  46   test->plugin_quit = TRUE;
  47 }
  48
  49 static void
  50 swfdec_test_test_error (SwfdecTestPlugin *plugin, const char *description)
  51 {
  52   SwfdecTestTest *test = SWFDEC_TEST_TEST_FROM_PLUGIN (plugin);
  53
  54   if (test->plugin_error)
  55     return;
  56   test->plugin_error = TRUE;
  57   swfdec_test_throw (swfdec_gc_object_get_context (test), description);
  58 }
  59
  60 static void
  61 swfdec_test_test_trace (SwfdecTestPlugin *plugin, const char *message)
  62 {
  63   SwfdecTestTest *test = SWFDEC_TEST_TEST_FROM_PLUGIN (plugin);
  64   gsize len = strlen (message);
  65   SwfdecBuffer *buffer;
  66
  67   buffer = swfdec_buffer_new (len + 1);
  68   memcpy (buffer->data, message, len);
  69   buffer->data[len] = '\n';
  70   swfdec_buffer_queue_push (test->trace, buffer);
  71 }
  72
  73 static void
  74 swfdec_test_test_launch (SwfdecTestPlugin *plugin, const char *url)
  75 {
  76   SwfdecTestTest *test = SWFDEC_TEST_TEST_FROM_PLUGIN (plugin);
  77   gsize len = strlen (url);
  78   SwfdecBuffer *buffer;
  79
  80   buffer = swfdec_buffer_new (len + 1);
  81   memcpy (buffer->data, url, len);
  82   buffer->data[len] = '\n';
  83   swfdec_buffer_queue_push (test->launched, buffer);
  84 }
  85
  86 static void
  87 swfdec_test_test_request_socket (SwfdecTestPlugin *plugin,
  88     SwfdecTestPluginSocket *psock)
  89 {
  90   SwfdecTestTest *test = SWFDEC_TEST_TEST_FROM_PLUGIN (plugin);
  91   SwfdecAsContext *cx = swfdec_gc_object_get_context (test);
  92   SwfdecTestSocket *sock;
  93   SwfdecAsValue val;
  94
  95   sock = swfdec_test_socket_new (test, psock);
  96   SWFDEC_AS_VALUE_SET_OBJECT (&val, swfdec_as_relay_get_as_object (SWFDEC_AS_RELAY (sock)));
  97   swfdec_as_relay_call (SWFDEC_AS_RELAY (test), swfdec_as_context_get_string (cx, "onSocket"),
  98       1, &val, NULL);
  99 }
 100
 101 static void
 102 swfdec_test_test_load_plugin (SwfdecTestTest *test, const char *filename)
 103 {
 104   memset (&test->plugin, 0, sizeof (SwfdecTestPlugin));
 105   /* initialize test->plugin */
 106   /* FIXME: This assumes filenames - do we wanna allow http? */
 107   if (g_path_is_absolute (filename)) {
 108     test->plugin.filename = g_strdup (filename);
 109   } else {
 110     char *cur = g_get_current_dir ();
 111     test->plugin.filename = g_build_filename (cur, filename, NULL);
 112     g_free (cur);
 113   }
 114   test->plugin.trace = swfdec_test_test_trace;
 115   test->plugin.launch = swfdec_test_test_launch;
 116   test->plugin.quit = swfdec_test_test_quit;
 117   test->plugin.error = swfdec_test_test_error;
 118   test->plugin.request_socket = swfdec_test_test_request_socket;
 119
 120   /* load the right values */
 121   if (swfdec_test_plugin_name) {
 122     void (*init) (SwfdecTestPlugin *plugin);
 123     char *dir = g_build_filename (g_get_home_dir (), ".swfdec-test", NULL);
 124     char *name = g_module_build_path (dir, swfdec_test_plugin_name);
 125     g_free (dir);
 126     test->module = g_module_open (name, G_MODULE_BIND_LOCAL);
 127     if (test->module == NULL) {
 128       swfdec_test_throw (swfdec_gc_object_get_context (test), "could not find player \"%s\"",
 129           swfdec_test_plugin_name);
 130       return;
 131     }
 132     if (!g_module_symbol (test->module, "swfdec_test_plugin_init", (gpointer) &init)) {
 133       g_module_close (test->module);
 134       test->module = NULL;
 135     }
 136     init (&test->plugin);
 137   } else {
 138     swfdec_test_plugin_swfdec_new (&test->plugin);
 139   }
 140   test->plugin_loaded = TRUE;
 141 }
 142
 143 static void
 144 swfdec_test_test_unload_plugin (SwfdecTestTest *test)
 145 {
 146   if (!test->plugin_loaded)
 147     return;
 148
 149   /* unload all objects generated by the plugin first */
 150   while (test->sockets)
 151     swfdec_test_socket_close (test->sockets->data);
 152
 153   test->plugin.finish (&test->plugin);
 154   g_free (test->plugin.filename);
 155   if (test->module) {
 156     g_module_close (test->module);
 157     test->module = NULL;
 158   }
 159   test->plugin_quit = FALSE;
 160   test->plugin_error = FALSE;
 161   test->plugin_loaded = FALSE;
 162 }
 163
 164 /*** SWFDEC_TEST_TEST ***/
 165
 166 G_DEFINE_TYPE (SwfdecTestTest, swfdec_test_test, SWFDEC_TYPE_AS_RELAY)
 167
 168 static void
 169 swfdec_test_test_dispose (GObject *object)
 170 {
 171   SwfdecTestTest *test = SWFDEC_TEST_TEST (object);
 172
 173   test->plugin_error = TRUE; /* set to avoid callbacks into the engine */
 174   swfdec_test_test_unload_plugin (test);
 175
 176   if (test->trace) {
 177     swfdec_buffer_queue_unref (test->trace);
 178     test->trace = NULL;
 179   }
 180
 181   if (test->launched) {
 182     swfdec_buffer_queue_unref (test->launched);
 183     test->launched = NULL;
 184   }
 185
 186   g_free (test->filename);
 187   test->filename = NULL;
 188
 189   G_OBJECT_CLASS (swfdec_test_test_parent_class)->dispose (object);
 190 }
 191
 192 static void
 193 swfdec_test_test_mark (SwfdecGcObject *object)
 194 {
 195   SwfdecTestTest *test = SWFDEC_TEST_TEST (object);
 196
 197   g_slist_foreach (test->sockets, (GFunc) swfdec_gc_object_mark, NULL);
 198
 199   SWFDEC_GC_OBJECT_CLASS (swfdec_test_test_parent_class)->mark (object);
 200 }
 201
 202 static void
 203 swfdec_test_test_class_init (SwfdecTestTestClass *klass)
 204 {
 205   GObjectClass *object_class = G_OBJECT_CLASS (klass);
 206   SwfdecGcObjectClass *gc_class = SWFDEC_GC_OBJECT_CLASS (klass);
 207
 208   object_class->dispose = swfdec_test_test_dispose;
 209
 210   gc_class->mark = swfdec_test_test_mark;
 211 }
 212
 213 static void
 214 swfdec_test_test_init (SwfdecTestTest *test)
 215 {
 216   test->trace = swfdec_buffer_queue_new ();
 217   test->launched = swfdec_buffer_queue_new ();
 218 }
 219
 220 static void
 221 swfdec_test_do_reset (SwfdecTestTest *test, const char *filename)
 222 {
 223   swfdec_test_test_unload_plugin (test);
 224   swfdec_buffer_queue_clear (test->trace);
 225   if (filename == NULL)
 226     return;
 227
 228   swfdec_test_test_load_plugin (test, filename);
 229 }
 230
 231 SWFDEC_TEST_FUNCTION ("Test_advance", swfdec_test_test_advance)
 232 void
 233 swfdec_test_test_advance (SwfdecAsContext *cx, SwfdecAsObject *object, guint argc,
 234     SwfdecAsValue *argv, SwfdecAsValue *retval)
 235 {
 236   SwfdecTestTest *test;
 237   int msecs;
 238
 239   SWFDEC_AS_CHECK (SWFDEC_TYPE_TEST_TEST, &test, "i", &msecs);
 240
 241   if (msecs < 0 || !test->plugin_loaded || test->plugin_error || test->plugin_quit)
 242     return;
 243
 244   if (test->plugin.advance) {
 245     test->plugin.advance (&test->plugin, msecs);
 246   } else {
 247     swfdec_test_throw (cx, "plugin doesn't implement advance");
 248   }
 249 }
 250
 251 SWFDEC_TEST_FUNCTION ("Test_reset", swfdec_test_test_reset)
 252 void
 253 swfdec_test_test_reset (SwfdecAsContext *cx, SwfdecAsObject *object, guint argc,
 254     SwfdecAsValue *argv, SwfdecAsValue *retval)
 255 {
 256   SwfdecTestTest *test;
 257   const char *filename = NULL;
 258
 259   SWFDEC_AS_CHECK (SWFDEC_TYPE_TEST_TEST, &test, "|s", &filename);
 260
 261   swfdec_test_do_reset (test, filename);
 262 }
 263
 264 SWFDEC_TEST_FUNCTION ("Test_mouse_move", swfdec_test_test_mouse_move)
 265 void
 266 swfdec_test_test_mouse_move (SwfdecAsContext *cx, SwfdecAsObject *object, guint argc,
 267     SwfdecAsValue *argv, SwfdecAsValue *retval)
 268 {
 269   SwfdecTestTest *test;
 270   double x, y;
 271
 272   SWFDEC_AS_CHECK (SWFDEC_TYPE_TEST_TEST, &test, "nn", &x, &y);
 273
 274   if (!test->plugin_loaded || test->plugin_error || test->plugin_quit)
 275     return;
 276
 277   if (test->plugin.advance) {
 278     test->plugin.mouse_move (&test->plugin, x, y);
 279   } else {
 280     swfdec_test_throw (cx, "plugin doesn't implement mouse_move");
 281   }
 282 }
 283
 284 SWFDEC_TEST_FUNCTION ("Test_mouse_press", swfdec_test_test_mouse_press)
 285 void
 286 swfdec_test_test_mouse_press (SwfdecAsContext *cx, SwfdecAsObject *object, guint argc,
 287     SwfdecAsValue *argv, SwfdecAsValue *retval)
 288 {
 289   SwfdecTestTest *test;
 290   double x, y;
 291   int button = 1;
 292
 293   SWFDEC_AS_CHECK (SWFDEC_TYPE_TEST_TEST, &test, "nn|i", &x, &y, &button);
 294
 295   if (!test->plugin_loaded || test->plugin_error || test->plugin_quit)
 296     return;
 297
 298   button = CLAMP (button, 1, 32);
 299   if (test->plugin.advance) {
 300     test->plugin.mouse_press (&test->plugin, x, y, button);
 301   } else {
 302     swfdec_test_throw (cx, "plugin doesn't implement mouse_press");
 303   }
 304 }
 305
 306 SWFDEC_TEST_FUNCTION ("Test_mouse_release", swfdec_test_test_mouse_release)
 307 void
 308 swfdec_test_test_mouse_release (SwfdecAsContext *cx, SwfdecAsObject *object, guint argc,
 309     SwfdecAsValue *argv, SwfdecAsValue *retval)
 310 {
 311   SwfdecTestTest *test;
 312   double x, y;
 313   int button = 1;
 314
 315   SWFDEC_AS_CHECK (SWFDEC_TYPE_TEST_TEST, &test, "nn|i", &x, &y, &button);
 316
 317   if (!test->plugin_loaded || test->plugin_error || test->plugin_quit)
 318     return;
 319
 320   button = CLAMP (button, 1, 32);
 321   if (test->plugin.advance) {
 322     test->plugin.mouse_release (&test->plugin, x, y, button);
 323   } else {
 324     swfdec_test_throw (cx, "plugin doesn't implement mouse_release");
 325   }
 326 }
 327
 328 SWFDEC_TEST_FUNCTION ("Test_render", swfdec_test_test_render)
 329 void
 330 swfdec_test_test_render (SwfdecAsContext *cx, SwfdecAsObject *object, guint argc,
 331     SwfdecAsValue *argv, SwfdecAsValue *retval)
 332 {
 333   SwfdecTestTest *test;
 334   SwfdecTestImage *image;
 335   int x = 0, y = 0, w = 0, h = 0;
 336
 337   SWFDEC_AS_CHECK (SWFDEC_TYPE_TEST_TEST, &test, "|iiii", &x, &y, &w, &h);
 338
 339   if (!test->plugin_loaded || test->plugin_error || test->plugin_quit)
 340     return;
 341
 342   if (argc == 0) {
 343     w = test->plugin.width;
 344     h = test->plugin.height;
 345   }
 346   image = swfdec_test_image_new (cx, w, h);
 347
 348   if (test->plugin.screenshot) {
 349     test->plugin.screenshot (&test->plugin,
 350         cairo_image_surface_get_data (SWFDEC_TEST_IMAGE (image)->surface),
 351         x, y, w, h);
 352     SWFDEC_AS_VALUE_SET_OBJECT (retval, swfdec_as_relay_get_as_object (SWFDEC_AS_RELAY (image)));
 353   } else {
 354     swfdec_test_throw (cx, "plugin doesn't implement render");
 355   }
 356 }
 357
 358 SWFDEC_TEST_FUNCTION ("Test", swfdec_test_test_new)
 359 void
 360 swfdec_test_test_new (SwfdecAsContext *cx, SwfdecAsObject *object, guint argc,
 361     SwfdecAsValue *argv, SwfdecAsValue *retval)
 362 {
 363   SwfdecTestTest *test;
 364   const char *filename = NULL;
 365
 366   if (!swfdec_as_context_is_constructing (cx))
 367     return;
 368
 369   SWFDEC_AS_CHECK (0, NULL, "|s", &filename);
 370
 371   test = g_object_new (SWFDEC_TYPE_TEST_TEST, "context", cx, NULL);
 372   swfdec_test_do_reset (test, filename);
 373
 374   swfdec_as_object_set_relay (object, SWFDEC_AS_RELAY (test));
 375   SWFDEC_AS_VALUE_SET_OBJECT (retval, object);
 376 }
 377
 378 SWFDEC_TEST_FUNCTION ("Test_get_launched", swfdec_test_test_get_launched)
 379 void
 380 swfdec_test_test_get_launched (SwfdecAsContext *cx, SwfdecAsObject *object,
 381     guint argc, SwfdecAsValue *argv, SwfdecAsValue *retval)
 382 {
 383   SwfdecTestTest *test;
 384   SwfdecTestBuffer *buf;
 385   SwfdecBuffer *buffer;
 386   gsize len;
 387
 388   SWFDEC_AS_CHECK (SWFDEC_TYPE_TEST_TEST, &test, "");
 389
 390   len = swfdec_buffer_queue_get_depth (test->launched);
 391   buffer = swfdec_buffer_queue_peek (test->launched, len);
 392   buf = swfdec_test_buffer_new (cx, buffer);
 393   SWFDEC_AS_VALUE_SET_OBJECT (retval, swfdec_as_relay_get_as_object (SWFDEC_AS_RELAY (buf)));
 394 }
 395
 396 SWFDEC_TEST_FUNCTION ("Test_get_trace", swfdec_test_test_get_trace)
 397 void
 398 swfdec_test_test_get_trace (SwfdecAsContext *cx, SwfdecAsObject *object, guint argc,
 399     SwfdecAsValue *argv, SwfdecAsValue *retval)
 400 {
 401   SwfdecTestTest *test;
 402   SwfdecTestBuffer *buf;
 403   SwfdecBuffer *buffer;
 404   gsize len;
 405
 406   SWFDEC_AS_CHECK (SWFDEC_TYPE_TEST_TEST, &test, "");
 407
 408   len = swfdec_buffer_queue_get_depth (test->trace);
 409   buffer = swfdec_buffer_queue_peek (test->trace, len);
 410   buf = swfdec_test_buffer_new (cx, buffer);
 411   SWFDEC_AS_VALUE_SET_OBJECT (retval, swfdec_as_relay_get_as_object (SWFDEC_AS_RELAY (buf)));
 412 }
 413
 414 SWFDEC_TEST_FUNCTION ("Test_get_quit", swfdec_test_test_get_quit)
 415 void
 416 swfdec_test_test_get_quit (SwfdecAsContext *cx, SwfdecAsObject *object, guint argc,
 417     SwfdecAsValue *argv, SwfdecAsValue *retval)
 418 {
 419   SwfdecTestTest *test;
 420
 421   SWFDEC_AS_CHECK (SWFDEC_TYPE_TEST_TEST, &test, "");
 422
 423   /* FIXME: or not quit on error? */
 424   SWFDEC_AS_VALUE_SET_BOOLEAN (retval, !test->plugin_loaded || test->plugin_error || test->plugin_quit);
 425 }
 426
 427 SWFDEC_TEST_FUNCTION ("Test_get_rate", swfdec_test_test_get_rate)
 428 void
 429 swfdec_test_test_get_rate (SwfdecAsContext *cx, SwfdecAsObject *object, guint argc,
 430     SwfdecAsValue *argv, SwfdecAsValue *retval)
 431 {
 432   SwfdecTestTest *test;
 433
 434   SWFDEC_AS_CHECK (SWFDEC_TYPE_TEST_TEST, &test, "");
 435
 436   if (!test->plugin_loaded)
 437     return;
 438
 439   *retval = swfdec_as_value_from_number (cx, test->plugin.rate / 256.0);
 440 }
 441