*
*/
+#include "betty.h"
+
+/*
+ * functions
+ */
+
+void mmap_init(u8 memtype) {
+
+ MEMMAP=memtype;
+}
+
+void pll_init(void) {
+
+ /* configuration */
+ PLLCFG=0x42; // multiplier = 3 (for cclk), dividor = 4 (for f_cco)
+ PLLCON=0x03; // enable and set as clk source for the lpc
+ /* feed sequence */
+ PLLFEED=0xaa;
+ PLLFEED=0x55;
+ /* wait for lock */
+ while(!(PLLSTAT&(1<<10)))
+ continue;
+}
+
+void ext_mem_bank_init(void) {
+
+ BCFG0=0x10000420; // flash 1
+ BCFG1=0x00000c42; // lcd
+ BCFG2=0x10000420; // flash 2
+}
+
+
+void pin_select_init() {
+
+ /*
+ * a[19:2] -> address lines
+ */
+
+ PINSEL2=0x0d6041d4;
+}
+
+void uart0_init(void) {
+
+ /* select pins 0.0 and 0.1 as tx and rx */
+ PINSEL0=(PINSEL0&~(0xf))|0x05; // pin select -> tx, rx
+
+ /* configure uart0 */
+ UART0_FCR=0x07; // enable fifo
+ UART0_LCR=0x83; // set dlab + word length
+ UART0_DLL=0x04; // br: 38400 @ 10/4 mhz
+ UART0_DLM=0x00;
+ UART0_LCR=0x03; // unset dlab
+}
+
+void uart0_send_string(char *txbuf) {
+
+ int i;
+
+ i=0;
+
+ while(txbuf[i]) {
+ UART0_THR=txbuf[i++];
+ /* flush if tx buffer maximum reached */
+ if(!(i%16))
+ while(!(UART0_LSR&(1<<6)))
+ continue;
+ }
+
+ /* flush if \n and \r do not fit in the tx buffer */
+ if(i>14)
+ while(!(UART0_LSR&(1<<6)))
+ continue;
+
+ UART0_THR='\n';
+ UART0_THR='\r';
+
+ /* flush uart0 anyways */
+ while(!(UART0_LSR&(1<<6)))
+ continue;
+}
+
+void uart0_send_buf16(u16 *buf,int len) {
+
+ int i;
+
+ i=0;
+
+ for(i=0;i<len/2;i++) {
+ if(!(i%8))
+ while(!(UART0_LSR&(1<<6)))
+ continue;
+ UART0_THR=buf[i]&0xff;
+ UART0_THR=(buf[i]>>8)&0xff;
+ }
+}
+
+void uart0_send_buf32(u32 *buf,int len) {
+
+ int i;
+
+ i=0;
+
+ for(i=0;i<len/4;i++) {
+ if(!(i%4))
+ while(!(UART0_LSR&(1<<6)))
+ continue;
+ UART0_THR=buf[i]&0xff;
+ UART0_THR=(buf[i]>>8)&0xff;
+ UART0_THR=(buf[i]>>16)&0xff;
+ UART0_THR=(buf[i]>>24)&0xff;
+ }
+}
+
+void uart0_send_byte(u8 send) {
+
+ while(!(UART0_LSR&(1<<5)))
+ continue;
+
+ UART0_THR=send;
+}
+
+u8 uart0_get_byte(void) {
+
+ u8 rx;
+
+ while(!(UART0_LSR&(1<<0)))
+ continue;
+
+ rx=UART0_RBR;
+
+ return rx;
+}
+
+void pause(int cnt) {
+
+ while(cnt--)
+ asm volatile ("nop");
+}
+
+void init_lcd(u8 s) {
+
+ LCD_CMD=0xe1; // ?
+ LCD_CMD=0xe2;
+ pause(48000);
+ LCD_CMD=0xab;
+ LCD_CMD=0x27;
+ LCD_CMD=0x81;
+ LCD_CMD=0x3f;
+ LCD_CMD=0x65;
+ LCD_CMD=0x60;
+ LCD_CMD=0x1c;
+ LCD_CMD=0x61;
+ LCD_CMD=0x0a;
+ LCD_CMD=0x62;
+ LCD_CMD=0x75;
+ LCD_CMD=0x63;
+ LCD_CMD=0x81;
+ LCD_CMD=0x90;
+ LCD_CMD=0x88;
+ LCD_CMD=0x00;
+ LCD_CMD=0x89;
+ LCD_CMD=0x00;
+ LCD_CMD=0x8a;
+ LCD_CMD=0x33;
+ LCD_CMD=0x8b;
+ LCD_CMD=0x33;
+ LCD_CMD=0x8c;
+ LCD_CMD=0x66;
+ LCD_CMD=0x8d;
+ LCD_CMD=0x66;
+ LCD_CMD=0x8e;
+ LCD_CMD=0x99;
+ LCD_CMD=0x8f;
+ LCD_CMD=0x99;
+ if(s) {
+ LCD_CMD=0xa1;
+ LCD_CMD=0xc0;
+ }
+ else {
+ LCD_CMD=0xa0;
+ LCD_CMD=0xc8;
+ }
+ LCD_CMD=0x2e;
+ pause(48000);
+ LCD_CMD=0x2f;
+ LCD_CMD=0xa4;
+ LCD_CMD=0xa6;
+}
+
+/*
+ * spi0 stuff (+ cc1100)
+ */
+
+#define SLAVE 0
+#define MASTER 1
+
+void spi1_init(u8 width,u8 type,u8 div) {
+
+ if((width<8)|(width>16))
+ width=8;
+ if(width==16)
+ width=0;
+
+ div&=0xfe;
+ if(div<8)
+ div=8;
+
+ S1SPCR=(1<<2)|(width<<8)|(type<<5);
+ S1SPCCR=div;
+}
+
+#define cc1100_init spi1_init(8,MASTER,8)
+
+void spi1_send(u16 data) {
+
+ S1SPDR=data;
+
+ while(!(S1SPSR&(1<<7)))
+ continue;
+}
+
+void bl_init(void) {
+
+ IODIR0|=(1<<4);
+}
+
+void bl_toggle(void) {
+
+ if(IOPIN0&(1<<4))
+ IOCLR0=(1<<4);
+ else
+ IOSET0=(1<<4);
+}
+
+void bl_on(void) {
+
+ IOCLR0=(1<<4);
+}
+
+void bl_off(void) {
+
+ IOSET0=(1<<4);
+}
+
+/*
+ * main function
+ */
+
int main() {
+ char buf[]="betty - live from flash at 0x80000000! ;)\r\n";
+ t_button button;
+
+ pll_init();
+ uart0_init();
+ ext_mem_bank_init();
+ pin_select_init();
+ init_lcd(0);
+ bl_init();
+ button_init(&button);
+ button_set_retries(&button,100);
+
+ pause(0xffffff);
+
+ bl_toggle();
+
+ while(1) {
+ pause(0x0fffff);
+ /* button test! */
+ if(button_get_event(&button)) {
+ uart0_send_string(buf);
+ if(button.key[0]==BUTTON_POWER)
+ bl_toggle();
+ }
+ }
return 0;
}
projects / my-code / arm.git / blobdiff