Bump zlib to 1.3.1, 1.3 is no longer available.
[harbours.git] / msim / misc.c
blob3cba260eff5fb8603fbbe8c868286e9de3570fa0
1 /*
2 * Copyright (c) 2012 Vojtech Horky
3 * All rights reserved.
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
7 * are met:
9 * - Redistributions of source code must retain the above copyright
10 * notice, this list of conditions and the following disclaimer.
11 * - Redistributions in binary form must reproduce the above copyright
12 * notice, this list of conditions and the following disclaimer in the
13 * documentation and/or other materials provided with the distribution.
14 * - The name of the author may not be used to endorse or promote products
15 * derived from this software without specific prior written permission.
17 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
18 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
19 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
20 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
21 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
22 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
23 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
24 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
25 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
26 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
29 /** @addtogroup msim
30 * @{
32 /** @file HelenOS specific functions for MSIM simulator.
34 #include "../../io/input.h"
35 #include "../../io/output.h"
36 #include "../../device/dprinter.h"
37 #include "../../debug/gdb.h"
38 #include "../../cmd.h"
39 #include "../../fault.h"
40 #include "../../device/machine.h"
41 #include "helenos.h"
42 #include <malloc.h>
43 #include <ctype.h>
44 #include <stdio.h>
45 #include <stdlib.h>
47 /* Define when the dprinter device shall try to filter
48 * out ANSI escape sequences.
50 #define IGNORE_ANSI_ESCAPE_SEQUENCES
51 /* Define when you want the ANSI escape sequences to be dumped as
52 * hex numbers.
54 // #define DUMP_ANSI_ESCAPE_SEQUENCES
56 void interactive_control(void)
58 tobreak = false;
60 if (reenter) {
61 mprintf("\n");
62 reenter = false;
65 stepping = 0;
67 while (interactive) {
68 char *commline = helenos_input_get_next_command();
69 if (commline == NULL) {
70 mprintf("Quit\n");
71 input_back();
72 exit(1);
75 /* Check for empty input. */
76 if (commline[0] == '\0') {
77 interpret("step");
78 } else {
79 interpret(commline);
82 free(commline);
86 bool gdb_remote_init(void)
88 return false;
91 void gdb_session(void)
95 void gdb_handle_event(gdb_event_t event)
100 static void (*original_printer_write)(cpu_t *, device_s *, ptr_t, uint32_t);
101 static void helenos_printer_write(cpu_t *cpu, device_s *dev, ptr_t addr, uint32_t val)
103 #ifdef IGNORE_ANSI_ESCAPE_SEQUENCES
104 static bool inside_ansi_escape = false;
105 static bool just_ended_ansi_escape = false;
107 if (inside_ansi_escape) {
108 #ifdef DUMP_ANSI_ESCAPE_SEQUENCES
109 fprintf(stderr, "%02" PRIx32 "'%c' ", val, val >= 32 ? val : '?');
110 #endif
111 if (isalpha((int) val)) {
112 just_ended_ansi_escape = true;
113 inside_ansi_escape = false;
114 #ifdef DUMP_ANSI_ESCAPE_SEQUENCES
115 fprintf(stderr, " [END]\n");
116 #endif
119 return;
122 if (val == 0x1B) {
123 inside_ansi_escape = true;
125 if (!just_ended_ansi_escape) {
126 #ifdef DUMP_ANSI_ESCAPE_SEQUENCES
127 fprintf(stderr, "\n");
128 #endif
130 #ifdef DUMP_ANSI_ESCAPE_SEQUENCES
131 fprintf(stderr, "ESC sequence: ");
132 #endif
134 return;
137 just_ended_ansi_escape = false;
138 #endif
140 (*original_printer_write)(cpu, dev, addr, val);
143 void helenos_dprinter_init(void)
145 original_printer_write = dprinter.write;
146 dprinter.write = helenos_printer_write;