PAPI  5.7.0.0
system_overflow.c File Reference
Include dependency graph for system_overflow.c:

Go to the source code of this file.

Macros

#define MAX_EVENTS   3
 

Functions

static void my_handler (int EventSet, void *pc, long long ovec, void *context)
 
static void zero_count (void)
 
static void print_here (const char *str)
 
static void print_rate (const char *str)
 
static void do_cycles (int program_time)
 
static void my_papi_start (void)
 
static void run (const char *str, int len)
 
int main (int argc, char **argv)
 

Variables

static int Event [MAX_EVENTS]
 
static int Threshold [MAX_EVENTS]
 
static int num_events = 1
 
static int EventSet = PAPI_NULL
 
static const char * name = "unknown"
 
static struct timeval start last
 
static long count
 
static long total
 

Macro Definition Documentation

◆ MAX_EVENTS

#define MAX_EVENTS   3

Definition at line 15 of file system_overflow.c.

Function Documentation

◆ do_cycles()

static void do_cycles ( int  program_time)
static

Definition at line 95 of file system_overflow.c.

96 {
97  struct timeval start, now;
98  double x, sum;
99 
100  gettimeofday( &start, NULL );
101 
102  for ( ;; ) {
103  sum = 1.0;
104  for ( x = 1.0; x < 250000.0; x += 1.0 )
105  sum += x;
106  if ( sum < 0.0 )
107  printf( "==>> SUM IS NEGATIVE !! <<==\n" );
108 
109  gettimeofday( &now, NULL );
110  if ( now.tv_sec >= start.tv_sec + program_time )
111  break;
112  }
113 }
static struct timeval start
static int program_time
__time_t tv_sec
int gettimeofday(void *ptr1, void *ptr2)
int x
Definition: fileop.c:78
Here is the call graph for this function:
Here is the caller graph for this function:

◆ main()

int main ( int  argc,
char **  argv 
)

Definition at line 155 of file system_overflow.c.

156 {
157  char buf[100];
158 
159  int quiet,retval;
160 
161  /* Used to be able to set this via command line */
162  num_events=1;
163 
164  /* Set TESTS_QUIET variable */
165  quiet=tests_quiet( argc, argv );
166 
167  do_cycles( 1 );
168 
169  zero_count( );
170 
171 
173  if (retval!=PAPI_VER_CURRENT) {
174  test_fail( name, __LINE__, "PAPI_library_init failed", 1 );
175  }
176 
177  name = argv[0];
178  if (!quiet) printf( "[%d] %s, num_events = %d\n", getpid( ), name, num_events );
179  sprintf( buf, "%d", num_events );
180  my_papi_start( );
181  run( name, 3 );
182 
183  print_here( "system(./burn)" );
184  if ( access( "./burn", X_OK ) == 0 )
185  ( quiet ? system( "./burn TESTS_QUIET" ) : system( "./burn" ) );
186  else if ( access( "./ctests/burn", X_OK ) == 0 )
187  ( quiet ? system( "./ctests/burn TESTS_QUIET" ) :
188  system( "./ctests/burn" ) );
189 
190  test_pass(__FILE__);
191 
192  return 0;
193 }
static void do_cycles(int program_time)
void test_pass(const char *filename)
Definition: test_utils.c:432
static void run(const char *str, int len)
#define PAPI_VER_CURRENT
Definition: fpapi.h:14
int retval
Definition: zero_fork.c:53
static const char * name
static void my_papi_start(void)
int PAPI_library_init(int version)
Definition: papi.c:500
int quiet
Definition: rapl_overflow.c:18
static int num_events
static void zero_count(void)
static void print_here(const char *str)
int tests_quiet(int argc, char **argv)
Definition: test_utils.c:376
void test_fail(const char *file, int line, const char *call, int retval)
Definition: test_utils.c:468
int system()
volatile int buf[CACHE_FLUSH_BUFFER_SIZE_INTS]
Definition: do_loops.c:12
Here is the call graph for this function:

◆ my_handler()

static void my_handler ( int  EventSet,
void *  pc,
long long  ovec,
void *  context 
)
static

Definition at line 36 of file system_overflow.c.

37 {
38  ( void ) EventSet;
39  ( void ) pc;
40  ( void ) ovec;
41  ( void ) context;
42 
43  count++;
44  total++;
45 }
static long count
static long total
static int EventSet
Here is the caller graph for this function:

◆ my_papi_start()

static void my_papi_start ( void  )
static

Definition at line 116 of file system_overflow.c.

