-/* mailbox registers (MB 0: input 1: output)
- * function | MB 0 | MB 1
- * rd/wr | 00 | 20 ( upper 28: data, lower 4: channel )
- * peek | 10 | 30
- * sender | 14 | 34
- * status | 18 | 38
- * config | 1c | 3c
- *
- * channel 1: framebuffer
- * channel 8: request
- *
- * read: read status reg loop while empty flag is set
- * write: read status loop while full flag is set
- */
+#include "config.h"
+
+#include <stdio.h>
#include <string.h>
#include <stdint.h>
+#include <ctype.h>
+#include "asm.h"
+#include "rpi.h"
+#include "contty.h"
+#include "serial.h"
+#include "timer.h"
+#include "video.h"
+#include "intr.h"
-#ifdef RPI1
-#define IOBASEADDR 0x20000000
-#else
-#define IOBASEADDR 0x3f000000
-#endif
-
-#define phys2bus(addr) ((addr) | 0x40000000)
-#define bus2phys(addr) ((addr) & 0x3fffffff)
-
-#define IOREG_ADDR(x) (IOBASEADDR | (x))
-#define REG_MB_READ *((volatile uint32_t*)IOREG_ADDR(0xb880))
-#define REG_MB_STAT *((volatile uint32_t*)IOREG_ADDR(0xb898))
-#define REG_MB_WRITE *((volatile uint32_t*)IOREG_ADDR(0xb8a0))
-
-#define MB_STAT_FULL 0x80000000
-#define MB_STAT_EMPTY 0x40000000
-
-#define MB_CHAN_FRAMEBUF 1
-#define MB_CHAN_PROP 8
-
-#define PROP_CODE_REQ 0
-#define PROP_RESP_OK 0x80000000
-
+void dbgled(int x);
-#define PROP_TAG_END 0
+void reboot(void);
-#define PROP_TAG_SET 0x08000
-#define PROP_TAG_TEST 0x04000
-#define PROP_TAG_GET 0
-
-#define PROP_TAG_ALLOCBUF 0x40001
-#define PROP_TAG_BLANKSCR 0x40002
-#define PROP_TAG_PHYSRES 0x40003
-#define PROP_TAG_VIRTRES 0x40004
-#define PROP_TAG_DEPTH 0x40005
-#define PROP_TAG_PIXEL_ORDER 0x40006
-#define PROP_TAG_ALPHA_MODE 0x40007
-#define PROP_TAG_PITCH 0x40008
-#define PROP_TAG_VOFFS 0x40009
-#define PROP_TAG_OVERSCAN 0x4000a
-#define PROP_TAG_PALETTE 0x4000b
-#define PROP_TAG_CUR_INFO 0x00010
-#define PROP_TAG_CUR_STATE 0x00011
-
-
-int prop_blankscr(int onoff);
-int prop_setvres(int xsz, int ysz);
-void *prop_allocbuf(void);
-
-uint32_t mb_read(int chan);
-void mb_write(int chan, uint32_t val);
+static void cmdrun(char *cmd);
int main(void)
{
- int i;
- uint16_t *fb;
-
- prop_setvres(640, 480);
- fb = prop_allocbuf();
-
- for(i=0; i<640 * 480; i++) {
- *fb++ = (i & 0xff) | ((i & 0xff) << 8);
+ int lastnl = 0;
+ static char cmdbuf[256];
+ static int cmdend;
+
+ rpi_init();
+ /*init_serial(115200); done in rpi_init now for early debugging */
+ con_init();
+
+ printf("Detected raspberry pi %d, I/O base: %x\n", rpi_model, rpi_iobase);
+ printf("Main RAM base: %x, size: %u bytes\n", rpi_mem_base, rpi_mem_size);
+ printf("Video RAM base: %x, size: %u bytes\n", rpi_vmem_base, rpi_vmem_size);
+
+ timer_init();
+ video_init();
+
+ enable_intr();
+
+ printf("Going interactive\n");
+
+ for(;;) {
+ while(ser_pending()) {
+ int c = getchar();
+
+ switch(c) {
+ case '\r':
+ case '\n':
+ if(!lastnl) {
+ printf("\r\n");
+ cmdbuf[cmdend] = 0;
+ cmdend = 0;
+ cmdrun(cmdbuf);
+ }
+ lastnl = 1;
+ break;
+
+ case -1:
+ lastnl = 0;
+ printf("error!\n");
+ break;
+
+ default:
+ lastnl = 0;
+ putchar(c);
+ if(cmdend < sizeof cmdbuf) {
+ cmdbuf[cmdend++] = c;
+ }
+ }
+ }
+
+ /*video_update(1);*/
}
return 0;
}
-static uint32_t propbuf[64] __attribute__((aligned(16)));
-
-static int send_prop(uint32_t *buf)
+void reboot(void)
{
- mb_write(MB_CHAN_PROP, (uint32_t)buf >> 4);
- mb_read(MB_CHAN_PROP);
- return propbuf[1] == PROP_RESP_OK ? 0 : -1;
+ printf("Rebooting ...\n");
+ rpi_reboot();
}
-int prop_blankscr(int onoff)
+static void cmdrun(char *cmd)
{
- uint32_t *pb = propbuf;
-
- *pb++ = 0;
- *pb++ = 0;
- *pb++ = PROP_TAG_BLANKSCR;
- *pb++ = 4; /* data size */
- *pb++ = PROP_CODE_REQ;
- *pb++ = onoff ? 1 : 0;
- *pb++ = PROP_TAG_END;
- *pb++ = 0; /* padding */
- propbuf[0] = (char*)pb - (char*)propbuf;
-
- return send_prop(propbuf);
-}
-
-int prop_setvres(int xsz, int ysz)
-{
- uint32_t *pb = propbuf;
-
- *pb++ = 0;
- *pb++ = 0;
- *pb++ = PROP_TAG_VIRTRES | PROP_TAG_SET;
- *pb++ = 8; /* data size */
- *pb++ = PROP_CODE_REQ;
- *pb++ = xsz;
- *pb++ = ysz;
- *pb++ = PROP_TAG_END;
- propbuf[0] = (char*)pb - (char*)propbuf;
-
- return send_prop(propbuf);
-}
-
-void *prop_allocbuf(void)
-{
- uint32_t *pb = propbuf;
- uint32_t *data;
-
- *pb++ = 0;
- *pb++ = 0;
- *pb++ = PROP_TAG_ALLOCBUF;
- *pb++ = 8; /* data size */
- *pb++ = PROP_CODE_REQ;
- data = pb;
- *pb++ = 16; /* alignment */
- *pb++ = 0;
- *pb++ = PROP_TAG_END;
- propbuf[0] = (char*)pb - (char*)propbuf;
-
- if(send_prop(propbuf) == -1) {
- return 0;
+ static int cur_x, cur_y;
+ char *ptr, *args;
+
+ while(*cmd && isspace(*cmd)) cmd++;
+ ptr = cmd;
+ while(*ptr && !isspace(*ptr)) ptr++;
+ *ptr = 0;
+ args = ptr + 1;
+
+ if(strcmp(cmd, "reboot") == 0) {
+ reboot();
+
+ } else if(strcmp(cmd, "down") == 0) {
+ printf("scroll down\n");
+ cur_y += 10;
+ video_scroll(cur_x, cur_y);
+
+ } else if(strcmp(cmd, "up") == 0) {
+ printf("scroll up\n");
+ cur_y -= 10;
+ video_scroll(cur_x, cur_y);
+
+ } else if(strcmp(cmd, "ticks") == 0) {
+ printf("%lu\n", num_ticks);
+
+ } else if(strcmp(cmd, "help") == 0) {
+ printf("help not implemented yet\n");
+ } else if(strcmp(cmd, "ver") == 0) {
+ printf("rpikern version 0.0\n");
+ } else {
+ printf("Unknown command: %s\n", cmd);
}
-
- return (void*)bus2phys(*data);
-}
-
-uint32_t mb_read(int chan)
-{
- uint32_t val;
- do {
- while(REG_MB_STAT & MB_STAT_EMPTY);
- val = REG_MB_READ;
- } while((val & 0xf) != chan);
- return val >> 4;
-}
-
-void mb_write(int chan, uint32_t val)
-{
- while(REG_MB_STAT & MB_STAT_FULL);
- REG_MB_WRITE = (val << 4) | chan;
}