softmax.cl 2.8 KB
Newer Older
D
dolphin8 已提交
1 2 3 4 5 6 7 8 9 10 11 12 13 14
/* Copyright (c) 2018 PaddlePaddle Authors. All Rights Reserved.

Licensed under the Apache License, Version 2.0 (the "License");
you may not use this file except in compliance with the License.
You may obtain a copy of the License at

    http://www.apache.org/licenses/LICENSE-2.0

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. */

D
softmax  
dolphin8 已提交
15 16
#pragma OPENCL EXTENSION cl_khr_fp16 : enable

L
liuruilong 已提交
17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35
__kernel void softmax(__read_only image2d_t input_image,
                      __write_only image2d_t output_image,
                      __private const int group
                      ) {
    const int out_c = get_global_id(0);   //  block index
    const int out_w = get_global_id(1);   // index in one block
    const int out_nh = get_global_id(2);


  const sampler_t sampler = CLK_NORMALIZED_COORDS_TRUE |
                            CLK_ADDRESS_CLAMP |
                            CLK_FILTER_NEAREST;

  half maxv = 0.0f;
  for (int i = 0; i < group; ++i) {
    half4 temp = read_imageh(input_image, sampler, (int2)(i, 0));
    maxv = max(maxv, max(temp.x, max(temp.y, max(temp.z, temp.w))));
  }

L
liuruilong 已提交
36

Y
yangfei 已提交
37
  half4 rsum = (half4)(0.0f);
L
liuruilong 已提交
38 39
  for (int i = 0; i < group; ++i) {
    half4 r = read_imageh(input_image, sampler, (int2)(i, 0));
Y
yangfei 已提交
40
    rsum += convert_half4(exp(convert_float4(r - maxv)));
L
liuruilong 已提交
41 42
  }

D
dolphin8 已提交
43
  float sum = rsum.x + rsum.y + rsum.z + rsum.w;
L
liuruilong 已提交
44 45

  half4 rr = read_imageh(input_image, sampler, (int2)(out_w, out_nh));
Y
yangfei 已提交
46
  half4 result = convert_half4(exp(convert_float4(rr - maxv)) / sum);
L
liuruilong 已提交
47 48 49 50 51
  write_imageh(output_image, (int2)(out_w, out_nh), result);
}

/*

D
dolphin8 已提交
52 53 54 55 56 57 58 59 60 61 62 63
__kernel void softmax(__read_only image2d_t input,
                      __write_only image2d_t output,
                      __private const int d0,
                      __private const int d1,
                      __private const int d2,
                      __private const int d3) {
  const int z = get_global_id(0);
  const int x = get_global_id(1);
  const int y = get_global_id(2);
  const sampler_t sampler = CLK_NORMALIZED_COORDS_TRUE |
                            CLK_ADDRESS_CLAMP |
                            CLK_FILTER_NEAREST;
D
softmax  
dolphin8 已提交
64 65 66 67 68
  half4 cv = read_imageh(input, sampler, (int2)(x, y));
  half4 maxv = cv;
  for (int i = 0; i < d3; i++) {
    half4 temp = read_imageh(input, sampler, (int2)(z * d3 + i, y));
    maxv = max(maxv, temp);
D
dolphin8 已提交
69
  }
D
softmax  
dolphin8 已提交
70 71
  half4 sum = (half4)0.0f;
  // half4 x = = (half4)0.0f;
D
dolphin8 已提交
72
  for (int i = 0; i < d3; i++) {
D
softmax  
dolphin8 已提交
73 74
    half4 temp = read_imageh(input, sampler, (int2)(z * d3 + i, y));
    sum += exp(temp - maxv);
D
dolphin8 已提交
75
  }
D
softmax  
dolphin8 已提交
76
  half4 r = exp(cv - maxv) / sum;
D
dolphin8 已提交
77

D
softmax  
dolphin8 已提交
78
  write_imageh(output, (int2)(z * d3 + x, y), r);
D
dolphin8 已提交
79
}
L
liuruilong 已提交
80 81

*/