aboutsummaryrefslogtreecommitdiff
path: root/template/opengl.mako
blob: daf5f6676491949ec67215cf2e86d5bf946b6bc0 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
<%
def gid():
    return {
        2: 'get_global_id(1)*%d + get_global_id(0)' % memory.size_x,
        3: 'get_global_id(2)*%d + get_global_id(1)*%d + get_global_id(0)' % (memory.size_x*memory.size_y, memory.size_x)
    }.get(descriptor.d)

def pop_offset(i):
    return i * memory.volume

def moments_cell():
    return {
        2: '(int2)(get_global_id(0), get_global_id(1))',
        3: '(int4)(get_global_id(0), get_global_id(1), get_global_id(2), 0)'
    }.get(descriptor.d)

def neighbor_offset(c_i):
    return {
        2: lambda:                                      c_i[1]*memory.size_x + c_i[0],
        3: lambda: c_i[2]*memory.size_x*memory.size_y + c_i[1]*memory.size_x + c_i[0]
    }.get(descriptor.d)()

%>

__kernel void collect_gl_moments_and_materials_to_texture(__global ${float_type}* f,
                                                          __global int* material,
% if descriptor.d == 2:
                                                          __write_only image2d_t moments)
% elif descriptor.d == 3:
                                                          __write_only image3d_t moments)
% endif
{
    const unsigned int gid = ${gid()};

    __global ${float_type}* preshifted_f = f + gid;

% for i in range(0,descriptor.q):
    const ${float_type} f_curr_${i} = preshifted_f[${pop_offset(i)}];
% endfor

% for i, expr in enumerate(moments_subexpr):
    const ${float_type} ${expr[0]} = ${ccode(expr[1])};
% endfor

    float4 data;

    if (material[gid] == 1) {
% if descriptor.d == 2:
      data.x = ${ccode(moments_assignment[0].rhs)};
      data.y = ${ccode(moments_assignment[1].rhs)};
      data.z = ${ccode(moments_assignment[2].rhs)};
      data.w = sqrt(data.y*data.y + data.z*data.z);
% elif descriptor.d == 3:
      data.x = ${ccode(moments_assignment[0].rhs)};
      data.y = ${ccode(moments_assignment[1].rhs)};
      data.z = ${ccode(moments_assignment[2].rhs)};
      data.w = ${ccode(moments_assignment[3].rhs)};
% endif
    } else {
      data.x = 0.0;
      data.y = 0.0;
      data.z = 0.0;
      data.w = -material[gid];
    }

    write_imagef(moments, ${moments_cell()}, data);
}

__kernel void collect_gl_moments_to_texture(__global ${float_type}* f,
% if descriptor.d == 2:
                                            __write_only image2d_t moments)
% elif descriptor.d == 3:
                                            __write_only image3d_t moments)
% endif
{
    const unsigned int gid = ${gid()};

    __global ${float_type}* preshifted_f = f + gid;

% for i in range(0,descriptor.q):
    const ${float_type} f_curr_${i} = preshifted_f[${pop_offset(i)}];
% endfor

% for i, expr in enumerate(moments_subexpr):
    const ${float_type} ${expr[0]} = ${ccode(expr[1])};
% endfor

    float4 data;

% if descriptor.d == 2:
    data.x = ${ccode(moments_assignment[0].rhs)};
    data.y = ${ccode(moments_assignment[1].rhs)};
    data.z = ${ccode(moments_assignment[2].rhs)};
    data.w = sqrt(data.y*data.y + data.z*data.z);
% elif descriptor.d == 3:
    data.x = ${ccode(moments_assignment[0].rhs)};
    data.y = ${ccode(moments_assignment[1].rhs)};
    data.z = ${ccode(moments_assignment[2].rhs)};
    data.w = ${ccode(moments_assignment[3].rhs)};
% endif

    write_imagef(moments, ${moments_cell()}, data);
}