1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
|
/*___INFO__MARK_BEGIN__*/
/*************************************************************************
*
* The Contents of this file are made available subject to the terms of
* the Sun Industry Standards Source License Version 1.2
*
* Sun Microsystems Inc., March, 2006
*
*
* Sun Industry Standards Source License Version 1.2
* =================================================
* The contents of this file are subject to the Sun Industry Standards
* Source License Version 1.2 (the "License"); You may not use this file
* except in compliance with the License. You may obtain a copy of the
* License at http://gridengine.sunsource.net/Gridengine_SISSL_license.html
*
* Software provided under this License is provided on an "AS IS" basis,
* WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING,
* WITHOUT LIMITATION, WARRANTIES THAT THE SOFTWARE IS FREE OF DEFECTS,
* MERCHANTABLE, FIT FOR A PARTICULAR PURPOSE, OR NON-INFRINGING.
* See the License for the specific provisions governing your rights and
* obligations concerning the Software.
*
* The Initial Developer of the Original Code is: Sun Microsystems, Inc.
*
* Copyright: 2006 by Sun Microsystems, Inc.
*
* All Rights Reserved.
*
************************************************************************/
/*___INFO__MARK_END__*/
/*----------------------------------------------------
*
* The litte test program matches an "attribute" against
* a regular exression which follows the above grammar and the
* regular expression from the Grid Engine complex(5) man page
* and prints "TRUE" or "FALSE"
* For Expect test returns 0 .. TRUE
* 1 .. FALSE
* -1 .. ERROR
*
*----------------------------------------------------*/
#include <stdio.h>
#include <string.h>
#include <strings.h>
#include <stdlib.h>
#include <string.h>
#include "uti/sge_rmon.h"
#include "uti/sge_time.h"
#include "uti/sge_bootstrap.h"
#include "sgeobj/sge_feature.h"
#include "sge_complex_schedd.h"
#define T 0
#define F 1
#define ERROR -1
#define RESULT(match) (match == -1) ? "ERROR" : (match == 0) ? "TRUE" : "FALSE"
#ifndef __INSURE__
#define BALANCE_LOOP_COUNT 20
#define LOOP_COUNT 300000
#else
#define BALANCE_LOOP_COUNT 2
#define LOOP_COUNT 300
#endif
/* Local functions and variables */
static int tests(int (*test)(u_long32, const char *, const char *, int));
static int test_match_new(u_long32 , const char *, const char *, int );
static int test_match_old(u_long32 , const char *, const char *, int );
/*-----------------------------------------------------------
* call: test_eval_performace value expression
* print out some statistic about the efectivity of the algorithm
*-----------------------------------------------------------*/
int main(int argc, char *argv[]) {
int ret;
int i, j;
u_long32 start_tm=0;
u_long32 end_tm=0;
u_long32 new_total_tm=0;
u_long32 old_total_tm=0;
DENTER_MAIN(TOP_LAYER, "test_evel_performance");
bootstrap_mt_init();
feature_mt_init();
ret = 0;
if(argc!=4){
fprintf(stdout, "\nEval performance tests\n");
for(j=0;(j<BALANCE_LOOP_COUNT) && (ret==0);j++){
start_tm = sge_get_gmt();
for(i=0;(i<LOOP_COUNT) && (ret==0);i++){
ret=tests(&test_match_old);
}
end_tm = sge_get_gmt();
old_total_tm+=(end_tm-start_tm);
/* Old match */
start_tm = sge_get_gmt();
for(i=0;(i<LOOP_COUNT)&&(ret==0);i++){
ret=tests(&test_match_new);
}
end_tm = sge_get_gmt();
new_total_tm+=(end_tm-start_tm);
} /* End of j */
fprintf(stdout, "Try:$time test_eval_performance [0..old, 1..new] '<expresion>' '<value>'\n");
fprintf(stdout, "All eval_tests result is: %s \n", RESULT(ret));
if(ret==0){
fprintf(stdout, "The consumed time old is "sge_u32", new is "sge_u32" \n", old_total_tm, new_total_tm);
ret = (int)((double) new_total_tm/(3*old_total_tm)); /* No more than 3x slower */
fprintf(stdout, "Performance tests result is: %s \n", RESULT(ret));
}
DEXIT;
return ret;
}
for(i=0;(i<LOOP_COUNT) && (ret==0);i++){
if(argv[1][0]=='0'){
string_base_cmp_old(TYPE_RESTR, argv[2], argv[3]);
} else {
string_base_cmp(TYPE_RESTR, argv[2], argv[3]);
}
}
DEXIT;
return 0;
}
static int tests(int (*test)(u_long32, const char *, const char *, int)) {
int ret=0;
/* Regular tests */
ret=ret|test(TYPE_STR, "solaris", "solaris", T);
ret=ret|test(TYPE_CSTR, "Solaris", "solaris", T);
ret=ret|test(TYPE_RESTR, "sol-amd64", "sol-amd64", T);
ret=ret|test(TYPE_RESTR, "sol-amd*|sol-spa*", "sol-amd64", T);
/* test for host names */
ret=ret|test(TYPE_HOST, "latte3.czech.sun.com", "latte3.czech.sun.com", T);
ret=ret|test(TYPE_HOST, "latte3", "latte3", T);
return ret;
}
static int test_match_new(u_long32 type, const char *expression, const char *value, int expected) {
int match;
match = string_base_cmp(type, expression, value);
if(match!=expected) {
fprintf(stderr, "!!!NEW UNEXPECTED RESULT!!!: %s => eval_expr(%s,%s), expected: %s \n",
RESULT(match) , expression, value, RESULT(expected) );
return 1;
}
return 0;
}
static int test_match_old(u_long32 type, const char *expression, const char *value, int expected) {
int match;
match = string_base_cmp_old(type, expression, value);
if(match!=expected) {
fprintf(stderr, "!!!OLD UNEXPECTED RESULT!!!: %s => eval_expr(%s,%s), expected: %s \n",
RESULT(match) , expression, value, RESULT(expected) );
return 1;
}
return 0;
}
|
