![]() |
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 00077 #include <stdio.h> 00078 #include <string.h> 00079 #include <errno.h> 00080 #include <stm/system.h> 00081 00082 00087 StmAbstractType (SampleItemType) /* SampleSharedMemory */ 00088 00089 00094 struct SampleItemTypeImpl_ 00095 { 00096 int counter; 00097 double value; 00098 }; 00099 00103 static int stmSampleItemTypeInit (SampleItemType item, void *data) 00104 { 00105 item -> counter = 0; 00106 item -> value = * (double *) data; 00107 return 0; 00108 } 00109 00113 static int stmSampleItemTypeDeinit (SampleItemType item) 00114 { 00115 return 0; 00116 } 00117 00120 StmSharedMemoryItemDefine (SampleItemType, 100) /* SampleSharedMemory */ 00121 00122 00124 static StmSharedMemorySampleItemType shm; 00125 00138 int main (int argc, char **argv) 00139 { 00140 pid_t child = (pid_t) -1; 00141 int i; 00142 double begval = 0.99; 00143 shm = stmSharedMemorySampleItemTypeCreate 00144 ( 00145 argc == 1 ? "SampelItemTypeTestShm%p" : argv [1], 00146 StmAttach, 00147 &begval 00148 ); 00149 if (!shm) 00150 { 00151 printf ("Process %d: stmSharedMemorySampleItemTypeCreate failed: %s\n", 00152 getpid (), strerror (errno)); 00153 exit (1); 00154 } 00155 if (argc == 1) 00156 { 00157 char *const childArgv [] = 00158 { 00159 argv [0], 00160 (char *) stmSharedMemorySampleItemTypeName (shm), 00161 NULL 00162 }; 00163 if ((child = stmProcessSpawn (argv [0], childArgv, StmFalse)) < 0) 00164 { 00165 printf ("%s: stmProcessSpawn failed: %s\n", 00166 argv [0], strerror (errno)); 00167 exit (1); 00168 } 00169 } 00170 for (i = 0; i < 10; ++ i) 00171 { 00172 SampleItemType item = stmSharedMemorySampleItemTypeLock (shm); 00173 if (!item) 00174 { 00175 printf ("Process %d: stmSharedMemorySampleItemTypeLock failed: %s\n", 00176 getpid (), strerror (errno)); 00177 } 00178 else 00179 { 00180 ++ item -> counter; 00181 item -> value = (item -> value - 0.1) * 1.25; 00182 printf ("Process %d: Counter: %d, value: %f\n", 00183 getpid (), item -> counter, item -> value); 00184 stmSharedMemorySampleItemTypeUnlock (shm); 00185 stmSleepMs (10); 00186 } 00187 } 00188 stmSharedMemorySampleItemTypeDestroy (shm); 00189 if (child > 0) 00190 { 00191 stmProcessWait (child, NULL); 00192 } 00193 return 0; 00194 } 00195 00196
© Copyright Tom Michaelis 2002-2007
Distributed under the SysToMath Software License (See the accompanying file license.txt or a copy at www.SysToMath.com).