src/bin/test_flip_page.c

   1 #include <Elementary.h>
   2 #ifdef HAVE_CONFIG_H
   3 # include "elementary_config.h"
   4 #endif
   5 #ifndef ELM_LIB_QUICKLAUNCH
   6
   7 //#define PAGEMESH 1
   8
   9 typedef struct _State State;
  10 typedef struct _Slice Slice;
  11
  12 typedef struct _Vertex2 Vertex2;
  13 typedef struct _Vertex3 Vertex3;
  14
  15 struct _State
  16 {
  17    Evas_Object *orig, *win;
  18    Ecore_Job *job;
  19    Evas_Coord down_x, down_y;
  20    Eina_Bool  down : 1;
  21    Evas_Coord x, y;
  22    int slices_w, slices_h;
  23    Slice **slices, **slices2;
  24 };
  25
  26 struct _Slice
  27 {
  28    Evas_Object *obj;
  29    // (0)---(1)
  30    //  |     |
  31    //  |     |
  32    // (3)---(2)
  33    double u[4], v[4], x[4], y[4], z[4];
  34 };
  35
  36 struct _Vertex2
  37 {
  38    double x, y;
  39 };
  40
  41 struct _Vertex3
  42 {
  43    double x, y, z;
  44 };
  45
  46 static State state =
  47 {
  48    NULL, NULL,
  49    NULL,
  50    0, 0,
  51    0,
  52    0, 0,
  53    0, 0,
  54    NULL, NULL
  55 };
  56
  57 static Slice *
  58 _slice_new(State *st)
  59 {
  60    Slice *sl;
  61
  62    sl = calloc(1, sizeof(Slice));
  63    if (!sl) return NULL;
  64    sl->obj = evas_object_image_add(evas_object_evas_get(st->win));
  65    evas_object_image_smooth_scale_set(sl->obj, 0);
  66    evas_object_pass_events_set(sl->obj, 1);
  67    evas_object_image_source_set(sl->obj, st->orig);
  68    return sl;
  69 }
  70
  71 static void
  72 _slice_free(Slice *sl)
  73 {
  74    evas_object_del(sl->obj);
  75    free(sl);
  76 }
  77
  78 static void
  79 _slice_apply(Slice *sl, Evas_Coord x, Evas_Coord y, Evas_Coord w, Evas_Coord h)
  80 {
  81    Evas_Map *m;
  82    int i;
  83
  84    m = evas_map_new(4);
  85    if (!m) return;
  86    evas_map_smooth_set(m, 0);
  87    for (i = 0; i < 4; i++)
  88      {
  89         evas_map_point_coord_set(m, i, x + sl->x[i], y + sl->y[i], sl->z[i]);
  90         evas_map_point_image_uv_set(m, i, sl->u[i] , sl->v[i]);
  91         evas_map_point_color_set(m, i, 255, 255, 255, 255);
  92      }
  93    evas_object_map_enable_set(sl->obj, EINA_TRUE);
  94    evas_object_image_fill_set(sl->obj, 0, 0, w, h);
  95    evas_object_map_set(sl->obj, m);
  96    evas_map_free(m);
  97 }
  98
  99 static void
 100 _slice_3d(Slice *sl, Evas_Coord x, Evas_Coord y, Evas_Coord w, Evas_Coord h)
 101 {
 102    Evas_Map *m = (Evas_Map *)evas_object_map_get(sl->obj);
 103    if (!m) return;
 104    // vanishing point is center of page, and focal dist is 1024
 105    evas_map_util_3d_perspective(m, x + (w / 2), y + (h / 2), 0, 1024);
 106    if (evas_map_util_clockwise_get(m)) evas_object_show(sl->obj);
 107    else evas_object_hide(sl->obj);
 108    evas_object_map_set(sl->obj, m);
 109 }
 110
 111 static void
 112 _slice_light(Slice *sl, Evas_Coord x, Evas_Coord y, Evas_Coord w, Evas_Coord h)
 113 {
 114    Evas_Map *m = (Evas_Map *)evas_object_map_get(sl->obj);
 115    int i;
 116
 117    if (!m) return;
 118    evas_map_util_3d_lighting(m,
 119                              // light position
 120                              // (centered over page 10 * h toward camera)
 121                              x + (w / 2)  , y + (h / 2)  , -h * 10,
 122                              255, 255, 255, // light color
 123                              80 , 80 , 80); // ambient minimum
 124    // multiply brightness by 1.2 to make lightish bits all white so we dont
 125    // add shading where we could otherwise be pure white
 126    for (i = 0; i < 4; i++)
 127      {
 128         int r, g, b, a;
 129
 130         evas_map_point_color_get(m, i, &r, &g, &b, &a);
 131         r = (double)r * 1.2; if (r > 255) r = 255;
 132         g = (double)g * 1.2; if (g > 255) g = 255;
 133         b = (double)b * 1.2; if (b > 255) b = 255;
 134         evas_map_point_color_set(m, i, r, g, b, a);
 135      }
 136    evas_object_map_set(sl->obj, m);
 137 }
 138
 139 static void
 140 _slice_xyz(Slice *sl,
 141            double x1, double y1, double z1,
 142            double x2, double y2, double z2,
 143            double x3, double y3, double z3,
 144            double x4, double y4, double z4)
 145 {
 146    sl->x[0] = x1; sl->y[0] = y1; sl->z[0] = z1;
 147    sl->x[1] = x2; sl->y[1] = y2; sl->z[1] = z2;
 148    sl->x[2] = x3; sl->y[2] = y3; sl->z[2] = z3;
 149    sl->x[3] = x4; sl->y[3] = y4; sl->z[3] = z4;
 150 }
 151
 152 static void
 153 _slice_uv(Slice *sl,
 154            double u1, double v1,
 155            double u2, double v2,
 156            double u3, double v3,
 157            double u4, double v4)
 158 {
 159    sl->u[0] = u1; sl->v[0] = v1;
 160    sl->u[1] = u2; sl->v[1] = v2;
 161    sl->u[2] = u3; sl->v[2] = v3;
 162    sl->u[3] = u4; sl->v[3] = v4;
 163 }
 164
 165 static void
 166 _deform_point(Vertex2 *vi, Vertex3 *vo, double rho, double theta, double A)
 167 {
 168    // ^Y
 169    // |
 170    // |    X
 171    // +---->
 172    // theta == cone angle (0 -> PI/2)
 173    // A     == distance of cone apex from origin
 174    // rho   == angle of cone from vertical axis (...-PI/2 to PI/2...)
 175    Vertex3  v1;
 176    double d, r, b;
 177
 178    d = sqrt((vi->x * vi->x) + pow(vi->y - A, 2));
 179    r = d * sin(theta);
 180    b = asin(vi->x / d) / sin(theta);
 181
 182    v1.x = r * sin(b);
 183    v1.y = d + A - (r * (1 - cos(b)) * sin(theta));
 184    v1.z = r * (1 - cos(b)) * cos(theta);
 185
 186    vo->x = (v1.x * cos(rho)) - (v1.z * sin(rho));
 187    vo->y = v1.y;
 188    vo->z = (v1.x * sin(rho)) + (v1.z * cos(rho));
 189 }
 190
 191 static void
 192 _interp_point(Vertex3 *vi1, Vertex3 *vi2, Vertex3 *vo, double v)
 193 {
 194    vo->x = (v * vi2->x) + ((1.0 - v) * vi1->x);
 195    vo->y = (v * vi2->y) + ((1.0 - v) * vi1->y);
 196    vo->z = (v * vi2->z) + ((1.0 - v) * vi1->z);
 197 }
 198
 199 static void
 200 _state_slices_clear(State *st)
 201 {
 202    int i, j, num;
 203
 204    if (st->slices)
 205      {
 206         num = 0;
 207         for (j = 0; j < st->slices_h; j++)
 208           {
 209              for (i = 0; i < st->slices_w; i++)
 210                {
 211                   if (st->slices[num]) _slice_free(st->slices[num]);
 212                   if (st->slices2[num]) _slice_free(st->slices2[num]);
 213                   num++;
 214                }
 215           }
 216         free(st->slices);
 217         free(st->slices2);
 218         st->slices = NULL;
 219         st->slices2 = NULL;
 220      }
 221    st->slices_w = 0;
 222    st->slices_h = 0;
 223 }
 224
 225 static int
 226 _slice_obj_color_sum(Slice *s, int p, int *r, int *g, int *b, int *a)
 227 {
 228    Evas_Map *m;
 229    int rr = 0, gg = 0, bb = 0, aa = 0;
 230
 231    if (!s) return 0;
 232    m = (Evas_Map *)evas_object_map_get(s->obj);
 233    if (!m) return 0;
 234    evas_map_point_color_get(m, p, &rr, &gg, &bb, &aa);
 235    *r += rr; *g += gg; *b += bb; *a += aa;
 236    return 1;
 237 }
 238
 239 static void
 240 _slice_obj_color_set(Slice *s, int p, int r, int g, int b, int a)
 241 {
 242    Evas_Map *m;
 243
 244    if (!s) return;
 245    m = (Evas_Map *)evas_object_map_get(s->obj);
 246    if (!m) return;
 247    evas_map_point_color_set(m, p, r, g, b, a);
 248    evas_object_map_set(s->obj, m);
 249 }
 250
 251 static void
 252 _slice_obj_vert_color_merge(Slice *s1, int p1, Slice *s2, int p2,
 253                             Slice *s3, int p3, Slice *s4, int p4)
 254 {
 255    int r = 0, g = 0, b = 0, a = 0, n = 0;
 256
 257    n += _slice_obj_color_sum(s1, p1, &r, &g, &b, &a);
 258    n += _slice_obj_color_sum(s2, p2, &r, &g, &b, &a);
 259    n += _slice_obj_color_sum(s3, p3, &r, &g, &b, &a);
 260    n += _slice_obj_color_sum(s4, p4, &r, &g, &b, &a);
 261
 262    if (n < 1) return;
 263    r /= n; g /= n; b /= n; a /= n;
 264
 265    _slice_obj_color_set(s1, p1, r, g, b, a);
 266    _slice_obj_color_set(s2, p2, r, g, b, a);
 267    _slice_obj_color_set(s3, p3, r, g, b, a);
 268    _slice_obj_color_set(s4, p4, r, g, b, a);
 269 }
 270
 271 static int
 272 _state_update(State *st)
 273 {
 274    Evas_Coord x1, y1, x2, y2, mx, my, dst, dx, dy;
 275    Evas_Coord x, y, w, h;
 276    int i, j, num;
 277    Slice *sl;
 278    double b, minv = 0.0, minva, mgrad;
 279    int gx, gy, gszw, gszh, gw, gh, col, row, nw, nh;
 280    double rho, A, theta, perc, percm, n, rhol, Al, thetal;
 281
 282    evas_object_geometry_get(st->orig, &x, &y, &w, &h);
 283    x1 = st->down_x;
 284    y1 = st->down_y;
 285    x2 = st->x;
 286    y2 = st->y;
 287    if (x2 >= x1) x2 = x1 - 1;
 288    mx = (x1 + x2) / 2;
 289    my = (y1 + y2) / 2;
 290
 291    if (mx < 0) mx = 0;
 292    else if (mx >= w) mx = w - 1;
 293    if (my < 0) my = 0;
 294    else if (my >= h) my = h - 1;
 295
 296    dx = x2 - x1;
 297    dy = y2 - y1;
 298    dst = sqrt((dx * dx) + (dy * dy));
 299    if (dst < 10)
 300       {
 301          // FIXME: clean up old objects
 302          return 0;
 303       }
 304
 305    b = (h / 2);
 306    mgrad = (double)(y1 - y2) / (double)(x1 - x2);
 307
 308    if (mx < 1) mx = 1; // quick hack to keep curl line visible
 309
 310    if (mgrad == 0.0) // special horizontal case
 311       mgrad = 0.001; // quick dirty hack for now
 312    // else
 313      {
 314         minv = 1.0 / mgrad;
 315         // y = (m * x) + b
 316         b = my + (minv * mx);
 317      }
 318    if ((b >= -5) && (b <= (h + 5)))
 319      {
 320         if (minv > 0.0) // clamp to h
 321           {
 322              minv = (double)(h + 5 - my) / (double)(mx);
 323              b = my + (minv * mx);
 324           }
 325         else // clamp to 0
 326           {
 327              minv = (double)(-5 - my) / (double)(mx);
 328              b = my + (minv * mx);
 329           }
 330      }
 331
 332    perc = (double)x2 / (double)x1;
 333    percm = (double)mx / (double)x1;
 334    if (perc < 0.0) perc = 0.0;
 335    else if (perc > 1.0) perc = 1.0;
 336    if (percm < 0.0) percm = 0.0;
 337    else if (percm > 1.0) percm = 1.0;
 338
 339    minva = atan(minv) / (M_PI / 2);
 340    if (minva < 0.0) minva = -minva;
 341
 342    // A = apex of cone
 343    if (b <= 0) A = b;
 344    else A = h - b;
 345    if (A < -(h * 20)) A = -h * 20;
 346    //--//
 347    Al = -5;
 348
 349    // rho = is how much the page is turned
 350    n = 1.0 - perc;
 351    n = 1.0 - cos(n * M_PI / 2.0);
 352    n = n * n;
 353    rho = -(n * M_PI);
 354    //--//
 355    rhol = -(n * M_PI);
 356
 357    // theta == curliness (how much page culrs in on itself
 358    n = sin((1.0 - perc) * M_PI);
 359    n = n * 1.2;
 360    theta = 7.86 + n;
 361    //--//
 362    n = sin((1.0 - perc) * M_PI);
 363    n = 1.0 - n;
 364    n = n * n;
 365    n = 1.0 - n;
 366    thetal = 7.86 + n;
 367
 368    nw = 20;
 369    nh = 20;
 370    if (nw < 1) nw = 1;
 371    if (nh < 1) nh = 1;
 372    gszw = w / nw;
 373    gszh = h / nh;
 374    if (gszw < 8) gszw = 8;
 375    if (gszh < 8) gszh = 8;
 376
 377    _state_slices_clear(st);
 378
 379    st->slices_w = (w + gszw - 1) / gszw;
 380    st->slices_h = (h + gszh - 1) / gszh;
 381    st->slices = calloc(st->slices_w * st->slices_h, sizeof(Slice *));
 382    if (!st->slices) return 0;
 383    st->slices2 = calloc(st->slices_w * st->slices_h, sizeof(Slice *));
 384    if (!st->slices2)
 385      {
 386         free(st->slices);
 387         st->slices = NULL;
 388         return 0;
 389      }
 390
 391    for (col = 0, gx = 0; gx < w; gx += gszh, col++)
 392      {
 393         num =  st->slices_h * col;
 394         for (row = 0, gy = 0; gy < h; gy += gszw, row++)
 395           {
 396              Vertex2 vi[4], vil[2];
 397              Vertex3 vo[4], vol[2];
 398              gw = gszw;
 399              gh = gszh;
 400              if ((gx + gw) > w) gw = w - gx;
 401              if ((gy + gh) > h) gh = h - gy;
 402
 403              vi[0].x = gx;      vi[0].y = gy;
 404              vi[1].x = gx + gw; vi[1].y = gy;
 405              vi[2].x = gx + gw; vi[2].y = gy + gh;
 406              vi[3].x = gx;      vi[3].y = gy + gh;
 407
 408              vil[0].x = gx;      vil[0].y = h - gx;
 409              vil[1].x = gx + gw; vil[1].y = h - (gx + gw);
 410
 411              for (i = 0; i < 2; i++)
 412                 _deform_point(&(vil[i]), &(vol[i]), rhol, thetal, Al);
 413              for (i = 0; i < 4; i++)
 414                 _deform_point(&(vi[i]), &(vo[i]), rho, theta, A);
 415              n = minva * sin(perc * M_PI);
 416              n = n * n;
 417              vol[0].y = gy;
 418              vol[1].y = gy;
 419              _interp_point(&(vo[0]), &(vol[0]), &(vo[0]), n);
 420              _interp_point(&(vo[1]), &(vol[1]), &(vo[1]), n);
 421              vol[0].y = gy + gh;
 422              vol[1].y = gy + gh;
 423              _interp_point(&(vo[2]), &(vol[1]), &(vo[2]), n);
 424              _interp_point(&(vo[3]), &(vol[0]), &(vo[3]), n);
 425              if (b > 0)
 426                {
 427                   Vertex3 vt;
 428
 429 #define SWPV3(a, b) do {vt = (a); (a) = (b); (b) = vt;} while (0)
 430                   SWPV3(vo[0], vo[3]);
 431                   SWPV3(vo[1], vo[2]);
 432                   vo[0].y = h - vo[0].y;
 433                   vo[1].y = h - vo[1].y;
 434                   vo[2].y = h - vo[2].y;
 435                   vo[3].y = h - vo[3].y;
 436                }
 437
 438              sl = _slice_new(st);
 439              if (b > 0) st->slices[num + st->slices_h - row - 1] = sl;
 440              else st->slices[num + row] = sl;
 441              _slice_xyz(sl,
 442                         vo[0].x, vo[0].y, vo[0].z,
 443                         vo[1].x, vo[1].y, vo[1].z,
 444                         vo[2].x, vo[2].y, vo[2].z,
 445                         vo[3].x, vo[3].y, vo[3].z);
 446              if (b <= 0)
 447                 _slice_uv(sl,
 448                           gx,       gy,       gx + gw,  gy,
 449                           gx + gw,  gy + gh,  gx,       gy + gh);
 450              else
 451                 _slice_uv(sl,
 452                           gx,       h - (gy + gh), gx + gw,  h - (gy + gh),
 453                           gx + gw,  h - gy,        gx,       h - gy);
 454              _slice_apply(sl, x, y, w, h);
 455
 456              sl = _slice_new(st);
 457              if (b > 0) st->slices2[num + st->slices_h - row - 1] = sl;
 458              else st->slices2[num + row] = sl;
 459              _slice_xyz(sl,
 460                         vo[1].x, vo[1].y, vo[1].z,
 461                         vo[0].x, vo[0].y, vo[0].z,
 462                         vo[3].x, vo[3].y, vo[3].z,
 463                         vo[2].x, vo[2].y, vo[2].z);
 464              if (b <= 0)
 465                 _slice_uv(sl,
 466                           w - (gx + gw), gy,       w - (gx),      gy,
 467                           w - (gx),      gy + gh,  w - (gx + gw), gy + gh);
 468              else
 469                 _slice_uv(sl,
 470                           w - (gx + gw), h - (gy + gh), w - (gx),      h - (gy + gh),
 471                           w - (gx),      h - gy,        w - (gx + gw), h - gy);
 472              _slice_apply(sl, x, y, w, h);
 473           }
 474      }
 475
 476    num = 0;
 477    for (j = 0; j < st->slices_h; j++)
 478      {
 479         for (i = 0; i < st->slices_w; i++)
 480           {
 481              _slice_light(st->slices[num], x, y, w, h);
 482              _slice_light(st->slices2[num], x, y, w, h);
 483              num++;
 484           }
 485      }
 486
 487    for (i = 0; i <= st->slices_w; i++)
 488      {
 489         num = i * st->slices_h;
 490         for (j = 0; j <= st->slices_h; j++)
 491           {
 492              Slice *s[4];
 493
 494              s[0] = s[1] = s[2] = s[3] = NULL;
 495
 496              if ((i > 0)            && (j > 0))
 497                 s[0] = st->slices[num - 1 - st->slices_h];
 498              if ((i < st->slices_w) && (j > 0))
 499                 s[1] = st->slices[num - 1];
 500              if ((i > 0)            && (j < st->slices_h))
 501                 s[2] = st->slices[num - st->slices_h];
 502              if ((i < st->slices_w) && (j < st->slices_h))
 503                 s[3] = st->slices[num];
 504              _slice_obj_vert_color_merge(s[0], 2, s[1], 3,
 505                                          s[2], 1, s[3], 0);
 506              s[0] = s[1] = s[2] = s[3] = NULL;
 507
 508              if ((i > 0)            && (j > 0))
 509                 s[0] = st->slices2[num - 1 - st->slices_h];
 510              if ((i < st->slices_w) && (j > 0))
 511                 s[1] = st->slices2[num - 1];
 512              if ((i > 0)            && (j < st->slices_h))
 513                 s[2] = st->slices2[num - st->slices_h];
 514              if ((i < st->slices_w) && (j < st->slices_h))
 515                 s[3] = st->slices2[num];
 516              _slice_obj_vert_color_merge(s[0], 3, s[1], 2,
 517                                          s[2], 0, s[3], 1);
 518              num++;
 519           }
 520      }
 521
 522    num = 0;
 523    for (i = 0; i < st->slices_w; i++)
 524      {
 525         for (j = 0; j < st->slices_h; j++)
 526           {
 527              _slice_3d(st->slices[num], x, y, w, h);
 528              _slice_3d(st->slices2[num], x, y, w, h);
 529              num++;
 530           }
 531      }
 532
 533    return 1;
 534 }
 535
 536 static void
 537 _state_end(State *st)
 538 {
 539    _state_slices_clear(st);
 540 }
 541
 542
 543
 544
 545
 546
 547
 548
 549
 550
 551
 552 #ifdef PAGEMESH
 553 static Evas_Object *sl_rho, *sl_theta, *sl_A;
 554
 555 static void
 556 _test(void)
 557 {
 558    static Eina_List *pts = NULL;
 559    Evas_Object *o;
 560    Evas_Map *m;
 561    int i, j, k;
 562    Evas_Coord x, y, w, h;
 563    State *st = &state;
 564
 565    EINA_LIST_FREE(pts, o) evas_object_del(o);
 566
 567    evas_object_geometry_get(st->orig, &x, &y, &w, &h);
 568   for (j = 0; j < h; j += 20)
 569      {
 570         for (i = 0; i < w; i += 20)
 571           {
 572              Vertex2 vi;
 573              Vertex3 vo;
 574              double rho, theta, A, n;
 575
 576              vi.x = i;
 577              vi.y = j;
 578              rho = elm_slider_value_get(sl_rho);
 579              A = elm_slider_value_get(sl_A);
 580              theta = elm_slider_value_get(sl_theta);
 581
 582              _deform_point(&vi, &vo, rho, theta, A);
 583
 584              o = evas_object_image_add(evas_object_evas_get(st->win));
 585              evas_object_image_smooth_scale_set(o, 0);
 586              evas_object_pass_events_set(o, 1);
 587              evas_object_image_source_set(o, st->orig);
 588              evas_object_show(o);
 589
 590              m = evas_map_new(4);
 591              evas_map_smooth_set(m, 0);
 592
 593              k = 0;
 594              evas_map_point_coord_set(m, k, x + vo.x, y + vo.y, -vo.z);
 595              evas_map_point_image_uv_set(m, k, 0 , 0);
 596              evas_map_point_color_set(m, k, 255, 255, 255, 255);
 597              k++;
 598              evas_map_point_coord_set(m, k, x + vo.x + 10, y + vo.y, -vo.z);
 599              evas_map_point_image_uv_set(m, k, w , 0);
 600              evas_map_point_color_set(m, k, 255, 255, 255, 255);
 601              k++;
 602              evas_map_point_coord_set(m, k, x + vo.x + 10, y + vo.y + 10, -vo.z);
 603              evas_map_point_image_uv_set(m, k, w , h);
 604              evas_map_point_color_set(m, k, 255, 255, 255, 255);
 605              k++;
 606              evas_map_point_coord_set(m, k, x + vo.x, y + vo.y + 10, -vo.z);
 607              evas_map_point_image_uv_set(m, k, 0 , h);
 608              evas_map_point_color_set(m, k, 255, 255, 255, 255);
 609              k++;
 610
 611              evas_map_util_3d_perspective(m, x + (w / 2), y + (h / 2), 0, 1024);
 612
 613              evas_object_map_enable_set(o, EINA_TRUE);
 614              evas_object_image_fill_set(o, 0, 0, w, h);
 615              evas_object_map_set(o, m);
 616              evas_map_free(m);
 617
 618              pts = eina_list_append(pts, o);
 619           }
 620      }
 621 }
 622
 623 static void
 624 _sl_ch(void *data __UNUSED__, Evas_Object *obj __UNUSED__, void *event_info __UNUSED__)
 625 {
 626    _test();
 627 }
 628 #endif
 629
 630
 631
 632
 633
 634
 635
 636
 637
 638
 639 static void
 640 _update_curl_job(void *data)
 641 {
 642    State *st = data;
 643    st->job = NULL;
 644    if (_state_update(st)) evas_object_lower(st->orig);
 645 }
 646
 647 static void
 648 im_down_cb(void *data, Evas *e __UNUSED__, Evas_Object *obj, void *event_info)
 649 {
 650    Evas_Event_Mouse_Down *ev = event_info;
 651    Evas_Object *win = data;
 652    Evas_Coord x, y;
 653
 654    if (ev->button != 1) return;
 655    evas_object_geometry_get(obj, &x, &y, NULL, NULL);
 656    state.orig = obj;
 657    state.win = win;
 658    state.down = 1;
 659    state.x = ev->canvas.x - x;
 660    state.y = ev->canvas.y - y;
 661    state.down_x = state.x;
 662    state.down_y = state.y;
 663    if (_state_update(&state))
 664       evas_object_lower(obj);
 665    printf("v %i %i\n", state.x, state.y);
 666 }
 667
 668 static void
 669 im_up_cb(void *data __UNUSED__, Evas *e __UNUSED__, Evas_Object *obj, void *event_info)
 670 {
 671    Evas_Event_Mouse_Up *ev = event_info;
 672    Evas_Coord x, y;
 673
 674    if (ev->button != 1) return;
 675    evas_object_geometry_get(obj, &x, &y, NULL, NULL);
 676    state.down = 0;
 677    state.x = ev->canvas.x - x;
 678    state.y = ev->canvas.y - y;
 679    evas_object_raise(obj);
 680    printf("^ %i %i\n", state.x, state.y);
 681    _state_end(&state);
 682 }
 683
 684 static void
 685 im_move_cb(void *data __UNUSED__, Evas *e __UNUSED__, Evas_Object *obj, void *event_info)
 686 {
 687    Evas_Event_Mouse_Move *ev = event_info;
 688    Evas_Coord x, y;
 689
 690    if (!state.down) return;
 691    evas_object_geometry_get(obj, &x, &y, NULL, NULL);
 692    state.x = ev->cur.canvas.x - x;
 693    state.y = ev->cur.canvas.y - y;
 694    printf("@ %i %i\n", state.x, state.y);
 695    if (state.job) ecore_job_del(state.job);
 696    state.job = ecore_job_add(_update_curl_job, &state);
 697 }
 698
 699 void
 700 test_flip_page(void *data __UNUSED__, Evas_Object *obj __UNUSED__, void *event_info __UNUSED__)
 701 {
 702    Evas_Object *win, *bg, *im;
 703    char buf[PATH_MAX];
 704
 705    win = elm_win_add(NULL, "flip_page", ELM_WIN_BASIC);
 706    elm_win_title_set(win, "Flip Page");
 707    elm_win_focus_highlight_enabled_set(win, EINA_TRUE);
 708    elm_win_autodel_set(win, 1);
 709
 710    bg = elm_bg_add(win);
 711    elm_win_resize_object_add(win, bg);
 712    evas_object_size_hint_weight_set(bg, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
 713    evas_object_show(bg);
 714
 715 #if 0
 716    im = elm_layout_add(win);
 717    snprintf(buf, sizeof(buf), "%s/objects/test.edj", PACKAGE_DATA_DIR);
 718    elm_layout_file_set(im, buf, "layout");
 719 #else
 720    im = evas_object_image_filled_add(evas_object_evas_get(win));
 721    snprintf(buf, sizeof(buf), "%s/images/%s",
 722             PACKAGE_DATA_DIR, "twofish.jpg");
 723    evas_object_image_file_set(im, buf, NULL);
 724 #endif
 725    evas_object_move(im, 40, 40);
 726    evas_object_resize(im, 400, 400);
 727    evas_object_show(im);
 728
 729    evas_object_event_callback_add(im, EVAS_CALLBACK_MOUSE_DOWN, im_down_cb, win);
 730    evas_object_event_callback_add(im, EVAS_CALLBACK_MOUSE_UP,   im_up_cb,   win);
 731    evas_object_event_callback_add(im, EVAS_CALLBACK_MOUSE_MOVE, im_move_cb, win);
 732
 733    evas_object_resize(win, 480, 480);
 734    evas_object_show(win);
 735
 736 #ifdef PAGEMESH
 737    Evas_Object *sl;
 738
 739    sl = elm_slider_add(win);
 740    elm_slider_min_max_set(sl, -5, 5);
 741    elm_slider_value_set(sl, 0);
 742    sl_rho = sl;
 743    evas_object_smart_callback_add(sl, "changed", _sl_ch, NULL);
 744    elm_slider_label_set(sl, "rho");
 745    elm_slider_unit_format_set(sl, "%1.2f");
 746    elm_slider_span_size_set(sl, 320);
 747    evas_object_move(sl, 10, 20);
 748    evas_object_resize(sl, 460, 40);
 749    evas_object_layer_set(sl, 100);
 750    evas_object_show(sl);
 751
 752    sl = elm_slider_add(win);
 753    elm_slider_min_max_set(sl, 0, 10);
 754    elm_slider_value_set(sl, 7.86);
 755    sl_theta = sl;
 756    evas_object_smart_callback_add(sl, "changed", _sl_ch, NULL);
 757    elm_slider_label_set(sl, "theta");
 758    elm_slider_unit_format_set(sl, "%1.2f");
 759    elm_slider_span_size_set(sl, 320);
 760    evas_object_move(sl, 10, 60);
 761    evas_object_resize(sl, 460, 40);
 762    evas_object_layer_set(sl, 100);
 763    evas_object_show(sl);
 764
 765    sl = elm_slider_add(win);
 766    elm_slider_min_max_set(sl, -800, 800);
 767    elm_slider_value_set(sl, -400);
 768    sl_A = sl;
 769    evas_object_smart_callback_add(sl, "changed", _sl_ch, NULL);
 770    elm_slider_label_set(sl, "A");
 771    elm_slider_unit_format_set(sl, "%1.2f");
 772    elm_slider_span_size_set(sl, 320);
 773    evas_object_move(sl, 10, 100);
 774    evas_object_resize(sl, 460, 40);
 775    evas_object_layer_set(sl, 100);
 776    evas_object_show(sl);
 777 #endif
 778 }
 779 #endif