source: roaraudio/libroar/libroar.c @ 5961:06e7fd9e4c25

Last change on this file since 5961:06e7fd9e4c25 was 5961:06e7fd9e4c25, checked in by phi, 10 years ago

Updates of copyright and license headers

File size: 8.2 KB
Line 
1//libroar.c:
2
3/*
4 *      Copyright (C) Philipp 'ph3-der-loewe' Schafft - 2008-2014
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=%" LIBROAR__ll "u): can not sleep: not implemented", (LIBROAR__longlong 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 pid_t ret;
182
183 if ( api == NULL )
184  api = &_libroar_forkapi;
185
186 if ( api->fork == NULL ) {
187  roar_err_set(ROAR_ERROR_INVAL);
188  return -1;
189 }
190
191 if ( api->prefork != NULL ) {
192  if ( api->prefork(&context, api->userdata) != 0 ) {
193   if ( api->failed != NULL )
194    api->failed(&context, api->userdata);
195
196   if ( context != NULL )
197    roar_mm_free_noerror(context);
198   return (pid_t)-1;
199  }
200 }
201
202 if ( (ret = api->fork(&context, api->userdata)) == (pid_t)-1 ) {
203  if ( api->failed != NULL )
204   api->failed(&context, api->userdata);
205
206  if ( context != NULL )
207   roar_mm_free_noerror(context);
208  return (pid_t)-1;
209 }
210
211 if ( ret == (pid_t)0 ) {
212  if ( api->child != NULL )
213   api->child(&context, api->userdata);
214 } else {
215  if ( api->parent != NULL )
216   api->parent(&context, api->userdata, ret);
217 }
218
219 if ( context != NULL )
220  roar_mm_free_noerror(context);
221
222 return ret;
223}
224
225int roar_reset(enum roar_reset what) {
226 char c;
227 int i;
228 enum roar_reset subsets = ROAR_RESET_NONE;
229
230 roar_err_set(ROAR_ERROR_NONE);
231
232 switch (what) {
233  case ROAR_RESET_NONE:
234    return 0;
235   break;
236  case ROAR_RESET_UNKNOWN:
237  case ROAR_RESET_EOL:
238    roar_err_set(ROAR_ERROR_INVAL);
239    return -1;
240   break;
241  case ROAR_RESET_ON_FORK:
242    subsets |= ROAR_RESET_MEMORY|ROAR_RESET_RANDOMPOOL;
243   break;
244  case ROAR_RESET_ON_EXIT:
245  case ROAR_RESET_ON_PRE_EXEC:
246    subsets |= ROAR_RESET_MEMORY|ROAR_RESET_CONFIG;
247   break;
248  default:
249    if ( what & 0x80 ) {
250     subsets |= what;
251    } else {
252     roar_err_set(ROAR_ERROR_INVAL);
253     return -1;
254    }
255   break;
256 }
257
258 // strip 0x80 so we can easly test on the other bit per subsystem.
259 what |= 0x80;
260 what -= 0x80;
261
262 if ( what & ROAR_RESET_MEMORY ) {
263  (void)roar_mm_reset();
264 }
265
266 if ( what & ROAR_RESET_CONFIG ) {
267  roar_libroar_reset_config();
268 }
269
270 if ( what & ROAR_RESET_RANDOMPOOL ) {
271  for (i = 0; i < 16; i++) {
272   roar_random_gen_nonce(&c, 1);
273   roar_random_uint16();
274   roar_random_uint32();
275  }
276 }
277
278 roar_err_set(ROAR_ERROR_NONE);
279 return 0;
280}
281
282void roar_panic_real(enum roar_fatal_error error, const char * info,
283                     unsigned long int line, const char * file, const char * prefix, const char * func) {
284 const char * errname = NULL;
285//#define ROAR_ERR(format, args...)  roar_debug_msg(ROAR_DEBUG_TYPE_ERROR, __LINE__, __FILE__, ROAR_DBG_PREFIX, format, ## args)
286
287 // we do not support info-text at the moment.
288 (void)info;
289
290 if ( func == NULL )
291  func = "<unknown>";
292
293 switch (error) {
294  case ROAR_FATAL_ERROR_MEMORY_CORRUPTION_GUARD:
295    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);
296    return;
297   break;
298  case ROAR_FATAL_ERROR_UNKNOWN:
299    errname = "<unknown error>";
300   break;
301  case ROAR_FATAL_ERROR_MEMORY_CORRUPTION:
302    errname = "Memory corruption";
303   break;
304  case ROAR_FATAL_ERROR_CPU_FAILURE:
305    errname = "CPU failure, replace hardware";
306   break;
307  case ROAR_FATAL_ERROR_MEMORY_USED_AFTER_FREE:
308    errname = "Memory used after free";
309   break;
310  case ROAR_FATAL_ERROR_MEMORY_DOUBLE_FREE:
311    errname = "Memory double freed";
312   break;
313  case ROAR_FATAL_ERROR_WATCHDOG:
314    errname = "Watchdog Timeout";
315   break;
316  default:
317    errname = "<unknown error code, BAD>";
318   break;
319 }
320
321 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);
322
323#ifdef SIGKILL
324 raise(SIGKILL);
325#endif
326 abort();
327#ifdef ROAR_HAVE_U_EXIT
328 ROAR_U_EXIT(1);
329#endif
330
331 while(1);
332}
333
334const char   * roar_version_string(void) {
335 return ROAR_VERSION_STRING;
336}
337
338uint32_t roar_version_num(void) {
339 return _ROAR_MKVERSION(ROAR_VERSION_MAJOR, ROAR_VERSION_MINOR, ROAR_VERSION_REV);
340}
341
342//ll
Note: See TracBrowser for help on using the repository browser.