开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > 操作系统开发 > 查看源码
TEST13.C
资源名称：ertos.rar　[点击查看]
上传用户：sunrenlu
上传日期：2022-06-13
资源大小：1419k
文件大小：2k
源码类别：

操作系统开发

开发平台：

DOS

TEST13.C：源码内容
  1. /**************************************************************************/
  2. /* test13                                                                 */
  3. /* This example demonstrates rt_yield(), rt_sleep(0), rt_sleep(500)       */
  4. /**************************************************************************/
  6. #include <stdio.h>
  7. #include <stdlib.h>
  8. #include <conio.h>
  9. #include <rtos.h>
  11. /*********************************************************/
  12. void test(DWORD arg)
  13. {
  14.     int i = 0;
  15.     kwindow( 1, 1, 80, 6 );
  16.     while ( 1 ) {
  17.         cprintf("%u ", i++);
  18.         switch ( arg ) {
  19.             case 0 : rt_yield(); break;
  20.             case 1 : rt_sleep( 0 ); break;
  21.             case 2 : rt_sleep( 100 );
  22.         }
  23.     }
  24. }
  26. /*********************************************************/
  27. void heartbeat(DWORD arg)
  28. {
  29.     int i = 0;
  31.     kwindow( 1, 6, 80, 12 );
  32.     cputs("Heartbeat threadrn");
  34.     /* run at low priority */
  35.     rt_setpriority( NULL, 127 );
  37.     while ( 1 ) {
  38.         cprintf("%u ", i++);
  39.         rt_sleep(0);
  40.     }
  41. }
  43. void runtest( DWORD testnum, char *s )
  44. {
  45.     void *x, *hb;
  47.     hb = rt_newthread( heartbeat, 0, 4096, 0, "heartbeat");
  48.     x = rt_newthread( test,  testnum ,4096, 0, "worker" );
  49.     cputs(s);
  51.     /* let the test run, then stop it */
  52.     rt_sleep( 3000 );
  53.     kdestroythread( x );
  54.     kdestroythread( hb );
  56.     /* signal the user */
  57.     sound( 100 );
  58.     rt_sleep( 20 );
  59.     nosound();
  60. }
  61. /*--------------------------------------------------------------------*/
  63. main(int argc, char **argv)
  64. {
  65.     int i;
  67.     kdebug = 1;
  68.     rt_init( 100 );
  69.     kwindow( 1, 12, 80, 25 );
  71.     rt_timerfreq( 100 );
  73.     cputs("The top window executes at normal priority, the second window is low priorityrn");
  74.     cputs("This demonstrates the effects of a normal program yielding and sleepingrnn");
  76.     /* rt_yield() */
  77.     runtest( 0, "Top thread is calling rt_yield()rn"
  78.                 "Only yields to similar or higher priority threads. Heartbeat does not qualify.rnn");
  80.     /* rt_sleep( 0 ) */
  81.     runtest( 1, "Now, top thread is calling rt_sleep( 0 )rn"
  82.                 "Yields current time slice, even low priority threads get a chancernn");
  84.     /* rt_sleep( 1 ) */
  85.     runtest( 2, "Now, top thread is calling rt_sleep( 100 )rn"
  86.                 "Sleeps for a spell, allowing other threads to execute for 100msn");
  88. }