ncnn

1
// Tencent is pleased to support the open source community by making ncnn available.
2
//
3
// Copyright (C) 2019 THL A29 Limited, a Tencent company. All rights reserved.
4
//
5
// Licensed under the BSD 3-Clause License (the "License"); you may not use this file except
6
// in compliance with the License. You may obtain a copy of the License at
7
//
8
// https://opensource.org/licenses/BSD-3-Clause
9
//
10
// Unless required by applicable law or agreed to in writing, software distributed
11
// under the License is distributed on an "AS IS" BASIS, WITHOUT WARRANTIES OR
12
// CONDITIONS OF ANY KIND, either express or implied. See the License for the
13
// specific language governing permissions and limitations under the License.
14

15
#version 450
16

17
#if NCNN_fp16_storage
18
#extension GL_EXT_shader_16bit_storage: require
19
#endif
20
#if NCNN_fp16_arithmetic
21
#extension GL_EXT_shader_explicit_arithmetic_types_float16: require
22
#endif
23

24
layout (constant_id = 0) const int ndim = 0;
25

26
#define shape_constant_id_offset 1
27
layout (constant_id = shape_constant_id_offset + 0) const int dims = 0;
28
layout (constant_id = shape_constant_id_offset + 1) const int w = 0;
29
layout (constant_id = shape_constant_id_offset + 2) const int h = 0;
30
layout (constant_id = shape_constant_id_offset + 3) const int d = 0;
31
layout (constant_id = shape_constant_id_offset + 4) const int c = 0;
32
layout (constant_id = shape_constant_id_offset + 5) const int cstep = 0;
33

34
layout (constant_id = shape_constant_id_offset + 6) const int outdims = 0;
35
layout (constant_id = shape_constant_id_offset + 7) const int outw = 0;
36
layout (constant_id = shape_constant_id_offset + 8) const int outh = 0;
37
layout (constant_id = shape_constant_id_offset + 9) const int outd = 0;
38
layout (constant_id = shape_constant_id_offset + 10) const int outc = 0;
39
layout (constant_id = shape_constant_id_offset + 11) const int outcstep = 0;
40

41
#if NCNN_image_shader
42
layout (binding = 0) uniform unfp sampler3D bottom_blob_3d;
43
layout (binding = 1, imfmtc1) writeonly uniform unfp image3D top_blob_3d;
44
#else
45
layout (binding = 0) readonly buffer bottom_blob { sfp bottom_blob_data[]; };
46
layout (binding = 1) writeonly buffer top_blob { sfp top_blob_data[]; };
47
#endif
48

49
layout (push_constant) uniform parameter
50
{
51
    int dims;
52
    int w;
53
    int h;
54
    int d;
55
    int c;
56
    int cstep;
57

58
    int outdims;
59
    int outw;
60
    int outh;
61
    int outd;
62
    int outc;
63
    int outcstep;
64
} p;
65

66
void main()
67
{
68
    int gx = int(gl_GlobalInvocationID.x);
69
    int gy = int(gl_GlobalInvocationID.y);
70
    int gz = int(gl_GlobalInvocationID.z);
71

72
    if (gx >= psc(outw) || gy >= psc(outh) * psc(outd) || gz >= psc(outc))
73
        return;
74

75
    int i;
76
    if (ndim == 1) i = gx;
77
    if (ndim == 2) i = gy * psc(outw) + gx;
78
    if (ndim == 3) i = gz * psc(outh) * psc(outw) + gy * psc(outw) + gx;
79
    if (ndim == 4) i = gz * psc(outd) * psc(outh) * psc(outw) + gy * psc(outw) + gx;
80

81
    int x;
82
    int y;
83
    int z;
84

85
    if (psc(dims) == 1)
86
    {
87
        z = 0;
88
        y = 0;
89
        x = i;
90
    }
91
    else if (psc(dims) == 2)
92
    {
93
        z = 0;
94
        y = i / psc(w);
95
        x = i % psc(w);
96
    }
97
    else if (psc(dims) == 3)
98
    {
99
        int size = psc(w) * psc(h);
100

101
        z = i / size;
102
        y = i % size / psc(w);
103
        x = i % size % psc(w);
104
    }
105
    else // if (psc(dims) == 4)
106
    {
107
        int size = psc(w) * psc(h) * psc(d);
108
        int dsize = psc(w) * psc(h);
109

110
        z = i / size;
111
        int yd = i % size / dsize;
112
        int yh = i % size % dsize / psc(w);
113
        x = i % size % dsize % psc(w);
114

115
        y = yd * psc(h) + yh;
116
    }
117

118
#if NCNN_image_shader
119
    afp v = image3d_ld1(bottom_blob_3d, ivec3(x, y, z));
120

121
    if (ndim == 1) image3d_st1(top_blob_3d, ivec3(gx, 0, 0), v);
122
    if (ndim == 2) image3d_st1(top_blob_3d, ivec3(gx, gy, 0), v);
123
    if (ndim == 3 || ndim == 4) image3d_st1(top_blob_3d, ivec3(gx, gy, gz), v);
124
#else
125
    int v_offset = z * psc(cstep) + y * psc(w) + x;
126

127
    int gi;
128
    if (ndim == 1) gi = gx;
129
    if (ndim == 2) gi = gy * psc(outw) + gx;
130
    if (ndim == 3 || ndim == 4) gi = gz * psc(outcstep) + gy * psc(outw) + gx;
131

132
    buffer_cp1(top_blob_data, gi, bottom_blob_data, v_offset);
133
#endif
134
}
135