softmax.cl 2.7 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 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51
__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))));
  }

  half4 rsum = (half4)(0.0f);

  for (int i = 0; i < group; ++i) {
    half4 r = read_imageh(input_image, sampler, (int2)(i, 0));
    rsum += exp(r - maxv);
  }

  half sum = rsum.x + rsum.y + rsum.z + rsum.w;

  half4 rr = read_imageh(input_image, sampler, (int2)(out_w, out_nh));
  half4 result = exp(rr - maxv) / sum;
  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

*/