/*
 * $RCSfile: ZeroElementTest.java,v $ $Revision: 1.2 $ $Date: 2007/09/26 04:14:07 $
 * $AIST_Release: 5.0.0 $
 * $AIST_Copyright:
 *  Copyright 2003, 2004, 2005, 2006 Grid Technology Research Center,
 *  National Institute of Advanced Industrial Science and Technology
 *  Copyright 2003, 2004, 2005, 2006 National Institute of Informatics
 *  
 *  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.
 *  $
 */

import java.util.Vector;

import org.apgrid.grpc.ng.Dcomplex;
import org.apgrid.grpc.ng.Scomplex;
import org.gridforum.gridrpc.GrpcClient;
import org.gridforum.gridrpc.GrpcClientFactory;
import org.gridforum.gridrpc.GrpcException;
import org.gridforum.gridrpc.GrpcFunctionHandle;

/**
 * Diagnostic program for Ninf-G
 * This program checks data types of Ninf-G parameters.
 *
 * A client program which transfers arguments and results
 * data with no elements. This program uses char, short, int,
 * long, float, double, scomplex, dcomplex and string types
 * of variables.
 */
public class ZeroElementTest {
	private static final String targetModule = "zero_element/";

	private static final int NELEMENTS = 5;
	private static boolean verbose = true;

	// instance variables
	private GrpcClient client;
	
	public ZeroElementTest(String configName) throws GrpcException {
		// Initialize Client 
		// create GrpcClient 
		this.client =
			GrpcClientFactory.getClient("org.apgrid.grpc.ng.NgGrpcClient");
		// activate GrpcClient 
		client.activate(configName);
	}
	
	// Finalize Client 
	private void deactivateClient() {
		try {
			client.deactivate();
		} catch (GrpcException e) {
			e.printStackTrace();
		}
	}

	/*
	 * Test zero_element
	 */
	private boolean zeroElementArrayTest() {
		final String targetEntry = "zero_element_array";

		int[] rpcResult = new int[1];
		boolean success = true;
		
		byte[] a_char = new byte [NELEMENTS]; 
		byte[] b_char = new byte [NELEMENTS]; 
		short[] a_short = new short [NELEMENTS]; 
		short[] b_short = new short [NELEMENTS]; 
		int[] a_int = new int [NELEMENTS]; 
		int[] b_int = new int [NELEMENTS]; 
		long[] a_long = new long [NELEMENTS]; 
		long[] b_long = new long [NELEMENTS]; 
		float[] a_float = new float [NELEMENTS]; 
		float[] b_float = new float [NELEMENTS]; 
		double[] a_double = new double [NELEMENTS]; 
		double[] b_double = new double [NELEMENTS]; 
		Scomplex[] a_scomplex = new Scomplex [NELEMENTS]; 
		Scomplex[] b_scomplex = new Scomplex [NELEMENTS]; 
		Dcomplex[] a_dcomplex = new Dcomplex [NELEMENTS]; 
		Dcomplex[] b_dcomplex = new Dcomplex [NELEMENTS]; 

		// Init data 
		for (int i = 0; i < NELEMENTS; i++) {
			a_char[i] = (byte)i;
			b_char[i] = (byte)(NELEMENTS - i);
			a_short[i] = (short)i;
			b_short[i] = (short)(NELEMENTS - i);
			a_int[i] = i;
			b_int[i] = NELEMENTS - i;
			a_long[i] = i;
			b_long[i] = NELEMENTS - i;
			a_float[i] = i;
			b_float[i] = NELEMENTS - i;
			a_double[i] = i;
			b_double[i] = NELEMENTS - i;
			
			a_scomplex[i] = new Scomplex();
			b_scomplex[i] = new Scomplex();
			a_scomplex[i].r = i;
			a_scomplex[i].i = i;
			b_scomplex[i].r = NELEMENTS - i;
			b_scomplex[i].i = NELEMENTS - i;

			a_dcomplex[i] = new Dcomplex();
			b_dcomplex[i] = new Dcomplex();
			a_dcomplex[i].r = i;
			a_dcomplex[i].i = i;
			b_dcomplex[i].r = NELEMENTS - i;
			b_dcomplex[i].i = NELEMENTS - i;
		}
		
		GrpcFunctionHandle handle = null;
		try {
			// create GrpcHandle 
			handle = this.client.getFunctionHandle(targetModule + targetEntry);

			// call char_test function 
			handle.call(new Integer(0), rpcResult,
				a_char, b_char,
				a_short, b_short,
				a_int, b_int,
				a_long, b_long, 
				a_float, b_float,
				a_double, b_double,
				a_scomplex, b_scomplex,
				a_dcomplex, b_dcomplex);

			// Check the result 
			if (rpcResult[0] == 0) {
				printError();
				success = false;
			}
		} catch (GrpcException e) {
			e.printStackTrace();
			return false;
		} finally {
			if (handle != null) {
				try {
					handle.dispose();
				} catch (GrpcException e1) {
					e1.printStackTrace();
				}
			}
		}
		
		// check result 
		for (int i = 0; i < NELEMENTS; i++) {
			if ((a_char[i]   != i)  || (b_char[i]   != NELEMENTS -i) ||
				(a_short[i]  != i)  || (b_short[i]  != NELEMENTS -i) ||
				(a_int[i]    != i)  || (b_int[i]    != NELEMENTS -i) ||
				(a_long[i]   != i)  || (b_long[i]   != NELEMENTS -i) ||
				(a_float[i]  != i)  || (b_float[i]  != NELEMENTS -i) ||
				(a_double[i] != i)  || (b_double[i] != NELEMENTS -i) ||
				(a_scomplex[i].r != i)  || (b_scomplex[i].r != NELEMENTS -i) ||
				(a_scomplex[i].i != i)  || (b_scomplex[i].i != NELEMENTS -i) ||
				(a_dcomplex[i].r != i)  || (b_dcomplex[i].r != NELEMENTS -i) ||
				(a_dcomplex[i].i != i)  || (b_dcomplex[i].i != NELEMENTS -i)) {
				
				if (verbose) {
					System.out.println (
						"zero_element_array_test: " + "[" + i + "] failed.");
				}
				success = false;
			}
		}

		// succeed 
		return success;
	}

