1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
|
static char _[] = "@(#)set.c 5.20 93/07/30 16:39:00, Srini, AMD.";
/******************************************************************************
* Copyright 1991 Advanced Micro Devices, Inc.
*
* This software is the property of Advanced Micro Devices, Inc (AMD) which
* specifically grants the user the right to modify, use and distribute this
* software provided this notice is not removed or altered. All other rights
* are reserved by AMD.
*
* AMD MAKES NO WARRANTY OF ANY KIND, EXPRESS OR IMPLIED, WITH REGARD TO THIS
* SOFTWARE. IN NO EVENT SHALL AMD BE LIABLE FOR INCIDENTAL OR CONSEQUENTIAL
* DAMAGES IN CONNECTION WITH OR ARISING FROM THE FURNISHING, PERFORMANCE, OR
* USE OF THIS SOFTWARE.
*
* So that all may benefit from your experience, please report any problems
* or suggestions about this software to the 29K Technical Support Center at
* 800-29-29-AMD (800-292-9263) in the USA, or 0800-89-1131 in the UK, or
* 0031-11-1129 in Japan, toll free. The direct dial number is 512-462-4118.
*
* Advanced Micro Devices, Inc.
* 29K Support Products
* Mail Stop 573
* 5900 E. Ben White Blvd.
* Austin, TX 78741
* 800-292-9263
*****************************************************************************
* Engineer: Srini Subramanian.
*****************************************************************************
** This code provides "set" routines to set memory and
** registers. Data may be set as words (32 bit), half-words
** (16 bit), bytes (8 bit), float (32 bit floating point) or
** double (64 bit floating point).
**
** Since registers are 32 bits long, the set byte and set half
** commands will only be permitted for memory accesses.
*****************************************************************************
*/
#include <stdio.h>
#include <ctype.h>
#include <memory.h>
#include "main.h"
#include "monitor.h"
#include "miniint.h"
#include "memspcs.h"
#include "macros.h"
#include "error.h"
#ifdef MSDOS
#include <stdlib.h>
#include <string.h>
#else
#include <string.h>
#endif
int get_addr_29k PARAMS((char *, struct addr_29k_t *));
int addr_29k_ok PARAMS((struct addr_29k_t *));
int get_word PARAMS((char *, INT32 *));
int get_half PARAMS((char *, INT16 *));
int get_byte PARAMS((char *, BYTE *));
int get_float PARAMS((char *, float *));
int get_double PARAMS((char *, double *));
int set_data PARAMS((BYTE *, BYTE *, int));
/*
** The function below is used in setting data. This function is
** called in the main command loop parser of the monitor. The
** parameters passed to this function are:
**
** token - This is an array of pointers to strings. Each string
** referenced by this array is a "token" of the user's
** input, translated to lower case.
**
** token_count - This is the number of items in the token array.
**
** This function reduces the tokens to three parameters:
** memory_space, address and the data to be set. This data
** is one of the "temp_" variables.
**
*/
INT32
set_cmd(token, token_count)
char *token[];
int token_count;
{
INT16 size;
int result;
struct addr_29k_t addr_29k;
int set_format;
INT32 temp_word;
INT16 temp_half;
BYTE temp_byte;
float temp_float;
double temp_double;
INT32 retval;
BYTE write_buffer[16]; /* */
INT32 bytes_ret;
INT32 hostendian; /* UDI conformant */
INT32 count;
if (token_count != 3) {
return (EMSYNTAX);
}
/*
** What is the data format?
*/
count = (INT32) 1;
if ((strcmp(token[0], "s") == 0) ||
(strcmp(token[0], "sw") == 0)) {
set_format = WORD_FORMAT;
size = (INT16) sizeof(INT32);
result = get_word(token[2], &temp_word);
if (result != 0)
return (EMSYNTAX);
result = set_data(write_buffer, (BYTE *)&temp_word, sizeof(INT32));
if (result != 0)
return (EMSYNTAX);
}
else
if (strcmp(token[0], "sh") == 0) {
set_format = HALF_FORMAT;
size = (INT16) sizeof(INT16);
result = get_half(token[2], &temp_half);
if (result != 0)
return (EMSYNTAX);
result = set_data(write_buffer, (BYTE *)&temp_half, sizeof(INT16));
if (result != 0)
return (EMSYNTAX);
}
else
if (strcmp(token[0], "sb") == 0) {
set_format = BYTE_FORMAT;
size = (INT16) sizeof(BYTE);
result = get_byte(token[2], &temp_byte);
if (result != 0)
return (EMSYNTAX);
result = set_data(write_buffer, (BYTE *)&temp_byte, sizeof(BYTE));
if (result != 0)
return (EMSYNTAX);
}
else
if (strcmp(token[0], "sf") == 0) {
set_format = FLOAT_FORMAT;
size = (INT16) sizeof(float);
result = get_float(token[2], &temp_float);
if (result != 0)
return (EMSYNTAX);
result = set_data(write_buffer, (BYTE *)&temp_float, sizeof(float));
if (result != 0)
return (EMSYNTAX);
}
else
if (strcmp(token[0], "sd") == 0) {
set_format = DOUBLE_FORMAT;
size = (INT16) sizeof(double);
result = get_double(token[2], &temp_double);
if (result != 0)
return (EMSYNTAX);
result = set_data(write_buffer, (BYTE *)&temp_double, sizeof(double));
if (result != 0)
return (EMSYNTAX);
}
else
return(EMSYNTAX);
/*
** Get address
*/
result = get_addr_29k(token[1], &addr_29k);
if (result != 0)
return (EMSYNTAX);
result = addr_29k_ok(&addr_29k);
if (result != 0)
return (result);
/*
** We don't set bytes or half words in registers
*/
if (((ISREG(addr_29k.memory_space)) &&
(set_format == BYTE_FORMAT)) ||
((ISREG(addr_29k.memory_space)) &&
(set_format == HALF_FORMAT)))
return (EMSYNTAX);
/* Will the data overflow the message buffer? Done in TIP */
hostendian = FALSE;
if ((retval = Mini_write_req (addr_29k.memory_space,
addr_29k.address,
count,
(INT16) size,
&bytes_ret,
write_buffer,
hostendian)) != SUCCESS) {
return(FAILURE);
} else
return(SUCCESS);
} /* end set_cmd() */
|
