1 /*
2 * Copyright (c) 2025, Oracle and/or its affiliates. All rights reserved.
3 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
4 *
5 * This code is free software; you can redistribute it and/or modify it
6 * under the terms of the GNU General Public License version 2 only, as
7 * published by the Free Software Foundation. Oracle designates this
8 * particular file as subject to the "Classpath" exception as provided
9 * by Oracle in the LICENSE file that accompanied this code.
10 *
11 * This code is distributed in the hope that it will be useful, but WITHOUT
12 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
13 * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
14 * version 2 for more details (a copy is included in the LICENSE file that
15 * accompanied this code).
16 *
17 * You should have received a copy of the GNU General Public License version
18 * 2 along with this work; if not, write to the Free Software Foundation,
19 * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
20 *
21 * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
22 * or visit www.oracle.com if you need additional information or have any
23 * questions.
24 */
25 package hat.test;
26
27 import hat.Accelerator;
28 import hat.ComputeContext;
29 import hat.NDRange;
30 import hat.KernelContext;
31 import hat.backend.Backend;
32 import hat.buffer.S32Array;
33 import hat.buffer.S32Array2D;
34 import hat.ifacemapper.MappableIface.RO;
35 import hat.ifacemapper.MappableIface.RW;
36 import jdk.incubator.code.Reflect;
37 import hat.test.annotation.HatTest;
38 import hat.test.engine.HATAsserts;
39
40 import java.lang.invoke.MethodHandles;
41
42 public class TestMandel {
43
44 @Reflect
45 public static void mandel(@RO KernelContext kc, @RW S32Array2D s32Array2D, @RO S32Array pallette, float offsetx, float offsety, float scale) {
46 if (kc.gix < kc.gsx) {
47 float width = s32Array2D.width();
48 float height = s32Array2D.height();
49 float x = ((kc.gix % s32Array2D.width()) * scale - (scale / 2f * width)) / width + offsetx;
50 float y = ((kc.gix / s32Array2D.width()) * scale - (scale / 2f * height)) / height + offsety;
51 float zx = x;
52 float zy = y;
53 float new_zx;
54 int colorIdx = 0;
55 while ((colorIdx < pallette.length()) && (((zx * zx) + (zy * zy)) < 4f)) {
56 new_zx = ((zx * zx) - (zy * zy)) + x;
57 zy = (2f * zx * zy) + y;
58 zx = new_zx;
59 colorIdx++;
60 }
61 int color = colorIdx < pallette.length() ? pallette.array(colorIdx) : 0;
62 s32Array2D.array(kc.gix, color);
63 }
64 }
65
66 @Reflect
67 static public void compute(final ComputeContext computeContext, S32Array pallete, S32Array2D s32Array2D, float x, float y, float scale) {
68 computeContext.dispatchKernel(NDRange.of1D(s32Array2D.width() * s32Array2D.height()),
69 kc -> TestMandel.mandel(kc, s32Array2D, pallete, x, y, scale)
70 );
71 }
72
73 public static void mandelSeq(@RW S32Array2D s32Array2D, @RO S32Array pallette, float offsetx, float offsety, float scale) {
74 for (int i = 0; i < pallette.length(); i++) {
75 float width = s32Array2D.width();
76 float height = s32Array2D.height();
77 float x = ((i % s32Array2D.width()) * scale - (scale / 2f * width)) / width + offsetx;
78 float y = (((float) i / s32Array2D.width()) * scale - (scale / 2f * height)) / height + offsety;
79 float zx = x;
80 float zy = y;
81 float new_zx;
82 int colorIdx = 0;
83 while ((colorIdx < pallette.length()) && (((zx * zx) + (zy * zy)) < 4f)) {
84 new_zx = ((zx * zx) - (zy * zy)) + x;
85 zy = (2f * zx * zy) + y;
86 zx = new_zx;
87 colorIdx++;
88 }
89 int color = colorIdx < pallette.length() ? pallette.array(colorIdx) : 0;
90 s32Array2D.array(i, color);
91 }
92
93 }
94
95 @HatTest
96 @Reflect
97 public void testMandel() {
98 Accelerator accelerator = new Accelerator(MethodHandles.lookup(), Backend.FIRST);
99 final int width = 1024;
100 final int height = 1024;
101 final float defaultScale = 3f;
102 final float originX = -1f;
103 final float originY = 0;
104 final int maxIterations = 64;
105
106 S32Array2D s32Array2D = S32Array2D.create(accelerator, width, height);
107 S32Array2D check = S32Array2D.create(accelerator, width, height);
108
109 int[] palletteArray = new int[maxIterations];
110 for (int i = 1; i < maxIterations; i++) {
111 palletteArray[i]=(i/8+1);// 0-7?
112 }
113 palletteArray[0]=0;
114 S32Array pallette = S32Array.createFrom(accelerator, palletteArray);
115
116 accelerator.compute(cc -> TestMandel.compute(cc, pallette, s32Array2D, originX, originY, defaultScale));
117
118 // Check
119 TestMandel.mandelSeq(check, pallette, originX, originY, defaultScale);
120
121 int subsample = 16;
122 for (int y = 0; y<height/subsample; y++) {
123 for (int x = 0; x<width/subsample; x++) {
124 int palletteValue = s32Array2D.get(x * subsample, y * subsample); // so 0->8
125 int palletteValueSeq = s32Array2D.get(x * subsample, y * subsample); // so 0->8
126 HATAsserts.assertEquals(palletteValueSeq, palletteValue);
127 }
128 }
129 }
130 }