|
- // Tencent is pleased to support the open source community by making ncnn available.
- //
- // Copyright (C) 2019 THL A29 Limited, a Tencent company. All rights reserved.
- //
- // Licensed under the BSD 3-Clause License (the "License"); you may not use this file except
- // in compliance with the License. You may obtain a copy of the License at
- //
- // https://opensource.org/licenses/BSD-3-Clause
- //
- // Unless required by applicable law or agreed to in writing, software distributed
- // under the License is distributed on an "AS IS" BASIS, WITHOUT WARRANTIES OR
- // CONDITIONS OF ANY KIND, either express or implied. See the License for the
- // specific language governing permissions and limitations under the License.
-
- #version 450
-
- #if NCNN_fp16_storage
- #extension GL_EXT_shader_16bit_storage: require
- #endif
- #if NCNN_fp16_arithmetic
- #extension GL_EXT_shader_explicit_arithmetic_types_float16: require
- #endif
-
- layout (constant_id = 0) const int op_type = 0;
-
- #define shape_constant_id_offset 1
- layout (constant_id = shape_constant_id_offset + 0) const int adims = 0;
- layout (constant_id = shape_constant_id_offset + 1) const int aw = 0;
- layout (constant_id = shape_constant_id_offset + 2) const int ah = 0;
- layout (constant_id = shape_constant_id_offset + 3) const int ad = 0;
- layout (constant_id = shape_constant_id_offset + 4) const int ac = 0;
- layout (constant_id = shape_constant_id_offset + 5) const int acstep = 0;
-
- layout (constant_id = shape_constant_id_offset + 6) const int bdims = 0;
- layout (constant_id = shape_constant_id_offset + 7) const int bw = 0;
- layout (constant_id = shape_constant_id_offset + 8) const int bh = 0;
- layout (constant_id = shape_constant_id_offset + 9) const int bd = 0;
- layout (constant_id = shape_constant_id_offset + 10) const int bc = 0;
- layout (constant_id = shape_constant_id_offset + 11) const int bcstep = 0;
-
- layout (constant_id = shape_constant_id_offset + 12) const int outdims = 0;
- layout (constant_id = shape_constant_id_offset + 13) const int outw = 0;
- layout (constant_id = shape_constant_id_offset + 14) const int outh = 0;
- layout (constant_id = shape_constant_id_offset + 15) const int outd = 0;
- layout (constant_id = shape_constant_id_offset + 16) const int outc = 0;
- layout (constant_id = shape_constant_id_offset + 17) const int outcstep = 0;
-
- #if NCNN_image_shader
- layout (binding = 0) uniform unfp sampler3D a_blob_3d;
- layout (binding = 1) uniform unfp sampler3D b_blob_3d;
- layout (binding = 2, imfmtc1) writeonly uniform unfp image3D top_blob_3d;
- #else
- layout (binding = 0) readonly buffer a_blob { sfp a_blob_data[]; };
- layout (binding = 1) readonly buffer b_blob { sfp b_blob_data[]; };
- layout (binding = 2) writeonly buffer top_blob { sfp top_blob_data[]; };
- #endif
-
- layout (push_constant) uniform parameter
- {
- int adims;
- int aw;
- int ah;
- int ad;
- int ac;
- int acstep;
-
- int bdims;
- int bw;
- int bh;
- int bd;
- int bc;
- int bcstep;
-
- int outdims;
- int outw;
- int outh;
- int outd;
- int outc;
- int outcstep;
- } p;
-
- void main()
- {
- int gx = int(gl_GlobalInvocationID.x);
- int gy = int(gl_GlobalInvocationID.y);
- int gz = int(gl_GlobalInvocationID.z);
-
- if (gx >= psc(outw) || gy >= psc(outh) * psc(outd) || gz >= psc(outc))
- return;
-
- #if NCNN_image_shader
- int ax = gx;
- int ay = gy;
- int az = gz;
- int bx = gx;
- int by = gy;
- int bz = gz;
-
- if (psc(adims) == 4)
- {
- int yd = gy / psc(outh);
- int yh = gy % psc(outh);
-
- if (psc(bdims) == 3)
- {
- // type 28
- bx = yh;
- by = yd;
- bz = gz;
- }
-
- if (psc(bdims) == 2)
- {
- // type 27
- bx = yd;
- by = gz;
- bz = 0;
- }
-
- if (psc(bdims) == 1)
- {
- if (psc(bw) == 1)
- {
- // type 25
- bx = 0;
- by = 0;
- bz = 0;
- }
- else
- {
- // type 26
- bx = gz;
- by = 0;
- bz = 0;
- }
- }
- }
- else if (psc(adims) == 3)
- {
- if (psc(bdims) == 4)
- {
- int yd = gy / psc(outh);
- int yh = gy % psc(outh);
-
- // type 23
- ax = yh;
- ay = yd;
- az = gz;
- }
-
- if (psc(bdims) == 3)
- {
- if (psc(bw) == 1 && psc(bh) == 1)
- {
- // special type 1
- bx = 0;
- by = 0;
- }
-
- if (psc(bw) == psc(aw) && psc(bh) == psc(ah) && psc(bc) == 1)
- {
- // special type 2
- bz = 0;
- }
-
- if (psc(aw) == 1 && psc(ah) == 1)
- {
- // special type 3
- ax = 0;
- ay = 0;
- }
-
- if (psc(bw) == psc(aw) && psc(bh) == psc(ah) && psc(ac) == 1)
- {
- // special type 4
- az = 0;
- }
-
- if (psc(aw) != 1 && psc(bw) == 1 && psc(bh) == psc(ah) && psc(bc) == psc(ac))
- {
- // special type 5
- bx = 0;
- }
-
- if (psc(bw) == psc(aw) && psc(ah) != 1 && psc(bh) == 1 && psc(bc) == psc(ac))
- {
- // special type 6
- by = 0;
- }
-
- if (psc(bw) != 1 && psc(aw) == 1 && psc(bh) == psc(ah) && psc(bc) == psc(ac))
- {
- // special type 7
- ax = 0;
- }
-
- if (psc(bw) == psc(aw) && psc(bh) != 1 && psc(ah) == 1 && psc(bc) == psc(ac))
- {
- // special type 8
- ay = 0;
- }
- }
-
- if (psc(bdims) == 2)
- {
- // type 18
- bx = gy;
- by = gz;
- bz = 0;
- }
-
- if (psc(bdims) == 1)
- {
- if (psc(bw) == 1)
- {
- // type 16
- bx = 0;
- by = 0;
- bz = 0;
- }
- else
- {
- // type 17
- bx = gz;
- by = 0;
- bz = 0;
- }
- }
- }
- else if (psc(adims) == 2)
- {
- if (psc(bdims) == 4)
- {
- int yd = gy / psc(outh);
- int yh = gy % psc(outh);
-
- // type 22
- ax = yd;
- ay = gz;
- az = 0;
- }
-
- if (psc(bdims) == 3)
- {
- // type 14
- ax = gy;
- ay = gz;
- az = 0;
- }
-
- if (psc(bdims) == 1)
- {
- if (psc(bw) == 1)
- {
- // type 11
- bx = 0;
- by = 0;
- bz = 0;
- }
- else
- {
- // type 12
- bx = gy;
- by = 0;
- bz = 0;
- }
- }
- }
- else if (psc(adims) == 1)
- {
- if (psc(aw) == 1)
- {
- // type 2 3 4 20
- ax = 0;
- ay = 0;
- az = 0;
- }
- else
- {
- if (psc(bdims) == 4)
- {
- // type 21
- ax = gz;
- ay = 0;
- az = 0;
- }
-
- if (psc(bdims) == 3)
- {
- // type 9
- ax = gz;
- ay = 0;
- az = 0;
- }
-
- if (psc(bdims) == 2)
- {
- // type 8
- ax = gy;
- ay = 0;
- az = 0;
- }
-
- if (psc(bdims) == 1)
- {
- if (psc(bw) == 1)
- {
- // type 6
- bx = 0;
- by = 0;
- bz = 0;
- }
- }
- }
- }
-
- afp v1 = image3d_ld1(a_blob_3d, ivec3(ax, ay, az));
- afp v2 = image3d_ld1(b_blob_3d, ivec3(bx, by, bz));
- #else
- const int gi = gz * psc(outcstep) + gy * psc(outw) + gx;
-
- int ai;
- int bi;
-
- if (psc(adims) == 4)
- {
- int yd = gy / psc(outh);
- int yh = gy % psc(outh);
-
- if (psc(bdims) == 3)
- {
- // type 28
- ai = gi;
- bi = gz * psc(bcstep) + yd * psc(bw) + yh;
- }
-
- if (psc(bdims) == 2)
- {
- // type 27
- ai = gi;
- bi = gz * psc(bw) + yd;
- }
-
- if (psc(bdims) == 1)
- {
- if (psc(bw) == 1)
- {
- // type 25
- ai = gi;
- bi = 0;
- }
- else
- {
- // type 26
- ai = gi;
- bi = gz;
- }
- }
- }
- else if (psc(adims) == 3)
- {
- if (psc(bdims) == 4)
- {
- int yd = gy / psc(outh);
- int yh = gy % psc(outh);
-
- // type 23
- ai = gz * psc(acstep) + yd * psc(aw) + yh;
- bi = gi;
- }
-
- if (psc(bdims) == 3)
- {
- if (psc(bw) == 1 && psc(bh) == 1)
- {
- // special type 1
- ai = gi;
- bi = gz * psc(bcstep);
- }
-
- if (psc(bw) == psc(aw) && psc(bh) == psc(ah) && psc(bc) == 1)
- {
- // special type 2
- ai = gi;
- bi = gy * psc(bw) + gx;
- }
-
- if (psc(aw) == 1 && psc(ah) == 1)
- {
- // special type 3
- ai = gz * psc(acstep);
- bi = gi;
- }
-
- if (psc(bw) == psc(aw) && psc(bh) == psc(ah) && psc(ac) == 1)
- {
- // special type 4
- ai = gy * psc(aw) + gx;
- bi = gi;
- }
-
- if (psc(aw) != 1 && psc(bw) == 1 && psc(bh) == psc(ah) && psc(bc) == psc(ac))
- {
- // special type 5
- ai = gi;
- bi = gz * psc(bcstep) + gy;
- }
-
- if (psc(bw) == psc(aw) && psc(ah) != 1 && psc(bh) == 1 && psc(bc) == psc(ac))
- {
- // special type 6
- ai = gi;
- bi = gz * psc(bcstep) + gx;
- }
-
- if (psc(bw) != 1 && psc(aw) == 1 && psc(bh) == psc(ah) && psc(bc) == psc(ac))
- {
- // special type 7
- ai = gz * psc(acstep) + gy;
- bi = gi;
- }
-
- if (psc(bw) == psc(aw) && psc(bh) != 1 && psc(ah) == 1 && psc(bc) == psc(ac))
- {
- // special type 8
- ai = gz * psc(acstep) + gx;
- bi = gi;
- }
- }
-
- if (psc(bdims) == 2)
- {
- // type 18
- ai = gi;
- bi = gz * psc(bw) + gy;
- }
-
- if (psc(bdims) == 1)
- {
- if (psc(bw) == 1)
- {
- // type 16
- ai = gi;
- bi = 0;
- }
- else
- {
- // type 17
- ai = gi;
- bi = gz;
- }
- }
- }
- else if (psc(adims) == 2)
- {
- if (psc(bdims) == 4)
- {
- int yd = gy / psc(outh);
- int yh = gy % psc(outh);
-
- // type 22
- ai = gz * psc(aw) + yd;
- bi = gi;
- }
-
- if (psc(bdims) == 3)
- {
- // type 14
- ai = gz * psc(aw) + gy;
- bi = gi;
- }
-
- if (psc(bdims) == 1)
- {
- if (psc(bw) == 1)
- {
- // type 11
- ai = gi;
- bi = 0;
- }
- else
- {
- // type 12
- ai = gi;
- bi = gy;
- }
- }
- }
- else if (psc(adims) == 1)
- {
- if (psc(aw) == 1)
- {
- // type 2 3 4 20
- ai = 0;
- bi = gi;
- }
- else
- {
- if (psc(bdims) == 4)
- {
- // type 21
- ai = gz;
- bi = gi;
- }
-
- if (psc(bdims) == 3)
- {
- // type 9
- ai = gz;
- bi = gi;
- }
-
- if (psc(bdims) == 2)
- {
- // type 8
- ai = gy;
- bi = gi;
- }
-
- if (psc(bdims) == 1)
- {
- if (psc(bw) == 1)
- {
- // type 6
- ai = gi;
- bi = 0;
- }
- }
- }
- }
-
- afp v1 = buffer_ld1(a_blob_data, ai);
- afp v2 = buffer_ld1(b_blob_data, bi);
- #endif
-
- afp res;
-
- if (op_type == 0) res = v1 + v2;
- if (op_type == 1) res = v1 - v2;
- if (op_type == 2) res = v1 * v2;
- if (op_type == 3) res = v1 / v2;
- if (op_type == 4) res = max(v1, v2);
- if (op_type == 5) res = min(v1, v2);
- if (op_type == 6) res = pow(v1, v2);
- if (op_type == 7) res = v2 - v1;
- if (op_type == 8) res = v2 / v1;
-
- #if NCNN_image_shader
- image3d_st1(top_blob_3d, ivec3(gx, gy, gz), res);
- #else
- buffer_st1(top_blob_data, gi, res);
- #endif
- }
|