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