src/error.c

Wed, 08 Nov 2023 21:53:43 +0100

author
Mike Becker <universe@uap-core.de>
date
Wed, 08 Nov 2023 21:53:43 +0100
changeset 14
9dbfc0031887
parent 7
9dd76cbd6c90
child 15
362b7659dc76
permissions
-rw-r--r--

remove C++ support

0
593b60458157 initial commit
Mike Becker <universe@uap-core.de>
parents:
diff changeset
1 /*
593b60458157 initial commit
Mike Becker <universe@uap-core.de>
parents:
diff changeset
2 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS HEADER.
593b60458157 initial commit
Mike Becker <universe@uap-core.de>
parents:
diff changeset
3 * Copyright 2023 Mike Becker. All rights reserved.
593b60458157 initial commit
Mike Becker <universe@uap-core.de>
parents:
diff changeset
4 *
593b60458157 initial commit
Mike Becker <universe@uap-core.de>
parents:
diff changeset
5 * Redistribution and use in source and binary forms, with or without
593b60458157 initial commit
Mike Becker <universe@uap-core.de>
parents:
diff changeset
6 * modification, are permitted provided that the following conditions are met:
593b60458157 initial commit
Mike Becker <universe@uap-core.de>
parents:
diff changeset
7 *
593b60458157 initial commit
Mike Becker <universe@uap-core.de>
parents:
diff changeset
8 * 1. Redistributions of source code must retain the above copyright
593b60458157 initial commit
Mike Becker <universe@uap-core.de>
parents:
diff changeset
9 * notice, this list of conditions and the following disclaimer.
593b60458157 initial commit
Mike Becker <universe@uap-core.de>
parents:
diff changeset
10 *
593b60458157 initial commit
Mike Becker <universe@uap-core.de>
parents:
diff changeset
11 * 2. Redistributions in binary form must reproduce the above copyright
593b60458157 initial commit
Mike Becker <universe@uap-core.de>
parents:
diff changeset
12 * notice, this list of conditions and the following disclaimer in the
593b60458157 initial commit
Mike Becker <universe@uap-core.de>
parents:
diff changeset
13 * documentation and/or other materials provided with the distribution.
593b60458157 initial commit
Mike Becker <universe@uap-core.de>
parents:
diff changeset
14 *
593b60458157 initial commit
Mike Becker <universe@uap-core.de>
parents:
diff changeset
15 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
593b60458157 initial commit
Mike Becker <universe@uap-core.de>
parents:
diff changeset
16 * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
593b60458157 initial commit
Mike Becker <universe@uap-core.de>
parents:
diff changeset
17 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
593b60458157 initial commit
Mike Becker <universe@uap-core.de>
parents:
diff changeset
18 * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE
593b60458157 initial commit
Mike Becker <universe@uap-core.de>
parents:
diff changeset
19 * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
593b60458157 initial commit
Mike Becker <universe@uap-core.de>
parents:
diff changeset
20 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
593b60458157 initial commit
Mike Becker <universe@uap-core.de>
parents:
diff changeset
21 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
593b60458157 initial commit
Mike Becker <universe@uap-core.de>
parents:
diff changeset
22 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
593b60458157 initial commit
Mike Becker <universe@uap-core.de>
parents:
diff changeset
23 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
593b60458157 initial commit
Mike Becker <universe@uap-core.de>
parents:
diff changeset
24 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
593b60458157 initial commit
Mike Becker <universe@uap-core.de>
parents:
diff changeset
25 * POSSIBILITY OF SUCH DAMAGE.
593b60458157 initial commit
Mike Becker <universe@uap-core.de>
parents:
diff changeset
26 */
593b60458157 initial commit
Mike Becker <universe@uap-core.de>
parents:
diff changeset
27
7
9dd76cbd6c90 improve code structure
Mike Becker <universe@uap-core.de>
parents: 6
diff changeset
28 #include "ascension/context.h"
9dd76cbd6c90 improve code structure
Mike Becker <universe@uap-core.de>
parents: 6
diff changeset
29 #include "ascension/error.h"
9dd76cbd6c90 improve code structure
Mike Becker <universe@uap-core.de>
parents: 6
diff changeset
30 #include "ascension/utils.h"
0
593b60458157 initial commit
Mike Becker <universe@uap-core.de>
parents:
diff changeset
31
7
9dd76cbd6c90 improve code structure
Mike Becker <universe@uap-core.de>
parents: 6
diff changeset
32 #include <cx/buffer.h>
0
593b60458157 initial commit
Mike Becker <universe@uap-core.de>
parents:
diff changeset
33
593b60458157 initial commit
Mike Becker <universe@uap-core.de>
parents:
diff changeset
34 void asc_error_cchar(char const* text) {
593b60458157 initial commit
Mike Becker <universe@uap-core.de>
parents:
diff changeset
35 asc_error_cxstr(cx_str(text));
593b60458157 initial commit
Mike Becker <universe@uap-core.de>
parents:
diff changeset
36 }
593b60458157 initial commit
Mike Becker <universe@uap-core.de>
parents:
diff changeset
37
593b60458157 initial commit
Mike Becker <universe@uap-core.de>
parents:
diff changeset
38 void asc_error_cuchar(unsigned char const* text) {
593b60458157 initial commit
Mike Becker <universe@uap-core.de>
parents:
diff changeset
39 asc_error_cxstr(cx_str((char const*)text));
593b60458157 initial commit
Mike Becker <universe@uap-core.de>
parents:
diff changeset
40 }
593b60458157 initial commit
Mike Becker <universe@uap-core.de>
parents:
diff changeset
41
593b60458157 initial commit
Mike Becker <universe@uap-core.de>
parents:
diff changeset
42 void asc_error_cxstr(cxstring text) {
593b60458157 initial commit
Mike Becker <universe@uap-core.de>
parents:
diff changeset
43 if (text.length == 0) return;
593b60458157 initial commit
Mike Becker <universe@uap-core.de>
parents:
diff changeset
44
593b60458157 initial commit
Mike Becker <universe@uap-core.de>
parents:
diff changeset
45 // write error to debug output
593b60458157 initial commit
Mike Becker <universe@uap-core.de>
parents:
diff changeset
46 asc_dprintf("ERROR: %*.s", (int)text.length, text.ptr);
593b60458157 initial commit
Mike Becker <universe@uap-core.de>
parents:
diff changeset
47
593b60458157 initial commit
Mike Becker <universe@uap-core.de>
parents:
diff changeset
48 // write error to buffer
593b60458157 initial commit
Mike Becker <universe@uap-core.de>
parents:
diff changeset
49 CxBuffer* buf = &asc_context.error_buffer;
593b60458157 initial commit
Mike Becker <universe@uap-core.de>
parents:
diff changeset
50 cxBufferWrite(text.ptr, 1, text.length, buf);
593b60458157 initial commit
Mike Becker <universe@uap-core.de>
parents:
diff changeset
51 cxBufferPut(buf, '\n');
593b60458157 initial commit
Mike Becker <universe@uap-core.de>
parents:
diff changeset
52
593b60458157 initial commit
Mike Becker <universe@uap-core.de>
parents:
diff changeset
53 asc_set_flag(&asc_context.flags, ASC_FLAG_HAS_ERROR);
593b60458157 initial commit
Mike Becker <universe@uap-core.de>
parents:
diff changeset
54 }
593b60458157 initial commit
Mike Becker <universe@uap-core.de>
parents:
diff changeset
55
593b60458157 initial commit
Mike Becker <universe@uap-core.de>
parents:
diff changeset
56 bool asc_has_error(void) {
593b60458157 initial commit
Mike Becker <universe@uap-core.de>
parents:
diff changeset
57 return asc_test_flag(asc_context.flags, ASC_FLAG_HAS_ERROR);
593b60458157 initial commit
Mike Becker <universe@uap-core.de>
parents:
diff changeset
58 }
593b60458157 initial commit
Mike Becker <universe@uap-core.de>
parents:
diff changeset
59
593b60458157 initial commit
Mike Becker <universe@uap-core.de>
parents:
diff changeset
60 char const* asc_get_error(void) {
593b60458157 initial commit
Mike Becker <universe@uap-core.de>
parents:
diff changeset
61 // we zero-terminate the current buffer contents before providing them
593b60458157 initial commit
Mike Becker <universe@uap-core.de>
parents:
diff changeset
62 cxBufferPut(&asc_context.error_buffer, 0);
593b60458157 initial commit
Mike Becker <universe@uap-core.de>
parents:
diff changeset
63 --asc_context.error_buffer.pos;
593b60458157 initial commit
Mike Becker <universe@uap-core.de>
parents:
diff changeset
64 --asc_context.error_buffer.size;
593b60458157 initial commit
Mike Becker <universe@uap-core.de>
parents:
diff changeset
65 return asc_context.error_buffer.space;
593b60458157 initial commit
Mike Becker <universe@uap-core.de>
parents:
diff changeset
66 }
593b60458157 initial commit
Mike Becker <universe@uap-core.de>
parents:
diff changeset
67
593b60458157 initial commit
Mike Becker <universe@uap-core.de>
parents:
diff changeset
68 void asc_clear_error(void) {
593b60458157 initial commit
Mike Becker <universe@uap-core.de>
parents:
diff changeset
69 cxBufferClear(&asc_context.error_buffer);
593b60458157 initial commit
Mike Becker <universe@uap-core.de>
parents:
diff changeset
70 asc_clear_flag(&asc_context.flags, ASC_FLAG_HAS_ERROR);
593b60458157 initial commit
Mike Becker <universe@uap-core.de>
parents:
diff changeset
71 }

mercurial