small fixes and add "gmake test"
[tedtools.git] / shmem.c
1 /*
2  * Copyright (c) 2004 Teodor Sigaev <teodor@sigaev.ru>
3  * All rights reserved.
4  *
5  * Redistribution and use in source and binary forms, with or without
6  * modification, are permitted provided that the following conditions
7  * are met:
8  * 1. Redistributions of source code must retain the above copyright
9  *        notice, this list of conditions and the following disclaimer.
10  * 2. Redistributions in binary form must reproduce the above copyright
11  *        notice, this list of conditions and the following disclaimer in the
12  *        documentation and/or other materials provided with the distribution.
13  * 3. Neither the name of the author nor the names of any co-contributors
14  *        may be used to endorse or promote products derived from this software
15  *        without specific prior written permission.
16  *
17  * THIS SOFTWARE IS PROVIDED BY CONTRIBUTORS ``AS IS'' AND ANY EXPRESS
18  * OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
19  * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
20  * ARE DISCLAIMED. IN NO EVENT SHALL CONTRIBUTORS BE LIABLE FOR ANY
21  * DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
22  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE
23  * GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
24  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER
25  * IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
26  * OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN
27  * IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
28  */
29 #include <stdio.h>
30 #include <stdlib.h>
31 #include <string.h>
32 #include <sys/types.h> 
33 #include <sys/ipc.h>
34 #include <sys/sem.h>
35 #include <sys/shm.h>
36 #include <errno.h>
37
38 #include "tlog.h"
39 #include "shmem.h"
40
41 #define KEY 101
42 #define PATH    "/bin"
43
44 void *
45 attachSharedMemory(int key, char *path, int size, int rdonly) {
46         key_t shm_key;
47         int shm_id, flags=0;
48         void *shm;
49
50         if ( size>0 && rdonly )
51                 return NULL;
52
53         shm_key = ftok( (path) ? path : PATH, (key) ? key : KEY);    /* Get IPC key */
54         if ((int) shm_key == -1) 
55                 tlog(TL_CRIT|TL_EXIT, "Ftok error: %s", strerror(errno));
56
57         if (size > 0) 
58                 flags = IPC_CREAT | IPC_EXCL | 0644;
59
60         shm_id = shmget(shm_key, size, flags); /* Get SHM segment */
61         if (shm_id == -1) {
62                 if ( errno == EEXIST || errno == ENOENT )
63                         return NULL;
64                 else
65                          tlog(TL_CRIT|TL_EXIT, "shmget error: %s", strerror(errno));
66         }
67
68         flags = ( rdonly ) ? SHM_RDONLY : 0;
69
70         shm = shmat(shm_id, 0, flags);      /* Attach SHM segment */
71         if ( (int)shm == -1 )
72                 tlog(TL_CRIT|TL_EXIT, "shmat error: %s", strerror(errno));
73  
74         return shm;
75 }
76  
77 void 
78 detachSharedMemory(void *shm) {
79         if ( shmdt(shm) == -1 )
80                 tlog(TL_CRIT, "shmdt error: %s", strerror(errno));
81 }
82
83 int
84 attachSemaphore(int key, char *path) {
85         key_t shm_key;
86         int sem_id;
87
88         shm_key = ftok( (path) ? path : PATH, (key) ? key : KEY);    /* Get IPC key */
89         if ((int) shm_key == -1)
90                 tlog(TL_CRIT|TL_EXIT, "Ftok error: %s", strerror(errno));
91
92         sem_id = semget(shm_key, 1, 0);
93         if ( sem_id == -1 ) {
94                 if ( errno == ENOENT ) { /* not exists */
95                         sem_id = semget(shm_key, 1, IPC_CREAT | IPC_EXCL | 0644);
96                         if ( sem_id == -1 )
97                                 tlog(TL_CRIT|TL_EXIT, "semget error: %s", strerror(errno));
98                         if ( semctl( sem_id, 0, SETVAL, 1 ) == -1 )
99                                 tlog(TL_CRIT|TL_EXIT, "sysctl error: %s", strerror(errno));
100                 } else 
101                         tlog(TL_CRIT|TL_EXIT, "semget error: %s", strerror(errno));
102         }
103         return sem_id;
104 }
105
106 void releaseSemaphore(int sem_id) {
107         struct sembuf sem;
108
109         sem.sem_num = 0;
110         sem.sem_flg = 0;
111         sem.sem_op =  1;
112
113         if (semop(sem_id, &sem, 1) == -1) 
114                 tlog(TL_CRIT|TL_EXIT, "semop error: %s", strerror(errno));
115 }
116         
117 void lockSemaphore(int sem_id) {
118         struct sembuf sem;
119
120         sem.sem_num = 0;
121         sem.sem_flg = 0;
122         sem.sem_op = -1;
123
124         if (semop(sem_id, &sem, 1) == -1) 
125                 tlog(TL_CRIT|TL_EXIT, "semop error: %s", strerror(errno));
126 }
127         
128         
129