1 /* 2 * Copyright (c) Bull S.A. 2007 All Rights Reserved. 3 * 4 * This program is free software; you can redistribute it and/or modify it 5 * under the terms of version 2 of the GNU General Public License as 6 * published by the Free Software Foundation. 7 * 8 * This program is distributed in the hope that it would be useful, but 9 * WITHOUT ANY WARRANTY; without even the implied warranty of 10 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. 11 * 12 * Further, this software is distributed without any warranty that it is 13 * free of the rightful claim of any third person regarding infringement 14 * or the like. Any license provided herein, whether implied or 15 * otherwise, applies only to this software file. Patent licenses, if 16 * any, provided herein do not apply to combinations of this program with 17 * other software, or any other product whatsoever. 18 * 19 * You should have received a copy of the GNU General Public License along 20 * with this program; if not, write the Free Software Foundation, Inc., 21 * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA. 22 * 23 * History: 24 * Created by: Cyril Lacabanne (Cyril.Lacabanne (at) bull.net) 25 * 26 */ 27 28 #include <stdio.h> 29 #include <stdlib.h> 30 #include <sys/time.h> 31 #include <tirpc/rpc/rpc.h> 32 33 //Standard define 34 #define PROCNUM 1 35 #define VERSNUM 1 36 37 //Set number of test call 38 int maxIter; 39 40 int eachresult(char *out, struct sockaddr_in *addr) 41 { 42 //Nothing to do for that test 43 return 1; 44 } 45 46 double average(double *tbl) 47 { 48 //Return average of values in tbl 49 int i; 50 double rslt = 0; 51 52 for (i = 0; i < maxIter; i++) { 53 rslt += tbl[i]; 54 } 55 rslt = rslt / maxIter; 56 return rslt; 57 } 58 59 double mini(double *tbl) 60 { 61 //Return minimal of values in tbl 62 int i; 63 double rslt = tbl[0]; 64 65 for (i = 0; i < maxIter; i++) { 66 if (rslt > tbl[i]) 67 rslt = tbl[i]; 68 } 69 return rslt; 70 } 71 72 double maxi(double *tbl) 73 { 74 //Return maximal of values in tbl 75 int i; 76 double rslt = tbl[0]; 77 78 for (i = 0; i < maxIter; i++) { 79 if (rslt < tbl[i]) 80 rslt = tbl[i]; 81 } 82 return rslt; 83 } 84 85 int main(int argn, char *argc[]) 86 { 87 //Program parameters : argc[1] : HostName or Host IP 88 // argc[2] : Server Program Number 89 // argc[3] : Number of test call 90 // other arguments depend on test case 91 92 //run_mode can switch into stand alone program or program launch by shell script 93 //1 : stand alone, debug mode, more screen information 94 //0 : launch by shell script as test case, only one printf -> result status 95 int run_mode = 0; 96 int test_status = 0; //Default test result set to FAILED 97 int i; 98 double *resultTbl; 99 struct timeval tv1, tv2; 100 struct timezone tz; 101 long long diff; 102 double rslt; 103 int progNum = atoi(argc[2]); 104 char nettype[16] = "visible"; 105 int sndVar = 0; 106 int recVar = -1; 107 enum clnt_stat cs; 108 109 //Test initialisation 110 maxIter = atoi(argc[3]); 111 resultTbl = malloc(maxIter * sizeof(double)); 112 113 //Call tested function several times 114 for (i = 0; i < maxIter; i++) { 115 //Tic 116 gettimeofday(&tv1, &tz); 117 118 //Call function 119 cs = rpc_broadcast_exp(progNum, VERSNUM, PROCNUM, 120 (xdrproc_t) xdr_int, (char *)&sndVar, 121 (xdrproc_t) xdr_int, (char *)&recVar, 122 (resultproc_t) eachresult, atoi(argc[3]), 123 atoi(argc[4]), nettype); 124 125 //Toc 126 gettimeofday(&tv2, &tz); 127 128 //Add function execution time (toc-tic) 129 diff = 130 (tv2.tv_sec - tv1.tv_sec) * 1000000L + (tv2.tv_usec - 131 tv1.tv_usec); 132 rslt = (double)diff / 1000; 133 134 if (cs == RPC_SUCCESS) { 135 resultTbl[i] = rslt; 136 } else { 137 test_status = 1; 138 break; 139 } 140 141 if (run_mode) { 142 fprintf(stderr, "lf time = %lf usecn\n", resultTbl[i]); 143 } 144 } 145 146 //This last printf gives the result status to the tests suite 147 //normally should be 0: test has passed or 1: test has failed 148 printf("%d\n", test_status); 149 printf("%lf %d\n", average(resultTbl), maxIter); 150 printf("%lf\n", mini(resultTbl)); 151 printf("%lf\n", maxi(resultTbl)); 152 153 return test_status; 154 } 155