![]() |
Home | Libraries | Author | Links |
00001 /* ***** BEGIN LICENSE BLOCK ***** 00002 * Version: MPL 1.1/GPL 2.0/LGPL 2.1 00003 * 00004 * The contents of this file are subject to the Mozilla Public License Version 00005 * 1.1 (the "License"); you may not use this file except in compliance with 00006 * the License. You may obtain a copy of the License at 00007 * http://www.mozilla.org/MPL/ 00008 * 00009 * Software distributed under the License is distributed on an "AS IS" basis, 00010 * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License 00011 * for the specific language governing rights and limitations under the 00012 * License. 00013 * 00014 * The Original Code is the SysToMath C Libraries package (LibStmC). 00015 * 00016 * The Initial Developer of the Original Code is 00017 * Tom Michaelis, SysToMath. 00018 * Portions created by the Initial Developer are Copyright (C) 1994-2006 00019 * the Initial Developer. All Rights Reserved. 00020 * 00021 * Contributor(s): 00022 * 00023 * Alternatively, the contents of this file may be used under the terms of 00024 * either the GNU General Public License Version 2 or later (the "GPL"), or 00025 * the GNU Lesser General Public License Version 2.1 or later (the "LGPL"), 00026 * in which case the provisions of the GPL or the LGPL are applicable instead 00027 * of those above. If you wish to allow use of your version of this file only 00028 * under the terms of either the GPL or the LGPL, and not to allow others to 00029 * use your version of this file under the terms of the MPL, indicate your 00030 * decision by deleting the provisions above and replace them with the notice 00031 * and other provisions required by the GPL or the LGPL. If you do not delete 00032 * the provisions above, a recipient may use your version of this file under 00033 * the terms of any one of the MPL, the GPL or the LGPL. 00034 * 00035 * ***** END LICENSE BLOCK ***** */ 00036 00037 /****************************************************************************** 00038 * First Release 1994-07-20 00039 ******************************************************************************/ 00040 00041 00069 #include <stdio.h> 00070 #include <string.h> 00071 #include <errno.h> 00072 #include <stm/system.h> 00073 00086 int main (int argc, char **argv) 00087 { 00088 struct 00089 { 00090 StmSemaphore semaphore; 00091 char *msg; 00092 } 00093 data [] = 00094 { 00095 { 00096 NULL, 00097 "Ping" 00098 }, 00099 { 00100 NULL, 00101 "Pong" 00102 } 00103 }; 00104 int i, j, k; 00105 char suff [16]; 00106 char name [32]; 00107 if (argc == 1) 00108 { 00109 char *const childArgv [] = {argv [0], suff, NULL}; 00110 sprintf (suff, "%d", getpid ()); 00111 if (stmProcessSpawn (argv [0], childArgv, StmFalse) < 0) 00112 { 00113 printf ("%s: stmProcessSpawn failed: %s\n", 00114 argv [0], strerror (errno)); 00115 exit (1); 00116 } 00117 j = 0; 00118 } 00119 else 00120 { 00121 strcpy (suff, argv [1]); 00122 j = 1; 00123 } 00124 for (k = 0; k < 2; ++ k) 00125 { 00126 sprintf (name, "TestSemaphore%s%s", data [k].msg, suff); 00127 if (! (data [k].semaphore = stmSemaphoreCreate (name, 1 - k, StmAttach))) 00128 { 00129 printf ("Process %d: stmSemaphoreCreate for '%s' failed: %s\n", 00130 getpid (), name, strerror (errno)); 00131 } 00132 } 00133 for (i = 0; i < 10; ++ i) 00134 { 00135 if (stmSemaphoreTimedAcquire (data [j].semaphore, stmGetMsTime () + 500)) 00136 { 00137 printf ("Process %d: stmSemaphoreAcquire for '%s' failed: %s\n", 00138 getpid (), stmSemaphoreName (data [j].semaphore), strerror (errno)); 00139 exit (1); 00140 } 00141 printf ("Process %d: %s\n", getpid (), data [j].msg); 00142 if (stmSemaphoreRelease (data [1 - j].semaphore)) 00143 { 00144 printf ("Process %d: stmSemaphoreRelease for '%s' failed: %s\n", 00145 getpid (), stmSemaphoreName (data [1 - j].semaphore), strerror (errno)); 00146 exit (1); 00147 } 00148 } 00149 stmSemaphoreDestroy (data [0].semaphore); 00150 stmSemaphoreDestroy (data [1].semaphore); 00151 return 0; 00152 } 00153 00154
© Copyright Tom Michaelis 2002-2007
Distributed under the SysToMath Software License (See the accompanying file license.txt or a copy at www.SysToMath.com).