helpful progress reporting
[IRC.git] / Robust / src / Benchmarks / Prefetch / SOR / dsm / JGFSORBench.java
1 /**************************************************************************
2  *                                                                         *
3  *         Java Grande Forum Benchmark Suite - Thread Version 1.0          *
4  *                                                                         *
5  *                            produced by                                  *
6  *                                                                         *
7  *                  Java Grande Benchmarking Project                       *
8  *                                                                         *
9  *                                at                                       *
10  *                                                                         *
11  *                Edinburgh Parallel Computing Centre                      *
12  *                                                                         * 
13  *                email: epcc-javagrande@epcc.ed.ac.uk                     *
14  *                                                                         *
15  *                                                                         *
16  *      This version copyright (c) The University of Edinburgh, 2001.      *
17  *                         All rights reserved.                            *
18  *                                                                         *
19  **************************************************************************/
20 public class JGFSORBench { 
21
22   int size; 
23   int[] datasizes;
24   int JACOBI_NUM_ITER;
25   long RANDOM_SEED;
26   public int nthreads;
27   public double Gtotal;
28
29   public JGFSORBench(int nthreads){
30     this.nthreads = nthreads;
31     datasizes = global new int[4];
32     datasizes[0] = 1000;
33     datasizes[1] = 1500;
34     datasizes[2] = 2000;
35     datasizes[3] = 8000;
36     JACOBI_NUM_ITER = 100;
37     RANDOM_SEED = 10101010;
38     Gtotal = 0.0;
39   }
40
41   public void JGFsetsize(int size){
42     this.size = size;
43   }
44
45   public static void JGFkernel(JGFSORBench sor) {
46     int numthreads, datasize;
47     BarrierServer mybarr;
48
49     int[] mid = new int[4];
50     mid[0] = (128<<24)|(195<<16)|(175<<8)|84;//dw-10
51     mid[1] = (128<<24)|(195<<16)|(175<<8)|85;//dw-11
52     mid[2] = (128<<24)|(195<<16)|(175<<8)|86;//dw-12
53     mid[3] = (128<<24)|(195<<16)|(175<<8)|87;//dw-13
54
55     double[][] G;
56     int num_iterations;
57
58     atomic {
59       numthreads = sor.nthreads;
60       datasize = sor.datasizes[sor.size];
61       mybarr = global new BarrierServer(numthreads);
62       G =  global new double[datasize][];
63       num_iterations = sor.JACOBI_NUM_ITER;
64     }
65     mybarr.start(mid[0]);
66
67     double omega = 1.25;
68     double omega_over_four = omega * 0.25;
69     double one_minus_omega = 1.0 - omega;
70
71     // update interior points
72     //
73     //spawn threads
74
75     SORWrap[] thobjects = new SORWrap[numthreads];
76
77     atomic {
78         for(int i=0;i<numthreads;i++) {
79             thobjects[i] =  new SORWrap(global new SORRunner(i,omega,G,num_iterations,numthreads));
80         }
81     }
82
83     boolean waitfordone=true;
84     while(waitfordone) {
85       atomic {
86         if (mybarr.done)
87           waitfordone=false;
88       }
89     }
90
91     for(int i=0;i<numthreads;i++) {
92         thobjects[i].sor.start(mid[i]);
93     }
94
95     for(int i=0;i<numthreads;i++) {
96       thobjects[i].sor.join();
97     }
98
99     //JGFInstrumentor.stopTimer("Section2:SOR:Kernel", instr.timers);
100     atomic {
101         for (int i=1; i<G.length-1; i++) {
102             for (int j=1; j<G.length-1; j++) {
103                 sor.Gtotal += G[i][j];
104             }
105         }               
106     }
107   }
108
109   public int JGFvalidate(){
110
111     double refval[];
112     refval = new double[4];
113     refval[0] = 0.498574406322512;
114     refval[1] = 1.1234778980135105;
115     refval[2] = 1.9954895063582696;
116     refval[3] = 2.654895063582696;
117     double dev = Math.fabs(Gtotal - refval[size]);
118     long l = (long) refval[size] * 1000000;
119     long r = (long) Gtotal * 1000000;
120     if (l != r ){
121       return 1;
122     } else {
123       return 0;
124     }
125   }
126 }