[6d4e604b] | 1 | -- |
---|
| 2 | -- TMTEST / BODY |
---|
| 3 | -- |
---|
| 4 | -- DESCRIPTION: |
---|
| 5 | -- |
---|
| 6 | -- This package is the implementation of Calling Overhead Test of the RTEMS |
---|
| 7 | -- Timing Test Suite. |
---|
| 8 | -- |
---|
| 9 | -- DEPENDENCIES: |
---|
| 10 | -- |
---|
| 11 | -- |
---|
| 12 | -- |
---|
[bf9ae83] | 13 | -- COPYRIGHT (c) 1989-1997. |
---|
[6d4e604b] | 14 | -- On-Line Applications Research Corporation (OAR). |
---|
[bf9ae83] | 15 | -- Copyright assigned to U.S. Government, 1994. |
---|
[6d4e604b] | 16 | -- |
---|
[bf9ae83] | 17 | -- The license and distribution terms for this file may in |
---|
| 18 | -- the file LICENSE in this distribution or at |
---|
| 19 | -- http://www.OARcorp.com/rtems/license.html. |
---|
[6d4e604b] | 20 | -- |
---|
[bf9ae83] | 21 | -- $Id$ |
---|
[6d4e604b] | 22 | -- |
---|
| 23 | |
---|
| 24 | with BSP; |
---|
| 25 | with DUMMY_RTEMS; |
---|
| 26 | with INTERFACES; use INTERFACES; |
---|
| 27 | with RTEMS; |
---|
| 28 | with TEST_SUPPORT; |
---|
| 29 | with TEXT_IO; |
---|
| 30 | with TIME_TEST_SUPPORT; |
---|
| 31 | with UNSIGNED32_IO; |
---|
| 32 | |
---|
| 33 | package body TMTEST is |
---|
| 34 | |
---|
| 35 | --PAGE |
---|
| 36 | -- |
---|
| 37 | -- INIT |
---|
| 38 | -- |
---|
| 39 | |
---|
| 40 | procedure INIT ( |
---|
| 41 | ARGUMENT : in RTEMS.TASK_ARGUMENT |
---|
| 42 | ) is |
---|
| 43 | STATUS : RTEMS.STATUS_CODES; |
---|
| 44 | begin |
---|
| 45 | |
---|
| 46 | TEXT_IO.NEW_LINE( 2 ); |
---|
| 47 | TEXT_IO.PUT_LINE( "*** TIME TEST OVERHEAD ***" ); |
---|
| 48 | |
---|
| 49 | TIMER_DRIVER.SET_FIND_AVERAGE_OVERHEAD( TRUE ); |
---|
| 50 | |
---|
| 51 | TMTEST.TASK_NAME( 1 ) := RTEMS.BUILD_NAME( 'T', 'A', '1', ' ' ); |
---|
| 52 | |
---|
| 53 | RTEMS.TASK_CREATE( |
---|
| 54 | TMTEST.TASK_NAME( 1 ), |
---|
| 55 | 254, |
---|
| 56 | 2048, |
---|
| 57 | RTEMS.DEFAULT_MODES, |
---|
| 58 | RTEMS.DEFAULT_ATTRIBUTES, |
---|
| 59 | TMTEST.TASK_ID( 1 ), |
---|
| 60 | STATUS |
---|
| 61 | ); |
---|
| 62 | TEST_SUPPORT.DIRECTIVE_FAILED( STATUS, "TASK_CREATE OF TA1" ); |
---|
| 63 | |
---|
| 64 | RTEMS.TASK_START( |
---|
| 65 | TMTEST.TASK_ID( 1 ), |
---|
| 66 | TMTEST.TASK_1'ACCESS, |
---|
| 67 | 0, |
---|
| 68 | STATUS |
---|
| 69 | ); |
---|
| 70 | TEST_SUPPORT.DIRECTIVE_FAILED( STATUS, "TASK_START OF TA1" ); |
---|
| 71 | |
---|
| 72 | RTEMS.TASK_DELETE( RTEMS.SELF, STATUS ); |
---|
| 73 | TEST_SUPPORT.DIRECTIVE_FAILED( STATUS, "TASK_DELETE OF SELF" ); |
---|
| 74 | |
---|
| 75 | end INIT; |
---|
| 76 | |
---|
| 77 | --PAGE |
---|
| 78 | -- |
---|
| 79 | -- TIMER_HANDLER |
---|
| 80 | -- |
---|
| 81 | |
---|
| 82 | procedure TIMER_HANDLER ( |
---|
| 83 | IGNORED_ID : in RTEMS.ID; |
---|
| 84 | IGNORED_ADDRESS : in RTEMS.ADDRESS |
---|
| 85 | ) is |
---|
| 86 | begin |
---|
| 87 | |
---|
| 88 | NULL; |
---|
| 89 | |
---|
| 90 | end TIMER_HANDLER; |
---|
| 91 | |
---|
| 92 | --PAGE |
---|
| 93 | -- |
---|
| 94 | -- ISR_HANDLER |
---|
| 95 | -- |
---|
| 96 | |
---|
| 97 | procedure ISR_HANDLER ( |
---|
| 98 | VECTOR : in RTEMS.VECTOR_NUMBER |
---|
| 99 | ) is |
---|
| 100 | begin |
---|
| 101 | |
---|
| 102 | NULL; |
---|
| 103 | |
---|
| 104 | end ISR_HANDLER; |
---|
| 105 | |
---|
| 106 | --PAGE |
---|
| 107 | -- |
---|
| 108 | -- ASR_HANDLER |
---|
| 109 | -- |
---|
| 110 | |
---|
| 111 | procedure ASR_HANDLER ( |
---|
| 112 | SIGNALS : in RTEMS.SIGNAL_SET |
---|
| 113 | ) is |
---|
| 114 | begin |
---|
| 115 | |
---|
| 116 | NULL; |
---|
| 117 | |
---|
| 118 | end ASR_HANDLER; |
---|
| 119 | |
---|
| 120 | --PAGE |
---|
| 121 | -- |
---|
| 122 | -- TASK_1 |
---|
| 123 | -- |
---|
| 124 | |
---|
| 125 | CPU_TABLE : aliased RTEMS.CPU_TABLE; |
---|
| 126 | |
---|
| 127 | procedure TASK_1 ( |
---|
| 128 | ARGUMENT : in RTEMS.TASK_ARGUMENT |
---|
| 129 | ) is |
---|
| 130 | NAME : RTEMS.NAME; |
---|
| 131 | INDEX : RTEMS.UNSIGNED32; |
---|
| 132 | OVERHEAD : RTEMS.UNSIGNED32; |
---|
| 133 | ID : RTEMS.ID; |
---|
| 134 | IN_PRIORITY : RTEMS.TASK_PRIORITY; |
---|
| 135 | OUT_PRIORITY : RTEMS.TASK_PRIORITY; |
---|
| 136 | IN_MODE : RTEMS.MODE; |
---|
| 137 | MASK : RTEMS.MODE; |
---|
| 138 | OUT_MODE : RTEMS.MODE; |
---|
| 139 | NOTE : RTEMS.UNSIGNED32; |
---|
| 140 | TIME : RTEMS.TIME_OF_DAY; |
---|
| 141 | TIMEOUT : RTEMS.INTERVAL; |
---|
| 142 | SIGNALS : RTEMS.SIGNAL_SET; |
---|
| 143 | ADDRESS_1 : RTEMS.ADDRESS; |
---|
| 144 | EVENTS : RTEMS.SIGNAL_SET; |
---|
[e17ffea] | 145 | BUFFER : TMTEST.BUFFER; |
---|
| 146 | BUFFER_POINTER : RTEMS.ADDRESS; |
---|
| 147 | MESSAGE_SIZE : RTEMS.UNSIGNED32; |
---|
[6d4e604b] | 148 | COUNT : RTEMS.UNSIGNED32; |
---|
| 149 | MAJOR : RTEMS.DEVICE_MAJOR_NUMBER; |
---|
| 150 | MINOR : RTEMS.DEVICE_MINOR_NUMBER; |
---|
| 151 | IO_RESULT : RTEMS.UNSIGNED32; |
---|
| 152 | ERROR : RTEMS.UNSIGNED32; |
---|
| 153 | STATUS : RTEMS.STATUS_CODES; |
---|
| 154 | begin |
---|
| 155 | |
---|
| 156 | NAME := RTEMS.BUILD_NAME( 'N', 'A', 'M', 'E' ); |
---|
| 157 | |
---|
[e17ffea] | 158 | BUFFER_POINTER := BUFFER'ADDRESS; |
---|
[6d4e604b] | 159 | |
---|
| 160 | -- INITIALIZE_EXECUTIVE |
---|
| 161 | |
---|
| 162 | TIMER_DRIVER.INITIALIZE; |
---|
| 163 | for INDEX in 1 .. TIME_TEST_SUPPORT.OPERATION_COUNT |
---|
| 164 | loop |
---|
| 165 | DUMMY_RTEMS.INITIALIZE_EXECUTIVE( |
---|
| 166 | BSP.CONFIGURATION'ACCESS, |
---|
| 167 | CPU_TABLE'ACCESS, |
---|
| 168 | TMTEST.INITIALIZATION_TASKS'ACCESS, |
---|
| 169 | RTEMS.NO_DEVICE_DRIVERS, |
---|
| 170 | RTEMS.NO_USER_EXTENSIONS, |
---|
| 171 | RTEMS.NO_MULTIPROCESSING_TABLE, |
---|
| 172 | RTEMS.NO_MPCI_TABLE |
---|
| 173 | ); |
---|
| 174 | end loop; |
---|
| 175 | TMTEST.END_TIME := TIMER_DRIVER.READ_TIMER; |
---|
| 176 | |
---|
| 177 | TIME_TEST_SUPPORT.PUT_TIME( |
---|
| 178 | "INITIALIZE_EXECUTIVE", |
---|
| 179 | TMTEST.END_TIME, |
---|
| 180 | TIME_TEST_SUPPORT.OPERATION_COUNT, |
---|
| 181 | OVERHEAD, |
---|
| 182 | 0 |
---|
| 183 | ); |
---|
| 184 | |
---|
| 185 | -- SHUTDOWN_EXECUTIVE |
---|
| 186 | |
---|
| 187 | TIMER_DRIVER.INITIALIZE; |
---|
| 188 | for INDEX in 1 .. TIME_TEST_SUPPORT.OPERATION_COUNT |
---|
| 189 | loop |
---|
| 190 | DUMMY_RTEMS.SHUTDOWN_EXECUTIVE( ERROR ); |
---|
| 191 | end loop; |
---|
| 192 | TMTEST.END_TIME := TIMER_DRIVER.READ_TIMER; |
---|
| 193 | |
---|
| 194 | TIME_TEST_SUPPORT.PUT_TIME( |
---|
| 195 | "SHUTDOWN_EXECUTIVE", |
---|
| 196 | TMTEST.END_TIME, |
---|
| 197 | TIME_TEST_SUPPORT.OPERATION_COUNT, |
---|
| 198 | OVERHEAD, |
---|
| 199 | 0 |
---|
| 200 | ); |
---|
| 201 | |
---|
| 202 | -- TASK_CREATE |
---|
| 203 | |
---|
| 204 | TIMER_DRIVER.INITIALIZE; |
---|
| 205 | for INDEX in 1 .. TIME_TEST_SUPPORT.OPERATION_COUNT |
---|
| 206 | loop |
---|
| 207 | DUMMY_RTEMS.TASK_CREATE( |
---|
| 208 | NAME, |
---|
| 209 | IN_PRIORITY, |
---|
| 210 | 2048, |
---|
| 211 | RTEMS.DEFAULT_MODES, |
---|
| 212 | RTEMS.DEFAULT_ATTRIBUTES, |
---|
| 213 | ID, |
---|
| 214 | STATUS |
---|
| 215 | ); |
---|
| 216 | end loop; |
---|
| 217 | TMTEST.END_TIME := TIMER_DRIVER.READ_TIMER; |
---|
| 218 | |
---|
| 219 | TIME_TEST_SUPPORT.PUT_TIME( |
---|
| 220 | "TASK_CREATE", |
---|
| 221 | TMTEST.END_TIME, |
---|
| 222 | TIME_TEST_SUPPORT.OPERATION_COUNT, |
---|
| 223 | OVERHEAD, |
---|
| 224 | 0 |
---|
| 225 | ); |
---|
| 226 | |
---|
| 227 | -- TASK_IDENT |
---|
| 228 | |
---|
| 229 | TIMER_DRIVER.INITIALIZE; |
---|
| 230 | for INDEX in 1 .. TIME_TEST_SUPPORT.OPERATION_COUNT |
---|
| 231 | loop |
---|
| 232 | DUMMY_RTEMS.TASK_IDENT( |
---|
| 233 | NAME, |
---|
| 234 | RTEMS.SEARCH_ALL_NODES, |
---|
| 235 | ID, |
---|
| 236 | STATUS |
---|
| 237 | ); |
---|
| 238 | end loop; |
---|
| 239 | TMTEST.END_TIME := TIMER_DRIVER.READ_TIMER; |
---|
| 240 | |
---|
| 241 | TIME_TEST_SUPPORT.PUT_TIME( |
---|
| 242 | "TASK_IDENT", |
---|
| 243 | TMTEST.END_TIME, |
---|
| 244 | TIME_TEST_SUPPORT.OPERATION_COUNT, |
---|
| 245 | OVERHEAD, |
---|
| 246 | 0 |
---|
| 247 | ); |
---|
| 248 | |
---|
| 249 | -- TASK_START |
---|
| 250 | |
---|
| 251 | TIMER_DRIVER.INITIALIZE; |
---|
| 252 | for INDEX in 1 .. TIME_TEST_SUPPORT.OPERATION_COUNT |
---|
| 253 | loop |
---|
| 254 | DUMMY_RTEMS.TASK_START( ID, TMTEST.TASK_1'ACCESS, 0, STATUS ); |
---|
| 255 | end loop; |
---|
| 256 | TMTEST.END_TIME := TIMER_DRIVER.READ_TIMER; |
---|
| 257 | |
---|
| 258 | TIME_TEST_SUPPORT.PUT_TIME( |
---|
| 259 | "TASK_START", |
---|
| 260 | TMTEST.END_TIME, |
---|
| 261 | TIME_TEST_SUPPORT.OPERATION_COUNT, |
---|
| 262 | OVERHEAD, |
---|
| 263 | 0 |
---|
| 264 | ); |
---|
| 265 | |
---|
| 266 | -- TASK_RESTART |
---|
| 267 | |
---|
| 268 | TIMER_DRIVER.INITIALIZE; |
---|
| 269 | for INDEX in 1 .. TIME_TEST_SUPPORT.OPERATION_COUNT |
---|
| 270 | loop |
---|
| 271 | DUMMY_RTEMS.TASK_RESTART( ID, 0, STATUS ); |
---|
| 272 | end loop; |
---|
| 273 | TMTEST.END_TIME := TIMER_DRIVER.READ_TIMER; |
---|
| 274 | |
---|
| 275 | TIME_TEST_SUPPORT.PUT_TIME( |
---|
| 276 | "TASK_RESTART", |
---|
| 277 | TMTEST.END_TIME, |
---|
| 278 | TIME_TEST_SUPPORT.OPERATION_COUNT, |
---|
| 279 | OVERHEAD, |
---|
| 280 | 0 |
---|
| 281 | ); |
---|
| 282 | |
---|
| 283 | -- TASK_DELETE |
---|
| 284 | |
---|
| 285 | TIMER_DRIVER.INITIALIZE; |
---|
| 286 | for INDEX in 1 .. TIME_TEST_SUPPORT.OPERATION_COUNT |
---|
| 287 | loop |
---|
| 288 | DUMMY_RTEMS.TASK_DELETE( ID, STATUS ); |
---|
| 289 | end loop; |
---|
| 290 | TMTEST.END_TIME := TIMER_DRIVER.READ_TIMER; |
---|
| 291 | |
---|
| 292 | TIME_TEST_SUPPORT.PUT_TIME( |
---|
| 293 | "TASK_DELETE", |
---|
| 294 | TMTEST.END_TIME, |
---|
| 295 | TIME_TEST_SUPPORT.OPERATION_COUNT, |
---|
| 296 | OVERHEAD, |
---|
| 297 | 0 |
---|
| 298 | ); |
---|
| 299 | |
---|
| 300 | -- TASK_SUSPEND |
---|
| 301 | |
---|
| 302 | TIMER_DRIVER.INITIALIZE; |
---|
| 303 | for INDEX in 1 .. TIME_TEST_SUPPORT.OPERATION_COUNT |
---|
| 304 | loop |
---|
| 305 | DUMMY_RTEMS.TASK_SUSPEND( ID, STATUS ); |
---|
| 306 | end loop; |
---|
| 307 | TMTEST.END_TIME := TIMER_DRIVER.READ_TIMER; |
---|
| 308 | |
---|
| 309 | TIME_TEST_SUPPORT.PUT_TIME( |
---|
| 310 | "TASK_SUSPEND", |
---|
| 311 | TMTEST.END_TIME, |
---|
| 312 | TIME_TEST_SUPPORT.OPERATION_COUNT, |
---|
| 313 | OVERHEAD, |
---|
| 314 | 0 |
---|
| 315 | ); |
---|
| 316 | |
---|
| 317 | -- TASK_RESUME |
---|
| 318 | |
---|
| 319 | TIMER_DRIVER.INITIALIZE; |
---|
| 320 | for INDEX in 1 .. TIME_TEST_SUPPORT.OPERATION_COUNT |
---|
| 321 | loop |
---|
| 322 | DUMMY_RTEMS.TASK_RESUME( ID, STATUS ); |
---|
| 323 | end loop; |
---|
| 324 | TMTEST.END_TIME := TIMER_DRIVER.READ_TIMER; |
---|
| 325 | |
---|
| 326 | TIME_TEST_SUPPORT.PUT_TIME( |
---|
| 327 | "TASK_RESUME", |
---|
| 328 | TMTEST.END_TIME, |
---|
| 329 | TIME_TEST_SUPPORT.OPERATION_COUNT, |
---|
| 330 | OVERHEAD, |
---|
| 331 | 0 |
---|
| 332 | ); |
---|
| 333 | |
---|
| 334 | -- TASK_SET_PRIORITY |
---|
| 335 | |
---|
| 336 | TIMER_DRIVER.INITIALIZE; |
---|
| 337 | for INDEX in 1 .. TIME_TEST_SUPPORT.OPERATION_COUNT |
---|
| 338 | loop |
---|
| 339 | DUMMY_RTEMS.TASK_SET_PRIORITY( |
---|
| 340 | ID, |
---|
| 341 | IN_PRIORITY, |
---|
| 342 | OUT_PRIORITY, |
---|
| 343 | STATUS |
---|
| 344 | ); |
---|
| 345 | end loop; |
---|
| 346 | TMTEST.END_TIME := TIMER_DRIVER.READ_TIMER; |
---|
| 347 | |
---|
| 348 | TIME_TEST_SUPPORT.PUT_TIME( |
---|
| 349 | "TASK_SET_PRIORITY", |
---|
| 350 | TMTEST.END_TIME, |
---|
| 351 | TIME_TEST_SUPPORT.OPERATION_COUNT, |
---|
| 352 | OVERHEAD, |
---|
| 353 | 0 |
---|
| 354 | ); |
---|
| 355 | |
---|
| 356 | -- TASK_MODE |
---|
| 357 | |
---|
| 358 | TIMER_DRIVER.INITIALIZE; |
---|
| 359 | for INDEX in 1 .. TIME_TEST_SUPPORT.OPERATION_COUNT |
---|
| 360 | loop |
---|
| 361 | DUMMY_RTEMS.TASK_MODE( |
---|
| 362 | IN_MODE, |
---|
| 363 | MASK, |
---|
| 364 | OUT_MODE, |
---|
| 365 | STATUS |
---|
| 366 | ); |
---|
| 367 | end loop; |
---|
| 368 | TMTEST.END_TIME := TIMER_DRIVER.READ_TIMER; |
---|
| 369 | |
---|
| 370 | TIME_TEST_SUPPORT.PUT_TIME( |
---|
| 371 | "TASK_MODE", |
---|
| 372 | TMTEST.END_TIME, |
---|
| 373 | TIME_TEST_SUPPORT.OPERATION_COUNT, |
---|
| 374 | OVERHEAD, |
---|
| 375 | 0 |
---|
| 376 | ); |
---|
| 377 | |
---|
| 378 | -- TASK_GET_NOTE |
---|
| 379 | |
---|
| 380 | TIMER_DRIVER.INITIALIZE; |
---|
| 381 | for INDEX in 1 .. TIME_TEST_SUPPORT.OPERATION_COUNT |
---|
| 382 | loop |
---|
| 383 | DUMMY_RTEMS.TASK_GET_NOTE( ID, 1, NOTE, STATUS ); |
---|
| 384 | end loop; |
---|
| 385 | TMTEST.END_TIME := TIMER_DRIVER.READ_TIMER; |
---|
| 386 | |
---|
| 387 | TIME_TEST_SUPPORT.PUT_TIME( |
---|
| 388 | "TASK_GET_NOTE", |
---|
| 389 | TMTEST.END_TIME, |
---|
| 390 | TIME_TEST_SUPPORT.OPERATION_COUNT, |
---|
| 391 | OVERHEAD, |
---|
| 392 | 0 |
---|
| 393 | ); |
---|
| 394 | |
---|
| 395 | -- TASK_SET_NOTE |
---|
| 396 | |
---|
| 397 | TIMER_DRIVER.INITIALIZE; |
---|
| 398 | for INDEX in 1 .. TIME_TEST_SUPPORT.OPERATION_COUNT |
---|
| 399 | loop |
---|
| 400 | DUMMY_RTEMS.TASK_SET_NOTE( ID, 1, NOTE, STATUS ); |
---|
| 401 | end loop; |
---|
| 402 | TMTEST.END_TIME := TIMER_DRIVER.READ_TIMER; |
---|
| 403 | |
---|
| 404 | TIME_TEST_SUPPORT.PUT_TIME( |
---|
| 405 | "TASK_SET_NOTE", |
---|
| 406 | TMTEST.END_TIME, |
---|
| 407 | TIME_TEST_SUPPORT.OPERATION_COUNT, |
---|
| 408 | OVERHEAD, |
---|
| 409 | 0 |
---|
| 410 | ); |
---|
| 411 | |
---|
| 412 | -- TASK_WAKE_WHEN |
---|
| 413 | |
---|
| 414 | TIMER_DRIVER.INITIALIZE; |
---|
| 415 | for INDEX in 1 .. TIME_TEST_SUPPORT.OPERATION_COUNT |
---|
| 416 | loop |
---|
| 417 | DUMMY_RTEMS.TASK_WAKE_WHEN( TIME, STATUS ); |
---|
| 418 | end loop; |
---|
| 419 | TMTEST.END_TIME := TIMER_DRIVER.READ_TIMER; |
---|
| 420 | |
---|
| 421 | TIME_TEST_SUPPORT.PUT_TIME( |
---|
| 422 | "TASK_WAKE_WHEN", |
---|
| 423 | TMTEST.END_TIME, |
---|
| 424 | TIME_TEST_SUPPORT.OPERATION_COUNT, |
---|
| 425 | OVERHEAD, |
---|
| 426 | 0 |
---|
| 427 | ); |
---|
| 428 | |
---|
| 429 | -- TASK_WAKE_AFTER |
---|
| 430 | |
---|
| 431 | TIMER_DRIVER.INITIALIZE; |
---|
| 432 | for INDEX in 1 .. TIME_TEST_SUPPORT.OPERATION_COUNT |
---|
| 433 | loop |
---|
| 434 | DUMMY_RTEMS.TASK_WAKE_AFTER( TIMEOUT, STATUS ); |
---|
| 435 | end loop; |
---|
| 436 | TMTEST.END_TIME := TIMER_DRIVER.READ_TIMER; |
---|
| 437 | |
---|
| 438 | TIME_TEST_SUPPORT.PUT_TIME( |
---|
| 439 | "TASK_WAKE_AFTER", |
---|
| 440 | TMTEST.END_TIME, |
---|
| 441 | TIME_TEST_SUPPORT.OPERATION_COUNT, |
---|
| 442 | OVERHEAD, |
---|
| 443 | 0 |
---|
| 444 | ); |
---|
| 445 | |
---|
| 446 | -- INTERRUPT_CATCH |
---|
| 447 | |
---|
| 448 | TIMER_DRIVER.INITIALIZE; |
---|
| 449 | for INDEX in 1 .. TIME_TEST_SUPPORT.OPERATION_COUNT |
---|
| 450 | loop |
---|
| 451 | DUMMY_RTEMS.INTERRUPT_CATCH( |
---|
| 452 | TMTEST.ISR_HANDLER'ADDRESS, |
---|
| 453 | RTEMS.VECTOR_NUMBER'FIRST, |
---|
| 454 | ADDRESS_1, |
---|
| 455 | STATUS |
---|
| 456 | ); |
---|
| 457 | end loop; |
---|
| 458 | TMTEST.END_TIME := TIMER_DRIVER.READ_TIMER; |
---|
| 459 | |
---|
| 460 | TIME_TEST_SUPPORT.PUT_TIME( |
---|
| 461 | "INTERRUPT_CATCH", |
---|
| 462 | TMTEST.END_TIME, |
---|
| 463 | TIME_TEST_SUPPORT.OPERATION_COUNT, |
---|
| 464 | OVERHEAD, |
---|
| 465 | 0 |
---|
| 466 | ); |
---|
| 467 | |
---|
| 468 | -- CLOCK_GET |
---|
| 469 | |
---|
| 470 | TIMER_DRIVER.INITIALIZE; |
---|
| 471 | for INDEX in 1 .. TIME_TEST_SUPPORT.OPERATION_COUNT |
---|
| 472 | loop |
---|
| 473 | DUMMY_RTEMS.CLOCK_GET( RTEMS.CLOCK_GET_TOD, TIME'ADDRESS, STATUS ); |
---|
| 474 | end loop; |
---|
| 475 | TMTEST.END_TIME := TIMER_DRIVER.READ_TIMER; |
---|
| 476 | |
---|
| 477 | TIME_TEST_SUPPORT.PUT_TIME( |
---|
| 478 | "CLOCK_GET", |
---|
| 479 | TMTEST.END_TIME, |
---|
| 480 | TIME_TEST_SUPPORT.OPERATION_COUNT, |
---|
| 481 | OVERHEAD, |
---|
| 482 | 0 |
---|
| 483 | ); |
---|
| 484 | |
---|
| 485 | -- CLOCK_SET |
---|
| 486 | |
---|
| 487 | TIMER_DRIVER.INITIALIZE; |
---|
| 488 | for INDEX in 1 .. TIME_TEST_SUPPORT.OPERATION_COUNT |
---|
| 489 | loop |
---|
| 490 | DUMMY_RTEMS.CLOCK_SET( TIME, STATUS ); |
---|
| 491 | end loop; |
---|
| 492 | TMTEST.END_TIME := TIMER_DRIVER.READ_TIMER; |
---|
| 493 | |
---|
| 494 | TIME_TEST_SUPPORT.PUT_TIME( |
---|
| 495 | "CLOCK_SET", |
---|
| 496 | TMTEST.END_TIME, |
---|
| 497 | TIME_TEST_SUPPORT.OPERATION_COUNT, |
---|
| 498 | OVERHEAD, |
---|
| 499 | 0 |
---|
| 500 | ); |
---|
| 501 | |
---|
| 502 | -- CLOCK_TICK |
---|
| 503 | |
---|
| 504 | TIMER_DRIVER.INITIALIZE; |
---|
| 505 | for INDEX in 1 .. TIME_TEST_SUPPORT.OPERATION_COUNT |
---|
| 506 | loop |
---|
| 507 | DUMMY_RTEMS.CLOCK_TICK( STATUS ); |
---|
| 508 | end loop; |
---|
| 509 | TMTEST.END_TIME := TIMER_DRIVER.READ_TIMER; |
---|
| 510 | |
---|
| 511 | TIME_TEST_SUPPORT.PUT_TIME( |
---|
| 512 | "CLOCK_TICK", |
---|
| 513 | TMTEST.END_TIME, |
---|
| 514 | TIME_TEST_SUPPORT.OPERATION_COUNT, |
---|
| 515 | OVERHEAD, |
---|
| 516 | 0 |
---|
| 517 | ); |
---|
| 518 | |
---|
| 519 | TEST_SUPPORT.PAUSE; |
---|
| 520 | |
---|
| 521 | -- TIMER_CREATE |
---|
| 522 | |
---|
| 523 | TIMER_DRIVER.INITIALIZE; |
---|
| 524 | for INDEX in 1 .. TIME_TEST_SUPPORT.OPERATION_COUNT |
---|
| 525 | loop |
---|
| 526 | DUMMY_RTEMS.TIMER_CREATE( NAME, ID, STATUS ); |
---|
| 527 | end loop; |
---|
| 528 | TMTEST.END_TIME := TIMER_DRIVER.READ_TIMER; |
---|
| 529 | |
---|
| 530 | TIME_TEST_SUPPORT.PUT_TIME( |
---|
| 531 | "TIMER_CREATE", |
---|
| 532 | TMTEST.END_TIME, |
---|
| 533 | TIME_TEST_SUPPORT.OPERATION_COUNT, |
---|
| 534 | OVERHEAD, |
---|
| 535 | 0 |
---|
| 536 | ); |
---|
| 537 | |
---|
| 538 | -- TIMER_DELETE |
---|
| 539 | |
---|
| 540 | TIMER_DRIVER.INITIALIZE; |
---|
| 541 | for INDEX in 1 .. TIME_TEST_SUPPORT.OPERATION_COUNT |
---|
| 542 | loop |
---|
| 543 | DUMMY_RTEMS.TIMER_DELETE( ID, STATUS ); |
---|
| 544 | end loop; |
---|
| 545 | TMTEST.END_TIME := TIMER_DRIVER.READ_TIMER; |
---|
| 546 | |
---|
| 547 | TIME_TEST_SUPPORT.PUT_TIME( |
---|
| 548 | "TIMER_DELETE", |
---|
| 549 | TMTEST.END_TIME, |
---|
| 550 | TIME_TEST_SUPPORT.OPERATION_COUNT, |
---|
| 551 | OVERHEAD, |
---|
| 552 | 0 |
---|
| 553 | ); |
---|
| 554 | |
---|
| 555 | -- TIMER_IDENT |
---|
| 556 | |
---|
| 557 | TIMER_DRIVER.INITIALIZE; |
---|
| 558 | for INDEX in 1 .. TIME_TEST_SUPPORT.OPERATION_COUNT |
---|
| 559 | loop |
---|
| 560 | DUMMY_RTEMS.TIMER_IDENT( |
---|
| 561 | NAME, |
---|
| 562 | ID, |
---|
| 563 | STATUS |
---|
| 564 | ); |
---|
| 565 | end loop; |
---|
| 566 | TMTEST.END_TIME := TIMER_DRIVER.READ_TIMER; |
---|
| 567 | |
---|
| 568 | TIME_TEST_SUPPORT.PUT_TIME( |
---|
| 569 | "TIMER_IDENT", |
---|
| 570 | TMTEST.END_TIME, |
---|
| 571 | TIME_TEST_SUPPORT.OPERATION_COUNT, |
---|
| 572 | OVERHEAD, |
---|
| 573 | 0 |
---|
| 574 | ); |
---|
| 575 | |
---|
| 576 | -- TIMER_FIRE_AFTER |
---|
| 577 | |
---|
| 578 | TIMER_DRIVER.INITIALIZE; |
---|
| 579 | for INDEX in 1 .. TIME_TEST_SUPPORT.OPERATION_COUNT |
---|
| 580 | loop |
---|
| 581 | DUMMY_RTEMS.TIMER_FIRE_AFTER( |
---|
| 582 | ID, |
---|
| 583 | TIMEOUT, |
---|
| 584 | TMTEST.TIMER_HANDLER'ACCESS, |
---|
| 585 | RTEMS.NULL_ADDRESS, |
---|
| 586 | STATUS |
---|
| 587 | ); |
---|
| 588 | end loop; |
---|
| 589 | TMTEST.END_TIME := TIMER_DRIVER.READ_TIMER; |
---|
| 590 | |
---|
| 591 | TIME_TEST_SUPPORT.PUT_TIME( |
---|
| 592 | "TIMER_FIRE_AFTER", |
---|
| 593 | TMTEST.END_TIME, |
---|
| 594 | TIME_TEST_SUPPORT.OPERATION_COUNT, |
---|
| 595 | OVERHEAD, |
---|
| 596 | 0 |
---|
| 597 | ); |
---|
| 598 | |
---|
| 599 | -- TIMER_FIRE_WHEN |
---|
| 600 | |
---|
| 601 | TIMER_DRIVER.INITIALIZE; |
---|
| 602 | for INDEX in 1 .. TIME_TEST_SUPPORT.OPERATION_COUNT |
---|
| 603 | loop |
---|
| 604 | DUMMY_RTEMS.TIMER_FIRE_WHEN( |
---|
| 605 | ID, |
---|
| 606 | TIME, |
---|
| 607 | TMTEST.TIMER_HANDLER'ACCESS, |
---|
| 608 | RTEMS.NULL_ADDRESS, |
---|
| 609 | STATUS |
---|
| 610 | ); |
---|
| 611 | end loop; |
---|
| 612 | TMTEST.END_TIME := TIMER_DRIVER.READ_TIMER; |
---|
| 613 | |
---|
| 614 | TIME_TEST_SUPPORT.PUT_TIME( |
---|
| 615 | "TIMER_FIRE_WHEN", |
---|
| 616 | TMTEST.END_TIME, |
---|
| 617 | TIME_TEST_SUPPORT.OPERATION_COUNT, |
---|
| 618 | OVERHEAD, |
---|
| 619 | 0 |
---|
| 620 | ); |
---|
| 621 | |
---|
| 622 | -- TIMER_RESET |
---|
| 623 | |
---|
| 624 | TIMER_DRIVER.INITIALIZE; |
---|
| 625 | for INDEX in 1 .. TIME_TEST_SUPPORT.OPERATION_COUNT |
---|
| 626 | loop |
---|
| 627 | DUMMY_RTEMS.TIMER_RESET( ID, STATUS ); |
---|
| 628 | end loop; |
---|
| 629 | TMTEST.END_TIME := TIMER_DRIVER.READ_TIMER; |
---|
| 630 | |
---|
| 631 | TIME_TEST_SUPPORT.PUT_TIME( |
---|
| 632 | "TIMER_RESET", |
---|
| 633 | TMTEST.END_TIME, |
---|
| 634 | TIME_TEST_SUPPORT.OPERATION_COUNT, |
---|
| 635 | OVERHEAD, |
---|
| 636 | 0 |
---|
| 637 | ); |
---|
| 638 | |
---|
| 639 | -- TIMER_CANCEL |
---|
| 640 | |
---|
| 641 | TIMER_DRIVER.INITIALIZE; |
---|
| 642 | for INDEX in 1 .. TIME_TEST_SUPPORT.OPERATION_COUNT |
---|
| 643 | loop |
---|
| 644 | DUMMY_RTEMS.TIMER_CANCEL( ID, STATUS ); |
---|
| 645 | end loop; |
---|
| 646 | TMTEST.END_TIME := TIMER_DRIVER.READ_TIMER; |
---|
| 647 | |
---|
| 648 | TIME_TEST_SUPPORT.PUT_TIME( |
---|
| 649 | "TIMER_CANCEL", |
---|
| 650 | TMTEST.END_TIME, |
---|
| 651 | TIME_TEST_SUPPORT.OPERATION_COUNT, |
---|
| 652 | OVERHEAD, |
---|
| 653 | 0 |
---|
| 654 | ); |
---|
| 655 | |
---|
| 656 | -- SEMAPHORE_CREATE |
---|
| 657 | |
---|
| 658 | TIMER_DRIVER.INITIALIZE; |
---|
| 659 | for INDEX in 1 .. TIME_TEST_SUPPORT.OPERATION_COUNT |
---|
| 660 | loop |
---|
| 661 | DUMMY_RTEMS.SEMAPHORE_CREATE( |
---|
| 662 | NAME, |
---|
| 663 | 128, |
---|
| 664 | RTEMS.DEFAULT_ATTRIBUTES, |
---|
[c7f646b5] | 665 | RTEMS.NO_PRIORITY, |
---|
[6d4e604b] | 666 | ID, |
---|
| 667 | STATUS |
---|
| 668 | ); |
---|
| 669 | end loop; |
---|
| 670 | TMTEST.END_TIME := TIMER_DRIVER.READ_TIMER; |
---|
| 671 | |
---|
| 672 | TIME_TEST_SUPPORT.PUT_TIME( |
---|
| 673 | "SEMAPHORE_CREATE", |
---|
| 674 | TMTEST.END_TIME, |
---|
| 675 | TIME_TEST_SUPPORT.OPERATION_COUNT, |
---|
| 676 | OVERHEAD, |
---|
| 677 | 0 |
---|
| 678 | ); |
---|
| 679 | |
---|
| 680 | -- SEMAPHORE_DELETE |
---|
| 681 | |
---|
| 682 | TIMER_DRIVER.INITIALIZE; |
---|
| 683 | for INDEX in 1 .. TIME_TEST_SUPPORT.OPERATION_COUNT |
---|
| 684 | loop |
---|
| 685 | DUMMY_RTEMS.SEMAPHORE_DELETE( ID, STATUS ); |
---|
| 686 | end loop; |
---|
| 687 | TMTEST.END_TIME := TIMER_DRIVER.READ_TIMER; |
---|
| 688 | |
---|
| 689 | TIME_TEST_SUPPORT.PUT_TIME( |
---|
| 690 | "SEMAPHORE_DELETE", |
---|
| 691 | TMTEST.END_TIME, |
---|
| 692 | TIME_TEST_SUPPORT.OPERATION_COUNT, |
---|
| 693 | OVERHEAD, |
---|
| 694 | 0 |
---|
| 695 | ); |
---|
| 696 | |
---|
| 697 | -- SEMAPHORE_IDENT |
---|
| 698 | |
---|
| 699 | TIMER_DRIVER.INITIALIZE; |
---|
| 700 | for INDEX in 1 .. TIME_TEST_SUPPORT.OPERATION_COUNT |
---|
| 701 | loop |
---|
| 702 | DUMMY_RTEMS.SEMAPHORE_IDENT( |
---|
| 703 | NAME, |
---|
| 704 | RTEMS.SEARCH_ALL_NODES, |
---|
| 705 | ID, |
---|
| 706 | STATUS |
---|
| 707 | ); |
---|
| 708 | end loop; |
---|
| 709 | TMTEST.END_TIME := TIMER_DRIVER.READ_TIMER; |
---|
| 710 | |
---|
| 711 | TIME_TEST_SUPPORT.PUT_TIME( |
---|
| 712 | "SEMAPHORE_IDENT", |
---|
| 713 | TMTEST.END_TIME, |
---|
| 714 | TIME_TEST_SUPPORT.OPERATION_COUNT, |
---|
| 715 | OVERHEAD, |
---|
| 716 | 0 |
---|
| 717 | ); |
---|
| 718 | |
---|
| 719 | -- SEMAPHORE_OBTAIN |
---|
| 720 | |
---|
| 721 | TIMER_DRIVER.INITIALIZE; |
---|
| 722 | for INDEX in 1 .. TIME_TEST_SUPPORT.OPERATION_COUNT |
---|
| 723 | loop |
---|
| 724 | DUMMY_RTEMS.SEMAPHORE_OBTAIN( |
---|
| 725 | ID, |
---|
| 726 | RTEMS.DEFAULT_OPTIONS, |
---|
| 727 | TIMEOUT, |
---|
| 728 | STATUS |
---|
| 729 | ); |
---|
| 730 | end loop; |
---|
| 731 | TMTEST.END_TIME := TIMER_DRIVER.READ_TIMER; |
---|
| 732 | |
---|
| 733 | TIME_TEST_SUPPORT.PUT_TIME( |
---|
| 734 | "SEMAPHORE_OBTAIN", |
---|
| 735 | TMTEST.END_TIME, |
---|
| 736 | TIME_TEST_SUPPORT.OPERATION_COUNT, |
---|
| 737 | OVERHEAD, |
---|
| 738 | 0 |
---|
| 739 | ); |
---|
| 740 | |
---|
| 741 | -- SEMAPHORE_RELEASE |
---|
| 742 | |
---|
| 743 | TIMER_DRIVER.INITIALIZE; |
---|
| 744 | for INDEX in 1 .. TIME_TEST_SUPPORT.OPERATION_COUNT |
---|
| 745 | loop |
---|
| 746 | DUMMY_RTEMS.SEMAPHORE_RELEASE( ID, STATUS ); |
---|
| 747 | end loop; |
---|
| 748 | TMTEST.END_TIME := TIMER_DRIVER.READ_TIMER; |
---|
| 749 | |
---|
| 750 | TIME_TEST_SUPPORT.PUT_TIME( |
---|
| 751 | "SEMAPHORE_RELEASE", |
---|
| 752 | TMTEST.END_TIME, |
---|
| 753 | TIME_TEST_SUPPORT.OPERATION_COUNT, |
---|
| 754 | OVERHEAD, |
---|
| 755 | 0 |
---|
| 756 | ); |
---|
| 757 | |
---|
| 758 | -- MESSAGE_QUEUE_CREATE |
---|
| 759 | |
---|
| 760 | TIMER_DRIVER.INITIALIZE; |
---|
| 761 | for INDEX in 1 .. TIME_TEST_SUPPORT.OPERATION_COUNT |
---|
| 762 | loop |
---|
| 763 | DUMMY_RTEMS.MESSAGE_QUEUE_CREATE( |
---|
| 764 | NAME, |
---|
| 765 | 128, |
---|
[688ecaa0] | 766 | 16, |
---|
[6d4e604b] | 767 | RTEMS.DEFAULT_ATTRIBUTES, |
---|
| 768 | ID, |
---|
| 769 | STATUS |
---|
| 770 | ); |
---|
| 771 | end loop; |
---|
| 772 | TMTEST.END_TIME := TIMER_DRIVER.READ_TIMER; |
---|
| 773 | |
---|
| 774 | TIME_TEST_SUPPORT.PUT_TIME( |
---|
| 775 | "MESSAGE_QUEUE_CREATE", |
---|
| 776 | TMTEST.END_TIME, |
---|
| 777 | TIME_TEST_SUPPORT.OPERATION_COUNT, |
---|
| 778 | OVERHEAD, |
---|
| 779 | 0 |
---|
| 780 | ); |
---|
| 781 | |
---|
| 782 | -- MESSAGE_QUEUE_IDENT |
---|
| 783 | |
---|
| 784 | TIMER_DRIVER.INITIALIZE; |
---|
| 785 | for INDEX in 1 .. TIME_TEST_SUPPORT.OPERATION_COUNT |
---|
| 786 | loop |
---|
| 787 | DUMMY_RTEMS.MESSAGE_QUEUE_IDENT( |
---|
| 788 | NAME, |
---|
| 789 | RTEMS.SEARCH_ALL_NODES, |
---|
| 790 | ID, |
---|
| 791 | STATUS |
---|
| 792 | ); |
---|
| 793 | end loop; |
---|
| 794 | TMTEST.END_TIME := TIMER_DRIVER.READ_TIMER; |
---|
| 795 | |
---|
| 796 | TIME_TEST_SUPPORT.PUT_TIME( |
---|
| 797 | "MESSAGE_QUEUE_IDENT", |
---|
| 798 | TMTEST.END_TIME, |
---|
| 799 | TIME_TEST_SUPPORT.OPERATION_COUNT, |
---|
| 800 | OVERHEAD, |
---|
| 801 | 0 |
---|
| 802 | ); |
---|
| 803 | |
---|
| 804 | -- MESSAGE_QUEUE_DELETE |
---|
| 805 | |
---|
| 806 | TIMER_DRIVER.INITIALIZE; |
---|
| 807 | for INDEX in 1 .. TIME_TEST_SUPPORT.OPERATION_COUNT |
---|
| 808 | loop |
---|
| 809 | DUMMY_RTEMS.MESSAGE_QUEUE_DELETE( ID, STATUS ); |
---|
| 810 | end loop; |
---|
| 811 | TMTEST.END_TIME := TIMER_DRIVER.READ_TIMER; |
---|
| 812 | |
---|
| 813 | TIME_TEST_SUPPORT.PUT_TIME( |
---|
| 814 | "MESSAGE_QUEUE_DELETE", |
---|
| 815 | TMTEST.END_TIME, |
---|
| 816 | TIME_TEST_SUPPORT.OPERATION_COUNT, |
---|
| 817 | OVERHEAD, |
---|
| 818 | 0 |
---|
| 819 | ); |
---|
| 820 | |
---|
| 821 | -- MESSAGE_QUEUE_SEND |
---|
| 822 | |
---|
| 823 | TIMER_DRIVER.INITIALIZE; |
---|
| 824 | for INDEX in 1 .. TIME_TEST_SUPPORT.OPERATION_COUNT |
---|
| 825 | loop |
---|
[e17ffea] | 826 | DUMMY_RTEMS.MESSAGE_QUEUE_SEND( ID, BUFFER_POINTER, 16, STATUS ); |
---|
[6d4e604b] | 827 | end loop; |
---|
| 828 | TMTEST.END_TIME := TIMER_DRIVER.READ_TIMER; |
---|
| 829 | |
---|
| 830 | TIME_TEST_SUPPORT.PUT_TIME( |
---|
| 831 | "MESSAGE_QUEUE_SEND", |
---|
| 832 | TMTEST.END_TIME, |
---|
| 833 | TIME_TEST_SUPPORT.OPERATION_COUNT, |
---|
| 834 | OVERHEAD, |
---|
| 835 | 0 |
---|
| 836 | ); |
---|
| 837 | |
---|
| 838 | -- MESSAGE_QUEUE_URGENT |
---|
| 839 | |
---|
| 840 | TIMER_DRIVER.INITIALIZE; |
---|
| 841 | for INDEX in 1 .. TIME_TEST_SUPPORT.OPERATION_COUNT |
---|
| 842 | loop |
---|
[e17ffea] | 843 | DUMMY_RTEMS.MESSAGE_QUEUE_URGENT( ID, BUFFER_POINTER, 16, STATUS ); |
---|
[6d4e604b] | 844 | end loop; |
---|
| 845 | TMTEST.END_TIME := TIMER_DRIVER.READ_TIMER; |
---|
| 846 | |
---|
| 847 | TIME_TEST_SUPPORT.PUT_TIME( |
---|
| 848 | "MESSAGE_QUEUE_URGENT", |
---|
| 849 | TMTEST.END_TIME, |
---|
| 850 | TIME_TEST_SUPPORT.OPERATION_COUNT, |
---|
| 851 | OVERHEAD, |
---|
| 852 | 0 |
---|
| 853 | ); |
---|
| 854 | |
---|
| 855 | -- MESSAGE_QUEUE_BROADCAST |
---|
| 856 | |
---|
| 857 | TIMER_DRIVER.INITIALIZE; |
---|
| 858 | for INDEX in 1 .. TIME_TEST_SUPPORT.OPERATION_COUNT |
---|
| 859 | loop |
---|
| 860 | DUMMY_RTEMS.MESSAGE_QUEUE_BROADCAST( |
---|
| 861 | ID, |
---|
| 862 | BUFFER_POINTER, |
---|
[e17ffea] | 863 | 16, |
---|
[6d4e604b] | 864 | COUNT, |
---|
| 865 | STATUS |
---|
| 866 | ); |
---|
| 867 | end loop; |
---|
| 868 | TMTEST.END_TIME := TIMER_DRIVER.READ_TIMER; |
---|
| 869 | |
---|
| 870 | TIME_TEST_SUPPORT.PUT_TIME( |
---|
| 871 | "MESSAGE_QUEUE_BROADCAST", |
---|
| 872 | TMTEST.END_TIME, |
---|
| 873 | TIME_TEST_SUPPORT.OPERATION_COUNT, |
---|
| 874 | OVERHEAD, |
---|
| 875 | 0 |
---|
| 876 | ); |
---|
| 877 | |
---|
| 878 | -- MESSAGE_QUEUE_RECEIVE |
---|
| 879 | |
---|
| 880 | TIMER_DRIVER.INITIALIZE; |
---|
| 881 | for INDEX in 1 .. TIME_TEST_SUPPORT.OPERATION_COUNT |
---|
| 882 | loop |
---|
| 883 | DUMMY_RTEMS.MESSAGE_QUEUE_RECEIVE( |
---|
| 884 | ID, |
---|
| 885 | BUFFER_POINTER, |
---|
| 886 | RTEMS.DEFAULT_OPTIONS, |
---|
| 887 | TIMEOUT, |
---|
[e17ffea] | 888 | MESSAGE_SIZE, |
---|
[6d4e604b] | 889 | STATUS |
---|
| 890 | ); |
---|
| 891 | end loop; |
---|
| 892 | TMTEST.END_TIME := TIMER_DRIVER.READ_TIMER; |
---|
| 893 | |
---|
| 894 | TIME_TEST_SUPPORT.PUT_TIME( |
---|
| 895 | "MESSAGE_QUEUE_RECEIVE", |
---|
| 896 | TMTEST.END_TIME, |
---|
| 897 | TIME_TEST_SUPPORT.OPERATION_COUNT, |
---|
| 898 | OVERHEAD, |
---|
| 899 | 0 |
---|
| 900 | ); |
---|
| 901 | |
---|
| 902 | -- MESSAGE_QUEUE_FLUSH |
---|
| 903 | |
---|
| 904 | TIMER_DRIVER.INITIALIZE; |
---|
| 905 | for INDEX in 1 .. TIME_TEST_SUPPORT.OPERATION_COUNT |
---|
| 906 | loop |
---|
| 907 | DUMMY_RTEMS.MESSAGE_QUEUE_FLUSH( ID, COUNT, STATUS ); |
---|
| 908 | end loop; |
---|
| 909 | TMTEST.END_TIME := TIMER_DRIVER.READ_TIMER; |
---|
| 910 | |
---|
| 911 | TIME_TEST_SUPPORT.PUT_TIME( |
---|
| 912 | "MESSAGE_QUEUE_FLUSH", |
---|
| 913 | TMTEST.END_TIME, |
---|
| 914 | TIME_TEST_SUPPORT.OPERATION_COUNT, |
---|
| 915 | OVERHEAD, |
---|
| 916 | 0 |
---|
| 917 | ); |
---|
| 918 | |
---|
| 919 | TEST_SUPPORT.PAUSE; |
---|
| 920 | |
---|
| 921 | -- EVENT_SEND |
---|
| 922 | |
---|
| 923 | TIMER_DRIVER.INITIALIZE; |
---|
| 924 | for INDEX in 1 .. TIME_TEST_SUPPORT.OPERATION_COUNT |
---|
| 925 | loop |
---|
| 926 | DUMMY_RTEMS.EVENT_SEND( ID, EVENTS, STATUS ); |
---|
| 927 | end loop; |
---|
| 928 | TMTEST.END_TIME := TIMER_DRIVER.READ_TIMER; |
---|
| 929 | |
---|
| 930 | TIME_TEST_SUPPORT.PUT_TIME( |
---|
| 931 | "EVENT_SEND", |
---|
| 932 | TMTEST.END_TIME, |
---|
| 933 | TIME_TEST_SUPPORT.OPERATION_COUNT, |
---|
| 934 | OVERHEAD, |
---|
| 935 | 0 |
---|
| 936 | ); |
---|
| 937 | |
---|
| 938 | -- EVENT_RECEIVE |
---|
| 939 | |
---|
| 940 | TIMER_DRIVER.INITIALIZE; |
---|
| 941 | for INDEX in 1 .. TIME_TEST_SUPPORT.OPERATION_COUNT |
---|
| 942 | loop |
---|
| 943 | DUMMY_RTEMS.EVENT_RECEIVE( |
---|
| 944 | RTEMS.EVENT_16, |
---|
| 945 | EVENTS, |
---|
| 946 | RTEMS.DEFAULT_OPTIONS, |
---|
| 947 | TIMEOUT, |
---|
| 948 | STATUS |
---|
| 949 | ); |
---|
| 950 | end loop; |
---|
| 951 | TMTEST.END_TIME := TIMER_DRIVER.READ_TIMER; |
---|
| 952 | |
---|
| 953 | TIME_TEST_SUPPORT.PUT_TIME( |
---|
| 954 | "EVENT_RECEIVE", |
---|
| 955 | TMTEST.END_TIME, |
---|
| 956 | TIME_TEST_SUPPORT.OPERATION_COUNT, |
---|
| 957 | OVERHEAD, |
---|
| 958 | 0 |
---|
| 959 | ); |
---|
| 960 | |
---|
| 961 | -- SIGNAL_CATCH |
---|
| 962 | |
---|
| 963 | TIMER_DRIVER.INITIALIZE; |
---|
| 964 | for INDEX in 1 .. TIME_TEST_SUPPORT.OPERATION_COUNT |
---|
| 965 | loop |
---|
| 966 | DUMMY_RTEMS.SIGNAL_CATCH( |
---|
| 967 | TMTEST.ASR_HANDLER'ACCESS, |
---|
| 968 | RTEMS.DEFAULT_MODES, |
---|
| 969 | STATUS |
---|
| 970 | ); |
---|
| 971 | end loop; |
---|
| 972 | TMTEST.END_TIME := TIMER_DRIVER.READ_TIMER; |
---|
| 973 | |
---|
| 974 | TIME_TEST_SUPPORT.PUT_TIME( |
---|
| 975 | "SIGNAL_CATCH", |
---|
| 976 | TMTEST.END_TIME, |
---|
| 977 | TIME_TEST_SUPPORT.OPERATION_COUNT, |
---|
| 978 | OVERHEAD, |
---|
| 979 | 0 |
---|
| 980 | ); |
---|
| 981 | |
---|
| 982 | -- SIGNAL_SEND |
---|
| 983 | |
---|
| 984 | TIMER_DRIVER.INITIALIZE; |
---|
| 985 | for INDEX in 1 .. TIME_TEST_SUPPORT.OPERATION_COUNT |
---|
| 986 | loop |
---|
| 987 | DUMMY_RTEMS.SIGNAL_SEND( ID, SIGNALS, STATUS ); |
---|
| 988 | end loop; |
---|
| 989 | TMTEST.END_TIME := TIMER_DRIVER.READ_TIMER; |
---|
| 990 | |
---|
| 991 | TIME_TEST_SUPPORT.PUT_TIME( |
---|
| 992 | "SIGNAL_SEND", |
---|
| 993 | TMTEST.END_TIME, |
---|
| 994 | TIME_TEST_SUPPORT.OPERATION_COUNT, |
---|
| 995 | OVERHEAD, |
---|
| 996 | 0 |
---|
| 997 | ); |
---|
| 998 | |
---|
| 999 | -- PARTITION_CREATE |
---|
| 1000 | |
---|
| 1001 | TIMER_DRIVER.INITIALIZE; |
---|
| 1002 | for INDEX in 1 .. TIME_TEST_SUPPORT.OPERATION_COUNT |
---|
| 1003 | loop |
---|
| 1004 | DUMMY_RTEMS.PARTITION_CREATE( |
---|
| 1005 | NAME, |
---|
| 1006 | TMTEST.MEMORY_AREA'ADDRESS, |
---|
| 1007 | 2048, |
---|
| 1008 | 128, |
---|
| 1009 | RTEMS.DEFAULT_ATTRIBUTES, |
---|
| 1010 | ID, |
---|
| 1011 | STATUS |
---|
| 1012 | ); |
---|
| 1013 | end loop; |
---|
| 1014 | TMTEST.END_TIME := TIMER_DRIVER.READ_TIMER; |
---|
| 1015 | |
---|
| 1016 | TIME_TEST_SUPPORT.PUT_TIME( |
---|
| 1017 | "PARTITION_CREATE", |
---|
| 1018 | TMTEST.END_TIME, |
---|
| 1019 | TIME_TEST_SUPPORT.OPERATION_COUNT, |
---|
| 1020 | OVERHEAD, |
---|
| 1021 | 0 |
---|
| 1022 | ); |
---|
| 1023 | |
---|
| 1024 | -- PARTITION_IDENT |
---|
| 1025 | |
---|
| 1026 | TIMER_DRIVER.INITIALIZE; |
---|
| 1027 | for INDEX in 1 .. TIME_TEST_SUPPORT.OPERATION_COUNT |
---|
| 1028 | loop |
---|
| 1029 | DUMMY_RTEMS.PARTITION_IDENT( |
---|
| 1030 | NAME, |
---|
| 1031 | RTEMS.SEARCH_ALL_NODES, |
---|
| 1032 | ID, |
---|
| 1033 | STATUS |
---|
| 1034 | ); |
---|
| 1035 | end loop; |
---|
| 1036 | TMTEST.END_TIME := TIMER_DRIVER.READ_TIMER; |
---|
| 1037 | |
---|
| 1038 | TIME_TEST_SUPPORT.PUT_TIME( |
---|
| 1039 | "PARTITION_IDENT", |
---|
| 1040 | TMTEST.END_TIME, |
---|
| 1041 | TIME_TEST_SUPPORT.OPERATION_COUNT, |
---|
| 1042 | OVERHEAD, |
---|
| 1043 | 0 |
---|
| 1044 | ); |
---|
| 1045 | |
---|
| 1046 | -- PARTITION_DELETE |
---|
| 1047 | |
---|
| 1048 | TIMER_DRIVER.INITIALIZE; |
---|
| 1049 | for INDEX in 1 .. TIME_TEST_SUPPORT.OPERATION_COUNT |
---|
| 1050 | loop |
---|
| 1051 | DUMMY_RTEMS.PARTITION_DELETE( ID, STATUS ); |
---|
| 1052 | end loop; |
---|
| 1053 | TMTEST.END_TIME := TIMER_DRIVER.READ_TIMER; |
---|
| 1054 | |
---|
| 1055 | TIME_TEST_SUPPORT.PUT_TIME( |
---|
| 1056 | "PARTITION_DELETE", |
---|
| 1057 | TMTEST.END_TIME, |
---|
| 1058 | TIME_TEST_SUPPORT.OPERATION_COUNT, |
---|
| 1059 | OVERHEAD, |
---|
| 1060 | 0 |
---|
| 1061 | ); |
---|
| 1062 | |
---|
| 1063 | -- PARTITION_GET_BUFFER |
---|
| 1064 | |
---|
| 1065 | TIMER_DRIVER.INITIALIZE; |
---|
| 1066 | for INDEX in 1 .. TIME_TEST_SUPPORT.OPERATION_COUNT |
---|
| 1067 | loop |
---|
| 1068 | DUMMY_RTEMS.PARTITION_GET_BUFFER( ID, ADDRESS_1, STATUS ); |
---|
| 1069 | end loop; |
---|
| 1070 | TMTEST.END_TIME := TIMER_DRIVER.READ_TIMER; |
---|
| 1071 | |
---|
| 1072 | TIME_TEST_SUPPORT.PUT_TIME( |
---|
| 1073 | "PARTITION_GET_BUFFER", |
---|
| 1074 | TMTEST.END_TIME, |
---|
| 1075 | TIME_TEST_SUPPORT.OPERATION_COUNT, |
---|
| 1076 | OVERHEAD, |
---|
| 1077 | 0 |
---|
| 1078 | ); |
---|
| 1079 | |
---|
| 1080 | -- PARTITION_RETURN_BUFFER |
---|
| 1081 | |
---|
| 1082 | TIMER_DRIVER.INITIALIZE; |
---|
| 1083 | for INDEX in 1 .. TIME_TEST_SUPPORT.OPERATION_COUNT |
---|
| 1084 | loop |
---|
| 1085 | DUMMY_RTEMS.PARTITION_RETURN_BUFFER( ID, ADDRESS_1, STATUS ); |
---|
| 1086 | end loop; |
---|
| 1087 | TMTEST.END_TIME := TIMER_DRIVER.READ_TIMER; |
---|
| 1088 | |
---|
| 1089 | TIME_TEST_SUPPORT.PUT_TIME( |
---|
| 1090 | "PARTITION_RETURN_BUFFER", |
---|
| 1091 | TMTEST.END_TIME, |
---|
| 1092 | TIME_TEST_SUPPORT.OPERATION_COUNT, |
---|
| 1093 | OVERHEAD, |
---|
| 1094 | 0 |
---|
| 1095 | ); |
---|
| 1096 | |
---|
| 1097 | -- REGION_CREATE |
---|
| 1098 | |
---|
| 1099 | TIMER_DRIVER.INITIALIZE; |
---|
| 1100 | for INDEX in 1 .. TIME_TEST_SUPPORT.OPERATION_COUNT |
---|
| 1101 | loop |
---|
| 1102 | DUMMY_RTEMS.REGION_CREATE( |
---|
| 1103 | NAME, |
---|
| 1104 | TMTEST.MEMORY_AREA'ADDRESS, |
---|
| 1105 | 2048, |
---|
| 1106 | 128, |
---|
| 1107 | RTEMS.DEFAULT_ATTRIBUTES, |
---|
| 1108 | ID, |
---|
| 1109 | STATUS |
---|
| 1110 | ); |
---|
| 1111 | end loop; |
---|
| 1112 | TMTEST.END_TIME := TIMER_DRIVER.READ_TIMER; |
---|
| 1113 | |
---|
| 1114 | TIME_TEST_SUPPORT.PUT_TIME( |
---|
| 1115 | "REGION_CREATE", |
---|
| 1116 | TMTEST.END_TIME, |
---|
| 1117 | TIME_TEST_SUPPORT.OPERATION_COUNT, |
---|
| 1118 | OVERHEAD, |
---|
| 1119 | 0 |
---|
| 1120 | ); |
---|
| 1121 | |
---|
| 1122 | -- REGION_IDENT |
---|
| 1123 | |
---|
| 1124 | TIMER_DRIVER.INITIALIZE; |
---|
| 1125 | for INDEX in 1 .. TIME_TEST_SUPPORT.OPERATION_COUNT |
---|
| 1126 | loop |
---|
| 1127 | DUMMY_RTEMS.REGION_IDENT( |
---|
| 1128 | NAME, |
---|
| 1129 | ID, |
---|
| 1130 | STATUS |
---|
| 1131 | ); |
---|
| 1132 | end loop; |
---|
| 1133 | TMTEST.END_TIME := TIMER_DRIVER.READ_TIMER; |
---|
| 1134 | |
---|
| 1135 | TIME_TEST_SUPPORT.PUT_TIME( |
---|
| 1136 | "REGION_IDENT", |
---|
| 1137 | TMTEST.END_TIME, |
---|
| 1138 | TIME_TEST_SUPPORT.OPERATION_COUNT, |
---|
| 1139 | OVERHEAD, |
---|
| 1140 | 0 |
---|
| 1141 | ); |
---|
| 1142 | |
---|
| 1143 | -- REGION_DELETE |
---|
| 1144 | |
---|
| 1145 | TIMER_DRIVER.INITIALIZE; |
---|
| 1146 | for INDEX in 1 .. TIME_TEST_SUPPORT.OPERATION_COUNT |
---|
| 1147 | loop |
---|
| 1148 | DUMMY_RTEMS.REGION_DELETE( ID, STATUS ); |
---|
| 1149 | end loop; |
---|
| 1150 | TMTEST.END_TIME := TIMER_DRIVER.READ_TIMER; |
---|
| 1151 | |
---|
| 1152 | TIME_TEST_SUPPORT.PUT_TIME( |
---|
| 1153 | "REGION_DELETE", |
---|
| 1154 | TMTEST.END_TIME, |
---|
| 1155 | TIME_TEST_SUPPORT.OPERATION_COUNT, |
---|
| 1156 | OVERHEAD, |
---|
| 1157 | 0 |
---|
| 1158 | ); |
---|
| 1159 | |
---|
| 1160 | -- REGION_GET_SEGMENT |
---|
| 1161 | |
---|
| 1162 | TIMER_DRIVER.INITIALIZE; |
---|
| 1163 | for INDEX in 1 .. TIME_TEST_SUPPORT.OPERATION_COUNT |
---|
| 1164 | loop |
---|
| 1165 | DUMMY_RTEMS.REGION_GET_SEGMENT( |
---|
| 1166 | ID, |
---|
| 1167 | 243, |
---|
| 1168 | RTEMS.DEFAULT_OPTIONS, |
---|
| 1169 | TIMEOUT, |
---|
| 1170 | ADDRESS_1, |
---|
| 1171 | STATUS |
---|
| 1172 | ); |
---|
| 1173 | end loop; |
---|
| 1174 | TMTEST.END_TIME := TIMER_DRIVER.READ_TIMER; |
---|
| 1175 | |
---|
| 1176 | TIME_TEST_SUPPORT.PUT_TIME( |
---|
| 1177 | "REGION_GET_SEGMENT", |
---|
| 1178 | TMTEST.END_TIME, |
---|
| 1179 | TIME_TEST_SUPPORT.OPERATION_COUNT, |
---|
| 1180 | OVERHEAD, |
---|
| 1181 | 0 |
---|
| 1182 | ); |
---|
| 1183 | |
---|
| 1184 | -- REGION_RETURN_SEGMENT |
---|
| 1185 | |
---|
| 1186 | TIMER_DRIVER.INITIALIZE; |
---|
| 1187 | for INDEX in 1 .. TIME_TEST_SUPPORT.OPERATION_COUNT |
---|
| 1188 | loop |
---|
| 1189 | DUMMY_RTEMS.REGION_RETURN_SEGMENT( ID, ADDRESS_1, STATUS ); |
---|
| 1190 | end loop; |
---|
| 1191 | TMTEST.END_TIME := TIMER_DRIVER.READ_TIMER; |
---|
| 1192 | |
---|
| 1193 | TIME_TEST_SUPPORT.PUT_TIME( |
---|
| 1194 | "REGION_RETURN_SEGMENT", |
---|
| 1195 | TMTEST.END_TIME, |
---|
| 1196 | TIME_TEST_SUPPORT.OPERATION_COUNT, |
---|
| 1197 | OVERHEAD, |
---|
| 1198 | 0 |
---|
| 1199 | ); |
---|
| 1200 | |
---|
| 1201 | -- PORT_CREATE |
---|
| 1202 | |
---|
| 1203 | TIMER_DRIVER.INITIALIZE; |
---|
| 1204 | for INDEX in 1 .. TIME_TEST_SUPPORT.OPERATION_COUNT |
---|
| 1205 | loop |
---|
| 1206 | DUMMY_RTEMS.PORT_CREATE( |
---|
| 1207 | NAME, |
---|
| 1208 | TMTEST.INTERNAL_PORT_AREA'ADDRESS, |
---|
| 1209 | TMTEST.EXTERNAL_PORT_AREA'ADDRESS, |
---|
| 1210 | TMTEST.INTERNAL_PORT_AREA'LENGTH, |
---|
| 1211 | ID, |
---|
| 1212 | STATUS |
---|
| 1213 | ); |
---|
| 1214 | end loop; |
---|
| 1215 | TMTEST.END_TIME := TIMER_DRIVER.READ_TIMER; |
---|
| 1216 | |
---|
| 1217 | TIME_TEST_SUPPORT.PUT_TIME( |
---|
| 1218 | "PORT_CREATE", |
---|
| 1219 | TMTEST.END_TIME, |
---|
| 1220 | TIME_TEST_SUPPORT.OPERATION_COUNT, |
---|
| 1221 | OVERHEAD, |
---|
| 1222 | 0 |
---|
| 1223 | ); |
---|
| 1224 | |
---|
| 1225 | -- PORT_IDENT |
---|
| 1226 | |
---|
| 1227 | TIMER_DRIVER.INITIALIZE; |
---|
| 1228 | for INDEX in 1 .. TIME_TEST_SUPPORT.OPERATION_COUNT |
---|
| 1229 | loop |
---|
| 1230 | DUMMY_RTEMS.PORT_IDENT( NAME, ID, STATUS ); |
---|
| 1231 | end loop; |
---|
| 1232 | TMTEST.END_TIME := TIMER_DRIVER.READ_TIMER; |
---|
| 1233 | |
---|
| 1234 | TIME_TEST_SUPPORT.PUT_TIME( |
---|
| 1235 | "PORT_IDENT", |
---|
| 1236 | TMTEST.END_TIME, |
---|
| 1237 | TIME_TEST_SUPPORT.OPERATION_COUNT, |
---|
| 1238 | OVERHEAD, |
---|
| 1239 | 0 |
---|
| 1240 | ); |
---|
| 1241 | |
---|
| 1242 | -- PORT_DELETE |
---|
| 1243 | |
---|
| 1244 | TIMER_DRIVER.INITIALIZE; |
---|
| 1245 | for INDEX in 1 .. TIME_TEST_SUPPORT.OPERATION_COUNT |
---|
| 1246 | loop |
---|
| 1247 | DUMMY_RTEMS.PORT_DELETE( ID, STATUS ); |
---|
| 1248 | end loop; |
---|
| 1249 | TMTEST.END_TIME := TIMER_DRIVER.READ_TIMER; |
---|
| 1250 | |
---|
| 1251 | TIME_TEST_SUPPORT.PUT_TIME( |
---|
| 1252 | "PORT_DELETE", |
---|
| 1253 | TMTEST.END_TIME, |
---|
| 1254 | TIME_TEST_SUPPORT.OPERATION_COUNT, |
---|
| 1255 | OVERHEAD, |
---|
| 1256 | 0 |
---|
| 1257 | ); |
---|
| 1258 | |
---|
| 1259 | -- PORT_EXTERNAL_TO_INTERNAL |
---|
| 1260 | |
---|
| 1261 | TIMER_DRIVER.INITIALIZE; |
---|
| 1262 | for INDEX in 1 .. TIME_TEST_SUPPORT.OPERATION_COUNT |
---|
| 1263 | loop |
---|
| 1264 | DUMMY_RTEMS.PORT_EXTERNAL_TO_INTERNAL( |
---|
| 1265 | ID, |
---|
| 1266 | TMTEST.EXTERNAL_PORT_AREA( 7 )'ADDRESS, |
---|
| 1267 | ADDRESS_1, |
---|
| 1268 | STATUS |
---|
| 1269 | ); |
---|
| 1270 | end loop; |
---|
| 1271 | TMTEST.END_TIME := TIMER_DRIVER.READ_TIMER; |
---|
| 1272 | |
---|
| 1273 | TIME_TEST_SUPPORT.PUT_TIME( |
---|
| 1274 | "PORT_EXTERNAL_TO_INTERNAL", |
---|
| 1275 | TMTEST.END_TIME, |
---|
| 1276 | TIME_TEST_SUPPORT.OPERATION_COUNT, |
---|
| 1277 | OVERHEAD, |
---|
| 1278 | 0 |
---|
| 1279 | ); |
---|
| 1280 | |
---|
| 1281 | -- PORT_INTERNAL_TO_EXTERNAL |
---|
| 1282 | |
---|
| 1283 | TIMER_DRIVER.INITIALIZE; |
---|
| 1284 | for INDEX in 1 .. TIME_TEST_SUPPORT.OPERATION_COUNT |
---|
| 1285 | loop |
---|
| 1286 | DUMMY_RTEMS.PORT_INTERNAL_TO_EXTERNAL( |
---|
| 1287 | ID, |
---|
| 1288 | TMTEST.INTERNAL_PORT_AREA( 7 )'ADDRESS, |
---|
| 1289 | ADDRESS_1, |
---|
| 1290 | STATUS |
---|
| 1291 | ); |
---|
| 1292 | end loop; |
---|
| 1293 | TMTEST.END_TIME := TIMER_DRIVER.READ_TIMER; |
---|
| 1294 | |
---|
| 1295 | TIME_TEST_SUPPORT.PUT_TIME( |
---|
| 1296 | "PORT_INTERNAL_TO_EXTERNAL", |
---|
| 1297 | TMTEST.END_TIME, |
---|
| 1298 | TIME_TEST_SUPPORT.OPERATION_COUNT, |
---|
| 1299 | OVERHEAD, |
---|
| 1300 | 0 |
---|
| 1301 | ); |
---|
| 1302 | |
---|
| 1303 | TEST_SUPPORT.PAUSE; |
---|
| 1304 | |
---|
| 1305 | -- IO_INITIALIZE |
---|
| 1306 | |
---|
| 1307 | TIMER_DRIVER.INITIALIZE; |
---|
| 1308 | for INDEX in 1 .. TIME_TEST_SUPPORT.OPERATION_COUNT |
---|
| 1309 | loop |
---|
| 1310 | DUMMY_RTEMS.IO_INITIALIZE( |
---|
| 1311 | MAJOR, |
---|
| 1312 | MINOR, |
---|
| 1313 | ADDRESS_1, |
---|
| 1314 | IO_RESULT, |
---|
| 1315 | STATUS |
---|
| 1316 | ); |
---|
| 1317 | end loop; |
---|
| 1318 | TMTEST.END_TIME := TIMER_DRIVER.READ_TIMER; |
---|
| 1319 | |
---|
| 1320 | TIME_TEST_SUPPORT.PUT_TIME( |
---|
| 1321 | "IO_INITIALIZE", |
---|
| 1322 | TMTEST.END_TIME, |
---|
| 1323 | TIME_TEST_SUPPORT.OPERATION_COUNT, |
---|
| 1324 | OVERHEAD, |
---|
| 1325 | 0 |
---|
| 1326 | ); |
---|
| 1327 | |
---|
| 1328 | -- IO_OPEN |
---|
| 1329 | |
---|
| 1330 | TIMER_DRIVER.INITIALIZE; |
---|
| 1331 | for INDEX in 1 .. TIME_TEST_SUPPORT.OPERATION_COUNT |
---|
| 1332 | loop |
---|
| 1333 | DUMMY_RTEMS.IO_OPEN( |
---|
| 1334 | MAJOR, |
---|
| 1335 | MINOR, |
---|
| 1336 | ADDRESS_1, |
---|
| 1337 | IO_RESULT, |
---|
| 1338 | STATUS |
---|
| 1339 | ); |
---|
| 1340 | end loop; |
---|
| 1341 | TMTEST.END_TIME := TIMER_DRIVER.READ_TIMER; |
---|
| 1342 | |
---|
| 1343 | TIME_TEST_SUPPORT.PUT_TIME( |
---|
| 1344 | "IO_OPEN", |
---|
| 1345 | TMTEST.END_TIME, |
---|
| 1346 | TIME_TEST_SUPPORT.OPERATION_COUNT, |
---|
| 1347 | OVERHEAD, |
---|
| 1348 | 0 |
---|
| 1349 | ); |
---|
| 1350 | |
---|
| 1351 | -- IO_CLOSE |
---|
| 1352 | |
---|
| 1353 | TIMER_DRIVER.INITIALIZE; |
---|
| 1354 | for INDEX in 1 .. TIME_TEST_SUPPORT.OPERATION_COUNT |
---|
| 1355 | loop |
---|
| 1356 | DUMMY_RTEMS.IO_CLOSE( |
---|
| 1357 | MAJOR, |
---|
| 1358 | MINOR, |
---|
| 1359 | ADDRESS_1, |
---|
| 1360 | IO_RESULT, |
---|
| 1361 | STATUS |
---|
| 1362 | ); |
---|
| 1363 | end loop; |
---|
| 1364 | TMTEST.END_TIME := TIMER_DRIVER.READ_TIMER; |
---|
| 1365 | |
---|
| 1366 | TIME_TEST_SUPPORT.PUT_TIME( |
---|
| 1367 | "IO_CLOSE", |
---|
| 1368 | TMTEST.END_TIME, |
---|
| 1369 | TIME_TEST_SUPPORT.OPERATION_COUNT, |
---|
| 1370 | OVERHEAD, |
---|
| 1371 | 0 |
---|
| 1372 | ); |
---|
| 1373 | |
---|
| 1374 | -- IO_READ |
---|
| 1375 | |
---|
| 1376 | TIMER_DRIVER.INITIALIZE; |
---|
| 1377 | for INDEX in 1 .. TIME_TEST_SUPPORT.OPERATION_COUNT |
---|
| 1378 | loop |
---|
| 1379 | DUMMY_RTEMS.IO_READ( |
---|
| 1380 | MAJOR, |
---|
| 1381 | MINOR, |
---|
| 1382 | ADDRESS_1, |
---|
| 1383 | IO_RESULT, |
---|
| 1384 | STATUS |
---|
| 1385 | ); |
---|
| 1386 | end loop; |
---|
| 1387 | TMTEST.END_TIME := TIMER_DRIVER.READ_TIMER; |
---|
| 1388 | |
---|
| 1389 | TIME_TEST_SUPPORT.PUT_TIME( |
---|
| 1390 | "IO_READ", |
---|
| 1391 | TMTEST.END_TIME, |
---|
| 1392 | TIME_TEST_SUPPORT.OPERATION_COUNT, |
---|
| 1393 | OVERHEAD, |
---|
| 1394 | 0 |
---|
| 1395 | ); |
---|
| 1396 | |
---|
| 1397 | -- IO_WRITE |
---|
| 1398 | |
---|
| 1399 | TIMER_DRIVER.INITIALIZE; |
---|
| 1400 | for INDEX in 1 .. TIME_TEST_SUPPORT.OPERATION_COUNT |
---|
| 1401 | loop |
---|
| 1402 | DUMMY_RTEMS.IO_WRITE( |
---|
| 1403 | MAJOR, |
---|
| 1404 | MINOR, |
---|
| 1405 | ADDRESS_1, |
---|
| 1406 | IO_RESULT, |
---|
| 1407 | STATUS |
---|
| 1408 | ); |
---|
| 1409 | end loop; |
---|
| 1410 | TMTEST.END_TIME := TIMER_DRIVER.READ_TIMER; |
---|
| 1411 | |
---|
| 1412 | TIME_TEST_SUPPORT.PUT_TIME( |
---|
| 1413 | "IO_WRITE", |
---|
| 1414 | TMTEST.END_TIME, |
---|
| 1415 | TIME_TEST_SUPPORT.OPERATION_COUNT, |
---|
| 1416 | OVERHEAD, |
---|
| 1417 | 0 |
---|
| 1418 | ); |
---|
| 1419 | |
---|
| 1420 | -- IO_CONTROL |
---|
| 1421 | |
---|
| 1422 | TIMER_DRIVER.INITIALIZE; |
---|
| 1423 | for INDEX in 1 .. TIME_TEST_SUPPORT.OPERATION_COUNT |
---|
| 1424 | loop |
---|
| 1425 | DUMMY_RTEMS.IO_CONTROL( |
---|
| 1426 | MAJOR, |
---|
| 1427 | MINOR, |
---|
| 1428 | ADDRESS_1, |
---|
| 1429 | IO_RESULT, |
---|
| 1430 | STATUS |
---|
| 1431 | ); |
---|
| 1432 | end loop; |
---|
| 1433 | TMTEST.END_TIME := TIMER_DRIVER.READ_TIMER; |
---|
| 1434 | |
---|
| 1435 | TIME_TEST_SUPPORT.PUT_TIME( |
---|
| 1436 | "IO_CONTROL", |
---|
| 1437 | TMTEST.END_TIME, |
---|
| 1438 | TIME_TEST_SUPPORT.OPERATION_COUNT, |
---|
| 1439 | OVERHEAD, |
---|
| 1440 | 0 |
---|
| 1441 | ); |
---|
| 1442 | |
---|
| 1443 | -- FATAL_ERROR_OCCURRED |
---|
| 1444 | |
---|
| 1445 | TIMER_DRIVER.INITIALIZE; |
---|
| 1446 | for INDEX in 1 .. TIME_TEST_SUPPORT.OPERATION_COUNT |
---|
| 1447 | loop |
---|
| 1448 | DUMMY_RTEMS.FATAL_ERROR_OCCURRED( ERROR ); |
---|
| 1449 | end loop; |
---|
| 1450 | TMTEST.END_TIME := TIMER_DRIVER.READ_TIMER; |
---|
| 1451 | |
---|
| 1452 | TIME_TEST_SUPPORT.PUT_TIME( |
---|
| 1453 | "FATAL_ERROR_OCCURRED", |
---|
| 1454 | TMTEST.END_TIME, |
---|
| 1455 | TIME_TEST_SUPPORT.OPERATION_COUNT, |
---|
| 1456 | OVERHEAD, |
---|
| 1457 | 0 |
---|
| 1458 | ); |
---|
| 1459 | |
---|
| 1460 | -- RATE_MONOTONIC_CREATE |
---|
| 1461 | |
---|
| 1462 | TIMER_DRIVER.INITIALIZE; |
---|
| 1463 | for INDEX in 1 .. TIME_TEST_SUPPORT.OPERATION_COUNT |
---|
| 1464 | loop |
---|
| 1465 | DUMMY_RTEMS.RATE_MONOTONIC_CREATE( NAME, ID, STATUS ); |
---|
| 1466 | end loop; |
---|
| 1467 | TMTEST.END_TIME := TIMER_DRIVER.READ_TIMER; |
---|
| 1468 | |
---|
| 1469 | TIME_TEST_SUPPORT.PUT_TIME( |
---|
| 1470 | "RATE_MONOTONIC_CREATE", |
---|
| 1471 | TMTEST.END_TIME, |
---|
| 1472 | TIME_TEST_SUPPORT.OPERATION_COUNT, |
---|
| 1473 | OVERHEAD, |
---|
| 1474 | 0 |
---|
| 1475 | ); |
---|
| 1476 | |
---|
| 1477 | -- RATE_MONOTONIC_IDENT |
---|
| 1478 | |
---|
| 1479 | TIMER_DRIVER.INITIALIZE; |
---|
| 1480 | for INDEX in 1 .. TIME_TEST_SUPPORT.OPERATION_COUNT |
---|
| 1481 | loop |
---|
| 1482 | DUMMY_RTEMS.RATE_MONOTONIC_IDENT( |
---|
| 1483 | NAME, |
---|
| 1484 | ID, |
---|
| 1485 | STATUS |
---|
| 1486 | ); |
---|
| 1487 | end loop; |
---|
| 1488 | TMTEST.END_TIME := TIMER_DRIVER.READ_TIMER; |
---|
| 1489 | |
---|
| 1490 | TIME_TEST_SUPPORT.PUT_TIME( |
---|
| 1491 | "RATE_MONOTONIC_IDENT", |
---|
| 1492 | TMTEST.END_TIME, |
---|
| 1493 | TIME_TEST_SUPPORT.OPERATION_COUNT, |
---|
| 1494 | OVERHEAD, |
---|
| 1495 | 0 |
---|
| 1496 | ); |
---|
| 1497 | |
---|
| 1498 | -- RATE_MONOTONIC_DELETE |
---|
| 1499 | |
---|
| 1500 | TIMER_DRIVER.INITIALIZE; |
---|
| 1501 | for INDEX in 1 .. TIME_TEST_SUPPORT.OPERATION_COUNT |
---|
| 1502 | loop |
---|
| 1503 | DUMMY_RTEMS.RATE_MONOTONIC_DELETE( ID, STATUS ); |
---|
| 1504 | end loop; |
---|
| 1505 | TMTEST.END_TIME := TIMER_DRIVER.READ_TIMER; |
---|
| 1506 | |
---|
| 1507 | TIME_TEST_SUPPORT.PUT_TIME( |
---|
| 1508 | "RATE_MONOTONIC_DELETE", |
---|
| 1509 | TMTEST.END_TIME, |
---|
| 1510 | TIME_TEST_SUPPORT.OPERATION_COUNT, |
---|
| 1511 | OVERHEAD, |
---|
| 1512 | 0 |
---|
| 1513 | ); |
---|
| 1514 | |
---|
| 1515 | -- RATE_MONOTONIC_CANCEL |
---|
| 1516 | |
---|
| 1517 | TIMER_DRIVER.INITIALIZE; |
---|
| 1518 | for INDEX in 1 .. TIME_TEST_SUPPORT.OPERATION_COUNT |
---|
| 1519 | loop |
---|
| 1520 | DUMMY_RTEMS.RATE_MONOTONIC_CANCEL( ID, STATUS ); |
---|
| 1521 | end loop; |
---|
| 1522 | TMTEST.END_TIME := TIMER_DRIVER.READ_TIMER; |
---|
| 1523 | |
---|
| 1524 | TIME_TEST_SUPPORT.PUT_TIME( |
---|
| 1525 | "RATE_MONOTONIC_CANCEL", |
---|
| 1526 | TMTEST.END_TIME, |
---|
| 1527 | TIME_TEST_SUPPORT.OPERATION_COUNT, |
---|
| 1528 | OVERHEAD, |
---|
| 1529 | 0 |
---|
| 1530 | ); |
---|
| 1531 | |
---|
| 1532 | -- RATE_MONOTONIC_PERIOD |
---|
| 1533 | |
---|
| 1534 | TIMER_DRIVER.INITIALIZE; |
---|
| 1535 | for INDEX in 1 .. TIME_TEST_SUPPORT.OPERATION_COUNT |
---|
| 1536 | loop |
---|
| 1537 | DUMMY_RTEMS.RATE_MONOTONIC_PERIOD( ID, TIMEOUT, STATUS ); |
---|
| 1538 | end loop; |
---|
| 1539 | TMTEST.END_TIME := TIMER_DRIVER.READ_TIMER; |
---|
| 1540 | |
---|
| 1541 | TIME_TEST_SUPPORT.PUT_TIME( |
---|
| 1542 | "RATE_MONOTONIC_PERIOD", |
---|
| 1543 | TMTEST.END_TIME, |
---|
| 1544 | TIME_TEST_SUPPORT.OPERATION_COUNT, |
---|
| 1545 | OVERHEAD, |
---|
| 1546 | 0 |
---|
| 1547 | ); |
---|
| 1548 | |
---|
| 1549 | -- MULTIPROCESSING_ANNOUNCE |
---|
| 1550 | |
---|
| 1551 | TIMER_DRIVER.INITIALIZE; |
---|
| 1552 | for INDEX in 1 .. TIME_TEST_SUPPORT.OPERATION_COUNT |
---|
| 1553 | loop |
---|
| 1554 | DUMMY_RTEMS.MULTIPROCESSING_ANNOUNCE; |
---|
| 1555 | end loop; |
---|
| 1556 | TMTEST.END_TIME := TIMER_DRIVER.READ_TIMER; |
---|
| 1557 | |
---|
| 1558 | TIME_TEST_SUPPORT.PUT_TIME( |
---|
| 1559 | "MULTIPROCESSING_ANNOUNCE", |
---|
| 1560 | TMTEST.END_TIME, |
---|
| 1561 | TIME_TEST_SUPPORT.OPERATION_COUNT, |
---|
| 1562 | OVERHEAD, |
---|
| 1563 | 0 |
---|
| 1564 | ); |
---|
| 1565 | |
---|
| 1566 | RTEMS.SHUTDOWN_EXECUTIVE( 0 ); |
---|
| 1567 | |
---|
| 1568 | end TASK_1; |
---|
| 1569 | |
---|
| 1570 | end TMTEST; |
---|