ugBASIC 1.18
An isomorphic BASIC language compiler for retrocomputers
Loading...
Searching...
No Matches
dojo.c
Go to the documentation of this file.
1/*****************************************************************************
2 * ugBASIC - an isomorphic BASIC language compiler for retrocomputers *
3 *****************************************************************************
4 * Copyright 2021-2026 Marco Spedaletti (asimov@mclink.it)
5 *
6 * Licensed under the Apache License, Version 2.0 (the "License");
7 * you may not use this file except in compliance with the License.
8 * You may obtain a copy of the License at
9 *
10 * http://www.apache.org/licenses/LICENSE-2.0
11 *
12 * Unless required by applicable law or agreed to in writing, software
13 * distributed under the License is distributed on an "AS IS" BASIS,
14 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
15 * See the License for the specific language governing permissions and
16 * limitations under the License.
17 *----------------------------------------------------------------------------
18 * Concesso in licenza secondo i termini della Licenza Apache, versione 2.0
19 * (la "Licenza"); è proibito usare questo file se non in conformità alla
20 * Licenza. Una copia della Licenza è disponibile all'indirizzo:
21 *
22 * http://www.apache.org/licenses/LICENSE-2.0
23 *
24 * Se non richiesto dalla legislazione vigente o concordato per iscritto,
25 * il software distribuito nei termini della Licenza è distribuito
26 * "COSÌ COM'È", SENZA GARANZIE O CONDIZIONI DI ALCUN TIPO, esplicite o
27 * implicite. Consultare la Licenza per il testo specifico che regola le
28 * autorizzazioni e le limitazioni previste dalla medesima.
29 ****************************************************************************/
30
31/****************************************************************************
32 * INCLUDE SECTION
33 ****************************************************************************/
34
35 #include "../../ugbc.h"
36
37/****************************************************************************
38 * CODE SECTION
39 ****************************************************************************/
40
41extern char DATATYPE_AS_STRING[][16];
42
43void dojo_init( Environment * _environment ) {
44
45 if ( _environment->dojoOnFujiNet || _environment->dojoOnVirtualizedFujiNet ) {
46 dojo_fujinet_init( _environment );
47 } else {
48 dojo_serial_init( _environment );
49 }
50
51}
52
53void dojo_begin( Environment * _environment ) {
54
55 if ( _environment->dojoOnFujiNet || _environment->dojoOnVirtualizedFujiNet ) {
56 dojo_fujinet_begin( _environment );
57 } else {
58 dojo_serial_begin( _environment );
59 }
60
61}
62
63void dojo_put_request0( Environment * _environment, int _command, char * _param1, char * _param2, char * _result ) {
64
65 if ( _environment->dojoOnFujiNet || _environment->dojoOnVirtualizedFujiNet ) {
66 dojo_fujinet_put_request0( _environment, _command, _param1, _param2, _result );
67 } else {
68 dojo_serial_put_request0( _environment, _command, _param1, _param2, _result );
69 }
70
71}
72
73void dojo_put_request( Environment * _environment, int _command, char * _param1, char * _param2, char * _address, char * _size, char * _result ) {
74
75 if ( _environment->dojoOnFujiNet || _environment->dojoOnVirtualizedFujiNet ) {
76 dojo_fujinet_put_request( _environment, _command, _param1, _param2, _address, _size, _result );
77 } else {
78 dojo_serial_put_request( _environment, _command, _param1, _param2, _address, _size, _result );
79 }
80
81}
82
83void dojo_put_requestd( Environment * _environment, int _command, char * _param1, char * _param2, char * _data, char * _size, char * _result ) {
84
85 if ( _environment->dojoOnFujiNet || _environment->dojoOnVirtualizedFujiNet ) {
86 dojo_fujinet_put_requestd( _environment, _command, _param1, _param2, _data, _size, _result );
87 } else {
88 dojo_serial_put_requestd( _environment, _command, _param1, _param2, _data, _size, _result );
89 }
90
91}
92
93void dojo_put_requestds( Environment * _environment, int _command, char * _param1, char * _param2, char * _data, int _size, char * _result ) {
94
95 if ( _environment->dojoOnFujiNet || _environment->dojoOnVirtualizedFujiNet ) {
96 dojo_fujinet_put_requestds( _environment, _command, _param1, _param2, _data, _size, _result );
97 } else {
98 dojo_serial_put_requestds( _environment, _command, _param1, _param2, _data, _size, _result );
99 }
100
101}
102
103void dojo_partial( Environment * _environment ) {
104
105 if ( _environment->dojoOnFujiNet || _environment->dojoOnVirtualizedFujiNet ) {
106 dojo_fujinet_partial( _environment );
107 } else {
108 // dojo_serial_partial( _environment );
109 }
110
111}
112
113void dojo_get_response0( Environment * _environment, char * _status ) {
114
115 if ( _environment->dojoOnFujiNet || _environment->dojoOnVirtualizedFujiNet ) {
116 dojo_fujinet_get_response0( _environment, _status );
117 } else {
118 dojo_serial_get_response0( _environment, _status );
119 }
120
121}
122
123void dojo_get_response( Environment * _environment, char * _status, char * _address, char * _size ) {
124
125 if ( _environment->dojoOnFujiNet || _environment->dojoOnVirtualizedFujiNet ) {
126 dojo_fujinet_get_response( _environment, _status, _address, _size );
127 } else {
128 dojo_serial_get_response( _environment, _status, _address, _size );
129 }
130
131}
132
133void dojo_get_responsed( Environment * _environment, char * _status, char * _data, char * _size ) {
134
135 if ( _environment->dojoOnFujiNet || _environment->dojoOnVirtualizedFujiNet ) {
136 dojo_fujinet_get_responsed( _environment, _status, _data, _size );
137 } else {
138 dojo_serial_get_responsed( _environment, _status, _data, _size );
139 }
140
141}
142
143void dojo_get_response_size( Environment * _environment, char * _status, char * _size ) {
144
145 if ( _environment->dojoOnFujiNet || _environment->dojoOnVirtualizedFujiNet ) {
146 dojo_fujinet_get_response_size( _environment, _status, _size );
147 } else {
148 dojo_serial_get_response_size( _environment, _status, _size );
149 }
150
151}
152
153void dojo_get_response_payload( Environment * _environment, char * _address ) {
154
155 if ( _environment->dojoOnFujiNet || _environment->dojoOnVirtualizedFujiNet ) {
156 dojo_fujinet_get_response_payload( _environment, _address );
157 } else {
158 dojo_serial_get_response_payload( _environment, _address );
159 }
160
161}
162
163void dojo_get_response_payloadd( Environment * _environment, char * _data ) {
164
165 if ( _environment->dojoOnFujiNet || _environment->dojoOnVirtualizedFujiNet ) {
166 dojo_fujinet_get_response_payloadd( _environment, _data );
167 } else {
168 dojo_serial_get_response_payloadd( _environment, _data );
169 }
170
171}
172
173void dojo_end( Environment * _environment ) {
174
175 if ( _environment->dojoOnFujiNet || _environment->dojoOnVirtualizedFujiNet ) {
176 dojo_fujinet_end( _environment );
177 } else {
178 dojo_serial_end( _environment );
179 }
180
181}
void dojo_serial_init(Environment *_environment)
Definition dojo.c:43
void dojo_serial_get_response_size(Environment *_environment, char *_status, char *_size)
Definition dojo.c:92
void dojo_serial_put_request(Environment *_environment, int _command, char *_param1, char *_param2, char *_address, char *_size, char *_result)
Definition dojo.c:56
void dojo_serial_end(Environment *_environment)
Definition dojo.c:110
void dojo_serial_put_requestd(Environment *_environment, int _command, char *_param1, char *_param2, char *_data, char *_size, char *_result)
Definition dojo.c:62
void dojo_serial_get_responsed(Environment *_environment, char *_status, char *_data, char *_size)
Definition dojo.c:86
void dojo_serial_get_response_payloadd(Environment *_environment, char *_data)
Definition dojo.c:104
void dojo_serial_get_response0(Environment *_environment, char *_status)
Definition dojo.c:74
void dojo_serial_put_request0(Environment *_environment, int _command, char *_param1, char *_param2, char *_result)
Definition dojo.c:51
void dojo_serial_get_response(Environment *_environment, char *_status, char *_address, char *_size)
Definition dojo.c:80
void dojo_serial_put_requestds(Environment *_environment, int _command, char *_param1, char *_param2, char *_data, int _size, char *_result)
Definition dojo.c:68
void dojo_serial_get_response_payload(Environment *_environment, char *_address)
Definition dojo.c:98
void dojo_serial_begin(Environment *_environment)
Definition dojo.c:47
void dojo_fujinet_put_requestd(Environment *_environment, int _command, char *_param1, char *_param2, char *_data, char *_size, char *_result)
void dojo_fujinet_get_response(Environment *_environment, char *_status, char *_address, char *_size)
void dojo_fujinet_end(Environment *_environment)
void dojo_fujinet_get_response0(Environment *_environment, char *_status)
void dojo_fujinet_get_response_payload(Environment *_environment, char *_address)
void dojo_fujinet_put_requestds(Environment *_environment, int _command, char *_param1, char *_param2, char *_data, int _size, char *_result)
void dojo_fujinet_begin(Environment *_environment)
void dojo_fujinet_get_responsed(Environment *_environment, char *_status, char *_data, char *_size)
void dojo_fujinet_get_response_size(Environment *_environment, char *_status, char *_size)
void dojo_fujinet_put_request(Environment *_environment, int _command, char *_param1, char *_param2, char *_address, char *_size, char *_result)
void dojo_fujinet_put_request0(Environment *_environment, int _command, char *_param1, char *_param2, char *_result)
void dojo_fujinet_get_response_payloadd(Environment *_environment, char *_data)
void dojo_fujinet_init(Environment *_environment)
void dojo_fujinet_partial(Environment *_environment)
void dojo_get_response_payloadd(Environment *_environment, char *_data)
Definition dojo.c:163
void dojo_init(Environment *_environment)
Definition dojo.c:43
void dojo_put_request(Environment *_environment, int _command, char *_param1, char *_param2, char *_address, char *_size, char *_result)
Definition dojo.c:73
void dojo_put_request0(Environment *_environment, int _command, char *_param1, char *_param2, char *_result)
Definition dojo.c:63
void dojo_get_response0(Environment *_environment, char *_status)
Definition dojo.c:113
void dojo_partial(Environment *_environment)
Definition dojo.c:103
void dojo_put_requestd(Environment *_environment, int _command, char *_param1, char *_param2, char *_data, char *_size, char *_result)
Definition dojo.c:83
void dojo_get_responsed(Environment *_environment, char *_status, char *_data, char *_size)
Definition dojo.c:133
void dojo_end(Environment *_environment)
Definition dojo.c:173
void dojo_put_requestds(Environment *_environment, int _command, char *_param1, char *_param2, char *_data, int _size, char *_result)
Definition dojo.c:93
void dojo_begin(Environment *_environment)
Definition dojo.c:53
void dojo_get_response_size(Environment *_environment, char *_status, char *_size)
Definition dojo.c:143
void dojo_get_response(Environment *_environment, char *_status, char *_address, char *_size)
Definition dojo.c:123
void dojo_get_response_payload(Environment *_environment, char *_address)
Definition dojo.c:153
int dojoOnVirtualizedFujiNet
Definition ugbc.h:3245
int dojoOnFujiNet
Definition ugbc.h:3244
struct _Environment Environment
Structure of compilation environment.
char DATATYPE_AS_STRING[][16]