117 {
118  int ev;
119 
121 
123  test_fail( name, __LINE__, "PAPI_create_eventset failed", 1 );
124 
125  for ( ev = 0; ev < num_events; ev++ ) {
126  if ( PAPI_add_event( EventSet, Event[ev] ) != PAPI_OK ) {
127  if (!TESTS_QUIET) printf("Trouble adding event\n");
128  test_skip( name, __LINE__, "PAPI_add_event failed", 1 );
129  }
130  }
131 
132  for ( ev = 0; ev < num_events; ev++ ) {
133  if ( PAPI_overflow( EventSet, Event[ev], Threshold[ev], 0, my_handler )
134  != PAPI_OK ) {
135  test_fail( name, __LINE__, "PAPI_overflow failed", 1 );
136  }
137  }
138 
139  if ( PAPI_start( EventSet ) != PAPI_OK )
140  test_fail( name, __LINE__, "PAPI_start failed", 1 );
141 }
#define PAPI_OK
Definition: fpapi.h:105
int PAPI_add_event(int EventSet, int EventCode)
Definition: papi.c:1663
int PAPI_overflow(int EventSet, int EventCode, int threshold, int flags, PAPI_overflow_handler_t handler)
Definition: papi.c:4788
static const char * name
void test_skip(const char *file, int line, const char *call, int retval)
Definition: test_utils.c:561
static int Event[MAX_EVENTS]
static int num_events
#define PAPI_NULL
Definition: fpapi.h:13
int PAPI_create_eventset(int *EventSet)
Definition: papi.c:1464
static void my_handler(int EventSet, void *pc, long long ovec, void *context)
static int EventSet
int TESTS_QUIET
Definition: test_utils.c:18
void test_fail(const char *file, int line, const char *call, int retval)
Definition: test_utils.c:468
int PAPI_start(int EventSet)
Definition: papi.c:2096
static int Threshold[MAX_EVENTS]
Here is the call graph for this function:
Here is the caller graph for this function:

◆ print_here()

static void print_here ( const char *  str)
static

Definition at line 57 of file system_overflow.c.

57  {
58 
59  if (!TESTS_QUIET) printf("[%d] %s, %s\n", getpid(), name, str);
60 }
static const char * name
int TESTS_QUIET
Definition: test_utils.c:18
Here is the caller graph for this function:

◆ print_rate()

static void print_rate ( const char *  str)
static

Definition at line 63 of file system_overflow.c.

64 {
65  static int last_count = -1;
66  struct timeval now;
67  double st_secs, last_secs;
68 
69  gettimeofday( &now, NULL );
70  st_secs = ( double ) ( now.tv_sec - start.tv_sec )
71  + ( ( double ) ( now.tv_usec - start.tv_usec ) ) / 1000000.0;
72  last_secs = ( double ) ( now.tv_sec - last.tv_sec )
73  + ( ( double ) ( now.tv_usec - last.tv_usec ) ) / 1000000.0;
74  if ( last_secs <= 0.001 )
75  last_secs = 0.001;
76 
77  if (!TESTS_QUIET) {
78  printf( "[%d] %s, time = %.3f, total = %ld, last = %ld, rate = %.1f/sec\n",
79  getpid( ), str, st_secs, total, count,
80  ( ( double ) count ) / last_secs );
81  }
82 
83  if ( last_count != -1 ) {
84  if ( count < .1 * last_count ) {
85  test_fail( name, __LINE__, "Interrupt rate changed!", 1 );
86  exit( 1 );
87  }
88  }
89  last_count = ( int ) count;
90  count = 0;
91  last = now;
92 }
static struct timeval start
static const char * name
static long count
static long total
__time_t tv_sec
__suseconds_t tv_usec
int gettimeofday(void *ptr1, void *ptr2)
int TESTS_QUIET
Definition: test_utils.c:18
void test_fail(const char *file, int line, const char *call, int retval)
Definition: test_utils.c:468
void exit()
static struct timeval start last
Here is the call graph for this function:
Here is the caller graph for this function:

◆ run()

static void run ( const char *  str,
int  len 
)
static

Definition at line 144 of file system_overflow.c.

145 {
146  int n;
147 
148  for ( n = 1; n <= len; n++ ) {
149  do_cycles( 1 );
150  print_rate( str );
151  }
152 }
static void do_cycles(int program_time)
static void print_rate(const char *str)
Here is the call graph for this function:
Here is the caller graph for this function:

◆ zero_count()

static void zero_count ( void  )
static

Definition at line 48 of file system_overflow.c.

49 {
50  gettimeofday( &start, NULL );
51  last = start;
52  count = 0;
53  total = 0;
54 }
static struct timeval start
static long count
static long total
int gettimeofday(void *ptr1, void *ptr2)
static struct timeval start last
Here is the call graph for this function:
Here is the caller graph for this function:

Variable Documentation

◆ count

long count
static

Definition at line 33 of file system_overflow.c.

◆ Event

int Event[MAX_EVENTS]
static
Initial value:
= {
}
#define PAPI_FAD_INS
Definition: fpapi.h:234
#define PAPI_TOT_CYC
Definition: fpapi.h:195
#define PAPI_FP_INS
Definition: fpapi.h:188

Definition at line 17 of file system_overflow.c.

◆ EventSet

int EventSet = PAPI_NULL
static

Definition at line 30 of file system_overflow.c.

◆ last

struct timeval start last
static

Definition at line 32 of file system_overflow.c.

◆ name

const char* name = "unknown"
static

Definition at line 31 of file system_overflow.c.

◆ num_events

int num_events = 1
static

Definition at line 29 of file system_overflow.c.

◆ Threshold

int Threshold[MAX_EVENTS]
static
Initial value:
= {
8000000,
4000000,
4000000,
}

Definition at line 23 of file system_overflow.c.

◆ total

long total
static

Definition at line 33 of file system_overflow.c.