source: roaraudio/libroar/libroar.c @ 5419:655954f5b684

Last change on this file since 5419:655954f5b684 was 5390:95fe0821d953, checked in by phi, 12 years ago

only fork() if we have fork()

File size: 8.2 KB
Line 
1//libroar.c:
2
3/*
4 *      Copyright (C) Philipp 'ph3-der-loewe' Schafft - 2008-2012
5 *
6 *  This file is part of libroar a part of RoarAudio,
7 *  a cross-platform sound system for both, home and professional use.
8 *  See README for details.
9 *
10 *  This file is free software; you can redistribute it and/or modify
11 *  it under the terms of the GNU General Public License version 3
12 *  as published by the Free Software Foundation.
13 *
14 *  libroar is distributed in the hope that it will be useful,
15 *  but WITHOUT ANY WARRANTY; without even the implied warranty of
16 *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
17 *  GNU General Public License for more details.
18 *
19 *  You should have received a copy of the GNU General Public License
20 *  along with this software; see the file COPYING.  If not, write to
21 *  the Free Software Foundation, 51 Franklin Street, Fifth Floor,
22 *  Boston, MA 02110-1301, USA.
23 *
24 *  NOTE for everyone want's to change something and send patches:
25 *  read README and HACKING! There a addition information on
26 *  the license of this document you need to read before you send
27 *  any patches.
28 *
29 *  NOTE for uses of non-GPL (LGPL,...) software using libesd, libartsc
30 *  or libpulse*:
31 *  The libs libroaresd, libroararts and libroarpulse link this lib
32 *  and are therefore GPL. Because of this it may be illigal to use
33 *  them with any software that uses libesd, libartsc or libpulse*.
34 */
35
36/* ckport options:
37 * ckport: ignore-symbol: sleep of target win32   -- checked by configure
38 */
39
40#include "libroar.h"
41
42#ifndef roar_mm_mlock
43int roar_mm_mlock(const void *addr, size_t len) {
44#if defined(ROAR_TARGET_WIN32)
45 /* GlobalLock() generates errors. Maybe we do not use correctly.
46  * We just ignore that at the moment and throw NOSYS.
47  *
48  * return GlobalLock(addr) == addr ? 0 : -1;
49  */
50 roar_err_set(ROAR_ERROR_NOSYS);
51 return -1;
52#elif defined(ROAR_TARGET_MICROCONTROLLER)
53 return 0;
54#elif defined(_SC_PAGESIZE)
55 long sz = sysconf(_SC_PAGESIZE);
56 unsigned long int pos = (unsigned long int) addr;
57
58 len += sz - (len % sz);
59
60 pos -= pos % sz;
61
62 return mlock((void*)pos, len);
63#else
64 roar_err_set(ROAR_ERROR_NOSYS);
65 return -1;
66#endif
67}
68#endif
69
70#ifndef roar_mm_munlock
71int roar_mm_munlock(const void *addr, size_t len) {
72#if defined(ROAR_TARGET_WIN32)
73 // TODO: find out what do do here. GlobalUnLock()? does such a function exist?
74// return GlobalLock(addr) == addr ? 0 : -1;
75 roar_err_set(ROAR_ERROR_NOSYS);
76 return -1;
77#elif defined(ROAR_TARGET_MICROCONTROLLER)
78 return 0;
79#elif defined(_SC_PAGESIZE)
80 long sz = sysconf(_SC_PAGESIZE);
81 unsigned long int pos = (unsigned long int) addr;
82
83 len += sz - (len % sz);
84
85 pos -= pos % sz;
86
87 return munlock((void*)pos, len);
88#else
89 roar_err_set(ROAR_ERROR_NOSYS);
90 return -1;
91#endif
92}
93#endif
94
95// for compatibility with old versions:
96int _ROAR_MLOCK(const void *addr, size_t len) {
97 roar_debug_warn_obsolete("_ROAR_MLOCK", "roar_mm_mlock", NULL);
98 return roar_mm_mlock(addr, len);
99}
100
101int roar_usleep(uint_least32_t t) {
102#ifdef ROAR_TARGET_WIN32
103 Sleep(t/(uint_least32_t)1000);
104 return 0;
105#elif defined(ROAR_HAVE_NANOSLEEP)
106 struct timespec tv;
107 struct timespec left;
108
109 if ( t > (uint_least32_t)1000000 ) {
110  tv.tv_sec  = t/(uint_least32_t)1000000;
111  t         -= tv.tv_sec*(uint_least32_t)1000000;
112 } else {
113  tv.tv_sec  = 0;
114 }
115
116 tv.tv_nsec = t*(uint_least32_t)1000;
117
118 while (nanosleep(&tv, &left) == -1)
119  memcpy(&tv, &left, sizeof(tv));
120 return 0;
121#elif defined(ROAR_HAVE_USLEEP)
122 usleep(t);
123 return 0;
124#else
125 ROAR_ERR("roar_usleep(t=%llu): can not sleep: not implemented", (long long unsigned int)t);
126 roar_strap(ROAR_TRAP_GROUP_LIBROAR, "usleep.not-implemented");
127 roar_err_set(ROAR_ERROR_NOSYS);
128 return -1;
129#endif
130}
131
132int roar_sleep(int t) {
133 if ( t < 0 ) {
134  roar_err_set(ROAR_ERROR_CAUSALITY);
135  return -1;
136 }
137
138#ifdef ROAR_TARGET_WIN32
139 Sleep(1000L*(long)t);
140#elif defined(ROAR_HAVE_SLEEP)
141 while (t)
142  t = sleep(t);
143#else
144 while (t) {
145  if ( roar_usleep(500000) == -1 )
146   return -1;
147  if ( roar_usleep(500000) == -1 )
148   return -1;
149  t--;
150 }
151#endif
152
153 return 0;
154}
155
156static pid_t _libroar_fork(void ** context, void * userdata) {
157#ifdef ROAR_HAVE_FORK
158 pid_t ret;
159 (void)context, (void)userdata;
160 ret = fork();
161 if ( ret == -1 )
162  roar_err_from_errno();
163 return ret;
164#else
165 roar_err_set(ROAR_ERROR_NOSYS);
166 return (pid_t)-1;
167#endif
168}
169
170static const struct roar_libroar_forkapi _libroar_forkapi = {
171 .prefork   = NULL,
172 .fork      = _libroar_fork,
173 .failed    = NULL,
174 .parent    = NULL,
175 .child     = NULL,
176 .userdata  = NULL
177};
178
179pid_t roar_fork(const struct roar_libroar_forkapi * api) {
180 void * context = NULL;
181 int err;
182 pid_t ret;
183
184 if ( api == NULL )
185  api = &_libroar_forkapi;
186
187 if ( api->fork == NULL ) {
188  roar_err_set(ROAR_ERROR_INVAL);
189  return -1;
190 }
191
192 if ( api->prefork != NULL ) {
193  if ( api->prefork(&context, api->userdata) != 0 ) {
194   if ( api->failed != NULL )
195    api->failed(&context, api->userdata);
196
197   if ( context != NULL ) {
198    err = roar_error;
199    roar_mm_free(context);
200    roar_error = err;
201   }
202   return (pid_t)-1;
203  }
204 }
205
206 if ( (ret = api->fork(&context, api->userdata)) == (pid_t)-1 ) {
207  if ( api->failed != NULL )
208   api->failed(&context, api->userdata);
209
210  if ( context != NULL ) {
211   err = roar_error;
212   roar_mm_free(context);
213   roar_error = err;
214  }
215  return (pid_t)-1;
216 }
217
218 if ( ret == (pid_t)0 ) {
219  if ( api->child != NULL )
220   api->child(&context, api->userdata);
221 } else {
222  if ( api->parent != NULL )
223   api->parent(&context, api->userdata, ret);
224 }
225
226 if ( context != NULL ) {
227  err = roar_error;
228  roar_mm_free(context);
229  roar_error = err;
230 }
231
232 return ret;
233}
234
235int roar_reset(enum roar_reset what) {
236 char c;
237 int i;
238 enum roar_reset subsets = ROAR_RESET_NONE;
239
240 roar_err_set(ROAR_ERROR_NONE);
241
242 switch (what) {
243  case ROAR_RESET_NONE:
244    return 0;
245   break;
246  case ROAR_RESET_UNKNOWN:
247  case ROAR_RESET_EOL:
248    roar_err_set(ROAR_ERROR_INVAL);
249    return -1;
250   break;
251  case ROAR_RESET_ON_FORK:
252    subsets |= ROAR_RESET_MEMORY|ROAR_RESET_RANDOMPOOL;
253   break;
254  case ROAR_RESET_ON_EXIT:
255  case ROAR_RESET_ON_PRE_EXEC:
256    subsets |= ROAR_RESET_MEMORY|ROAR_RESET_CONFIG;
257   break;
258  default:
259    if ( what & 0x80 ) {
260     subsets |= what;
261    } else {
262     roar_err_set(ROAR_ERROR_INVAL);
263     return -1;
264    }
265   break;
266 }
267
268 // strip 0x80 so we can easly test on the other bit per subsystem.
269 what |= 0x80;
270 what -= 0x80;
271
272 if ( what & ROAR_RESET_MEMORY ) {
273  (void)roar_mm_reset();
274 }
275
276 if ( what & ROAR_RESET_CONFIG ) {
277  roar_libroar_reset_config();
278 }
279
280 if ( what & ROAR_RESET_RANDOMPOOL ) {
281  for (i = 0; i < 16; i++) {
282   roar_random_gen_nonce(&c, 1);
283   roar_random_uint16();
284   roar_random_uint32();
285  }
286 }
287
288 roar_err_set(ROAR_ERROR_NONE);
289 return 0;
290}
291
292void roar_panic_real(enum roar_fatal_error error, const char * info,
293                     unsigned long int line, const char * file, const char * prefix, const char * func) {
294 const char * errname = NULL;
295//#define ROAR_ERR(format, args...)  roar_debug_msg(ROAR_DEBUG_TYPE_ERROR, __LINE__, __FILE__, ROAR_DBG_PREFIX, format, ## args)
296
297 // we do not support info-text at the moment.
298 (void)info;
299
300 if ( func == NULL )
301  func = "<unknown>";
302
303 switch (error) {
304  case ROAR_FATAL_ERROR_MEMORY_CORRUPTION_GUARD:
305    roar_debug_msg(ROAR_DEBUG_TYPE_ERROR, line, file, prefix, "in %s() a guard segment memory corruption was detected. Backup your data and terminate this program. Report this lion to developer. Thanks.", func);
306    return;
307   break;
308  case ROAR_FATAL_ERROR_UNKNOWN:
309    errname = "<unknown error>";
310   break;
311  case ROAR_FATAL_ERROR_MEMORY_CORRUPTION:
312    errname = "Memory corruption";
313   break;
314  case ROAR_FATAL_ERROR_CPU_FAILURE:
315    errname = "CPU failure, replace hardware";
316   break;
317  case ROAR_FATAL_ERROR_MEMORY_USED_AFTER_FREE:
318    errname = "Memory used after free";
319   break;
320  case ROAR_FATAL_ERROR_MEMORY_DOUBLE_FREE:
321    errname = "Memory double freed";
322   break;
323  default:
324    errname = "<unknown error code, BAD>";
325   break;
326 }
327
328 roar_debug_msg(ROAR_DEBUG_TYPE_ERROR, line, file, prefix, "in %s() a _FATAL_ error of type \"%s\" was detected. Terminating program. Report this lion to developer. Thanks.", func, errname);
329
330#ifdef SIGKILL
331 raise(SIGKILL);
332#endif
333 abort();
334
335 while(1);
336}
337
338const char   * roar_version_string(void) {
339 return ROAR_VERSION_STRING;
340}
341
342uint32_t roar_version_num(void) {
343 return _ROAR_MKVERSION(ROAR_VERSION_MAJOR, ROAR_VERSION_MINOR, ROAR_VERSION_REV);
344}
345
346//ll
Note: See TracBrowser for help on using the repository browser.