source: roaraudio/libroar/libroar.c @ 4998:b404387a2080

Last change on this file since 4998:b404387a2080 was 4998:b404387a2080, checked in by phi, 11 years ago

Updated roar_panic() (Closes: #132)

File size: 5.6 KB
Line 
1//libroar.c:
2
3/*
4 *      Copyright (C) Philipp 'ph3-der-loewe' Schafft - 2008-2011
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#else
141 while (t)
142  t = sleep(t);
143#endif
144
145 return 0;
146}
147
148int roar_reset(int forked) {
149 char c;
150 int i;
151
152 roar_err_set(ROAR_ERROR_NONE);
153
154 for (i = 0; i < 16; i++) {
155  roar_random_gen_nonce(&c, 1);
156  roar_random_uint16();
157  roar_random_uint32();
158 }
159
160 return 0;
161}
162
163void roar_panic_real(enum roar_fatal_error error, const char * info,
164                     unsigned long int line, const char * file, const char * prefix, const char * func) {
165 const char * errname = NULL;
166//#define ROAR_ERR(format, args...)  roar_debug_msg(ROAR_DEBUG_TYPE_ERROR, __LINE__, __FILE__, ROAR_DBG_PREFIX, format, ## args)
167
168 if ( func == NULL )
169  func = "<unknown>";
170
171 switch (error) {
172  case ROAR_FATAL_ERROR_MEMORY_CORRUPTION_GUARD:
173    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);
174    return;
175   break;
176  case ROAR_FATAL_ERROR_UNKNOWN:
177    errname = "<unknown error>";
178   break;
179  case ROAR_FATAL_ERROR_MEMORY_CORRUPTION:
180    errname = "Memory corruption";
181   break;
182  case ROAR_FATAL_ERROR_CPU_FAILURE:
183    errname = "CPU failure, replace hardware";
184   break;
185  case ROAR_FATAL_ERROR_MEMORY_USED_AFTER_FREE:
186    errname = "Memory used after free";
187   break;
188  case ROAR_FATAL_ERROR_MEMORY_DOUBLE_FREE:
189    errname = "Memory double freed";
190   break;
191  default:
192    errname = "<unknown error code, BAD>";
193   break;
194 }
195
196 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);
197
198#ifdef SIGKILL
199 raise(SIGKILL);
200#endif
201 abort();
202
203 while(1);
204}
205
206const char   * roar_version_string(void) {
207 return ROAR_VERSION_STRING;
208}
209
210uint32_t roar_version_num(void) {
211 return _ROAR_MKVERSION(ROAR_VERSION_MAJOR, ROAR_VERSION_MINOR, ROAR_VERSION_REV);
212}
213
214//ll
Note: See TracBrowser for help on using the repository browser.