1/*
2 * Copyright (c) 2014-2015 Advanced Micro Devices, Inc.
3 * All rights reserved.
4 *
5 * For use for simulation and test purposes only
6 *
7 * Redistribution and use in source and binary forms, with or without
8 * modification, are permitted provided that the following conditions are met:
9 *
10 * 1. Redistributions of source code must retain the above copyright notice,
11 * this list of conditions and the following disclaimer.
12 *
13 * 2. Redistributions in binary form must reproduce the above copyright notice,
14 * this list of conditions and the following disclaimer in the documentation
15 * and/or other materials provided with the distribution.
16 *
17 * 3. Neither the name of the copyright holder nor the names of its contributors
18 * may be used to endorse or promote products derived from this software
19 * without specific prior written permission.
20 *
21 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
22 * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
23 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
24 * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE
25 * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
26 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
27 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
28 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
29 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
30 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
31 * POSSIBILITY OF SUCH DAMAGE.
32 *
33 * Author: Marc Orr
34 */
35
36
37__kernel void read_kernel(size_t code_size,
38                          __global char *code_in,
39                          __global int *key_arr,
40                          __global char *msg_out,
41                          __global int *chars_decoded)
42{
43    size_t gid = get_global_id(0);
44    size_t my_idx = gid % code_size;
45    bool decode = 0;
46    __local atomic_int lcount;
47
48    if (get_local_id(0) == 0) {
49        lcount=0;
50    }
51    barrier(CLK_LOCAL_MEM_FENCE);
52
53    // read code
54    char mycode = code_in[my_idx];
55
56    // decode
57    int my_key = key_arr[my_idx];
58    if (my_key) {
59        decode = 1;
60        for (int n = 0; n < my_key; n++) {
61            mycode++;
62        }
63    }
64
65    // write out msg
66    msg_out[gid] = mycode;
67
68    if (decode) {
69        atomic_fetch_add((atomic_int *)(&lcount), 1);
70    }
71    barrier(CLK_LOCAL_MEM_FENCE);
72
73
74    if (get_local_id(0) == 0) {
75        int _lcount = atomic_load(&lcount);
76        atomic_fetch_add((atomic_int *)chars_decoded, _lcount);
77    }
78}
79