	/*
	 * Test  Zero length string
	 */
	private boolean zeroLengthStringTest() {
		final String targetEntry = "zero_length_string";

		int[] rpcResult = new int[1];
		String[] b_string = new String[1];
		boolean success = true;

		GrpcFunctionHandle handle = null;
		try {
			// Create GrpcHandle 
			handle = this.client.getFunctionHandle(targetModule + targetEntry);

			// Call char_test function 
			handle.call(rpcResult, "", b_string);

			// Check the result 
			if (rpcResult[0] == 0) {
				printError();
				success = false;
			}
		} catch (GrpcException e) {
			e.printStackTrace();
			return false;
		} finally {
			// dispose handle 
			if (handle != null) {
				try {
					handle.dispose();
				} catch (GrpcException e1) {
					e1.printStackTrace();
				}
			}
		}
		
		// check result 
		if ((b_string[0] == null) || (! b_string[0].equals(""))) {
			if (verbose) {
				System.out.println("OUT String is not equal \"\"");
			}
			success = false;
		}
		
		// succeed 
		return success;
	}



	/*
	 *  Test Zero element string array
	 */
	private boolean zeroElementStringArray() {
		final String targetEntry = "zero_element_string_array";

		String[] a_string = new String[NELEMENTS];
		String[] b_string = new String[NELEMENTS];
		boolean success = true;
		int[] rpcResult = new int[1];
		
		// Init data 
		for (int i = 0; i < NELEMENTS; i++) {
			//a_string[i] = new String("" + i); 
			//b_string[i] = new String("" + (NELEMENTS - i));
			a_string[i] = String.valueOf(i); 
			b_string[i] = String.valueOf(NELEMENTS - i);
		}
		
		GrpcFunctionHandle handle = null;
		try {
			// Create GrpcHandle 
			handle = this.client.getFunctionHandle(targetModule + targetEntry);

			// Call char_test function 
			handle.call(new Integer(0), rpcResult, a_string, b_string);

			// Check the result 
			if (rpcResult[0] == 0) {
				printError();
				success = false;
			}
		} catch (GrpcException e) {
			e.printStackTrace();
			return false;
		} finally {
			// dispose handle 
			if (handle != null) {
				try {
					handle.dispose();
				} catch (GrpcException e1) {
					e1.printStackTrace();
				}
			}
		}

		// Check result 
		for (int i = 0; i < NELEMENTS; i++) {
			//if ( (! a_string[i].equals("" + i)) || 
			//	 (! b_string[i].equals("" + (NELEMENTS - i)))) {
			if ( ( ! a_string[i].equals(String.valueOf(i))) || 
				 ( ! b_string[i].equals(String.valueOf(NELEMENTS - i))) ) {

				if (verbose) {
					System.out.println (
						"zero_element_string_array_test: " + "[" + i + "] failed.");
				}
				success = false;
			}
		}
		return success;
	}

	private void printError() {
		if (! verbose ) { return ; }
		System.out.println("error was occurred at Remote Executable.");
	}

///// ===== main routines ===== 
	// check argument for this program (accept "-verbose" and name of config) 
	static String[] parseMyArg(String arg[]){
		Vector tmpV = new Vector();
		int index = 0;
		for (int i = 0; i < arg.length; i++){
			if (arg[i].equalsIgnoreCase("-verbose")) {
				verbose = true;
			} else {
				tmpV.addElement(arg[i]);
			}
		}
		String tmp[] = new String[tmpV.size()];
		for (int i = 0; i < tmpV.size(); i++) {
			tmp[i] = (String)(tmpV.elementAt(i));
		}
		return tmp;
	}

	static void printResult(boolean result) {
		if ( result ) {
			System.out.println("OK!");
		} else {
			System.out.println("FAILED!");
		}
	}

	// main routine for DataTest 
	public static void main (String[] args) throws InterruptedException {
		// parse arguments 
		String[] params = parseMyArg(args);
		
		System.out.println("=====    ZeroElementTest start    =====");
		ZeroElementTest zeroElementTest = null;
		try {
			zeroElementTest = new ZeroElementTest(params[0]);

			// zero_element test 
			System.out.print("ZeroElement Test : ");
			printResult( zeroElementTest.zeroElementArrayTest() ); 
			
			// short test 
			System.out.print("ZeroLength String Test : ");
			printResult( zeroElementTest.zeroLengthStringTest() );
			
			// int test 
			System.out.print("ZeroElement String Array Test : ");
			printResult( zeroElementTest.zeroElementStringArray() );

		} catch (GrpcException e) {
			e.printStackTrace();
		} finally {
			if (zeroElementTest != null) {
				zeroElementTest.deactivateClient();
			}
		}
		System.out.println("===== ZeroElementTest was finished =====");
	}

}