|
ArcaOS 5.0 Russian
Russian ARCAOS exists and it's available since the middle of 2017.
All versions are supported: 5.0, 5.0.1, 5.0.2.
eCo Software is able release OS/2 LIP packages for any other language
(German, Dutch, Brazilian Portuguese, Spanish, Sweden, etc)
|
TITLE: Interaction of processes
DATE: 2012-08-11 17:56:09
AUTHOR: Capricorn
Please use online translator go to http://translate.google.com and request the translation of http://ru.ecomstation./showarticle.php?id=273 to your language |
........
..... ..........., ....... ..... .... ... ............. OS (. . .... ... ...... .......... .. ..........) .... ... ...... ............ . .............. .......... .............. ..... ........... ..........., ....... ...... ........ . ....... . OS/2 ... .... .... .......... ......... ..........: ........, ....., ..... (...........) ......, ........ .... . ....... ..... ... .....-..... ....... . ............ ....... .......... .., .. ....... . ..... ...... ......-.. ........ .......... .. ... ......, .......... ............. .... ...... ...... - ........ ........... ...... ......... . .... ............ .. .. .............. .. ......., .......... ...... ....
........
........ ...... ..... ....: ............. .......... . ........ ...... .... 2 .........: "....." . "........". .... ............. ....... . ..., ... ............... ....... ........ ........., ..... .. ......., . .... .., ............ ..... .......... 2 .... .........: ...... . ........
.) ....... .... "event" (".......") ..... ... ...., ..... ......... ...... ..... ........., .... ...... .... ........ ......... .......
......:
/*************/
/* */
/* ....... 1 */
/* */
/*************/
#define INCL_DOS
#include
PSZ szSemName = "\\SEM32\\EVENT"; /* ... ......... ...... ..... ....... \SEM32\ */
HEV hevEvent1 = 0; /* .......... ........ */
if (DosCreateEventSem(szSemName, /* ... ............ ........ */
&hevEvent1, /* .... ..... ......... .......... ........ */
DC_SEM_SHARED, /* ........... ....... */
FALSE)) /* ....... ....... . .......... (.......) ......... */
return 1; /* ....... ....... .. ....... */
/* ... ...-.. ......
.. ..... ....... ...... .... ..... .....
............ (............) ........ */
DosPostEventSem(hevEvent); /* ......... ........ ......... (............) */
/* .......... ...... */
DosCloseEventSem(hevEvent1); /* ........... .. ........ */
/*************/
/* */
/* ....... 2 */
/* */
/*************/
..... (pipes)
[..........]
........... ......
[..........]
.......
... .... ...... .............. ..... .......... - ....... (queues). ... ... .......... ....., ....... ......-.. ........ ......... . ...... .... (pipes). .. ... ......, .......... ............. ..... ..... ....... ........... ....... ........ .., ... ..-........
...., ....... ............ ..... ........ ...... ............ ... ...-.. .......... ....... ......... Presentation Manager'., .. .... ............ ........, ....... .. ..... .. ....... ....... ........ ....... . ..., ... .. ...... .. ........, ....... ..... ........ .. ...... . ...... .........., ........ (FIFO), .. . . ...... ..... (LIFO), . ....., .. ............
....... ...... ............
.... ....., .... ....... (....), ....... .. ....... ....... ........, ....... ....... . ....... ..., ...... (....... .. .........), ......... .. . ..... .... .......... .........., ... ............ ....... ....... ............ .....
......:
/**********************/
/* */
/* ....... 1 (......) */
/* */
/**********************/
#define INCL_DOS
#include
#define QUEUE_FIFO 0 // .......
#define QUEUE_LIFO 1 // ....
#define QUEUE_PRIO 2 // .. ...........
#define MSG_QUIT 0x0001 /* ............. ......... ... .......... ..... */
#define QUEUE_NAME "\\QUEUES\\special.que" /* ... ........
* ...... ..... ....... \QUEUES\
*/
/* ......., ....... ..... ............ ......... */
BOOL processMessage(ULONG ulMessageId, ULONG ulDataSize, PVOID pvData);
int main(void)
.
HQUEUE hQueue; /* .... ..... ....... ..... ....... */
APIRET rc; /* ......... ...... ....... API */
/* ......... ....... */
rc = DosCreateQueue(&hQueue, QUEUE_FIFO, QUE_NAME);
if (rc)
return rc;
/* .... ......... ......... .. ....... */
while(TRUE)
.
REQUESTDATA requestData; /* ......... ... ......... ...... ....... */
ULONG ulDataSize; /* .... ..... ....... ..... .......... ...... */
PVOID pvData; /* .... ..... ........ ...... .. .......... ...... */
rc = DosReadQueue(hQueue, /* ..... ....... */
&requestData, /* ...... ....... */
&ulDataSize, /* ..... .......... ...... */
&pvData, /* .......... ...... */
0, /* ...... ...... ....... .. ....... */
FALSE, /* .... */
0, /* ......... .. ..... */
NULLHANDLE); /* ..... ........-....... .. ..... */
if (rc || requestData.ulData==MSG_QUIT)
break;
processMessage(ulMessageId, ulDataSize, pvData);
.
rc = DosCloseQueue(hQueue); /* ....... ....... */
return rc;
.
/**********************/
/* */
/* ....... 2 (......) */
/* */
/**********************/
#define MSG_QUIT 0x0001 /* ............. ......... ... .......... ..... */
#define QUEUE_NAME "\\QUEUES\\special.que" /* ... ........
* ...... ..... ....... \QUEUES\
#define INCL_DOS
#include
int main(void)
.
HQUEUE hQueue; /* .... ..... ....... ..... ....... */
APIRET rc; /* ......... ...... ....... API */
PID pid; /* ............. ........, .......... ....... */
/* ......... ....... */
rc = DosOpenQueue(&pid, &hQueue, QUE_NAME);
if (rc)
return rc;
rc = DosWriteQueue(hQueue, MSG_QUIT, 0L, NULL, 0L); /* .......... . ....... .........*/
rc = DosCloseQueue(hQueue); /* ......... ....... */
return rc;
.
. ...... ....... .. ...... ....... ....... . ....... ........ ...... ....... ......... ....... . .......... .... ............ .... ......... . .......... ...... (MSG_QUIT). ...... ......., ....... ... ........., ......... .... .......
........ ........, ... ....... DosCloseQueue() .. ...., ....... ..... ........ ... ...... ... ...... ....... ..... ......., ........ . .... ........
... . ... .. ............ ........ ..... .......? .... . ..., ... ... ............. .... .. .......... ..... .... . ........... ....... ....... ... ......, ..... .......... ......... .......... ....... ...... ....... .. ..... ...... ..... ...... .... ...... ....., ..... .... ....... ....... ....... . ..... ........ ... ......... .....-.. ......., .. ....... ...... ....... ...... ............ . ...... ...... ....... ....... ......., .. .. ........., .......... . ....... ... ... . ........ ..... .........
Test the program:
|
Where can I find utilities aimed to collect system information? SysInfo homepage.
|
Kommentare: Kommentiere diesen Artikel.
|
eComStation it's a reactive system, comfortable to use. 'Pre-emptive' multitasking + support of multi-processor/multi-core computers since 1994 + major part of programs are using Multi-threading. |
|
|
|
IBM OS/2 Warp
|