1#!amber
2# Copyright 2019 The Amber Authors.
3#
4# Licensed under the Apache License, Version 2.0 (the "License");
5# you may not use this file except in compliance with the License.
6# You may obtain a copy of the License at
7#
8#     https://www.apache.org/licenses/LICENSE-2.0
9#
10# Unless required by applicable law or agreed to in writing, software
11# distributed under the License is distributed on an "AS IS" BASIS,
12# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
13# See the License for the specific language governing permissions and
14# limitations under the License.
15
16SHADER compute write_imagef OPENCL-C
17kernel void foo(write_only image2d_t image, global float4* data) {
18  int gid_x = get_global_id(0);
19  int gid_y = get_global_id(1);
20  int linear = 2 * gid_y + gid_x;
21  int2 coord = (int2)(gid_x, gid_y);
22  write_imagef(image, coord, data[linear]);
23}
24END
25
26IMAGE texture DATA_TYPE vec4<float> DIM_2D WIDTH 2 HEIGHT 2 FILL 0.0
27BUFFER data DATA_TYPE vec4<float> DATA
281.0 2.0 3.0 4.0
292.0 3.0 4.0 1.0
303.0 4.0 1.0 2.0
314.0 1.0 2.0 3.0
32END
33
34PIPELINE compute read_pipe
35  ATTACH write_imagef ENTRY_POINT foo
36  BIND BUFFER data KERNEL ARG_NAME data
37  BIND BUFFER texture KERNEL ARG_NAME image
38END
39
40RUN read_pipe 2 2 1
41
42EXPECT texture IDX 0  EQ 1.0 2.0 3.0 4.0
43EXPECT texture IDX 16 EQ 2.0 3.0 4.0 1.0
44EXPECT texture IDX 32 EQ 3.0 4.0 1.0 2.0
45EXPECT texture IDX 48 EQ 4.0 1.0 2.0 3.0
46