1 /******************************************************************************/
2 /*                                                                            */
3 /* Copyright (c) International Business Machines  Corp., 2007                 */
4 /*                                                                            */
5 /* This program is free software;  you can redistribute it and/or modify      */
6 /* it under the terms of the GNU General Public License as published by       */
7 /* the Free Software Foundation; either version 2 of the License, or          */
8 /* (at your option) any later version.                                        */
9 /*                                                                            */
10 /* This program is distributed in the hope that it will be useful,            */
11 /* but WITHOUT ANY WARRANTY;  without even the implied warranty of            */
12 /* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See                  */
13 /* the GNU General Public License for more details.                           */
14 /*                                                                            */
15 /* You should have received a copy of the GNU General Public License          */
16 /* along with this program;  if not, write to the Free Software               */
17 /* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA    */
18 /*                                                                            */
19 /******************************************************************************/
20 
21 /******************************************************************************/
22 /*                                                                            */
23 /* File:        cpuctl_task_def04.c                                           */
24 /*                                                                            */
25 /* Description: This is a c program that runs as a default task in a default  */
26 /*              group to create an ideal scenario. In this default group all  */
27 /*              the system tasks will be running along with this spinning task*/
28 /*              The file is to be used by tests 9-10.                         */
29 /*                                                                            */
30 /* Total Tests: 2                                                             */
31 /*                                                                            */
32 /* Test 09:     Heavy stress test with nice value change                      */
33 /* Test 10:     Heavy stress test (effect of heavy group on light group)      */
34 /*                                                                            */
35 /* Test Name:   cpu_controller_test 9,10                                      */
36 /*                                                                            */
37 /* Test Assertion                                                             */
38 /*              Please refer to the file cpuctl_testplan.txt                  */
39 /*                                                                            */
40 /* Author:      Sudhir Kumar skumar@linux.vnet.ibm.com                        */
41 /*                                                                            */
42 /* History:                                                                   */
43 /* Created-     20/11/2008 -Sudhir Kumar <skumar@linux.vnet.ibm.com>          */
44 /*                                                                            */
45 /******************************************************************************/
46 
47 #include <unistd.h>
48 #include <math.h>
49 #include <signal.h>
50 #include <stdio.h>
51 #include <stdlib.h>
52 #include <string.h>
53 #include <sys/resource.h>
54 #include <sys/syscall.h>
55 #include <sys/stat.h>
56 #include <fcntl.h>
57 #include <sys/time.h>
58 #include <sys/types.h>
59 #include <time.h>
60 #include <unistd.h>
61 
62 #include "../libcontrollers/libcontrollers.h"
63 #include "test.h"		/* LTP harness APIs */
64 
65 #define TIME_INTERVAL	100	/* Time interval in seconds */
66 #define NUM_INTERVALS	2	/* How many iterations of TIME_INTERVAL */
67 
68 char *TCID = "cpu_controller_test06";
69 int TST_TOTAL = 2;
70 pid_t scriptpid;
71 char path[] = "/dev/cpuctl";
cleanup()72 extern void cleanup()
73 {
74 	kill(scriptpid, SIGUSR1);	/* Inform the shell to do cleanup */
75 	/* Report exit status */
76 }
77 
78 volatile int timer_expired = 0;
79 
main(int argc,char * argv[])80 int main(int argc, char *argv[])
81 {
82 
83 	int test_num;
84 	int task_num;
85 	int len;
86 	int num_cpus;
87 	char mygroup[FILENAME_MAX], mytaskfile[FILENAME_MAX];
88 	char mysharesfile[FILENAME_MAX], ch;
89 	/* Following variables are to capture parameters from script */
90 	char *group_num_p, *mygroup_p, *script_pid_p, *num_cpus_p;
91 	char *test_num_p, *task_num_p;
92 	gid_t mygroup_num;	/* A number attached with a group */
93 	int fd;			/* to open a fifo to synchronize */
94 	int counter = 0;	/* To take n number of readings */
95 	double total_cpu_time;	/* Accumulated cpu time */
96 	double delta_cpu_time;	/* Time the task could run on cpu(s) */
97 	double prev_cpu_time = 0;
98 	double exp_cpu_time;	/* Exp time in % by shares calculation */
99 
100 	struct rusage cpu_usage;
101 	time_t current_time, prev_time, delta_time;
102 	unsigned int fmyshares, num_tasks;
103 	unsigned int mygroup_shares;
104 	struct sigaction newaction, oldaction;
105 
106 	mygroup_num = -1;
107 	num_cpus = 0;
108 	task_num = 0;
109 	test_num = 0;
110 
111 	/* Signal handling for alarm */
112 	sigemptyset(&newaction.sa_mask);
113 	newaction.sa_handler = signal_handler_alarm;
114 	newaction.sa_flags = 0;
115 	sigaction(SIGALRM, &newaction, &oldaction);
116 
117 	/* Collect the parameters passed by the script */
118 	group_num_p = getenv("GROUP_NUM");
119 	mygroup_p = getenv("MYGROUP");
120 	script_pid_p = getenv("SCRIPT_PID");
121 	num_cpus_p = getenv("NUM_CPUS");
122 	test_num_p = getenv("TEST_NUM");
123 	task_num_p = getenv("TASK_NUM");
124 	/* Check if all of them are valid */
125 	if ((test_num_p != NULL) && (((test_num = atoi(test_num_p)) <= 10) &&
126 				     ((test_num = atoi(test_num_p)) >= 9))) {
127 		if ((group_num_p != NULL) && (mygroup_p != NULL) &&
128 		    (script_pid_p != NULL) && (num_cpus_p != NULL) &&
129 		    (task_num_p != NULL)) {
130 			mygroup_num = atoi(group_num_p);
131 			scriptpid = atoi(script_pid_p);
132 			num_cpus = atoi(num_cpus_p);
133 			task_num = atoi(task_num_p);
134 			sprintf(mygroup, "%s", mygroup_p);
135 		} else {
136 			tst_brkm(TBROK, cleanup,
137 				 "Invalid other input parameters\n");
138 		}
139 	} else {
140 		tst_brkm(TBROK, cleanup, "Invalid test number passed\n");
141 	}
142 
143 	sprintf(mytaskfile, "%s", mygroup);
144 	sprintf(mysharesfile, "%s", mygroup);
145 	strcat(mytaskfile, "/tasks");
146 	strcat(mysharesfile, "/cpu.shares");
147 
148 	write_to_file(mytaskfile, "a", getpid());
149 
150 	/*
151 	 * Let us give the default group 100 shares, as other groups will have
152 	 * a multiple of 100 shares.
153 	 */
154 	mygroup_shares = 100;
155 	write_to_file(mysharesfile, "w", mygroup_shares);
156 
157 	fd = open("./myfifo", 0);
158 	if (fd == -1)
159 		tst_brkm(TBROK, cleanup, "Could not open fifo synchronize");
160 
161 	read(fd, &ch, 1);	/* Block task here to synchronize */
162 
163 	/*
164 	 * We need not calculate the expected % cpu time of this task, as
165 	 * neither it is required nor it can be predicted as there are idle
166 	 * system tasks (and others too) in this group.
167 	 */
168 	FLAG = 0;
169 	total_shares = 0;
170 	shares_pointer = &total_shares;
171 	len = strlen(path);
172 	if (!strncpy(fullpath, path, len))
173 		tst_brkm(TBROK, cleanup,
174 			 "Could not copy directory path %s ", path);
175 
176 	if (scan_shares_files(shares_pointer) != 0)
177 		tst_brkm(TBROK, cleanup,
178 			 "From function scan_shares_files in %s ", fullpath);
179 
180 	/* return val -1 in case of function error, else 2 is min share value */
181 	if ((fmyshares = read_shares_file(mysharesfile)) < 2)
182 		tst_brkm(TBROK, cleanup,
183 			 "in reading shares files  %s ", mysharesfile);
184 
185 	if ((read_file(mytaskfile, GET_TASKS, &num_tasks)) < 0)
186 		tst_brkm(TBROK, cleanup,
187 			 "in reading tasks files  %s ", mytaskfile);
188 
189 	exp_cpu_time = (double)(fmyshares * 100) / (total_shares * num_tasks);
190 
191 	prev_time = time(NULL);	/* Note down the time */
192 
193 	while (1) {
194 		/*
195 		 * Need to run some cpu intensive task, which also
196 		 * frequently checks the timer value
197 		 */
198 		double f = 274.345, mytime;	/*just a float number for sqrt */
199 		alarm(TIME_INTERVAL);
200 		timer_expired = 0;
201 		/*
202 		 * Let the task run on cpu for TIME_INTERVAL. Time of this
203 		 * operation should not be high otherwise we can exceed the
204 		 * TIME_INTERVAL to measure cpu usage
205 		 */
206 		while (!timer_expired)
207 			f = sqrt(f * f);
208 
209 		current_time = time(NULL);
210 		/* Duration in case its not exact TIME_INTERVAL */
211 		delta_time = current_time - prev_time;
212 
213 		getrusage(0, &cpu_usage);
214 		/* total_cpu_time = total user time + total sys time */
215 		total_cpu_time = (cpu_usage.ru_utime.tv_sec +
216 				  cpu_usage.ru_utime.tv_usec * 1e-6 +
217 				  cpu_usage.ru_stime.tv_sec +
218 				  cpu_usage.ru_stime.tv_usec * 1e-6);
219 		delta_cpu_time = total_cpu_time - prev_cpu_time;
220 
221 		prev_cpu_time = total_cpu_time;
222 		prev_time = current_time;
223 
224 		/* calculate % cpu time each task gets */
225 		if (delta_time > TIME_INTERVAL)
226 			mytime = (delta_cpu_time * 100) /
227 			    (delta_time * num_cpus);
228 		else
229 			mytime = (delta_cpu_time * 100) /
230 			    (TIME_INTERVAL * num_cpus);
231 
232 		/* No neeed to print the results */
233 		fprintf(stdout, "Grp:-%3d task-%3d:CPU TIME{calc:-%6.2f(s) i.e."
234 			"  %6.2f(%%) exp:-%6.2f(%%)} with %3u shares in %lu (s)"
235 			" INTERVAL\n", mygroup_num, task_num, delta_cpu_time,
236 			mytime, exp_cpu_time, fmyshares, delta_time);
237 
238 		counter++;
239 
240 		if (counter >= NUM_INTERVALS) {
241 			switch (test_num) {
242 
243 			case 9:	/* Test 09 */
244 			case 10:	/* Test 10 */
245 				exit(0);	/* This task is done */
246 				break;
247 			default:
248 				tst_brkm(TBROK, cleanup,
249 					 "Invalid test number passed\n");
250 				break;
251 
252 			}	/* end switch */
253 		}		/* end if */
254 	}			/* end while */
255 }				/* end main */
256