source: anotherchoice/tags/jsp-1.4.4-full-UTF8/tools/WINDOWS/sample2.c@ 26

Last change on this file since 26 was 26, checked in by ykominami, 12 years ago

initial

File size: 4.0 KB
Line 
1/*
2 * TOPPERS/JSP Kernel
3 * Toyohashi Open Platform for Embedded Real-Time Systems/
4 * Just Standard Profile Kernel
5 *
6 * Copyright (C) 2000-2002 by Embedded and Real-Time Systems Laboratory
7 * Toyohashi Univ. of Technology, JAPAN
8 *
9 * 上記著作権者
10は,以下の (1)〜(4) の条件か,Free Software Foundation
11 * によってå…
12¬è¡¨ã•ã‚Œã¦ã„ã‚‹ GNU General Public License の Version 2 に記
13 * 述されている条件を満たす場合に限り,本ソフトウェア(本ソフトウェア
14 * を改変したものを含む.以下同じ)を使用・複製・改変・再é…
15å¸ƒï¼ˆä»¥ä¸‹ï¼Œ
16 * 利用と呼ぶ)することを無償で許諾する.
17 * (1) 本ソフトウェアをソースコードの形で利用する場合には,上記の著作
18 * 権表示,この利用条件および下記の無保証規定が,そのままの形でソー
19 * スコード中に含まれていること.
20 * (2) 本ソフトウェアを,ライブラリ形式など,他のソフトウェア開発に使
21 * 用できる形で再é…
22å¸ƒã™ã‚‹å ´åˆã«ã¯ï¼Œå†é…
23å¸ƒã«ä¼´ã†ãƒ‰ã‚­ãƒ¥ãƒ¡ãƒ³ãƒˆï¼ˆåˆ©ç”¨
24 * 者
25マニュアルなど)に,上記の著作権表示,この利用条件および下記
26 * の無保証規定を掲載すること.
27 * (3) 本ソフトウェアを,機器に組み込むなど,他のソフトウェア開発に使
28 * 用できない形で再é…
29å¸ƒã™ã‚‹å ´åˆã«ã¯ï¼Œæ¬¡ã®ã„ずれかの条件を満たすこ
30 * と.
31 * (a) 再é…
32å¸ƒã«ä¼´ã†ãƒ‰ã‚­ãƒ¥ãƒ¡ãƒ³ãƒˆï¼ˆåˆ©ç”¨è€…
33マニュアルなど)に,上記の著
34 * 作権表示,この利用条件および下記の無保証規定を掲載すること.
35 * (b) 再é…
36å¸ƒã®å½¢æ…
37‹ã‚’,別に定める方法によって,TOPPERSプロジェクトに
38 * 報告すること.
39 * (4) 本ソフトウェアの利用により直接的または間接的に生じるいかなる損
40 * 害からも,上記著作権者
41およびTOPPERSプロジェクトをå…
42è²¬ã™ã‚‹ã“と.
43 *
44 * 本ソフトウェアは,無保証で提供されているものである.上記著作権者
45お
46 * よびTOPPERSプロジェクトは,本ソフトウェアに関して,その適用可能性も
47 * 含めて,いかなる保証も行わない.また,本ソフトウェアの利用により直
48 * 接的または間接的に生じたいかなる損害に関しても,その責任を負わない.
49 *
50 * @(#) $Id: sample2.c,v 1.11 2003/12/24 08:23:58 takayuki Exp $
51 */
52
53
54/*
55 * TOPPERS/JSP サンプルプログラム - 5人の哲学者
56による哲学者
57問題 -
58 * デバイスエミュレーション デモ
59 * Last update : 23rd, February, 2001
60 */
61
62#include <t_services.h>
63#include "kernel_id.h"
64#include "sample2.h"
65#include "device.h"
66#include "debugout.h"
67
68void task(VP_INT exinf)
69{
70 ID tskid = (ID)exinf ;
71
72 while(1==1)
73 {
74 set_flg(1,0x10 | (tskid-1)); /* 空è…
75¹ */
76 if(pol_sem(tskid) == E_OK)
77 {
78 if(pol_sem( 1 + (tskid + 4 - 1) % 5 ) == E_OK)
79 {
80 set_flg(1,0x20 | (tskid-1)); /* 食事 */
81 dly_tsk(1000 * tskid);
82
83 set_flg(1,0x40 | (tskid-1)); /* 満è…
84¹ */
85 sig_sem( 1 + (tskid + 4 - 1) % 5 );
86 sig_sem(tskid);
87 dly_tsk(1000 * tskid);
88 continue;
89 }else
90 sig_sem(tskid);
91 }
92 dly_tsk(1000 * tskid);
93 }
94}
95
96void main_task(VP_INT exinf)
97{
98 char patternchar[5] = {'.','-','O','.','z'};
99 FLGPTN ptn;
100 char buffer[6] = "-----";
101
102
103 serial_ctl_por(TASK_PORTID, (IOCTL_CRLF | IOCTL_FCSND | IOCTL_FCRCV));
104 syslog_1(LOG_NOTICE,"Sample program starts (exinf = %d)", exinf);
105
106 act_tsk(1);
107 act_tsk(2);
108 act_tsk(3);
109 act_tsk(4);
110 act_tsk(5);
111
112 do{
113 wai_flg(1, 0xf0, TWF_ORW, &ptn);
114 if((ptn & 0xf) >= 5)
115 continue;
116
117 OnDevice DeviceWrite(100,4,&ptn);
118
119 if( buffer[ptn & 0xf] != patternchar[(ptn >> 4) & 0xf] )
120 {
121 buffer[ptn & 0xf] = patternchar[(ptn >> 4) & 0xf];
122 syslog_5(LOG_NOTICE,"%c%c%c%c%c",buffer[0],buffer[1],buffer[2],buffer[3],buffer[4]);
123 DebugOut(buffer);
124 DebugOut("\n");
125 }
126 }while(1==1);
127}
Note: See TracBrowser for help on using the repository browser.