4 Copyright 2008, 2009 Michel Pollet <buserror@gmail.com>
6 This file is part of simavr.
8 simavr is free software: you can redistribute it and/or modify
9 it under the terms of the GNU General Public License as published by
10 the Free Software Foundation, either version 3 of the License, or
11 (at your option) any later version.
13 simavr is distributed in the hope that it will be useful,
14 but WITHOUT ANY WARRANTY; without even the implied warranty of
15 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 GNU General Public License for more details.
18 You should have received a copy of the GNU General Public License
19 along with simavr. If not, see <http://www.gnu.org/licenses/>.
36 avr_io_t * port = avr->io_port;
38 while (port && res == -1) {
40 res = port->ioctl(port, ctl, io_param);
51 io->next = avr->io_port;
63 avr_io_addr_t a = AVR_DATA_TO_IO(addr);
64 if (avr->io[a].r.param || avr->io[a].r.c) {
65 if (avr->io[a].r.param != param || avr->io[a].r.c != readp) {
67 "Error: avr_register_io_read(): Already registered, refusing to override.\n");
69 "Error: avr_register_io_read(%04x : %p/%p): %p/%p\n", a,
70 avr->io[a].r.c, avr->io[a].r.param, readp, param);
74 avr->io[a].r.param = param;
75 avr->io[a].r.c = readp;
85 int io = (intptr_t)param;
86 for (int i = 0; i < avr->io_shared_io[io].used; i++) {
87 avr_io_write_t c = avr->io_shared_io[io].io[i].c;
89 c(avr, addr, v, avr->io_shared_io[io].io[i].param);
94 avr_register_io_write(
97 avr_io_write_t writep,
100 avr_io_addr_t a = AVR_DATA_TO_IO(addr);
104 "Error: avr_register_io_write(): IO address 0x%04x out of range (max 0x%04x).\n",
109 * Verifying that some other piece of code is not installed to watch write
110 * on this address. If there is, this code installs a "dispatcher" callback
111 * instead to handle multiple clients, otherwise, it continues as usual
113 if (avr->io[a].w.param || avr->io[a].w.c) {
114 if (avr->io[a].w.param != param || avr->io[a].w.c != writep) {
115 // if the muxer not already installed, allocate a new slot
116 if (avr->io[a].w.c != _avr_io_mux_write) {
117 int no = avr->io_shared_io_count++;
118 if (avr->io_shared_io_count > 4) {
120 "Error: avr_register_io_write(): Too many shared IO registers.\n");
124 "Note: avr_register_io_write(%04x): Installing muxer on register.\n", addr);
125 avr->io_shared_io[no].used = 1;
126 avr->io_shared_io[no].io[0].param = avr->io[a].w.param;
127 avr->io_shared_io[no].io[0].c = avr->io[a].w.c;
128 avr->io[a].w.param = (void*)(intptr_t)no;
129 avr->io[a].w.c = _avr_io_mux_write;
131 int no = (intptr_t)avr->io[a].w.param;
132 int d = avr->io_shared_io[no].used++;
133 if (avr->io_shared_io[no].used > 4) {
135 "Error: avr_register_io_write(): Too many callbacks on %04x.\n", addr);
138 avr->io_shared_io[no].io[d].param = param;
139 avr->io_shared_io[no].io[d].c = writep;
143 avr->io[a].w.param = param;
144 avr->io[a].w.c = writep;
153 avr_io_t * port = avr->io_port;
155 if (port->irq && port->irq_ioctl_get == ctl && port->irq_count > index)
156 return port->irq + index;
169 avr_io_addr_t a = AVR_DATA_TO_IO(addr);
170 if (avr->io[a].irq == NULL) {
171 avr->io[a].irq = avr_alloc_irq(&avr->irq_pool, 0, 9, NULL);
172 // mark the pin ones as filtered, so they only are raised when changing
173 for (int i = 0; i < 8; i++)
174 avr->io[a].irq[i].flags |= IRQ_FLAG_FILTERED;
176 return index < 9 ? avr->io[a].irq + index : NULL;
186 // allocate this module's IRQ
187 io->irq_count = count;
190 const char ** irq_names = NULL;
193 irq_names = malloc(count * sizeof(char*));
194 memset(irq_names, 0, count * sizeof(char*));
196 for (int i = 0; i < count; i++) {
198 * this bit takes the io module 'kind' ("port")
199 * the IRQ name ("=0") and the last character of the ioctl ('p','o','r','A')
200 * to create a full name "=porta.0"
203 // copy the 'flags' of the name out
204 const char * kind = io->irq_names[i];
205 while (!isalpha(*kind))
208 // strcpy(dst, io->avr->mmcu);
213 strcpy(dst, io->kind);
215 // add port name, if any
216 if ((ctl & 0xff) > ' ')
217 *dst ++ = tolower(ctl & 0xff);
219 // add the rest of the irq name
224 // printf("%s\n", buf);
225 irq_names[i] = strdup(buf);
228 irqs = avr_alloc_irq(&io->avr->irq_pool, 0,
231 for (int i = 0; i < count; i++)
232 free((char*)irq_names[i]);
233 free((char*)irq_names);
238 io->irq_ioctl_get = ctl;
248 avr_free_irq(io->irq, io->irq_count);
250 io->irq_ioctl_get = 0;
259 avr_io_t * port = avr->io_port;
261 avr_io_t * next = port->next;
262 avr_deallocate_io(port);