1 #include <Elementary.h>
3 # include "elementary_config.h"
5 #ifndef ELM_LIB_QUICKLAUNCH
9 typedef struct _State State;
10 typedef struct _Slice Slice;
12 typedef struct _Vertex2 Vertex2;
13 typedef struct _Vertex3 Vertex3;
17 Evas_Object *orig, *win;
18 Evas_Coord down_x, down_y;
33 double x[4], y[4], z[4];
63 sl = calloc(1, sizeof(Slice));
65 sl->obj = evas_object_image_add(evas_object_evas_get(st->win));
66 evas_object_image_smooth_scale_set(sl->obj, 0);
67 evas_object_pass_events_set(sl->obj, 1);
68 evas_object_image_source_set(sl->obj, st->orig);
69 evas_object_show(sl->obj);
74 _slice_free(Slice *sl)
76 evas_object_del(sl->obj);
81 _slice_apply(Slice *sl, Evas_Coord x, Evas_Coord y, Evas_Coord w, Evas_Coord h)
87 evas_map_smooth_set(m, 0);
89 for (i = 0; i < 4; i++)
91 evas_map_point_coord_set(m, i, x + sl->x[i], y + sl->y[i], sl->z[i]);
92 evas_map_point_image_uv_set(m, i, sl->u[i] , sl->v[i]);
93 evas_map_point_color_set(m, i, 255, 255, 255, 255);
96 evas_map_util_3d_perspective(m, x + (w / 2), y + (h / 2), 0, 1024);
99 // FIXME: lighting should be manual with pt 0 and 3 being white and
100 // 2 and 3 matching the
101 evas_map_util_3d_lighting(m,
107 evas_object_map_enable_set(sl->obj, EINA_TRUE);
108 evas_object_image_fill_set(sl->obj, 0, 0, w, h);
109 evas_object_map_set(sl->obj, m);
114 _slice_xyz(Slice *sl,
115 double x1, double y1, double z1,
116 double x2, double y2, double z2,
117 double x3, double y3, double z3,
118 double x4, double y4, double z4)
120 sl->x[0] = x1; sl->y[0] = y1; sl->z[0] = z1;
121 sl->x[1] = x2; sl->y[1] = y2; sl->z[1] = z2;
122 sl->x[2] = x3; sl->y[2] = y3; sl->z[2] = z3;
123 sl->x[3] = x4; sl->y[3] = y4; sl->z[3] = z4;
128 double u1, double v1,
129 double u2, double v2,
130 double u3, double v3,
131 double u4, double v4)
133 sl->u[0] = u1; sl->v[0] = v1;
134 sl->u[1] = u2; sl->v[1] = v2;
135 sl->u[2] = u3; sl->v[2] = v3;
136 sl->u[3] = u4; sl->v[3] = v4;
140 _deform_point(Vertex2 *vi, Vertex3 *vo, double rho, double theta, double A)
146 // theta == cone angle (0 -> PI/2)
147 // A == distance of cone apex from origin
148 // rho == angle of cone from vertical axis (...-PI/2 to PI/2...)
152 d = sqrt((vi->x * vi->x) + pow(vi->y - A, 2));
154 b = asin(vi->x / d) / sin(theta);
157 v1.y = d + A - (r * (1 - cos(b)) * sin(theta));
158 v1.z = r * (1 - cos(b)) * cos(theta);
160 vo->x = (v1.x * cos(rho)) - (v1.z * sin(rho));
162 vo->z = (v1.x * sin(rho)) + (v1.z * cos(rho));
166 _interp_point(Vertex3 *vi1, Vertex3 *vi2, Vertex3 *vo, double v)
168 vo->x = (v * vi2->x) + ((1.0 - v) * vi1->x);
169 vo->y = (v * vi2->y) + ((1.0 - v) * vi1->y);
170 vo->z = (v * vi2->z) + ((1.0 - v) * vi1->z);
174 _slice_update(State *st)
176 Evas_Coord x1, y1, x2, y2, mx, my, px, rx, ry, prx, pry, dst, dx, dy, pdst;
177 Evas_Coord x, y, w, h;
182 evas_object_geometry_get(st->orig, &x, &y, &w, &h);
187 if (x2 >= x1) x2 = x1 - 1;
192 else if (mx >= w) mx = w - 1;
194 else if (my >= h) my = h - 1;
198 dst = sqrt((dx * dx) + (dy * dy));
201 // FIXME: clean up old objects
206 // MAGIC MATH STUFF!!!
208 double b = (h / 2), minv = 0.0, minva;
209 double mgrad = (double)(y1 - y2) / (double)(x1 - x2);
210 Evas_Coord slx1, slx2, sly;
211 int gx, gy, gsz, gw, gh;
212 double rho, A, theta, perc, percm, n, cd, rhol, Al, thetal;
214 if (mx < 1) mx = 1; // quick hack to keep curl line visible
216 if (mgrad == 0.0) // special horizontal case
217 mgrad = 0.001; // quick dirty hack for now
222 b = my + (minv * mx);
224 if ((b >= -5) && (b <= (h + 5)))
226 if (minv > 0.0) // clamp to h
228 minv = (double)(h + 5 - my) / (double)(mx);
229 b = my + (minv * mx);
233 minv = (double)(-5 - my) / (double)(mx);
234 b = my + (minv * mx);
239 static Evas_Object *ol = NULL;
240 Evas_Coord lx1, ly1, lx2, ly2;
241 if (!ol) ol = evas_object_line_add(evas_object_evas_get(st->win));
242 evas_object_color_set(ol, 128, 0, 0, 128);
246 ly2 = y + b + (-minv * w);
247 evas_object_line_xy_set(ol, lx1, ly1, lx2, ly2);
248 evas_object_show(ol);
250 EINA_LIST_FREE(st->slices, sl) _slice_free(sl);
252 perc = (double)x2 / (double)x1;
253 percm = (double)mx / (double)x1;
254 if (perc < 0.0) perc = 0.0;
255 else if (perc > 1.0) perc = 1.0;
256 if (percm < 0.0) percm = 0.0;
257 else if (percm > 1.0) percm = 1.0;
259 minva = atan(minv) / (M_PI / 2);
260 if (minva < 0.0) minva = -minva;
265 if (A < -(h * 20)) A = -h * 20;
269 // rho = is how much the page is turned
271 n = 1.0 - cos(n * M_PI / 2.0);
277 // theta == curliness (how much page culrs in on itself
278 n = sin((1.0 - perc) * M_PI);
282 n = sin((1.0 - perc) * M_PI);
289 for (gx = 0; gx < w; gx += gsz)
291 for (gy = 0; gy < h; gy += gsz)
293 Vertex2 vi[4], vil[2];
294 Vertex3 vo[4], vol[2];
297 if ((gx + gw) > w) gw = w - gx;
298 if ((gy + gh) > h) gh = h - gy;
300 vi[0].x = gx; vi[0].y = gy;
301 vi[1].x = gx + gw; vi[1].y = gy;
302 vi[2].x = gx + gw; vi[2].y = gy + gh;
303 vi[3].x = gx; vi[3].y = gy + gh;
305 vil[0].x = gx; vil[0].y = h - gx;
306 vil[1].x = gx + gw; vil[1].y = h - (gx + gw);
308 for (i = 0; i < 2; i++)
310 _deform_point(&(vil[i]), &(vol[i]), rhol, thetal, Al);
312 for (i = 0; i < 4; i++)
314 _deform_point(&(vi[i]), &(vo[i]), rho, theta, A);
316 n = minva * sin(perc * M_PI);
320 _interp_point(&(vo[0]), &(vol[0]), &(vo[0]), n);
321 _interp_point(&(vo[1]), &(vol[1]), &(vo[1]), n);
324 _interp_point(&(vo[2]), &(vol[1]), &(vo[2]), n);
325 _interp_point(&(vo[3]), &(vol[0]), &(vo[3]), n);
330 #define SWPV3(a, b) do {vt = (a); (a) = (b); (b) = vt;} while (0)
333 vo[0].y = h - vo[0].y;
334 vo[1].y = h - vo[1].y;
335 vo[2].y = h - vo[2].y;
336 vo[3].y = h - vo[3].y;
340 vo[0].x, vo[0].y, vo[0].z,
341 vo[1].x, vo[1].y, vo[1].z,
342 vo[2].x, vo[2].y, vo[2].z,
343 vo[3].x, vo[3].y, vo[3].z);
347 gx + gw, gy + gh, gx, gy + gh);
350 gx, h - (gy + gh), gx + gw, h - (gy + gh),
351 gx + gw, h - gy, gx, h - gy);
352 _slice_apply(sl, x, y, w, h);
353 st->slices = eina_list_append(st->slices, sl);
358 if (!st->base) st->base = _slice_new(st);
371 _slice_apply(sl, x, y, w, h);
373 EINA_LIST_FREE(st->slices, sl) _slice_free(sl);
375 // cylinder radius is width / 8
377 if (rad < (w / 16)) rad = (w / 16);
378 if (rad > (w / 8)) rad = w / 8;
385 for (i = 1; i < RES; i++)
387 rx = (double)rad * sin((i * M_PI) / RES);
388 ry = (double)rad * cos((i * M_PI) / RES);
391 dst = sqrt((dx * dx) + (dy * dy));
396 rx = prx + (((rx - prx) * dst) / pdst);
397 ry = pry + (((ry - pry) * dst) / pdst);
404 mx + prx, 0, -(rad - pry),
405 mx + rx, 0, -(rad - ry),
406 mx + rx, h, -(rad - ry),
407 mx + prx, h, -(rad - pry));
413 _slice_apply(sl, x, y, w, h);
414 st->slices = eina_list_append(st->slices, sl);
425 mx + prx, 0, -(rad - pry),
426 mx + (px - w), 0, -(rad * 2),
427 mx + (px - w), h, -(rad * 2),
428 mx + prx, h, -(rad - pry));
434 _slice_apply(sl, x, y, w, h);
435 st->slices = eina_list_append(st->slices, sl);
442 _slice_end(State *st)
446 if (st->base) _slice_free(st->base);
448 if (st->base2) _slice_free(st->base2);
450 EINA_LIST_FREE(st->slices, sl) _slice_free(sl);
464 static Evas_Object *sl_rho, *sl_theta, *sl_A;
469 static Eina_List *pts = NULL;
473 Evas_Coord x, y, w, h;
476 EINA_LIST_FREE(pts, o) evas_object_del(o);
478 evas_object_geometry_get(st->orig, &x, &y, &w, &h);
479 for (j = 0; j < h; j += 20)
481 for (i = 0; i < w; i += 20)
485 double rho, theta, A, n;
489 rho = elm_slider_value_get(sl_rho);
490 A = elm_slider_value_get(sl_A);
491 theta = elm_slider_value_get(sl_theta);
493 _deform_point(&vi, &vo, rho, theta, A);
495 o = evas_object_image_add(evas_object_evas_get(st->win));
496 evas_object_image_smooth_scale_set(o, 0);
497 evas_object_pass_events_set(o, 1);
498 evas_object_image_source_set(o, st->orig);
502 evas_map_smooth_set(m, 0);
505 evas_map_point_coord_set(m, k, x + vo.x, y + vo.y, -vo.z);
506 evas_map_point_image_uv_set(m, k, 0 , 0);
507 evas_map_point_color_set(m, k, 255, 255, 255, 255);
509 evas_map_point_coord_set(m, k, x + vo.x + 10, y + vo.y, -vo.z);
510 evas_map_point_image_uv_set(m, k, w , 0);
511 evas_map_point_color_set(m, k, 255, 255, 255, 255);
513 evas_map_point_coord_set(m, k, x + vo.x + 10, y + vo.y + 10, -vo.z);
514 evas_map_point_image_uv_set(m, k, w , h);
515 evas_map_point_color_set(m, k, 255, 255, 255, 255);
517 evas_map_point_coord_set(m, k, x + vo.x, y + vo.y + 10, -vo.z);
518 evas_map_point_image_uv_set(m, k, 0 , h);
519 evas_map_point_color_set(m, k, 255, 255, 255, 255);
522 evas_map_util_3d_perspective(m, x + (w / 2), y + (h / 2), 0, 1024);
524 evas_object_map_enable_set(o, EINA_TRUE);
525 evas_object_image_fill_set(o, 0, 0, w, h);
526 evas_object_map_set(o, m);
529 pts = eina_list_append(pts, o);
535 _sl_ch(void *data __UNUSED__, Evas_Object *obj __UNUSED__, void *event_info __UNUSED__)
552 im_down_cb(void *data, Evas *e __UNUSED__, Evas_Object *obj, void *event_info)
554 Evas_Event_Mouse_Down *ev = event_info;
555 Evas_Object *win = data;
558 if (ev->button != 1) return;
559 evas_object_geometry_get(obj, &x, &y, NULL, NULL);
563 state.x = ev->canvas.x - x;
564 state.y = ev->canvas.y - y;
565 state.down_x = state.x;
566 state.down_y = state.y;
567 if (_slice_update(&state))
568 evas_object_lower(obj);
569 printf("v %i %i\n", state.x, state.y);
573 im_up_cb(void *data __UNUSED__, Evas *e __UNUSED__, Evas_Object *obj, void *event_info)
575 Evas_Event_Mouse_Up *ev = event_info;
578 if (ev->button != 1) return;
579 evas_object_geometry_get(obj, &x, &y, NULL, NULL);
581 state.x = ev->canvas.x - x;
582 state.y = ev->canvas.y - y;
583 evas_object_raise(obj);
584 printf("^ %i %i\n", state.x, state.y);
589 im_move_cb(void *data __UNUSED__, Evas *e __UNUSED__, Evas_Object *obj, void *event_info)
591 Evas_Event_Mouse_Move *ev = event_info;
594 if (!state.down) return;
595 evas_object_geometry_get(obj, &x, &y, NULL, NULL);
596 state.x = ev->cur.canvas.x - x;
597 state.y = ev->cur.canvas.y - y;
598 printf("@ %i %i\n", state.x, state.y);
599 if (_slice_update(&state))
600 evas_object_lower(obj);
604 test_flip_page(void *data __UNUSED__, Evas_Object *obj __UNUSED__, void *event_info __UNUSED__)
606 Evas_Object *win, *bg, *im;
609 win = elm_win_add(NULL, "flip_page", ELM_WIN_BASIC);
610 elm_win_title_set(win, "Flip Page");
611 elm_win_focus_highlight_enabled_set(win, EINA_TRUE);
612 elm_win_autodel_set(win, 1);
614 bg = elm_bg_add(win);
615 elm_win_resize_object_add(win, bg);
616 evas_object_size_hint_weight_set(bg, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
617 evas_object_show(bg);
620 im = elm_layout_add(win);
621 snprintf(buf, sizeof(buf), "%s/objects/test.edj", PACKAGE_DATA_DIR);
622 elm_layout_file_set(im, buf, "layout");
624 im = evas_object_image_filled_add(evas_object_evas_get(win));
625 snprintf(buf, sizeof(buf), "%s/images/%s",
626 PACKAGE_DATA_DIR, "twofish.jpg");
627 evas_object_image_file_set(im, buf, NULL);
629 evas_object_move(im, 140, 140);
630 evas_object_resize(im, 200, 200);
631 evas_object_show(im);
633 evas_object_event_callback_add(im, EVAS_CALLBACK_MOUSE_DOWN, im_down_cb, win);
634 evas_object_event_callback_add(im, EVAS_CALLBACK_MOUSE_UP, im_up_cb, win);
635 evas_object_event_callback_add(im, EVAS_CALLBACK_MOUSE_MOVE, im_move_cb, win);
637 evas_object_resize(win, 480, 480);
638 evas_object_show(win);
643 sl = elm_slider_add(win);
644 elm_slider_min_max_set(sl, -5, 5);
645 elm_slider_value_set(sl, 0);
647 evas_object_smart_callback_add(sl, "changed", _sl_ch, NULL);
648 elm_slider_label_set(sl, "rho");
649 elm_slider_unit_format_set(sl, "%1.2f");
650 elm_slider_span_size_set(sl, 320);
651 evas_object_move(sl, 10, 20);
652 evas_object_resize(sl, 460, 40);
653 evas_object_layer_set(sl, 100);
654 evas_object_show(sl);
656 sl = elm_slider_add(win);
657 elm_slider_min_max_set(sl, 0, 10);
658 elm_slider_value_set(sl, 7.86);
660 evas_object_smart_callback_add(sl, "changed", _sl_ch, NULL);
661 elm_slider_label_set(sl, "theta");
662 elm_slider_unit_format_set(sl, "%1.2f");
663 elm_slider_span_size_set(sl, 320);
664 evas_object_move(sl, 10, 60);
665 evas_object_resize(sl, 460, 40);
666 evas_object_layer_set(sl, 100);
667 evas_object_show(sl);
669 sl = elm_slider_add(win);
670 elm_slider_min_max_set(sl, -800, 800);
671 elm_slider_value_set(sl, -400);
673 evas_object_smart_callback_add(sl, "changed", _sl_ch, NULL);
674 elm_slider_label_set(sl, "A");
675 elm_slider_unit_format_set(sl, "%1.2f");
676 elm_slider_span_size_set(sl, 320);
677 evas_object_move(sl, 10, 100);
678 evas_object_resize(sl, 460, 40);
679 evas_object_layer_set(sl, 100);
680 evas_object_show(sl);