source: trunk/test/tutorial/tut03.cpp @ 1102

Last change on this file since 1102 was 1102, checked in by sam, 9 years ago

test: proper multithreading in the Mandelbrot tutorial.

  • Property svn:keywords set to Id
File size: 29.4 KB
Line 
1//
2// Lol Engine - Fractal tutorial
3//
4// Copyright: (c) 2011 Sam Hocevar <sam@hocevar.net>
5//   This program is free software; you can redistribute it and/or
6//   modify it under the terms of the Do What The Fuck You Want To
7//   Public License, Version 2, as published by Sam Hocevar. See
8//   http://sam.zoy.org/projects/COPYING.WTFPL for more details.
9//
10
11#if defined HAVE_CONFIG_H
12#   include "config.h"
13#endif
14
15#include <cstring>
16
17#include "core.h"
18#include "lolgl.h"
19#include "loldebug.h"
20
21using namespace std;
22using namespace lol;
23
24#if USE_SDL && defined __APPLE__
25#   include <SDL_main.h>
26#endif
27
28#if defined _WIN32
29#   undef main /* FIXME: still needed? */
30#   include <direct.h>
31#endif
32
33#ifdef __CELLOS_LV2__
34static GLint const INTERNAL_FORMAT = GL_ARGB_SCE;
35static GLenum const TEXTURE_FORMAT = GL_BGRA;
36static GLenum const TEXTURE_TYPE = GL_UNSIGNED_INT_8_8_8_8_REV;
37#elif defined __native_client__
38static GLint const INTERNAL_FORMAT = GL_RGBA;
39static GLenum const TEXTURE_FORMAT = GL_RGBA;
40static GLenum const TEXTURE_TYPE = GL_UNSIGNED_BYTE;
41#else
42/* Seems efficient for little endian textures */
43static GLint const INTERNAL_FORMAT = GL_RGBA;
44static GLenum const TEXTURE_FORMAT = GL_BGRA;
45static GLenum const TEXTURE_TYPE = GL_UNSIGNED_INT_8_8_8_8_REV;
46#endif
47
48class Fractal : public WorldEntity
49{
50public:
51    Fractal(ivec2 const &size)
52    {
53        /* Ensure texture size is a multiple of 16 for better aligned
54         * data access. Store the dimensions of a texel for our shader,
55         * as well as the half-size of the screen. */
56        m_size = size;
57        m_size.x = (m_size.x + 15) & ~15;
58        m_size.y = (m_size.y + 15) & ~15;
59        m_texel_settings = vec4(1.0, 1.0, 2.0, 2.0) / (vec4)m_size.xyxy();
60        m_screen_settings = vec4(1.0, 1.0, 0.5, 0.5) * (vec4)m_size.xyxy();
61
62        /* Window size decides the world aspect ratio. For instance, 640×480
63         * will be mapped to (-0.66,-0.5) - (0.66,0.5). */
64#if !defined __native_client__
65        m_window_size = Video::GetSize();
66#else
67        /* FIXME: it's illegal to call this on the game thread! */
68        m_window_size = ivec2(640, 480);
69#endif
70        if (m_window_size.y < m_window_size.x)
71            m_window2world = 0.5 / m_window_size.y;
72        else
73            m_window2world = 0.5 / m_window_size.x;
74        m_texel2world = (vec2)m_window_size / (vec2)m_size * m_window2world;
75
76        m_oldmouse = ivec2(0, 0);
77
78        m_pixels = new u8vec4[m_size.x * m_size.y];
79        m_tmppixels = new u8vec4[m_size.x / 2 * m_size.y / 2];
80        m_frame = -1;
81        m_slices = 4;
82        for (int i = 0; i < 4; i++)
83        {
84            m_deltashift[i] = 0.0;
85            m_deltascale[i] = 1.0;
86            m_dirty[i] = 2;
87        }
88#if defined __CELLOS_LV2__
89        //m_center = f64cmplx(-.22815528839841, -1.11514249704382);
90        //m_center = f64cmplx(0.001643721971153, 0.822467633298876);
91        m_center = f64cmplx(-0.65823419062254, 0.50221777363480);
92        m_zoom_speed = -0.000025;
93#else
94        m_center = -0.75;
95        m_zoom_speed = 0.0;
96#endif
97        m_translate = 0;
98        m_radius = 5.0;
99        m_ready = false;
100        m_drag = false;
101
102        m_palette = new u8vec4[(MAX_ITERATIONS + 1) * PALETTE_STEP];
103        for (int i = 0; i < (MAX_ITERATIONS + 1) * PALETTE_STEP; i++)
104        {
105            double f = (double)i / PALETTE_STEP;
106
107            double r = 0.5 * sin(f * 0.27 + 2.0) + 0.5;
108            double g = 0.5 * sin(f * 0.17 - 1.8) + 0.5;
109            double b = 0.5 * sin(f * 0.21 - 2.6) + 0.5;
110
111            if (f < 7.0)
112            {
113                f = f < 1.0 ? 0.0 : (f - 1.0) / 6.0;
114                r *= f;
115                g *= f;
116                b *= f;
117            }
118
119            uint8_t red = r * 255.99f;
120            uint8_t green = g * 255.99f;
121            uint8_t blue = b * 255.99f;
122#if defined __CELLOS_LV2__
123            m_palette[i] = u8vec4(255, red, green, blue);
124#elif defined __native_client__
125            m_palette[i] = u8vec4(red, green, blue, 255);
126#else
127            m_palette[i] = u8vec4(blue, green, red, 255);
128#endif
129        }
130
131#if !defined __native_client__
132        m_centertext = new Text(NULL, "gfx/font/ascii.png");
133        m_centertext->SetPos(ivec3(5, m_window_size.y - 15, 1));
134        Ticker::Ref(m_centertext);
135
136        m_mousetext = new Text(NULL, "gfx/font/ascii.png");
137        m_mousetext->SetPos(ivec3(5, m_window_size.y - 29, 1));
138        Ticker::Ref(m_mousetext);
139
140        m_zoomtext = new Text(NULL, "gfx/font/ascii.png");
141        m_zoomtext->SetPos(ivec3(5, m_window_size.y - 43, 1));
142        Ticker::Ref(m_zoomtext);
143#endif
144
145        position = ivec3(0, 0, 0);
146        bbox[0] = position;
147        bbox[1] = ivec3(m_window_size, 0);
148        Input::TrackMouse(this);
149
150        /* Spawn worker threads and wait for their readiness. */
151        for (int i = 0; i < MAX_THREADS; i++)
152            m_threads[i] = new Thread(DoWorkHelper, this);
153        for (int i = 0; i < MAX_THREADS; i++)
154            m_spawnqueue.Pop();
155    }
156
157    ~Fractal()
158    {
159        /* Signal worker threads for completion. */
160        for (int i = 0; i < MAX_THREADS; i++)
161            m_jobqueue.Push(-1);
162
163        Input::UntrackMouse(this);
164#if !defined __native_client__
165        Ticker::Unref(m_centertext);
166        Ticker::Unref(m_mousetext);
167        Ticker::Unref(m_zoomtext);
168#endif
169        delete m_pixels;
170        delete m_tmppixels;
171        delete m_palette;
172    }
173
174    inline f64cmplx TexelToWorldOffset(vec2 texel)
175    {
176        double dx = (0.5 + texel.x - m_size.x / 2) * m_texel2world.x;
177        double dy = (0.5 + m_size.y / 2 - texel.y) * m_texel2world.y;
178        return m_radius * f64cmplx(dx, dy);
179    }
180
181    inline f64cmplx ScreenToWorldOffset(vec2 pixel)
182    {
183        /* No 0.5 offset here, because we want to be able to position the
184         * mouse at (0,0) exactly. */
185        double dx = pixel.x - m_window_size.x / 2;
186        double dy = m_window_size.y / 2 - pixel.y;
187        return m_radius * m_window2world * f64cmplx(dx, dy);
188    }
189
190    virtual void TickGame(float deltams)
191    {
192        WorldEntity::TickGame(deltams);
193
194        int prev_frame = m_frame;
195        m_frame = (m_frame + 1) % 4;
196
197        f64cmplx worldmouse = m_center + ScreenToWorldOffset(mousepos);
198
199        ivec3 buttons = Input::GetMouseButtons();
200#if !defined __CELLOS_LV2__
201        if (buttons[1])
202        {
203            if (!m_drag)
204            {
205                m_oldmouse = mousepos;
206                m_drag = true;
207            }
208            m_translate = ScreenToWorldOffset(m_oldmouse)
209                        - ScreenToWorldOffset(mousepos);
210            /* XXX: the purpose of this hack is to avoid translating by
211             * an exact number of pixels. If this were to happen, the step()
212             * optimisation for i915 cards in our shader would behave
213             * incorrectly because a quarter of the pixels in the image
214             * would have tie rankings in the distance calculation. */
215            m_translate *= 1023.0 / 1024.0;
216            m_oldmouse = mousepos;
217        }
218        else
219        {
220            m_drag = false;
221            if (m_translate != 0.0)
222            {
223                m_translate *= pow(2.0, -deltams * 0.005);
224                if (m_translate.norm() / m_radius < 1e-4)
225                    m_translate = 0.0;
226            }
227        }
228
229        if ((buttons[0] || buttons[2]) && mousepos.x != -1)
230        {
231            double zoom = buttons[0] ? -0.0005 : 0.0005;
232            m_zoom_speed += deltams * zoom;
233            if (m_zoom_speed / zoom > 5)
234                m_zoom_speed = 5 * zoom;
235        }
236        else if (m_zoom_speed)
237        {
238            m_zoom_speed *= pow(2.0, -deltams * 0.005);
239            if (abs(m_zoom_speed) < 1e-5 || m_drag)
240                m_zoom_speed = 0.0;
241        }
242#endif
243
244        if (m_zoom_speed || m_translate != 0.0)
245        {
246            f64cmplx oldcenter = m_center;
247            double oldradius = m_radius;
248            double zoom = pow(2.0, deltams * m_zoom_speed);
249            if (m_radius * zoom > 8.0)
250            {
251                m_zoom_speed *= -1.0;
252                zoom = 8.0 / m_radius;
253            }
254            else if (m_radius * zoom < 1e-14)
255            {
256                m_zoom_speed *= -1.0;
257                zoom = 1e-14 / m_radius;
258            }
259            m_radius *= zoom;
260#if !defined __CELLOS_LV2__
261            m_center += m_translate;
262            m_center = (m_center - worldmouse) * zoom + worldmouse;
263            worldmouse = m_center + ScreenToWorldOffset(mousepos);
264#endif
265
266            /* Store the transformation properties to go from m_frame - 1
267             * to m_frame. */
268            m_deltashift[prev_frame] = (m_center - oldcenter) / oldradius;
269            m_deltashift[prev_frame].x /= m_size.x * m_texel2world.x;
270            m_deltashift[prev_frame].y /= m_size.y * m_texel2world.y;
271            m_deltascale[prev_frame] = m_radius / oldradius;
272            m_dirty[0] = m_dirty[1] = m_dirty[2] = m_dirty[3] = 2;
273        }
274        else
275        {
276            /* If settings didn't change, set transformation from previous
277             * frame to identity. */
278            m_deltashift[prev_frame] = 0.0;
279            m_deltascale[prev_frame] = 1.0;
280        }
281
282        /* Transformation from current frame to current frame is always
283         * identity. */
284        m_zoom_settings[m_frame][0] = 0.0f;
285        m_zoom_settings[m_frame][1] = 0.0f;
286        m_zoom_settings[m_frame][2] = 1.0f;
287
288        /* Compute transformation from other frames to current frame */
289        for (int i = 0; i < 3; i++)
290        {
291            int prev_index = (m_frame + 4 - i) % 4;
292            int cur_index = (m_frame + 3 - i) % 4;
293
294            m_zoom_settings[cur_index][0] = m_zoom_settings[prev_index][0] * m_deltascale[cur_index] + m_deltashift[cur_index].x;
295            m_zoom_settings[cur_index][1] = m_zoom_settings[prev_index][1] * m_deltascale[cur_index] + m_deltashift[cur_index].y;
296            m_zoom_settings[cur_index][2] = m_zoom_settings[prev_index][2] * m_deltascale[cur_index];
297        }
298
299        /* Precompute texture offset change instead of doing it in GLSL */
300        for (int i = 0; i < 4; i++)
301        {
302            m_zoom_settings[i][0] += 0.5 * (1.0 - m_zoom_settings[i][2]);
303            m_zoom_settings[i][1] -= 0.5 * (1.0 - m_zoom_settings[i][2]);
304        }
305
306#if !defined __native_client__
307        char buf[128];
308        sprintf(buf, "center: %+16.14f%+16.14fi", m_center.x, m_center.y);
309        m_centertext->SetText(buf);
310        sprintf(buf, " mouse: %+16.14f%+16.14fi", worldmouse.x, worldmouse.y);
311        m_mousetext->SetText(buf);
312        sprintf(buf, "  zoom: %g", 1.0 / m_radius);
313        m_zoomtext->SetText(buf);
314#endif
315
316        if (m_dirty[m_frame])
317        {
318            m_dirty[m_frame]--;
319
320            for (int i = 0; i < m_size.y; i += MAX_LINES * 2)
321                m_jobqueue.Push(i);
322        }
323    }
324
325    static void *DoWorkHelper(void *data)
326    {
327        Fractal *that = (Fractal *)data;
328        that->m_spawnqueue.Push(0);
329        for ( ; ; )
330        {
331            int line = that->m_jobqueue.Pop();
332            if (line == -1)
333                break;
334            that->DoWork(line);
335            that->m_donequeue.Push(0);
336        }
337        return NULL;
338    };
339
340    void DoWork(int line)
341    {
342        double const maxsqlen = 1024;
343        double const k1 = 1.0 / (1 << 10) / log2(maxsqlen);
344
345        int jmin = ((m_frame + 1) % 4) / 2 + line;
346        int jmax = jmin + MAX_LINES * 2;
347        if (jmax > m_size.y)
348            jmax = m_size.y;
349        u8vec4 *m_pixelstart = m_pixels
350                             + m_size.x * (m_size.y / 4 * m_frame + line / 4);
351
352        for (int j = jmin; j < jmax; j += 2)
353        for (int i = m_frame % 2; i < m_size.x; i += 2)
354        {
355            f64cmplx z0 = m_center + TexelToWorldOffset(ivec2(i, j));
356            f64cmplx r0 = z0;
357            //f64cmplx r0(0.28693186889504513, 0.014286693904085048);
358            //f64cmplx r0(0.001643721971153, 0.822467633298876);
359            //f64cmplx r0(-1.207205434596, 0.315432814901);
360            //f64cmplx r0(-0.79192956889854, -0.14632423080102);
361            //f64cmplx r0(0.3245046418497685, 0.04855101129280834);
362            f64cmplx z;
363            int iter = MAX_ITERATIONS;
364            for (z = z0; iter && z.sqlen() < maxsqlen; z = z * z + r0)
365                --iter;
366
367            if (iter)
368            {
369                double f = iter;
370                double n = z.sqlen();
371                if (n > maxsqlen * maxsqlen)
372                    n = maxsqlen * maxsqlen;
373
374                /* Approximate log(sqrt(n))/log(sqrt(maxsqlen)) */
375                union { double n; uint64_t x; } u = { n };
376                double k = (u.x >> 42) - (((1 << 10) - 1) << 10);
377                k *= k1;
378
379                /* Approximate log2(k) in [1,2]. */
380                f += (- 0.344847817623168308695977510213252644185 * k
381                      + 2.024664188044341212602376988171727038739) * k
382                      - 1.674876738008591047163498125918330313237;
383
384                *m_pixelstart++ = m_palette[(int)(f * PALETTE_STEP)];
385            }
386            else
387            {
388#if defined __CELLOS_LV2__
389                *m_pixelstart++ = u8vec4(255, 0, 0, 0);
390#else
391                *m_pixelstart++ = u8vec4(0, 0, 0, 255);
392#endif
393            }
394        }
395    }
396
397    virtual void TickDraw(float deltams)
398    {
399        WorldEntity::TickDraw(deltams);
400
401        static float const vertices[] =
402        {
403             1.0f,  1.0f,
404            -1.0f,  1.0f,
405            -1.0f, -1.0f,
406            -1.0f, -1.0f,
407             1.0f, -1.0f,
408             1.0f,  1.0f,
409        };
410
411        static float const texcoords[] =
412        {
413             1.0f,  1.0f,
414             0.0f,  1.0f,
415             0.0f,  0.0f,
416             0.0f,  0.0f,
417             1.0f,  0.0f,
418             1.0f,  1.0f,
419        };
420
421        if (!m_ready)
422        {
423            /* Create a texture of half the width and twice the height
424             * so that we can upload four different subimages each frame. */
425            glGenTextures(1, &m_texid);
426            glBindTexture(GL_TEXTURE_2D, m_texid);
427            glTexImage2D(GL_TEXTURE_2D, 0, INTERNAL_FORMAT,
428                         m_size.x / 2, m_size.y * 2, 0,
429                         TEXTURE_FORMAT, TEXTURE_TYPE, m_pixels);
430#if defined __CELLOS_LV2__
431            /* We need this hint because by default the storage type is
432             * GL_TEXTURE_SWIZZLED_GPU_SCE. */
433            glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_ALLOCATION_HINT_SCE,
434                            GL_TEXTURE_TILED_GPU_SCE);
435#endif
436            glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MAG_FILTER, GL_NEAREST);
437            glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MIN_FILTER, GL_NEAREST);
438
439            m_shader = Shader::Create(
440#if !defined __CELLOS_LV2__
441#if !defined HAVE_GLES_2X
442                "#version 120\n"
443#else
444                "precision highp float;"
445#endif
446                ""
447                "uniform mat4 u_ZoomSettings;"
448                "uniform vec4 u_TexelSize;"
449                "uniform vec4 u_ScreenSize;"
450                ""
451                "attribute vec2 a_TexCoord;"
452                "attribute vec2 a_Vertex;"
453                ""
454                "varying vec4 v_CenterX, v_CenterY, v_IndexX, v_IndexY;"
455                ""
456                "void main(void)"
457                "{"
458                "    gl_Position = vec4(a_Vertex, 0.0, 1.0);"
459                     /* Center point in [-.5,.5], apply zoom and translation
460                      * transformation, and go back to texture coordinates
461                      * in [0,1]. That's the ideal point we would like to
462                      * compute the value for. Then add or remove half the
463                      * size of a texel: the distance from this new point to
464                      * the final point will be our error. */
465                "    vec4 offsets = vec4(0.5, -0.5, 0.015625, -0.015625);"
466                "    vec4 zoomscale = vec4(u_ZoomSettings[0][2],"
467                "                          u_ZoomSettings[1][2],"
468                "                          u_ZoomSettings[2][2],"
469                "                          u_ZoomSettings[3][2]);"
470                "    vec4 zoomtx = vec4(u_ZoomSettings[0][0],"
471                "                       u_ZoomSettings[1][0],"
472                "                       u_ZoomSettings[2][0],"
473                "                       u_ZoomSettings[3][0]);"
474                "    vec4 zoomty = vec4(u_ZoomSettings[0][1],"
475                "                       u_ZoomSettings[1][1],"
476                "                       u_ZoomSettings[2][1],"
477                "                       u_ZoomSettings[3][1]);"
478                "    v_CenterX = zoomscale * a_TexCoord.x + zoomtx"
479                "              + offsets.xyxy * u_TexelSize.x;"
480                "    v_CenterY = zoomscale * a_TexCoord.y - zoomty"
481                "              + offsets.xyyx * u_TexelSize.y;"
482                     /* Precompute the multiple of one texel where our ideal
483                      * point lies. The fragment shader will call floor() on
484                      * this value. We add or remove a slight offset to avoid
485                      * rounding issues at the image's edges. */
486                "    v_IndexX = v_CenterX * u_ScreenSize.z - offsets.zwzw;"
487                "    v_IndexY = v_CenterY * u_ScreenSize.w - offsets.zwwz;"
488                "}",
489
490#if !defined HAVE_GLES_2X
491                "#version 120\n"
492#else
493                "precision highp float;"
494#endif
495                ""
496                "uniform vec4 u_TexelSize;"
497                "uniform sampler2D u_Texture;"
498                ""
499                "varying vec4 v_CenterX, v_CenterY, v_IndexX, v_IndexY;"
500                ""
501                "void main(void)"
502                "{"
503                "    vec4 v05 = vec4(0.5, 0.5, 0.5, 0.5);"
504                "    vec4 rx, ry, t0, dx, dy, dd;"
505                     /* Get a pixel coordinate from each slice into rx & ry */
506                "    rx = u_TexelSize.x + u_TexelSize.z * floor(v_IndexX);"
507                "    ry = u_TexelSize.y + u_TexelSize.w * floor(v_IndexY);"
508                     /* Compute inverse distance to expected pixel in dd,
509                      * and put zero if we fall outside the texture. */
510                "    t0 = step(abs(rx - v05), v05) * step(abs(ry - v05), v05);"
511                "    dx = rx - v_CenterX;"
512                "    dy = ry - v_CenterY;"
513                //"    vec4 dd = t0 * (abs(dx) + abs(dy));"
514                //"    vec4 dd = t0 / (0.001 + sqrt((dx * dx) + (dy * dy)));"
515                "    dd = t0 / (0.000001 + (dx * dx) + (dy * dy));"
516                     /* Modify Y coordinate to select proper quarter. */
517                "    ry = ry * 0.25 + vec4(0.0, 0.25, 0.5, 0.75);"
518                ""
519#if 1
520                "\n#if 0\n" /* XXX: disabled until we can autodetect i915 */
521                     /* t1.x <-- dd.x > dd.y */
522                     /* t1.y <-- dd.z > dd.w */
523                "    vec2 t1 = step(dd.xz, dd.yw);"
524                     /* ret.x <-- max(rx.x, rx.y) wrt. t1.x */
525                     /* ret.y <-- max(rx.z, rx.w) wrt. t1.y */
526                     /* ret.z <-- max(ry.x, ry.y) wrt. t1.x */
527                     /* ret.w <-- max(ry.z, ry.w) wrt. t1.y */
528                "    vec4 ret = mix(vec4(rx.xz, ry.xz),"
529                "                   vec4(rx.yw, ry.yw), t1.xyxy);"
530                     /* dd.x <-- max(dd.x, dd.y) */
531                     /* dd.z <-- max(dd.z, dd.w) */
532                "    dd.xy = mix(dd.xz, dd.yw, t1);"
533                     /* t2 <-- dd.x > dd.z */
534                "    float t2 = step(dd.x, dd.y);"
535                     /* ret.x <-- max(ret.x, ret.y); */
536                     /* ret.y <-- max(ret.z, ret.yw; */
537                "    ret.xy = mix(ret.xz, ret.yw, t2);"
538                "\n#else\n"
539                     /* Fallback for i915 cards -- the trick to reduce the
540                      * number of operations is to compute both step(a,b)
541                      * and step(b,a) and hope that their sum is 1. This is
542                      * almost always the case, and when it isn't we can
543                      * afford to have a few wrong pixels. However, a real
544                      * problem is when panning the image, because half the
545                      * screen is likely to flicker. To avoid this problem,
546                      * we cheat a little (see m_translate comment above). */
547                "    vec4 t1 = step(dd.xzyw, dd.ywxz);"
548                "    vec4 ret = vec4(rx.xz, ry.xz) * t1.zwzw"
549                "             + vec4(rx.yw, ry.yw) * t1.xyxy;"
550                "    dd.xy = dd.xz * t1.zw + dd.yw * t1.xy;"
551                "    vec2 t2 = step(dd.xy, dd.yx);"
552                "    ret.xy = ret.xz * t2.yy + ret.yw * t2.xx;"
553                "\n#endif\n"
554                     /* Nearest neighbour */
555                "    gl_FragColor = texture2D(u_Texture, ret.xy);"
556#else
557                     /* Alternate version: some kind of linear interpolation */
558                "    vec4 p0 = texture2D(u_Texture, vec2(rx.x, ry.x));"
559                "    vec4 p1 = texture2D(u_Texture, vec2(rx.y, ry.y));"
560                "    vec4 p2 = texture2D(u_Texture, vec2(rx.z, ry.z));"
561                "    vec4 p3 = texture2D(u_Texture, vec2(rx.w, ry.w));"
562                "    gl_FragColor = 1.0 / (dd.x + dd.y + dd.z + dd.w)"
563                "          * (dd.x * p0 + dd.y * p1 + dd.z * p2 + dd.w * p3);"
564#endif
565                "}"
566#else
567                "void main(float4 a_Vertex : POSITION,"
568                "          float2 a_TexCoord : TEXCOORD0,"
569                "          uniform float4x4 u_ZoomSettings,"
570                "          uniform float4 u_TexelSize,"
571                "          uniform float4 u_ScreenSize,"
572                "          out float4 out_Position : POSITION,"
573                "          out float4 v_CenterX,"
574                "          out float4 v_CenterY,"
575                "          out float4 v_IndexX,"
576                "          out float4 v_IndexY)"
577                "{"
578                "    out_Position = a_Vertex;"
579                "    float4 offsets = float4(0.5, -0.5, 0.015625, -0.015625);"
580                "    float4 zoomscale = float4(u_ZoomSettings[2][0],"
581                "                              u_ZoomSettings[2][1],"
582                "                              u_ZoomSettings[2][2],"
583                "                              u_ZoomSettings[2][3]);"
584                "    float4 zoomtx = float4(u_ZoomSettings[0][0],"
585                "                           u_ZoomSettings[0][1],"
586                "                           u_ZoomSettings[0][2],"
587                "                           u_ZoomSettings[0][3]);"
588                "    float4 zoomty = float4(u_ZoomSettings[1][0],"
589                "                           u_ZoomSettings[1][1],"
590                "                           u_ZoomSettings[1][2],"
591                "                           u_ZoomSettings[1][3]);"
592                "    v_CenterX = zoomscale * a_TexCoord.x + zoomtx"
593                "              + offsets.xyxy * u_TexelSize.x;"
594                "    v_CenterY = zoomscale * a_TexCoord.y - zoomty"
595                "              + offsets.xyyx * u_TexelSize.y;"
596                "    v_IndexX = v_CenterX * u_ScreenSize.z - offsets.zwzw;"
597                "    v_IndexY = v_CenterY * u_ScreenSize.w - offsets.zwwz;"
598                "}",
599
600                "void main(in float4 v_CenterX,"
601                "          in float4 v_CenterY,"
602                "          in float4 v_IndexX,"
603                "          in float4 v_IndexY,"
604                "          uniform float4 u_TexelSize2,"
605                "          uniform sampler2D u_Texture,"
606                "          out float4 out_FragColor : COLOR)"
607                "{"
608                "    float4 v05 = float4(0.5, 0.5, 0.5, 0.5);"
609                "    float4 rx, ry, t0, dx, dy, dd;"
610                "    rx = u_TexelSize2.x + u_TexelSize2.z * floor(v_IndexX);"
611                "    ry = u_TexelSize2.y + u_TexelSize2.w * floor(v_IndexY);"
612                "    t0 = step(abs(rx - v05), v05) * step(abs(ry - v05), v05);"
613                "    dx = rx - v_CenterX;"
614                "    dy = ry - v_CenterY;"
615                "    dd = t0 / (0.000001 + (dx * dx) + (dy * dy));"
616                "    ry = ry * 0.25 + float4(0.0, 0.25, 0.5, 0.75);"
617                "    float2 t1 = step(dd.xz, dd.yw);"
618                "    float4 ret = lerp(float4(rx.xz, ry.xz),"
619                "                      float4(rx.yw, ry.yw), t1.xyxy);"
620                "    dd.xy = lerp(dd.xz, dd.yw, t1);"
621                "    float t2 = step(dd.x, dd.y);"
622                "    ret.xy = lerp(ret.xz, ret.yw, t2);"
623                "    out_FragColor = tex2D(u_Texture, ret.xy);"
624                "}"
625#endif
626            );
627            m_vertexattrib = m_shader->GetAttribLocation("a_Vertex");
628            m_texattrib = m_shader->GetAttribLocation("a_TexCoord");
629            m_texeluni = m_shader->GetUniformLocation("u_TexelSize");
630#if defined __CELLOS_LV2__
631            m_texeluni2 = m_shader->GetUniformLocation("u_TexelSize2");
632#endif
633            m_screenuni = m_shader->GetUniformLocation("u_ScreenSize");
634            m_zoomuni = m_shader->GetUniformLocation("u_ZoomSettings");
635            m_ready = true;
636
637#if !defined __CELLOS_LV2__ && !defined __ANDROID__
638            /* Method 1: store vertex buffer on the GPU memory */
639            glGenBuffers(1, &m_vbo);
640            glBindBuffer(GL_ARRAY_BUFFER, m_vbo);
641            glBufferData(GL_ARRAY_BUFFER, sizeof(vertices), vertices,
642                         GL_STATIC_DRAW);
643            glGenBuffers(1, &m_tbo);
644            glBindBuffer(GL_ARRAY_BUFFER, m_tbo);
645            glBufferData(GL_ARRAY_BUFFER, sizeof(texcoords), texcoords,
646                         GL_STATIC_DRAW);
647#elif !defined __CELLOS_LV2__ && !defined __ANDROID__
648            /* Method 2: upload vertex information at each frame */
649#else
650#endif
651
652            /* FIXME: this object never cleans up */
653        }
654
655#if !defined HAVE_GLES_2X
656        glEnable(GL_TEXTURE_2D);
657#endif
658        glBindTexture(GL_TEXTURE_2D, m_texid);
659
660        if (m_dirty[m_frame])
661        {
662            for (int i = 0; i < m_size.y; i += MAX_LINES * 2)
663                m_donequeue.Pop();
664
665            m_dirty[m_frame]--;
666
667#ifdef __CELLOS_LV2__
668            /* glTexSubImage2D is extremely slow on the PS3, to the point
669             * that uploading the whole texture is 40 times faster. */
670            glTexImage2D(GL_TEXTURE_2D, 0, INTERNAL_FORMAT,
671                         m_size.x / 2, m_size.y * 2, 0,
672                         TEXTURE_FORMAT, TEXTURE_TYPE, m_pixels);
673#else
674            glTexSubImage2D(GL_TEXTURE_2D, 0, 0, m_frame * m_size.y / 2,
675                            m_size.x / 2, m_size.y / 2,
676                            TEXTURE_FORMAT, TEXTURE_TYPE,
677                            m_pixels + m_size.x * m_size.y / 4 * m_frame);
678#endif
679        }
680
681        m_shader->Bind();
682        m_shader->SetUniform(m_texeluni, m_texel_settings);
683#if defined __CELLOS_LV2__
684        m_shader->SetUniform(m_texeluni2, m_texel_settings);
685#endif
686        m_shader->SetUniform(m_screenuni, m_screen_settings);
687        m_shader->SetUniform(m_zoomuni, m_zoom_settings);
688#if !defined __CELLOS_LV2__ && !defined __ANDROID__
689        glBindBuffer(GL_ARRAY_BUFFER, m_vbo);
690        glEnableVertexAttribArray(m_vertexattrib);
691        glVertexAttribPointer(m_vertexattrib, 2, GL_FLOAT, GL_FALSE, 0, 0);
692
693        glBindBuffer(GL_ARRAY_BUFFER, m_tbo);
694        glEnableVertexAttribArray(m_texattrib);
695        glVertexAttribPointer(m_texattrib, 2, GL_FLOAT, GL_FALSE, 0, 0);
696#elif !defined __CELLOS_LV2__ && !defined __ANDROID__
697        /* Never used for now */
698        //glEnableVertexAttribArray(m_vertexattrib);
699        //glVertexAttribPointer(m_vertexattrib, 2, GL_FLOAT, GL_FALSE, 0, vertices);
700#else
701        glEnableClientState(GL_VERTEX_ARRAY);
702        glVertexPointer(2, GL_FLOAT, 0, vertices);
703        glEnableClientState(GL_TEXTURE_COORD_ARRAY);
704        glTexCoordPointer(2, GL_FLOAT, 0, texcoords);
705#endif
706
707        glDrawArrays(GL_TRIANGLES, 0, 6);
708
709#if !defined __CELLOS_LV2__ && !defined __ANDROID__
710        glDisableVertexAttribArray(m_vertexattrib);
711        glDisableVertexAttribArray(m_texattrib);
712        glBindBuffer(GL_ARRAY_BUFFER, 0);
713#elif !defined __CELLOS_LV2__ && !defined __ANDROID__
714        /* Never used for now */
715        //glDisableVertexAttribArray(m_vertexattrib);
716        //glDisableVertexAttribArray(m_texattrib);
717#else
718        glDisableClientState(GL_VERTEX_ARRAY);
719        glDisableClientState(GL_TEXTURE_COORD_ARRAY);
720#endif
721    }
722
723private:
724    static int const MAX_ITERATIONS = 340;
725    static int const PALETTE_STEP = 32;
726    static int const MAX_THREADS = 8;
727    static int const MAX_LINES = 8;
728
729    ivec2 m_size, m_window_size, m_oldmouse;
730    double m_window2world;
731    f64vec2 m_texel2world;
732    u8vec4 *m_pixels, *m_tmppixels, *m_palette;
733    Shader *m_shader;
734    GLuint m_texid;
735#if !defined __CELLOS_LV2__ && !defined __ANDROID__
736    GLuint m_vbo, m_tbo;
737    GLuint m_tco;
738#endif
739    int m_vertexattrib, m_texattrib, m_texeluni, m_screenuni, m_zoomuni;
740#if defined __CELLOS_LV2__
741    int m_texeluni2;
742#endif
743    int m_frame, m_slices, m_dirty[4];
744    bool m_ready, m_drag;
745
746    f64cmplx m_center, m_translate;
747    double m_zoom_speed, m_radius;
748    vec4 m_texel_settings, m_screen_settings;
749    mat4 m_zoom_settings;
750    f64cmplx m_deltashift[4];
751    double m_deltascale[4];
752
753    /* Worker threads */
754    Thread *m_threads[MAX_THREADS];
755    Queue m_spawnqueue, m_jobqueue, m_donequeue;
756
757    /* Debug information */
758#if !defined __native_client__
759    Text *m_centertext, *m_mousetext, *m_zoomtext;
760#endif
761};
762
763int main(int argc, char **argv)
764{
765#if defined _WIN32
766    _chdir("../..");
767#endif
768
769    Application app("Tutorial 3: Fractal", ivec2(640, 480), 60.0f);
770
771    new DebugFps(5, 5);
772    new Fractal(ivec2(640, 480));
773    //new DebugRecord("fractalol.ogm", 60.0f);
774
775    app.Run();
776
777    return EXIT_SUCCESS;
778}
779
Note: See TracBrowser for help on using the repository browser.