10 Commits

193 changed files with 24269 additions and 29480 deletions

View File

@@ -38,59 +38,3 @@ v0.1.3
* Some FPGA configuration error detection (mainly useful for hardware diag) * Some FPGA configuration error detection (mainly useful for hardware diag)
* Fixes: * Fixes:
- FPGA-side SD clock pullup (increases reliability with some cards) - FPGA-side SD clock pullup (increases reliability with some cards)
v0.1.4
======
* SPC Player (contributed by necronomfive/blargg)
* System Information screen now shows CPU/PPU revision (contributed by necronomfive)
* Satellaview: basic data transmission packet support (makes some more games boot, thanks to LuigiBlood for assistance and sample data packets)
* Number of supported files increased to 50000 per card / 16380 per directory
* Slight speedup of menu text rendering
* Reduce load time of menu
* Adjust Cx4 timing to be more faithful
(Mega Man now defeats the boss in attract mode in Mega Man X2)
* adapt ROM mirroring size to file size if header information is invalid
(fixes Super Noah's Ark 3D, possibly others)
* MSU1 interface changes suggested by byuu:
- Data offset 0 and audio track 0 are automatically requested on reset.
This causes the busy flags to become 0 shortly after reset/startup.
- $2000 bit 3 is now "audio error", becomes valid after "audio busy" -> 0
set when an error occurred while preparing playback of the requested audio track
* write LED stays on when SRAM content changes constantly
* Fixes:
- fix empty save files on FAT16 / incorrect free cluster count on FAT32
- correct directory sorting (force parent directory at top of list)
- fix text corruption when entering a directory with a scrollable name
- fix files/dirs count in system information
- make 'sd2snes' directory hiding case-insensitive
- improve DAC I²S timing
- fix occasional palette corruption in menu
- fix SD clock glitch on ROM loading (occasional glitches/crashes)
- fix memory write timing on ROM loading (occasional glitches/crashes)
- fix SPI timing (ROMs not loading; System Information not working)
- properly synchronize SNES control signals (occasional glitches/crashes)
- fix floating IRQ output (occasional glitches/slowdowns)
v0.1.4a (bugfix release)
========================
* Fix DMA initialization in the menu (could cause sprite corruption in some games)
v0.1.5
======
* Sort directories by entire file name instead of first 20 characters only
* Correctly map SRAM larger than 8192 bytes (HiROM) / 32768 bytes (LoROM)
(fixes Dezaemon, Ongaku Tsukuuru - Kanadeeru)
* SPC player: fix soft fade-in (first note cut off) on S-APU consoles
(1CHIP / some Jr.)
* More accurate BS-X memory map
* Ignore input from non-standard controllers (Super Scope, Mouse etc.)
* Fixes:
- minor memory access timing tweaks
(should help with occasional glitches on some systems)

Binary file not shown.

View File

@@ -744,4 +744,4 @@ supercic_pairmode_loop
; eeprom memory ; eeprom memory
DEEPROM CODE DEEPROM CODE
de 0x09 ; D411 (NTSC) de 0x09 ; D411 (NTSC)
end end

Binary file not shown.

File diff suppressed because it is too large Load Diff

View File

@@ -1,4 +1,4 @@
update=Sat 25 Feb 2012 11:51:50 PM CET update=ven. 20 avril 2012 18:26:30 CEST
version=1 version=1
last_client=pcbnew last_client=pcbnew
[general] [general]
@@ -87,6 +87,7 @@ PadDrlX=0
PadDimH=197 PadDimH=197
PadDimV=276 PadDimV=276
BoardThickness=630 BoardThickness=630
SgPcb45=1
TxtPcbV=800 TxtPcbV=800
TxtPcbH=600 TxtPcbH=600
TxtModV=600 TxtModV=600

View File

@@ -1,4 +1,4 @@
OBJS = header.ips reset.o65 main.o65 font.o65 palette.o65 data.o65 const.o65 logo.o65 logospr.o65 text.o65 dma.o65 menu.o65 pad.o65 time.o65 mainmenu.o65 sysinfo.o65 spc700.o65 spcplay.o65 # gfx.o65 # vars.o65 OBJS = header.ips reset.o65 main.o65 font.o65 palette.o65 data.o65 const.o65 logo.o65 logospr.o65 text.o65 dma.o65 menu.o65 pad.o65 time.o65 mainmenu.o65 sysinfo.o65 # gfx.o65 # vars.o65
all: clean menu.bin map all: clean menu.bin map

View File

@@ -2,8 +2,7 @@ version .byt " v0.1",0
zero .word 0 zero .word 0
bg2tile .byt $20 bg2tile .byt $20
space64 space64 .byt $20, $20, $20, $20, $20, $20, $20, $20
.byt $20, $20, $20, $20, $20, $20, $20, $20
.byt $20, $20, $20, $20, $20, $20, $20, $20 .byt $20, $20, $20, $20, $20, $20, $20, $20
.byt $20, $20, $20, $20, $20, $20, $20, $20 .byt $20, $20, $20, $20, $20, $20, $20, $20
.byt $20, $20, $20, $20, $20, $20, $20, $20 .byt $20, $20, $20, $20, $20, $20, $20, $20

View File

@@ -1,17 +1,17 @@
.data .data
;don't anger the stack! ;don't anger the stack!
;----------parameters for text output---------- ;----------parameters for text output----------
print_x .byt 0 ; x coordinate print_x .byt 0 ;x coordinate
.byt 0 .byt 0
print_y .byt 0 ; y coordinate print_y .byt 0 ;y coordinate
.byt 0 .byt 0
print_src .word 0 ; source data address print_src .word 0 ;source data address
print_bank .byt 0 ; source data bank print_bank .byt 0 ;source data bank
print_pal .word 0 ; palette number for text output print_pal .word 0 ;palette number for text output
print_temp .word 0 ; work variable print_temp .word 0 ;work variable
print_count .byt 0 ; how many characters may be printed? print_count .byt 0 ;how many characters may be printed?
print_count_tmp .byt 0 ; work variable print_count_tmp .byt 0 ;work variable
print_done .word 0 ; how many characters were printed? print_done .word 0 ;how many characters were printed?
;----------parameters for dma---------- ;----------parameters for dma----------
dma_a_bank .byt 0 dma_a_bank .byt 0
dma_a_addr .word 0 dma_a_addr .word 0
@@ -26,8 +26,7 @@ textdmasize .word 0 ; number of bytes to copy each frame
infloop .byt 0,0 ; to be filled w/ 80 FE infloop .byt 0,0 ; to be filled w/ 80 FE
printloop_wram printloop_wram .byt 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
.byt 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
.byt 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 .byt 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
.byt 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 .byt 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
.byt 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 .byt 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
@@ -35,8 +34,7 @@ printloop_wram
.byt 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 .byt 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
.byt 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 .byt 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
loprint_wram loprint_wram .byt 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
.byt 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
.byt 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 .byt 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
.byt 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 .byt 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
.byt 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 .byt 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0

View File

@@ -168,24 +168,4 @@ text_mm_vmode_game .byt "Game video mode", 0
text_mm_sysinfo .byt "System Information", 0 text_mm_sysinfo .byt "System Information", 0
text_statusbar_keys .byt "A:Select B:Back X:Menu", 0 text_statusbar_keys .byt "A:Select B:Back X:Menu", 0
text_last .byt "Run previous ROM: Press Start again to confirm", 0 text_last .byt "Run previous ROM: Press Start again to confirm", 0
text_system .byt "CPU Rev.: x PPU1 Rev.: y PPU2 Rev.: z",0
text_spcplay .byt "SPC Music Player", 0
spcplay_win_x .byt 15
spcplay_win_y .byt 15
spcplay_win_w .byt 33
spcplay_win_h .byt 5
text_spcload .byt "Loading SPC data to SPC700...", 0
text_spcstarta .byt "**** Now playing SPC tune ****", 0
text_spcstartb .byt "Name: ",0
text_spcstartc .byt "Song: ",0
text_spcstartd .byt "Artist:",0
spcstart_win_x .byt 10
spcstart_win_y .byt 13
spcstart_win_w .byt 44
spcstart_win_h .byt 9
text_spcid .byt "SNES-SPC700"

View File

@@ -16,7 +16,7 @@ dirend_onscreen .byt 0
dirlog_idx .byt 0,0,0 ; long ptr dirlog_idx .byt 0,0,0 ; long ptr
direntry_fits_idx direntry_fits_idx
.byt 0,0 .byt 0,0
longptr .byt 0,0,0 ; general purpose long ptr
;----------parameters for text output---------- ;----------parameters for text output----------
print_x .byt 0 ;x coordinate print_x .byt 0 ;x coordinate
.byt 0 .byt 0
@@ -26,8 +26,8 @@ print_src .word 0 ;source data address
print_bank .byt 0 ;source data bank print_bank .byt 0 ;source data bank
print_pal .word 0 ;palette number for text output print_pal .word 0 ;palette number for text output
print_temp .word 0 ;work variable print_temp .word 0 ;work variable
print_ptr .byt 0,0,0 ;read pointer print_count .byt 0 ;how many characters may be printed?
print_count .word 0 ;how many characters may be printed? print_count_tmp .byt 0 ;work variable
print_done .word 0 ;how many characters were printed? print_done .word 0 ;how many characters were printed?
print_over .byt 0 ;was the string printed incompletely? print_over .byt 0 ;was the string printed incompletely?
;----------parameters for dma---------- ;----------parameters for dma----------
@@ -184,17 +184,4 @@ direntry_xscroll
direntry_xscroll_wait direntry_xscroll_wait
.word 0 .word 0
infloop .byt 0,0 ; to be filled w/ 80 FE infloop .byt 0,0 ; to be filled w/ 80 FE
tgt_bright
.byt 0
cur_bright
.byt 0
;------------------------
saved_sp
.word 0
warm_signature
.word 0
snes_system_config
.word 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
wram_fadeloop .byt 0 wram_fadeloop .byt 0

View File

@@ -1,4 +1,21 @@
dma0:
rep #$10 : .xl
sep #$20 : .as
lda dma_mode
sta $4300
lda dma_b_reg
sta $4301
lda dma_a_bank
ldx dma_a_addr
stx $4302
sta $4304
ldx dma_len
stx $4305
lda #$01
sta $420b
rts
setup_hdma: setup_hdma:
sep #$20 : .as sep #$20 : .as
rep #$10 : .xl rep #$10 : .xl
@@ -50,11 +67,8 @@ setup_hdma:
sty $4352 sty $4352
sta $4354 sta $4354
lda #$3a ; lda #$06
sta $420c ;enable HDMA ch. 1+3+4+5 ; sta $420c ;enable HDMA ch. 1+2
jsr waitblank
lda #$3e
sta $420c ;enable HDMA ch. 2 too
lda #$81 ;VBlank NMI + Auto Joypad Read lda #$81 ;VBlank NMI + Auto Joypad Read
sta $4200 ;enable V-BLANK NMI sta $4200 ;enable V-BLANK NMI
rts rts

View File

@@ -1,22 +1,13 @@
#define hash #
#define f(x) x
#define imm(a) f(hash)a
#define DMA0(mode, len, a_bank, a_addr, b_reg)\ #define DMA0(mode, len, a_bank, a_addr, b_reg)\
php \ lda mode \
: sep imm($20) : .as \ : sta dma_mode \
: rep imm($10) : .xl \
: lda mode \
: sta $4300 \
: ldx a_addr \ : ldx a_addr \
: lda a_bank \ : lda a_bank \
: stx $4302 \ : stx dma_a_addr \
: sta $4304 \ : sta dma_a_bank \
: ldx len \ : ldx len \
: stx $4305 \ : stx dma_len \
: lda b_reg \ : lda b_reg \
: sta $4301 \ : sta dma_b_reg \
: lda imm($01) \ : jsr dma0
: sta $420b \
: plp

View File

@@ -4,45 +4,13 @@
GAME_MAIN: GAME_MAIN:
sep #$20 : .as sep #$20 : .as
lda #$00 lda #$00
sta @MCU_CMD ; clear MCU command register sta @AVR_CMD
rep #$20 : .al rep #$20 : .al
lda #$0000 lda #$0000
sta @MCU_PARAM ; clear MCU command parameters sta @AVR_PARAM
sta @MCU_PARAM+2 sta @AVR_PARAM+2
sep #$20 : .as sep #$20 : .as
stz $4200 ; inhibit VBlank NMI stz $4200 ; inhibit VBlank NMI
rep #$20 : .al
lda @warm_signature ; Was CMD_RESET issued before reset?
cmp #$fa50 ; If yes, then perform warm boot procedure
bne coldboot
lda #$0000
sta @warm_signature
lda @saved_sp ; Restore previous stack pointer
tcs
sep #$20 : .as
jsr killdma ; The following initialization processes must not touch memory
jsr waitblank ; structures used by the main menu !
jsr snes_init
cli
lda #$01
sta $420d ; fast cpu
jsr setup_gfx
jsr colortest
jsr tests
jsr setup_hdma
lda #$0f
sta cur_bright
sta tgt_bright
sta $2100
jmp @set_bank ; Set bios bank, just to be sure
set_bank:
plp ; Restore processor state
rts ; Jump to the routine which called the sub-routine issuing CMD_RESET
coldboot: ; Regular, cold-start init
sep #$20 : .as
jsr killdma jsr killdma
jsr waitblank jsr waitblank
jsr snes_init jsr snes_init
@@ -50,11 +18,9 @@ coldboot: ; Regular, cold-start init
sta $420d ; fast cpu sta $420d ; fast cpu
jsr setup_gfx jsr setup_gfx
jsr colortest jsr colortest
jsr setup_hdma
jsr menu_init jsr menu_init
jsr tests jsr tests
jsr setup_hdma
jsr screen_on
sep #$20 : .as sep #$20 : .as
lda @RTC_STATUS lda @RTC_STATUS
beq + beq +
@@ -66,93 +32,50 @@ coldboot: ; Regular, cold-start init
jmp @infloop ;infinite loop in WRAM jmp @infloop ;infinite loop in WRAM
killdma: killdma:
stz $4300 stz $420b
stz $4301 stz $420c
stz $4302
stz $4303
stz $4304
stz $4305
stz $4306
stz $4307
stz $4308
stz $4309
stz $430a
stz $430b
stz $4310 stz $4310
stz $4311 stz $4311
stz $4312 stz $4312
stz $4313 stz $4313
stz $4314 stz $4314
stz $4315
stz $4316
stz $4317
stz $4318
stz $4319
stz $431a
stz $431b
stz $4320 stz $4320
stz $4321 stz $4321
stz $4322 stz $4322
stz $4323 stz $4323
stz $4324 stz $4324
stz $4325
stz $4326
stz $4327
stz $4328
stz $4329
stz $432a
stz $432b
stz $4330 stz $4330
stz $4331 stz $4331
stz $4332 stz $4332
stz $4333 stz $4333
stz $4334 stz $4334
stz $4335
stz $4336
stz $4337
stz $4338
stz $4339
stz $433a
stz $433b
stz $4340 stz $4340
stz $4341 stz $4341
stz $4342 stz $4342
stz $4343 stz $4343
stz $4344 stz $4344
stz $4345
stz $4346
stz $4347
stz $4348
stz $4349
stz $434a
stz $434b
stz $4350 stz $4350
stz $4351 stz $4351
stz $4352 stz $4352
stz $4353 stz $4353
stz $4354 stz $4354
stz $4355 stz $4360
stz $4356 stz $4361
stz $4357 stz $4362
stz $4358 stz $4363
stz $4359 stz $4364
stz $435a
stz $435b
stz $420b
stz $420c
rts rts
waitblank: waitblank:
php
sep #$30 : .as : .xs
- lda $4212 - lda $4212
and #$80 and #$80
bne - bne -
- lda $4212 - lda $4212
and #$80 and #$80
beq - beq -
plp
rts rts
colortest: colortest:
@@ -168,11 +91,11 @@ setup_gfx:
stz $420b stz $420b
stz $420c stz $420c
;clear tilemap buffers ;clear tilemap buffers
ldx #$8000 ldx #$0000
stx $2181 stx $2181
lda #$00 lda #$01
sta $2183 sta $2183
DMA0(#$08, #$8000, #^zero, #!zero, #$80) DMA0(#$08, #0, #^zero, #!zero, #$80)
;generate fonts ;generate fonts
jsr genfonts jsr genfonts
@@ -223,7 +146,6 @@ setup_gfx:
;set palette ;set palette
stz $2121 stz $2121
DMA0(#$00, #$200, #^palette, #!palette, #$22) DMA0(#$00, #$200, #^palette, #!palette, #$22)
stz $2121
;copy hdma tables so we can work "without" the cartridge ;copy hdma tables so we can work "without" the cartridge
;palette ;palette
@@ -276,7 +198,7 @@ setup_gfx:
tests: tests:
sep #$20 : .as ;8-bit accumulator sep #$20 : .as ;8-bit accumulator
rep #$10 : .xl ;16-bit index rep #$10 : .xl ;16-bit index
lda #$03 ;mode 3, mode 5 via HDMA lda #$03 ;mode 3, mode 5 via HDMA :D
sta $2105 sta $2105
lda #$58 ;Tilemap addr 0xB000 lda #$58 ;Tilemap addr 0xB000
ora #$02 ;SC size 32x64 ora #$02 ;SC size 32x64
@@ -302,17 +224,11 @@ tests:
lda #$1f lda #$1f
sta $212e sta $212e
sta $212f sta $212f
; stz $2121 stz $2121
lda #8
sta bar_yl
stz cur_bright
stz tgt_bright
rts
screen_on:
stz $2100 ;screen on, 0% brightness
lda #$0f lda #$0f
sta tgt_bright sta $2100 ;screen on, full brightness
lda #9
sta bar_yl
rts rts
snes_init: snes_init:
@@ -332,7 +248,6 @@ snes_init:
stz $420a ; stz $420a ;
stz $420b ; stz $420b ;
stz $420c ; stz $420c ;
stz $420d ;
lda #$8f lda #$8f
sta $2100 ;INIDISP: force blank sta $2100 ;INIDISP: force blank
lda #$03 ; 8x8+16x16; name=0; base=3 lda #$03 ; 8x8+16x16; name=0; base=3
@@ -424,7 +339,7 @@ snes_init:
fadeloop: fadeloop:
sep #$30 : .as : .xs sep #$30 : .as : .xs
ldx cur_bright ldx #$0f
and #$00 and #$00
pha pha
plb plb

View File

@@ -6,24 +6,19 @@
/* These must be defined as constants, because they're used /* These must be defined as constants, because they're used
* in calculation that is sent to PPU as parameters */ * in calculation that is sent to PPU as parameters */
#define APUIO0 $2140
#define APUIO1 $2141
#define APUIO2 $2142
#define APUIO3 $2143
#define BG1_TILE_BASE $5800 #define BG1_TILE_BASE $5800
#define BG2_TILE_BASE $5000 #define BG2_TILE_BASE $5000
#define OAM_TILE_BASE $6000 #define OAM_TILE_BASE $6000
#define BG1_TILE_BUF $7EB000 #define BG1_TILE_BUF $7FB000
#define BG2_TILE_BUF $7EA000 #define BG2_TILE_BUF $7FA000
#define BG1_TILE_BAK $7E9000 #define BG1_TILE_BAK $7F9000
#define BG2_TILE_BAK $7E8000 #define BG2_TILE_BAK $7F8000
#define MCU_CMD $307000 #define AVR_CMD $307000
#define MCU_PARAM $307004 #define AVR_PARAM $307004
#define RTC_STATUS $307100 #define RTC_STATUS $307100
#define LAST_STATUS $307101 #define LAST_STATUS $307101
#define SYSINFO_BLK $307200 #define SYSINFO_BLK $307200
@@ -32,9 +27,3 @@
#define ROOT_DIR $C10000 #define ROOT_DIR $C10000
#define CMD_SYSINFO $03 #define CMD_SYSINFO $03
#define CMD_LOADSPC $05
#define CMD_RESET $06
#define SPC_DATA $FD0000
#define SPC_HEADER $FE0000
#define SPC_DSP_REGS $FE0100

View File

@@ -42,6 +42,7 @@ menuloop_s1
lda isr_done lda isr_done
lsr lsr
bcc menuloop_s1 bcc menuloop_s1
stz isr_done stz isr_done
jsr printtime jsr printtime
jsr menu_updates ;update stuff, check keys etc jsr menu_updates ;update stuff, check keys etc
@@ -271,10 +272,6 @@ dirent_is_file
lda #$0000 lda #$0000
bra dirent_type_cont bra dirent_type_cont
+ +
cmp #$0003 ;SPC -> palette 2
bne +
lda #$0002
bra dirent_type_cont
cmp #$0004 ;IPS -> palette 2 (green) cmp #$0004 ;IPS -> palette 2 (green)
bne + bne +
lda #$0002 lda #$0002
@@ -505,8 +502,6 @@ select_item:
lda [dirptr_addr], y lda [dirptr_addr], y
cmp #$01 cmp #$01
beq sel_is_file beq sel_is_file
cmp #$03
beq sel_is_spc
cmp #$04 cmp #$04
beq sel_is_file beq sel_is_file
cmp #$80 cmp #$80
@@ -524,28 +519,25 @@ sel_is_parent
sel_is_dir sel_is_dir
jsr select_dir jsr select_dir
bra select_item_cont bra select_item_cont
sel_is_spc
jsr select_spc
bra select_item_cont
select_file: select_file:
; have MCU load the rom ; have avr load the rom
dey dey
rep #$20 : .al rep #$20 : .al
lda [dirptr_addr], y lda [dirptr_addr], y
and #$00ff and #$00ff
sta @MCU_PARAM+2 sta @AVR_PARAM+2
dey dey
dey dey
lda [dirptr_addr], y lda [dirptr_addr], y
sta @MCU_PARAM sta @AVR_PARAM
sep #$20 : .as sep #$20 : .as
lda #$01
sta @AVR_CMD
select_file_fade:
lda #$00 lda #$00
sta @$4200 sta @$4200
sei sei
lda #$01
sta @MCU_CMD
select_file_fade:
jsl @wram_fadeloop jsl @wram_fadeloop
rts rts
@@ -605,8 +597,6 @@ select_dir:
sta @dirstart_addr sta @dirstart_addr
lda #$0000 lda #$0000
sta @menu_sel sta @menu_sel
sta @direntry_xscroll
sta @direntry_xscroll_state
sep #$20 : .as sep #$20 : .as
lda #$01 lda #$01
sta @menu_dirty sta @menu_dirty
@@ -645,27 +635,6 @@ select_parent:
sta @menu_dirty sta @menu_dirty
rts rts
select_spc:
dey
rep #$20 : .al
lda [dirptr_addr], y
and #$00ff
sta @MCU_PARAM+2
dey
dey
lda [dirptr_addr], y
sta @MCU_PARAM
sep #$20 : .as
lda #CMD_LOADSPC
sta @MCU_CMD
wait_spc:
lda @MCU_CMD
cmp #$00
bne wait_spc
jsr spcplayer
jsr restore_screen
rts
menu_key_x: menu_key_x:
jsr mainmenu jsr mainmenu
rts rts
@@ -805,7 +774,7 @@ select_last_file:
and pad1trig+1 and pad1trig+1
beq - beq -
lda #$04 lda #$04
sta @MCU_CMD sta @AVR_CMD
jmp select_file_fade jmp select_file_fade
+ jsr restore_screen + jsr restore_screen
plp plp
@@ -881,7 +850,6 @@ scroll_direntry_scrollfast
lda #$28 lda #$28
sta direntry_xscroll_wait sta direntry_xscroll_wait
+ lda direntry_xscroll_state + lda direntry_xscroll_state
clc
adc direntry_xscroll adc direntry_xscroll
sta direntry_xscroll sta direntry_xscroll
bne + bne +

View File

@@ -4,15 +4,7 @@ read_pad:
read_pad1 read_pad1
ldx pad1mem ;byetUDLRaxlriiii ldx pad1mem ;byetUDLRaxlriiii
lda $4218 lda $4218
and #$000f ora $421a
bne +
lda $4218
+ sta pad1mem
lda $421a
and #$000f
bne +
lda $421a
+ ora pad1mem
sta pad1mem sta pad1mem
and #$0f00 and #$0f00
bne read_pad1_count bne read_pad1_count

View File

@@ -84,29 +84,9 @@ math_cont
clc clc
adc bar_x ; + X start coord adc bar_x ; + X start coord
sta $2127 ; window 1 right sta $2127 ; window 1 right
; lda #$3e ; ch. 1-5 lda #$3e ; ch. 1-5
; sta @$420c ; trigger HDMA sta @$420c ; trigger HDMA
lda #$01
lda cur_bright
cmp tgt_bright
beq +
bpl bright_down
bright_up
inc
sta cur_bright
lda $2100
and #$f0
ora cur_bright
sta $2100
bra +
bright_down
dec
sta cur_bright
lda $2100
and #$f0
ora cur_bright
sta $2100
+ lda #$01
sta isr_done sta isr_done
rtl rtl

View File

@@ -1,61 +0,0 @@
; All SPC700 routines in SPC700 machine code
; SPC loader & transfer routines by Shay Green <gblargg@gmail.com>
loader ; .org $0002
.byt $F8,$21 ; mov x,@loader_data
.byt $BD ; mov sp,x
.byt $CD,$22 ; mov x,#@loader_data+1
; Push PC and PSW from SPC header
.byt $BF ; mov a,(x)+
.byt $2D ; push a
.byt $BF ; mov a,(x)+
.byt $2D ; push a
.byt $BF ; mov a,(x)+
.byt $2D ; push a
; Set FLG to $60 rather than value from SPC
.byt $E8,$60 ; mov a,#$60
.byt $D4,$6C ; mov FLG+x,a
; Restore DSP registers
.byt $8D,$00 ; mov y,#0
.byt $BF ; next: mov a,(x)+
.byt $CB,$F2 ; mov $F2,y
.byt $C4,$F3 ; mov $F3,a
.byt $FC ; inc y
.byt $10,-8 ; bpl next
.byt $8F,$6C,$F2 ; mov $F2,#FLG ; set for later
; Rerun loader
.byt $5F,$C0,$FF ; jmp $FFC0
;---------------------------------------
transfer ; .org $0002
.byt $CD,$FE ; mov x,#$FE ; transfer 254 pages
; Transfer four-byte chunks
.byt $8D,$3F ; page: mov y,#$3F
.byt $E4,$F4 ; quad: mov a,$F4
.byt $D6,$00,$02 ; mov0: mov !$0200+y,a
.byt $E4,$F5 ; mov a,$F5
.byt $D6,$40,$02 ; mov1: mov !$0240+y,a
.byt $E4,$F6 ; mov a,$F6
.byt $D6,$80,$02 ; mov2: mov !$0280+y,a
.byt $E4,$F7 ; mov a,$F7 ; tell S-CPU we're ready for more
.byt $CB,$F7 ; mov $F7,Y
.byt $D6,$C0,$02 ; mov3: mov !$02C0+y,a
.byt $DC ; dec y
.byt $10,-25 ; bpl quad
; Increment MSBs of addresses
.byt $AB,$0A ; inc mov0+2
.byt $AB,$0F ; inc mov1+2
.byt $AB,$14 ; inc mov2+2
.byt $AB,$1B ; inc mov3+2
.byt $1D ; dec x
.byt $D0,-38 ; bne page
; Rerun loader
.byt $5F,$C0,$FF ; jmp $FFC0

View File

@@ -1,676 +0,0 @@
#include "memmap.i65"
; SPC Player
; SPC700 transfer and IO routines by Shay Green <gblargg@gmail.com>
spcplayer:
php
sep #$30 : .as : .xs
ldx #$0a ; Check if SPC header is present
-
lda @SPC_HEADER,x
cmp @text_spcid,x
beq +
jmp spc_exit
+
dey
bne -
rep #$10 : .xl ; Now draw lots of stuff
stz bar_wl
dec bar_wl
stz bar_xl
dec bar_xl
stz bar_yl
dec bar_yl
jsr backup_screen
lda #^text_spcplay ; Loading window
sta window_tbank
ldx #!text_spcplay
stx window_taddr
lda @spcplay_win_x
sta window_x
lda @spcplay_win_y
sta window_y
lda @spcplay_win_w
sta window_w
lda @spcplay_win_h
sta window_h
jsr draw_window
lda #^text_spcload ; Loading text
ldx #!text_spcload
sta print_bank
stx print_src
stz print_pal
lda #29
sta print_count
lda #17
sta print_y
lda #17
sta print_x
jsr hiprint
stz isr_done
-
lda isr_done ; Wait until text is being printed...
beq -
jsr spc700_load ; Load SPC into SPC700
lda #^text_spcplay
sta window_tbank
ldx #!text_spcplay
stx window_taddr
lda @spcstart_win_x
sta window_x
lda @spcstart_win_y
sta window_y
lda @spcstart_win_w
sta window_w
lda @spcstart_win_h
sta window_h
jsr draw_window
lda #^text_spcstarta
ldx #!text_spcstarta
sta print_bank
stx print_src
lda #$01
sta print_pal
lda #30
sta print_count
lda #15
sta print_y
lda #17
sta print_x
jsr hiprint
lda #^text_spcstartb
ldx #!text_spcstartb
sta print_bank
stx print_src
lda #$01
sta print_pal
lda #07
sta print_count
lda #17
sta print_y
lda #12
sta print_x
jsr hiprint
lda #$fe
ldx #$004e
sta print_bank
stx print_src
stz print_pal
lda #32
sta print_count
lda #17
sta print_y
lda #20
sta print_x
jsr hiprint
lda #^text_spcstartc
ldx #!text_spcstartc
sta print_bank
stx print_src
lda #$01
sta print_pal
lda #07
sta print_count
lda #18
sta print_y
lda #12
sta print_x
jsr hiprint
lda #$fe
ldx #$002e
sta print_bank
stx print_src
stz print_pal
lda #32
sta print_count
lda #18
sta print_y
lda #20
sta print_x
jsr hiprint
lda #^text_spcstartd
ldx #!text_spcstartd
sta print_bank
stx print_src
lda #$01
sta print_pal
lda #07
sta print_count
lda #19
sta print_y
lda #12
sta print_x
jsr hiprint
lda #$fe
ldx #$00b0
sta longptr+2
sta print_bank
stx longptr
ldy #$00
lda [longptr], y
cmp #$41
bpl +
inx
+ stx print_src
stz print_pal
lda #32
sta print_count
lda #19
sta print_y
lda #20
sta print_x
jsr hiprint
spc_playloop:
lda isr_done ; SPC player loop
lsr
bcc spc_playloop
jsr printtime
stz isr_done
jsr read_pad
lda #$80
and pad1trig+1
bne spc_key_b
bra spc_playloop
spc_key_b:
rep #$20 : .al
tsc
sta saved_sp ; Save SP for later re-entry
lda #$fa50 ; Write reset signature
sta @warm_signature
sep #$20 : .as
sei ; Blank screen & issue CMD_RESET command to Microcontroller...
stz $2100 ; ...this is required, because there is no other way to stop S-SMP & S-DSP
lda #CMD_RESET
sta @MCU_CMD
-
bra - ; At this point, the SNES waits for an external reset from the Microcontroller
spc_exit: ; Return from player in case of wrong SPC file data
plp
rts
;---------------------------------------
spc700_load:
php
sep #$20 : .as
rep #$10 : .xl
sei ; Disable NMI & IRQ
stz $4200 ; The SPC player code is really timing sensitive ;)
jsr upload_dsp_regs ; Upload S-DSP registers
jsr upload_high_ram ; Upload 63.5K of SPC700 ram
jsr upload_low_ram ; Upload rest of ram
jsr restore_final ; Restore SPC700 state & start execution
lda #$81 ; VBlank NMI + Auto Joypad Read
sta $4200 ; enable V-BLANK NMI
cli
plp
rts
;---------------------------------------
; Uploads DSP registers and some other setup code
upload_dsp_regs:
; ---- Begin upload
ldy #$0002
jsr spc_begin_upload
; ---- Upload loader
ldx #$0000
-
lda @loader,x
jsr spc_upload_byte
inx
cpy #31 ; size of loader
bne -
; ---- Upload SP, PC & PSW
lda @SPC_HEADER+43
jsr spc_upload_byte
lda @SPC_HEADER+38
jsr spc_upload_byte
lda @SPC_HEADER+37
jsr spc_upload_byte
lda @SPC_HEADER+42
jsr spc_upload_byte
; ---- Upload DSP registers
ldx #$0000
-
; initialize FLG and KON ($6c/$4c) to avoid artifacts
cpx #$4C
bne +
lda #$00
bra upload_skip_load
+
cpx #$6C
bne +
lda #$E0
bra upload_skip_load
+
lda @SPC_DSP_REGS,x
upload_skip_load
jsr spc_upload_byte
inx
cpx #128
bne -
; --- Upload fixed values for $F1-$F3
ldy #$00F1
jsr spc_next_upload
lda #$80 ; stop timers
jsr spc_upload_byte
lda #$6c ; get dspaddr set for later
jsr spc_upload_byte
lda #$60
jsr spc_upload_byte
; ---- Upload $f8-$1ff
ldy #$00F8
jsr spc_next_upload
ldx #$00F8
-
lda @SPC_DATA,x
jsr spc_upload_byte
inx
cpx #$200
bne -
; ---- Execute loader
ldy #$0002
jsr spc_execute
rts
;---------------------------------------
upload_high_ram:
ldy #$0002
jsr spc_begin_upload
; ---- Upload transfer routine
ldx #$0000
-
lda @transfer,x
jsr spc_upload_byte
inx
cpy #43 ; size of transfer routine
bne -
ldx #$023f ; prepare transfer address
; ---- Execute transfer routine
ldy #$0002
sty APUIO2
stz APUIO1
lda APUIO0
inc
inc
sta APUIO0
; Wait for acknowledgement
-
cmp APUIO0
bne -
; ---- Burst transfer of 63.5K using custom routine
outer_transfer_loop:
ldy #$003f ; 3
inner_transfer_loop:
lda @SPC_DATA,x ; 5 |
sta APUIO0 ; 4 |
lda @SPC_DATA+$40,x ; 5 |
sta APUIO1 ; 4 |
lda @SPC_DATA+$80,x ; 5 |
sta APUIO2 ; 4 |
lda @SPC_DATA+$C0,x ; 5 |
sta APUIO3 ; 4 |
tya ; 2 >> 38 cycles
-
cmp APUIO3 ; 4 |
bne - ; 3 |
dex ; 2 |
dey ; 2 |
bpl inner_transfer_loop ; 3 >> 14 cycles
rep #$21 : .al ; 3 |
txa ; 2 |
adc #$140 ; 3 |
tax ; 2 |
sep #$20 : .as ; 3 |
cpx #$003f ; 3 |
bne outer_transfer_loop ; 3 >> 19 cycles
rts
;---------------------------------------
upload_low_ram:
; ---- Upload $0002-$00EF using IPL
ldy #$0002
jsr spc_begin_upload
ldx #$0002
-
lda @SPC_DATA,x
jsr spc_upload_byte
inx
cpx #$00F0
bne -
rts
;---------------------------------------
; Executes final restoration code
restore_final:
jsr start_exec_io ; prepare execution from I/O registers
stz $420d ; SPC700 I/O code requires SLOW timing
; ---- Restore first two bytes of RAM
lda @SPC_DATA
xba
lda #$e8 ; MOV A,#@SPC_DATA
tax
jsr exec_instr
ldx #$00C4 ; MOV $00,A
jsr exec_instr
lda @SPC_DATA+1
xba
lda #$e8 ; MOV A,#@SPC_DATA+1
tax
jsr exec_instr
ldx #$01C4 ; MOV $01,A
jsr exec_instr
; ---- Restore SP
lda @SPC_HEADER+43
sec
sbc #3
xba
lda #$cd ; MOV X,#@SPC_HEADER+43
tax
jsr exec_instr
ldx #$bd ; MOV SP,X
jsr exec_instr
; ---- Restore X
lda @SPC_HEADER+40
xba
lda #$cd ; MOV X,#@SPC_HEADER+40
tax
jsr exec_instr
; ---- Restore Y
lda @SPC_HEADER+41
xba
lda #$8d ; MOV Y,#@SPC_HEADER+41
tax
jsr exec_instr
; ---- Restore DSP FLG register
lda @SPC_DSP_REGS+$6c
xba
lda #$e8 ; MOV A,#@SPC_DSP_REGS+$6c
tax
jsr exec_instr
ldx #$f3C4 ; MOV $f3,A -> $f2 has been set-up before by SPC700 loader
jsr exec_instr
; ---- wait a bit (the newer S-APU takes its time to ramp up the volume)
lda #$10
- pha
jsr waitblank
pla
dec
bne -
; ---- Restore DSP KON register
lda #$4C
xba
lda #$e8 ; MOV A,#$4c
tax
jsr exec_instr
ldx #$f2C4 ; MOV $f2,A
jsr exec_instr
lda @SPC_DSP_REGS+$4C
xba
lda #$e8 ; MOV A,#@SPC_DSP_REGS+$4c
tax
jsr exec_instr
ldx #$f3C4 ; MOV $f3,A
jsr exec_instr
; ---- Restore DSP register address
lda @SPC_DATA+$F2
xba
lda #$e8 ; MOV A,#@SPC_DATA+$F2
tax
jsr exec_instr
ldx #$f2C4 ; MOV dest,A
jsr exec_instr
; ---- Restore CONTROL register
lda @SPC_DATA+$F1
and #$CF ; don't clear input ports
xba
lda #$e8 ; MOV A,#@SPC_DATA+$F1
tax
jsr exec_instr
ldx #$f1C4 ; MOV $F1,A
jsr exec_instr
;---- Restore A
lda @SPC_HEADER+39
xba
lda #$e8 ; MOV A,#@SPC_HEADER+39
tax
jsr exec_instr
;---- Restore PSW and PC
ldx #$7F00 ; NOP; RTI
stx APUIO0
lda #$FC ; Patch loop to execute instruction just written
sta APUIO3
;---- restore IO ports $f4 - $f7
rep #$20 : .al
lda @SPC_DATA+$F4
tax
lda @SPC_DATA+$F6
sta APUIO2
stx APUIO0 ; last to avoid overwriting RETI before run
sep #$20 : .as
lda #$01
sta $420d ; restore FAST CPU operation
rts
;---------------------------------------
spc_begin_upload:
sty APUIO2 ; Set address
ldy #$BBAA ; Wait for SPC
-
cpy APUIO0
bne -
lda #$CC ; Send acknowledgement
sta APUIO1
sta APUIO0
- ; Wait for acknowledgement
cmp APUIO0
bne -
ldy #0 ; Initialize index
rts
;---------------------------------------
spc_upload_byte:
sta APUIO1
tya ; Signal it's ready
sta APUIO0
- ; Wait for acknowledgement
cmp APUIO0
bne -
iny
rts
;---------------------------------------
spc_next_upload:
sty APUIO2
; Send command
; Special case operation has been fully tested.
lda APUIO0
inc
inc
bne +
inc
+
sta APUIO1
sta APUIO0
; Wait for acknowledgement
-
cmp APUIO0
bne -
ldy #0
rts
;---------------------------------------
spc_execute:
sty APUIO2
stz APUIO1
lda APUIO0
inc
inc
sta APUIO0
; Wait for acknowledgement
-
cmp APUIO0
bne -
rts
;---------------------------------------
start_exec_io:
; Set execution address
ldx #$00F5
stx APUIO2
stz APUIO1 ; NOP
ldx #$FE2F ; BRA *-2
; Signal to SPC that we're ready
lda APUIO0
inc
inc
sta APUIO0
; Wait for acknowledgement
-
cmp APUIO0
bne -
; Quickly write branch
stx APUIO2
rts
;---------------------------------------
exec_instr:
; Replace instruction
stx APUIO0
lda #$FC
sta APUIO3 ; 30
; SPC BRA loop takes 4 cycles, so it reads
; the branch offset every 4 SPC cycles (84 master).
; We must handle the case where it read just before
; the write above, and when it reads just after it.
; If it reads just after, we have at least 7 SPC
; cycles (147 master) to change restore the branch
; offset.
; 48 minimum, 90 maximum
ora #0
ora #0
ora #0
nop
nop
nop
; 66 delay, about the middle of the above limits
phd ;4
pld ;5
; Give plenty of extra time if single execution
; isn't needed, as this avoids such tight timing
; requirements.
; phd ;4
; pld ;5
; phd ;4
; pld ;5
; Patch loop to skip first two bytes
lda #$FE ; 16
sta APUIO3 ; 30
; 38 minimum (assuming 66 delay above)
phd ; 4
pld ; 5
; Give plenty of extra time if single execution
; isn't needed, as this avoids such tight timing
; requirements.
phd
pld
phd
pld
rts

View File

@@ -35,19 +35,11 @@ show_sysinfo:
sta window_h sta window_h
jsr draw_window jsr draw_window
stz print_pal stz print_pal
ldx #38
copy_snes_system_text:
lda @text_system,x
sta @snes_system_config,x
dex
bpl copy_snes_system_text
sysinfo_printloop: sysinfo_printloop:
sep #$20 : .as sep #$20 : .as
rep #$10 : .xl rep #$10 : .xl
lda #CMD_SYSINFO lda #CMD_SYSINFO
sta @MCU_CMD sta @AVR_CMD
lda #^SYSINFO_BLK lda #^SYSINFO_BLK
ldx #!SYSINFO_BLK ldx #!SYSINFO_BLK
sta print_bank sta print_bank
@@ -59,7 +51,7 @@ sysinfo_printloop:
sta print_x sta print_x
lda #40 lda #40
sta print_count sta print_count
lda #12 lda #13
- pha - pha
jsr hiprint jsr hiprint
inc print_y inc print_y
@@ -72,41 +64,6 @@ sysinfo_printloop:
pla pla
dec dec
bne - bne -
ldx #24
lda $213e
and #$0f
clc
adc #$30
sta @snes_system_config,x
ldx #38
lda $213f
and #$0f
clc
adc #$30
sta @snes_system_config,x
ldx #10
lda $4210
and #$0f
clc
adc #$30
sta @snes_system_config,x
lda #^snes_system_config ; System text
ldx #!snes_system_config
sta print_bank
stx print_src
stz print_pal
lda #39
sta print_count
lda #23
sta print_y
lda #12
sta print_x
jsr hiprint
- lda isr_done - lda isr_done
lsr lsr
bcc - bcc -
@@ -130,5 +87,5 @@ sysinfo_printloop:
+ plp + plp
jsr restore_screen jsr restore_screen
lda #$00 lda #$00
sta @MCU_CMD sta @AVR_CMD
rtl rtl

View File

@@ -1,95 +1,146 @@
.text .text
#include "memmap.i65" #include "memmap.i65"
.byt "===HIPRINT===" .byt "===HIPRINT==="
; input:
; print_count
; print_x
; print_y
; print_src
; print_bank
; print_pal
;
; output:
; print_done (# of chars printed)
; print_over (char after print_count)
hiprint: hiprint:
php
sep #$20 : .as sep #$20 : .as
rep #$10 : .xl
ldx print_src
stx print_ptr
lda print_bank
sta print_ptr+2
phb
lda #$7e
pha
plb
rep #$30 : .al : .xl
lda print_pal
and #$00ff
xba
asl
asl
ora #$2000
sta print_temp
lda print_count lda print_count
and #$00ff sta print_count_tmp
beq hiprint_end stz print_over
tay rep #$30 : .xl : .al
stz print_done
lda print_x lda print_x
and #$00ff and #$00ff
sta print_x lsr
lda print_y bcs print_bg1
ldx #!BG1_TILE_BUF ; for 2nd loop
phx
ldx #!BG2_TILE_BUF ; for 1st loop
phx
bra print_bg_cont
print_bg1
ldx #!BG2_TILE_BUF+2 ; for 2nd loop
phx
ldx #!BG1_TILE_BUF ; for 1st loop da whoop
phx
bra print_bg_cont
print_bg_cont
sta !print_temp
lda !print_y
and #$00ff and #$00ff
asl asl
asl asl
asl asl
asl asl
asl asl
asl
clc clc
adc print_x adc !print_temp
and #$fffe asl ; double the offset for WRAM addressing
tax tay ; zonday
lda print_x plx
lsr phy ; offset from tilemap start
bcs hiprint_bg1 stx !print_temp
hiprint_bg2 clc
lda [print_ptr] adc !print_temp
and #$00ff ; we need to transfer to WRAM and from there to VRAM via DMA during VBLANK
beq hiprint_end ; because VRAM can only be accessed during VBLANK and forced blanking.
inc print_ptr sta $2181
asl
ora print_temp
sta !BG2_TILE_BUF, x
dey
beq hiprint_end
hiprint_bg1
lda [print_ptr]
and #$00ff
beq hiprint_end
inc print_ptr
asl
ora print_temp
sta !BG1_TILE_BUF, x
inx
inx
dey
beq hiprint_end
bra hiprint_bg2
hiprint_end
plb
sep #$20 : .as sep #$20 : .as
lda [print_ptr] lda #$7f ;we really only need bit 0. full bank given for clarity
sta print_over sta $2183
tya print_loop
sec ldx !print_src
sbc print_count lda !print_bank
eor #$ff pha
plb
phx ; source addr
print_loop_inner
lda !0,x
bne +
jmp print_end2
+ asl
sta @$2180
lda @print_pal
asl
asl
adc #$00
ora #$20
sta @$2180
lda @print_done
inc inc
sta print_done sta @print_done
plp inx
lda !0,x
beq print_loop2
inx
lda !0,x
beq print_loop2
lda @print_count_tmp
dec
dec
sta @print_count_tmp
beq print_loop2
bmi print_loop2
bra print_loop_inner
print_loop2
lda @print_count
dec
sta @print_count_tmp
beq print_end2
lda #$00
pha
plb
rep #$30 : .al : .xl
ply ; source addr
iny
pla ; offset from tilemap start
plx ; other tilemap addr
stx !print_temp
clc
adc !print_temp ; tilemap+offset
sta $2181
tyx
sep #$20 : .as
lda print_bank
pha
plb
print_loop2_inner
lda !0,x
bne +
jmp print_end
+ asl
sta @$2180
lda @print_pal
asl
asl
adc #$00
ora #$20
sta @$2180
lda @print_done
inc
sta @print_done
inx
lda !0,x
beq print_end
lda @print_count_tmp
dec
dec
sta @print_count_tmp
beq print_end
bmi print_end
inx
lda !0,x
beq print_end
bra print_loop2_inner
print_end2 ; clean up the stack (6 bytes)
ply
ply
ply
print_end
lda !0,x
sta @print_over
lda #$00
pha
plb
rts rts
@@ -239,7 +290,6 @@ draw_window:
sta print_count sta print_count
jsr hiprint jsr hiprint
lda print_done lda print_done
clc
adc print_x adc print_x
sta print_x sta print_x
lda #^window_tr lda #^window_tr

View File

@@ -499,8 +499,6 @@ time_dec_y1_normal
rts rts
gettime gettime
php
sep #$20 : .as
lda #$0d lda #$0d
sta $2801 sta $2801
lda $2800 lda $2800
@@ -528,7 +526,6 @@ gettime
sta time_y10 sta time_y10
lda $2800 lda $2800
sta time_y100 sta time_y100
plp
rts rts
rendertime rendertime
@@ -680,31 +677,31 @@ is_leapyear_400th
settime settime
lda time_y100 lda time_y100
sta @MCU_PARAM sta @AVR_PARAM
lda time_y10 lda time_y10
sta @MCU_PARAM+1 sta @AVR_PARAM+1
lda time_y1 lda time_y1
sta @MCU_PARAM+2 sta @AVR_PARAM+2
lda time_mon lda time_mon
sta @MCU_PARAM+3 sta @AVR_PARAM+3
lda time_d10 lda time_d10
sta @MCU_PARAM+4 sta @AVR_PARAM+4
lda time_d1 lda time_d1
sta @MCU_PARAM+5 sta @AVR_PARAM+5
lda time_h10 lda time_h10
sta @MCU_PARAM+6 sta @AVR_PARAM+6
lda time_h1 lda time_h1
sta @MCU_PARAM+7 sta @AVR_PARAM+7
lda time_m10 lda time_m10
sta @MCU_PARAM+8 sta @AVR_PARAM+8
lda time_m1 lda time_m1
sta @MCU_PARAM+9 sta @AVR_PARAM+9
lda time_s10 lda time_s10
sta @MCU_PARAM+10 sta @AVR_PARAM+10
lda time_s1 lda time_s1
sta @MCU_PARAM+11 sta @AVR_PARAM+11
lda #$02 ; set clock lda #$02 ; set clock
sta @MCU_CMD sta @AVR_CMD
rts rts
printtime: printtime:

View File

@@ -55,7 +55,7 @@ TARGET = $(OBJDIR)/sd2snes
# List C source files here. (C dependencies are automatically generated.) # List C source files here. (C dependencies are automatically generated.)
SRC = main.c ff.c ccsbcs.c clock.c uart.c power.c led.c timer.c printf.c spi.c fileops.c rtc.c fpga.c fpga_spi.c snes.c smc.c memory.c filetypes.c faulthandler.c sort.c crc32.c cic.c cli.c xmodem.c irq.c rle.c sdnative.c msu1.c crc16.c sysinfo.c cfg.c tests.c SRC = main.c ff.c ccsbcs.c clock.c uart.c power.c led.c timer.c printf.c spi.c fileops.c rtc.c fpga.c fpga_spi.c snes.c smc.c memory.c filetypes.c faulthandler.c sort.c crc32.c cic.c cli.c xmodem.c irq.c rle.c sdnative.c msu1.c crc16.c sysinfo.c cfg.c
# usbcontrol.c usb_hid.c usbhw_lpc.c usbinit.c usbstdreq.c # usbcontrol.c usb_hid.c usbhw_lpc.c usbinit.c usbstdreq.c
@@ -75,7 +75,7 @@ ASRC = startup.S crc.S
# (Note: 3 is not always the best optimization level. See avr-libc FAQ.) # (Note: 3 is not always the best optimization level. See avr-libc FAQ.)
# Use s -mcall-prologues when you really need size... # Use s -mcall-prologues when you really need size...
#OPT = 2 #OPT = 2
OPT = s OPT = 2
# Debugging format. # Debugging format.
DEBUG = dwarf-2 DEBUG = dwarf-2
@@ -117,6 +117,7 @@ endif
# CC must be defined here to generate the correct CFLAGS # CC must be defined here to generate the correct CFLAGS
SHELL = sh SHELL = sh
CC = $(ARCH)-gcc CC = $(ARCH)-gcc
#CC = clang
OBJCOPY = $(ARCH)-objcopy OBJCOPY = $(ARCH)-objcopy
OBJDUMP = $(ARCH)-objdump OBJDUMP = $(ARCH)-objdump
SIZE = $(ARCH)-size SIZE = $(ARCH)-size
@@ -124,8 +125,6 @@ NM = $(ARCH)-nm
REMOVE = rm -f REMOVE = rm -f
COPY = cp COPY = cp
AWK = awk AWK = awk
RLE = ../utils/rle
BIN2H = utils/bin2h
#---------------- Compiler Options ---------------- #---------------- Compiler Options ----------------
# -g*: generate debugging information # -g*: generate debugging information
@@ -139,8 +138,10 @@ CFLAGS += $(CDEFS) $(CINCS)
CFLAGS += -O$(OPT) CFLAGS += -O$(OPT)
CFLAGS += $(CPUFLAGS) -nostartfiles CFLAGS += $(CPUFLAGS) -nostartfiles
#CFLAGS += -funsigned-char -funsigned-bitfields -fpack-struct -fshort-enums #CFLAGS += -funsigned-char -funsigned-bitfields -fpack-struct -fshort-enums
CFLAGS += -Wall -Wstrict-prototypes -Werror CFLAGS += -Wall -Wstrict-prototypes
#-Werror
CFLAGS += -Wa,-adhlns=$(OBJDIR)/$(<:.c=.lst) CFLAGS += -Wa,-adhlns=$(OBJDIR)/$(<:.c=.lst)
#CFLAGS += -I/opt/arm-none-eabi-4.6.2/arm-none-eabi/include/
CFLAGS += -I$(OBJDIR) CFLAGS += -I$(OBJDIR)
CFLAGS += $(patsubst %,-I%,$(EXTRAINCDIRS)) CFLAGS += $(patsubst %,-I%,$(EXTRAINCDIRS))
CFLAGS += $(CSTANDARD) CFLAGS += $(CSTANDARD)
@@ -198,7 +199,7 @@ ALL_ASFLAGS = -I. -x assembler-with-cpp $(ASFLAGS) $(CDEFS)
# Default target. # Default target.
all: build all: build
build: snesboot.h cfgware.h elf bin hex build: elf bin hex
$(E) " SIZE $(TARGET).elf" $(E) " SIZE $(TARGET).elf"
$(Q)$(ELFSIZE)|grep -v debug $(Q)$(ELFSIZE)|grep -v debug
cp $(TARGET).bin $(OBJDIR)/firmware.img cp $(TARGET).bin $(OBJDIR)/firmware.img
@@ -218,37 +219,19 @@ sym: $(TARGET).sym
program: build program: build
utils/lpcchksum $(TARGET).bin utils/lpcchksum $(TARGET).bin
openocd -f interface/olimex-arm-usb-ocd.cfg -f lpc1754.cfg -f flash.cfg openocd -f openocd-usb.cfg -f lpc1754.cfg -f flash.cfg
debug: build debug: build
openocd -f interface/olimex-arm-usb-ocd.cfg -f lpc1754.cfg openocd -f openocd-usb.cfg -f lpc1754.cfg
reset: reset:
openocd -f interface/olimex-arm-usb-ocd.cfg -f lpc1754.cfg -f reset.cfg openocd -f openocd-usb.cfg -f lpc1754.cfg -f reset.cfg
# Display size of file. # Display size of file.
HEXSIZE = $(SIZE) --target=$(FORMAT) $(TARGET).hex HEXSIZE = $(SIZE) --target=$(FORMAT) $(TARGET).hex
ELFSIZE = $(SIZE) -A $(TARGET).elf ELFSIZE = $(SIZE) -A $(TARGET).elf
# Generate cfgware.h
cfgware.h: $(OBJDIR)/fpga_rle.bit
$(E) " BIN2H $@"
$(Q) $(BIN2H) $< $@ cfgware
$(OBJDIR)/fpga_rle.bit: ../verilog/sd2sneslite/main.bit
$(E) " RLE $@"
$(Q) $(RLE) $< $@
#generate snesboot.h
snesboot.h: $(OBJDIR)/snesboot.rle
$(E) " BIN2H $@"
$(Q) $(BIN2H) $< $@ bootrle
$(OBJDIR)/snesboot.rle: ../snes/boot/menu.bin
$(E) " RLE $@"
$(Q) $(RLE) $< $@
# Generate autoconf.h from config # Generate autoconf.h from config
.PRECIOUS : $(OBJDIR)/autoconf.h .PRECIOUS : $(OBJDIR)/autoconf.h
@@ -321,7 +304,6 @@ clean_list :
$(Q)$(REMOVE) $(TARGET).sym $(Q)$(REMOVE) $(TARGET).sym
$(Q)$(REMOVE) $(TARGET).lss $(Q)$(REMOVE) $(TARGET).lss
$(Q)$(REMOVE) $(OBJ) $(Q)$(REMOVE) $(OBJ)
$(Q)$(REMOVE) cfgware.h
$(Q)$(REMOVE) $(OBJDIR)/autoconf.h $(Q)$(REMOVE) $(OBJDIR)/autoconf.h
$(Q)$(REMOVE) $(OBJDIR)/*.bin $(Q)$(REMOVE) $(OBJDIR)/*.bin
$(Q)$(REMOVE) $(LST) $(Q)$(REMOVE) $(LST)

View File

@@ -25,7 +25,6 @@ b) Cortex M3 toolchain
- libexpat-dev - libexpat-dev
- make - make
- gcc - gcc
Package names may differ for your distribution.
Newer gccs complain when compiling binutils, so you may have to add Newer gccs complain when compiling binutils, so you may have to add
'--disable-werror' to the compiler options for binutils in the Makefile. '--disable-werror' to the compiler options for binutils in the Makefile.
The Makefile will install immediately so make sure you can write to the The Makefile will install immediately so make sure you can write to the

80
src/bootldr/baudcalc.c Normal file
View File

@@ -0,0 +1,80 @@
#include <stdio.h>
#include <stdlib.h>
#include <stdint.h>
#include "config.h"
static uint8_t uart_lookupratio(float f_fr) {
uint16_t errors[72]={0,67,71,77,83,91,100,111,125,
133,143,154,167,182,200,214,222,231,
250,267,273,286,300,308,333,357,364,
375,385,400,417,429,444,455,462,467,
500,533,538,545,556,571,583,600,615,
625,636,643,667,692,700,714,727,733,
750,769,778,786,800,818,833,846,857,
867,875,889,900,909,917,923,929,933};
uint8_t ratios[72]={0x10,0xf1,0xe1,0xd1,0xc1,0xb1,0xa1,0x91,0x81,
0xf2,0x71,0xd2,0x61,0xb2,0x51,0xe3,0x92,0xd3,
0x41,0xf4,0xb3,0x72,0xa3,0xd4,0x31,0xe5,0xb4,
0x83,0xd5,0x52,0xc5,0x73,0x94,0xb5,0xd6,0xf7,
0x21,0xf8,0xd7,0xb6,0x95,0x74,0xc7,0x53,0xd8,
0x85,0xb7,0xe9,0x32,0xd9,0xa7,0x75,0xb8,0xfb,
0x43,0xda,0x97,0xeb,0x54,0xb9,0x65,0xdb,0x76,
0xfd,0x87,0x98,0xa9,0xba,0xcb,0xdc,0xed,0xfe};
int fr = (f_fr-1)*1000;
int i=0, i_result=0;
int err=0, lasterr=1000;
for(i=0; i<72; i++) {
if(fr<errors[i]) {
err=errors[i]-fr;
} else {
err=fr-errors[i];
}
if(err<lasterr) {
i_result=i;
lasterr=err;
}
}
return ratios[i_result];
}
static uint32_t baud2divisor(unsigned int baudrate) {
uint32_t int_ratio;
uint32_t error;
uint32_t dl=0;
float f_ratio;
float f_fr;
float f_dl;
float f_pclk = (float)CONFIG_CPU_FREQUENCY / CONFIG_UART_PCLKDIV;
uint8_t fract_ratio;
f_ratio=(f_pclk / 16 / baudrate);
int_ratio = (int)f_ratio;
error=(f_ratio*1000)-(int_ratio*1000);
if(error>990) {
int_ratio++;
} else if(error>10) {
f_fr=1.5;
f_dl=f_pclk / (16 * baudrate * (f_fr));
dl = (int)f_dl;
f_fr=f_pclk / (16 * baudrate * dl);
fract_ratio = uart_lookupratio(f_fr);
}
if(!dl) {
return int_ratio;
} else {
return ((fract_ratio<<16)&0xff0000) | dl;
}
}
int main(int argc, char *argv[])
{
if (argc != 2)
{
printf("usage: %s baud\n", argv[0]);
return -1;
}
printf("Baud %d : 0x%X\n", atoi(argv[1]), baud2divisor(atoi(argv[1])));
return 0;
}

View File

@@ -4,14 +4,14 @@
/* The classic macro */ /* The classic macro */
#define BV(x) (1<<(x)) #define BV(x) (1<<(x))
/* CM3 bit-bang access macro - no error checks! */ /* CM3 bit-band access macro - no error checks! */
#define BITBANG(addr,bit) \ #define BITBAND(addr,bit) \
(*((volatile unsigned long *)( \ (*((volatile unsigned long *)( \
((unsigned long)&(addr) & 0x01ffffff)*32 + \ ((unsigned long)&(addr) & 0x01ffffff)*32 + \
(bit)*4 + 0x02000000 + ((unsigned long)&(addr) & 0xfe000000) \ (bit)*4 + 0x02000000 + ((unsigned long)&(addr) & 0xfe000000) \
))) )))
#define BITBANG_OFF(addr,offset,bit) \ #define BITBAND_OFF(addr,offset,bit) \
(*((volatile unsigned long *)( \ (*((volatile unsigned long *)( \
(((unsigned long)&(addr) + offset) & 0x01ffffff)*32 + \ (((unsigned long)&(addr) + offset) & 0x01ffffff)*32 + \
(bit)*4 + 0x02000000 + (((unsigned long)&(addr) + offset) & 0xfe000000) \ (bit)*4 + 0x02000000 + (((unsigned long)&(addr) + offset) & 0xfe000000) \

View File

@@ -31,8 +31,7 @@
#if _CODE_PAGE == 437 #if _CODE_PAGE == 437
#define _TBLDEF 1 #define _TBLDEF 1
static static
const WCHAR Tbl[] = /* CP437(0x80-0xFF) to Unicode conversion table */ const WCHAR Tbl[] = { /* CP437(0x80-0xFF) to Unicode conversion table */
{
0x00C7, 0x00FC, 0x00E9, 0x00E2, 0x00E4, 0x00E0, 0x00E5, 0x00E7, 0x00C7, 0x00FC, 0x00E9, 0x00E2, 0x00E4, 0x00E0, 0x00E5, 0x00E7,
0x00EA, 0x00EB, 0x00E8, 0x00EF, 0x00EE, 0x00EC, 0x00C4, 0x00C5, 0x00EA, 0x00EB, 0x00E8, 0x00EF, 0x00EE, 0x00EC, 0x00C4, 0x00C5,
0x00C9, 0x00E6, 0x00C6, 0x00F4, 0x00F6, 0x00F2, 0x00FB, 0x00F9, 0x00C9, 0x00E6, 0x00C6, 0x00F4, 0x00F6, 0x00F2, 0x00FB, 0x00F9,
@@ -54,8 +53,7 @@ const WCHAR Tbl[] = /* CP437(0x80-0xFF) to Unicode conversion table */
#elif _CODE_PAGE == 720 #elif _CODE_PAGE == 720
#define _TBLDEF 1 #define _TBLDEF 1
static static
const WCHAR Tbl[] = /* CP720(0x80-0xFF) to Unicode conversion table */ const WCHAR Tbl[] = { /* CP720(0x80-0xFF) to Unicode conversion table */
{
0x0000, 0x0000, 0x00E9, 0x00E2, 0x0000, 0x00E0, 0x0000, 0x00E7, 0x0000, 0x0000, 0x00E9, 0x00E2, 0x0000, 0x00E0, 0x0000, 0x00E7,
0x00EA, 0x00EB, 0x00E8, 0x00EF, 0x00EE, 0x0000, 0x0000, 0x0000, 0x00EA, 0x00EB, 0x00E8, 0x00EF, 0x00EE, 0x0000, 0x0000, 0x0000,
0x0000, 0x0651, 0x0652, 0x00F4, 0x00A4, 0x0640, 0x00FB, 0x00F9, 0x0000, 0x0651, 0x0652, 0x00F4, 0x00A4, 0x0640, 0x00FB, 0x00F9,
@@ -77,8 +75,7 @@ const WCHAR Tbl[] = /* CP720(0x80-0xFF) to Unicode conversion table */
#elif _CODE_PAGE == 737 #elif _CODE_PAGE == 737
#define _TBLDEF 1 #define _TBLDEF 1
static static
const WCHAR Tbl[] = /* CP737(0x80-0xFF) to Unicode conversion table */ const WCHAR Tbl[] = { /* CP737(0x80-0xFF) to Unicode conversion table */
{
0x0391, 0x0392, 0x0393, 0x0394, 0x0395, 0x0396, 0x0397, 0x0398, 0x0391, 0x0392, 0x0393, 0x0394, 0x0395, 0x0396, 0x0397, 0x0398,
0x0399, 0x039A, 0x039B, 0x039C, 0x039D, 0x039E, 0x039F, 0x03A0, 0x0399, 0x039A, 0x039B, 0x039C, 0x039D, 0x039E, 0x039F, 0x03A0,
0x03A1, 0x03A3, 0x03A4, 0x03A5, 0x03A6, 0x03A7, 0x03A8, 0x03A9, 0x03A1, 0x03A3, 0x03A4, 0x03A5, 0x03A6, 0x03A7, 0x03A8, 0x03A9,
@@ -100,8 +97,7 @@ const WCHAR Tbl[] = /* CP737(0x80-0xFF) to Unicode conversion table */
#elif _CODE_PAGE == 775 #elif _CODE_PAGE == 775
#define _TBLDEF 1 #define _TBLDEF 1
static static
const WCHAR Tbl[] = /* CP775(0x80-0xFF) to Unicode conversion table */ const WCHAR Tbl[] = { /* CP775(0x80-0xFF) to Unicode conversion table */
{
0x0106, 0x00FC, 0x00E9, 0x0101, 0x00E4, 0x0123, 0x00E5, 0x0107, 0x0106, 0x00FC, 0x00E9, 0x0101, 0x00E4, 0x0123, 0x00E5, 0x0107,
0x0142, 0x0113, 0x0156, 0x0157, 0x012B, 0x0179, 0x00C4, 0x00C5, 0x0142, 0x0113, 0x0156, 0x0157, 0x012B, 0x0179, 0x00C4, 0x00C5,
0x00C9, 0x00E6, 0x00C6, 0x014D, 0x00F6, 0x0122, 0x00A2, 0x015A, 0x00C9, 0x00E6, 0x00C6, 0x014D, 0x00F6, 0x0122, 0x00A2, 0x015A,
@@ -123,8 +119,7 @@ const WCHAR Tbl[] = /* CP775(0x80-0xFF) to Unicode conversion table */
#elif _CODE_PAGE == 850 #elif _CODE_PAGE == 850
#define _TBLDEF 1 #define _TBLDEF 1
static static
const WCHAR Tbl[] = /* CP850(0x80-0xFF) to Unicode conversion table */ const WCHAR Tbl[] = { /* CP850(0x80-0xFF) to Unicode conversion table */
{
0x00C7, 0x00FC, 0x00E9, 0x00E2, 0x00E4, 0x00E0, 0x00E5, 0x00E7, 0x00C7, 0x00FC, 0x00E9, 0x00E2, 0x00E4, 0x00E0, 0x00E5, 0x00E7,
0x00EA, 0x00EB, 0x00E8, 0x00EF, 0x00EE, 0x00EC, 0x00C4, 0x00C5, 0x00EA, 0x00EB, 0x00E8, 0x00EF, 0x00EE, 0x00EC, 0x00C4, 0x00C5,
0x00C9, 0x00E6, 0x00C6, 0x00F4, 0x00F6, 0x00F2, 0x00FB, 0x00F9, 0x00C9, 0x00E6, 0x00C6, 0x00F4, 0x00F6, 0x00F2, 0x00FB, 0x00F9,
@@ -146,8 +141,7 @@ const WCHAR Tbl[] = /* CP850(0x80-0xFF) to Unicode conversion table */
#elif _CODE_PAGE == 852 #elif _CODE_PAGE == 852
#define _TBLDEF 1 #define _TBLDEF 1
static static
const WCHAR Tbl[] = /* CP852(0x80-0xFF) to Unicode conversion table */ const WCHAR Tbl[] = { /* CP852(0x80-0xFF) to Unicode conversion table */
{
0x00C7, 0x00FC, 0x00E9, 0x00E2, 0x00E4, 0x016F, 0x0107, 0x00E7, 0x00C7, 0x00FC, 0x00E9, 0x00E2, 0x00E4, 0x016F, 0x0107, 0x00E7,
0x0142, 0x00EB, 0x0150, 0x0151, 0x00EE, 0x0179, 0x00C4, 0x0106, 0x0142, 0x00EB, 0x0150, 0x0151, 0x00EE, 0x0179, 0x00C4, 0x0106,
0x00C9, 0x0139, 0x013A, 0x00F4, 0x00F6, 0x013D, 0x013E, 0x015A, 0x00C9, 0x0139, 0x013A, 0x00F4, 0x00F6, 0x013D, 0x013E, 0x015A,
@@ -169,8 +163,7 @@ const WCHAR Tbl[] = /* CP852(0x80-0xFF) to Unicode conversion table */
#elif _CODE_PAGE == 855 #elif _CODE_PAGE == 855
#define _TBLDEF 1 #define _TBLDEF 1
static static
const WCHAR Tbl[] = /* CP855(0x80-0xFF) to Unicode conversion table */ const WCHAR Tbl[] = { /* CP855(0x80-0xFF) to Unicode conversion table */
{
0x0452, 0x0402, 0x0453, 0x0403, 0x0451, 0x0401, 0x0454, 0x0404, 0x0452, 0x0402, 0x0453, 0x0403, 0x0451, 0x0401, 0x0454, 0x0404,
0x0455, 0x0405, 0x0456, 0x0406, 0x0457, 0x0407, 0x0458, 0x0408, 0x0455, 0x0405, 0x0456, 0x0406, 0x0457, 0x0407, 0x0458, 0x0408,
0x0459, 0x0409, 0x045A, 0x040A, 0x045B, 0x040B, 0x045C, 0x040C, 0x0459, 0x0409, 0x045A, 0x040A, 0x045B, 0x040B, 0x045C, 0x040C,
@@ -192,8 +185,7 @@ const WCHAR Tbl[] = /* CP855(0x80-0xFF) to Unicode conversion table */
#elif _CODE_PAGE == 857 #elif _CODE_PAGE == 857
#define _TBLDEF 1 #define _TBLDEF 1
static static
const WCHAR Tbl[] = /* CP857(0x80-0xFF) to Unicode conversion table */ const WCHAR Tbl[] = { /* CP857(0x80-0xFF) to Unicode conversion table */
{
0x00C7, 0x00FC, 0x00E9, 0x00E2, 0x00E4, 0x00E0, 0x00E5, 0x00E7, 0x00C7, 0x00FC, 0x00E9, 0x00E2, 0x00E4, 0x00E0, 0x00E5, 0x00E7,
0x00EA, 0x00EB, 0x00E8, 0x00EF, 0x00EE, 0x0131, 0x00C4, 0x00C5, 0x00EA, 0x00EB, 0x00E8, 0x00EF, 0x00EE, 0x0131, 0x00C4, 0x00C5,
0x00C9, 0x00E6, 0x00C6, 0x00F4, 0x00F6, 0x00F2, 0x00FB, 0x00F9, 0x00C9, 0x00E6, 0x00C6, 0x00F4, 0x00F6, 0x00F2, 0x00FB, 0x00F9,
@@ -215,8 +207,7 @@ const WCHAR Tbl[] = /* CP857(0x80-0xFF) to Unicode conversion table */
#elif _CODE_PAGE == 858 #elif _CODE_PAGE == 858
#define _TBLDEF 1 #define _TBLDEF 1
static static
const WCHAR Tbl[] = /* CP858(0x80-0xFF) to Unicode conversion table */ const WCHAR Tbl[] = { /* CP858(0x80-0xFF) to Unicode conversion table */
{
0x00C7, 0x00FC, 0x00E9, 0x00E2, 0x00E4, 0x00E0, 0x00E5, 0x00E7, 0x00C7, 0x00FC, 0x00E9, 0x00E2, 0x00E4, 0x00E0, 0x00E5, 0x00E7,
0x00EA, 0x00EB, 0x00E8, 0x00EF, 0x00EE, 0x00EC, 0x00C4, 0x00C5, 0x00EA, 0x00EB, 0x00E8, 0x00EF, 0x00EE, 0x00EC, 0x00C4, 0x00C5,
0x00C9, 0x00E6, 0x00C6, 0x00F4, 0x00F6, 0x00F2, 0x00FB, 0x00F9, 0x00C9, 0x00E6, 0x00C6, 0x00F4, 0x00F6, 0x00F2, 0x00FB, 0x00F9,
@@ -238,8 +229,7 @@ const WCHAR Tbl[] = /* CP858(0x80-0xFF) to Unicode conversion table */
#elif _CODE_PAGE == 862 #elif _CODE_PAGE == 862
#define _TBLDEF 1 #define _TBLDEF 1
static static
const WCHAR Tbl[] = /* CP862(0x80-0xFF) to Unicode conversion table */ const WCHAR Tbl[] = { /* CP862(0x80-0xFF) to Unicode conversion table */
{
0x05D0, 0x05D1, 0x05D2, 0x05D3, 0x05D4, 0x05D5, 0x05D6, 0x05D7, 0x05D0, 0x05D1, 0x05D2, 0x05D3, 0x05D4, 0x05D5, 0x05D6, 0x05D7,
0x05D8, 0x05D9, 0x05DA, 0x05DB, 0x05DC, 0x05DD, 0x05DE, 0x05DF, 0x05D8, 0x05D9, 0x05DA, 0x05DB, 0x05DC, 0x05DD, 0x05DE, 0x05DF,
0x05E0, 0x05E1, 0x05E2, 0x05E3, 0x05E4, 0x05E5, 0x05E6, 0x05E7, 0x05E0, 0x05E1, 0x05E2, 0x05E3, 0x05E4, 0x05E5, 0x05E6, 0x05E7,
@@ -261,8 +251,7 @@ const WCHAR Tbl[] = /* CP862(0x80-0xFF) to Unicode conversion table */
#elif _CODE_PAGE == 866 #elif _CODE_PAGE == 866
#define _TBLDEF 1 #define _TBLDEF 1
static static
const WCHAR Tbl[] = /* CP866(0x80-0xFF) to Unicode conversion table */ const WCHAR Tbl[] = { /* CP866(0x80-0xFF) to Unicode conversion table */
{
0x0410, 0x0411, 0x0412, 0x0413, 0x0414, 0x0415, 0x0416, 0x0417, 0x0410, 0x0411, 0x0412, 0x0413, 0x0414, 0x0415, 0x0416, 0x0417,
0x0418, 0x0419, 0x041A, 0x041B, 0x041C, 0x041D, 0x041E, 0x041F, 0x0418, 0x0419, 0x041A, 0x041B, 0x041C, 0x041D, 0x041E, 0x041F,
0x0420, 0x0421, 0x0422, 0x0423, 0x0424, 0x0425, 0x0426, 0x0427, 0x0420, 0x0421, 0x0422, 0x0423, 0x0424, 0x0425, 0x0426, 0x0427,
@@ -284,8 +273,7 @@ const WCHAR Tbl[] = /* CP866(0x80-0xFF) to Unicode conversion table */
#elif _CODE_PAGE == 874 #elif _CODE_PAGE == 874
#define _TBLDEF 1 #define _TBLDEF 1
static static
const WCHAR Tbl[] = /* CP874(0x80-0xFF) to Unicode conversion table */ const WCHAR Tbl[] = { /* CP874(0x80-0xFF) to Unicode conversion table */
{
0x20AC, 0x0000, 0x0000, 0x0000, 0x0000, 0x2026, 0x0000, 0x0000, 0x20AC, 0x0000, 0x0000, 0x0000, 0x0000, 0x2026, 0x0000, 0x0000,
0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
0x0000, 0x2018, 0x2019, 0x201C, 0x201D, 0x2022, 0x2013, 0x2014, 0x0000, 0x2018, 0x2019, 0x201C, 0x201D, 0x2022, 0x2013, 0x2014,
@@ -307,8 +295,7 @@ const WCHAR Tbl[] = /* CP874(0x80-0xFF) to Unicode conversion table */
#elif _CODE_PAGE == 1250 #elif _CODE_PAGE == 1250
#define _TBLDEF 1 #define _TBLDEF 1
static static
const WCHAR Tbl[] = /* CP1250(0x80-0xFF) to Unicode conversion table */ const WCHAR Tbl[] = { /* CP1250(0x80-0xFF) to Unicode conversion table */
{
0x20AC, 0x0000, 0x201A, 0x0000, 0x201E, 0x2026, 0x2020, 0x2021, 0x20AC, 0x0000, 0x201A, 0x0000, 0x201E, 0x2026, 0x2020, 0x2021,
0x0000, 0x2030, 0x0160, 0x2039, 0x015A, 0x0164, 0x017D, 0x0179, 0x0000, 0x2030, 0x0160, 0x2039, 0x015A, 0x0164, 0x017D, 0x0179,
0x0000, 0x2018, 0x2019, 0x201C, 0x201D, 0x2022, 0x2013, 0x2014, 0x0000, 0x2018, 0x2019, 0x201C, 0x201D, 0x2022, 0x2013, 0x2014,
@@ -330,8 +317,7 @@ const WCHAR Tbl[] = /* CP1250(0x80-0xFF) to Unicode conversion table */
#elif _CODE_PAGE == 1251 #elif _CODE_PAGE == 1251
#define _TBLDEF 1 #define _TBLDEF 1
static static
const WCHAR Tbl[] = /* CP1251(0x80-0xFF) to Unicode conversion table */ const WCHAR Tbl[] = { /* CP1251(0x80-0xFF) to Unicode conversion table */
{
0x0402, 0x0403, 0x201A, 0x0453, 0x201E, 0x2026, 0x2020, 0x2021, 0x0402, 0x0403, 0x201A, 0x0453, 0x201E, 0x2026, 0x2020, 0x2021,
0x20AC, 0x2030, 0x0409, 0x2039, 0x040A, 0x040C, 0x040B, 0x040F, 0x20AC, 0x2030, 0x0409, 0x2039, 0x040A, 0x040C, 0x040B, 0x040F,
0x0452, 0x2018, 0x2019, 0x201C, 0x201D, 0x2022, 0x2013, 0x2014, 0x0452, 0x2018, 0x2019, 0x201C, 0x201D, 0x2022, 0x2013, 0x2014,
@@ -353,8 +339,7 @@ const WCHAR Tbl[] = /* CP1251(0x80-0xFF) to Unicode conversion table */
#elif _CODE_PAGE == 1252 #elif _CODE_PAGE == 1252
#define _TBLDEF 1 #define _TBLDEF 1
static static
const WCHAR Tbl[] = /* CP1252(0x80-0xFF) to Unicode conversion table */ const WCHAR Tbl[] = { /* CP1252(0x80-0xFF) to Unicode conversion table */
{
0x20AC, 0x0000, 0x201A, 0x0192, 0x201E, 0x2026, 0x2020, 0x2021, 0x20AC, 0x0000, 0x201A, 0x0192, 0x201E, 0x2026, 0x2020, 0x2021,
0x02C6, 0x2030, 0x0160, 0x2039, 0x0152, 0x0000, 0x017D, 0x0000, 0x02C6, 0x2030, 0x0160, 0x2039, 0x0152, 0x0000, 0x017D, 0x0000,
0x0000, 0x2018, 0x2019, 0x201C, 0x201D, 0x2022, 0x2013, 0x2014, 0x0000, 0x2018, 0x2019, 0x201C, 0x201D, 0x2022, 0x2013, 0x2014,
@@ -376,8 +361,7 @@ const WCHAR Tbl[] = /* CP1252(0x80-0xFF) to Unicode conversion table */
#elif _CODE_PAGE == 1253 #elif _CODE_PAGE == 1253
#define _TBLDEF 1 #define _TBLDEF 1
static static
const WCHAR Tbl[] = /* CP1253(0x80-0xFF) to Unicode conversion table */ const WCHAR Tbl[] = { /* CP1253(0x80-0xFF) to Unicode conversion table */
{
0x20AC, 0x0000, 0x201A, 0x0192, 0x201E, 0x2026, 0x2020, 0x2021, 0x20AC, 0x0000, 0x201A, 0x0192, 0x201E, 0x2026, 0x2020, 0x2021,
0x0000, 0x2030, 0x0000, 0x2039, 0x000C, 0x0000, 0x0000, 0x0000, 0x0000, 0x2030, 0x0000, 0x2039, 0x000C, 0x0000, 0x0000, 0x0000,
0x0000, 0x2018, 0x2019, 0x201C, 0x201D, 0x2022, 0x2013, 0x2014, 0x0000, 0x2018, 0x2019, 0x201C, 0x201D, 0x2022, 0x2013, 0x2014,
@@ -399,8 +383,7 @@ const WCHAR Tbl[] = /* CP1253(0x80-0xFF) to Unicode conversion table */
#elif _CODE_PAGE == 1254 #elif _CODE_PAGE == 1254
#define _TBLDEF 1 #define _TBLDEF 1
static static
const WCHAR Tbl[] = /* CP1254(0x80-0xFF) to Unicode conversion table */ const WCHAR Tbl[] = { /* CP1254(0x80-0xFF) to Unicode conversion table */
{
0x20AC, 0x0000, 0x210A, 0x0192, 0x201E, 0x2026, 0x2020, 0x2021, 0x20AC, 0x0000, 0x210A, 0x0192, 0x201E, 0x2026, 0x2020, 0x2021,
0x02C6, 0x2030, 0x0160, 0x2039, 0x0152, 0x0000, 0x0000, 0x0000, 0x02C6, 0x2030, 0x0160, 0x2039, 0x0152, 0x0000, 0x0000, 0x0000,
0x0000, 0x2018, 0x2019, 0x201C, 0x201D, 0x2022, 0x2013, 0x2014, 0x0000, 0x2018, 0x2019, 0x201C, 0x201D, 0x2022, 0x2013, 0x2014,
@@ -422,8 +405,7 @@ const WCHAR Tbl[] = /* CP1254(0x80-0xFF) to Unicode conversion table */
#elif _CODE_PAGE == 1255 #elif _CODE_PAGE == 1255
#define _TBLDEF 1 #define _TBLDEF 1
static static
const WCHAR Tbl[] = /* CP1255(0x80-0xFF) to Unicode conversion table */ const WCHAR Tbl[] = { /* CP1255(0x80-0xFF) to Unicode conversion table */
{
0x20AC, 0x0000, 0x201A, 0x0192, 0x201E, 0x2026, 0x2020, 0x2021, 0x20AC, 0x0000, 0x201A, 0x0192, 0x201E, 0x2026, 0x2020, 0x2021,
0x02C6, 0x2030, 0x0000, 0x2039, 0x0000, 0x0000, 0x0000, 0x0000, 0x02C6, 0x2030, 0x0000, 0x2039, 0x0000, 0x0000, 0x0000, 0x0000,
0x0000, 0x2018, 0x2019, 0x201C, 0x201D, 0x2022, 0x2013, 0x2014, 0x0000, 0x2018, 0x2019, 0x201C, 0x201D, 0x2022, 0x2013, 0x2014,
@@ -445,8 +427,7 @@ const WCHAR Tbl[] = /* CP1255(0x80-0xFF) to Unicode conversion table */
#elif _CODE_PAGE == 1256 #elif _CODE_PAGE == 1256
#define _TBLDEF 1 #define _TBLDEF 1
static static
const WCHAR Tbl[] = /* CP1256(0x80-0xFF) to Unicode conversion table */ const WCHAR Tbl[] = { /* CP1256(0x80-0xFF) to Unicode conversion table */
{
0x20AC, 0x067E, 0x201A, 0x0192, 0x201E, 0x2026, 0x2020, 0x2021, 0x20AC, 0x067E, 0x201A, 0x0192, 0x201E, 0x2026, 0x2020, 0x2021,
0x02C6, 0x2030, 0x0679, 0x2039, 0x0152, 0x0686, 0x0698, 0x0688, 0x02C6, 0x2030, 0x0679, 0x2039, 0x0152, 0x0686, 0x0698, 0x0688,
0x06AF, 0x2018, 0x2019, 0x201C, 0x201D, 0x2022, 0x2013, 0x2014, 0x06AF, 0x2018, 0x2019, 0x201C, 0x201D, 0x2022, 0x2013, 0x2014,
@@ -468,8 +449,7 @@ const WCHAR Tbl[] = /* CP1256(0x80-0xFF) to Unicode conversion table */
#elif _CODE_PAGE == 1257 #elif _CODE_PAGE == 1257
#define _TBLDEF 1 #define _TBLDEF 1
static static
const WCHAR Tbl[] = /* CP1257(0x80-0xFF) to Unicode conversion table */ const WCHAR Tbl[] = { /* CP1257(0x80-0xFF) to Unicode conversion table */
{
0x20AC, 0x0000, 0x201A, 0x0000, 0x201E, 0x2026, 0x2020, 0x2021, 0x20AC, 0x0000, 0x201A, 0x0000, 0x201E, 0x2026, 0x2020, 0x2021,
0x0000, 0x2030, 0x0000, 0x2039, 0x0000, 0x00A8, 0x02C7, 0x00B8, 0x0000, 0x2030, 0x0000, 0x2039, 0x0000, 0x00A8, 0x02C7, 0x00B8,
0x0000, 0x2018, 0x2019, 0x201C, 0x201D, 0x2022, 0x2013, 0x2014, 0x0000, 0x2018, 0x2019, 0x201C, 0x201D, 0x2022, 0x2013, 0x2014,
@@ -491,8 +471,7 @@ const WCHAR Tbl[] = /* CP1257(0x80-0xFF) to Unicode conversion table */
#elif _CODE_PAGE == 1258 #elif _CODE_PAGE == 1258
#define _TBLDEF 1 #define _TBLDEF 1
static static
const WCHAR Tbl[] = /* CP1258(0x80-0xFF) to Unicode conversion table */ const WCHAR Tbl[] = { /* CP1258(0x80-0xFF) to Unicode conversion table */
{
0x20AC, 0x0000, 0x201A, 0x0192, 0x201E, 0x2026, 0x2020, 0x2021, 0x20AC, 0x0000, 0x201A, 0x0192, 0x201E, 0x2026, 0x2020, 0x2021,
0x02C6, 0x2030, 0x0000, 0x2039, 0x0152, 0x0000, 0x0000, 0x0000, 0x02C6, 0x2030, 0x0000, 0x2039, 0x0152, 0x0000, 0x0000, 0x0000,
0x0000, 0x2018, 0x2019, 0x201C, 0x201D, 0x2022, 0x2013, 0x2014, 0x0000, 0x2018, 0x2019, 0x201C, 0x201D, 0x2022, 0x2013, 0x2014,
@@ -527,29 +506,18 @@ WCHAR ff_convert ( /* Converted character, Returns zero on error */
WCHAR c; WCHAR c;
if ( src < 0x80 ) /* ASCII */ if (src < 0x80) { /* ASCII */
{
c = src; c = src;
} } else {
else if (dir) { /* OEMCP to Unicode */
{ c = (src >= 0x100) ? 0 : Tbl[src - 0x80];
if ( dir ) /* OEMCP to Unicode */
{
c = ( src >= 0x100 ) ? 0 : Tbl[src - 0x80];
} else { /* Unicode to OEMCP */
for (c = 0; c < 0x80; c++) {
if (src == Tbl[c]) break;
} }
else /* Unicode to OEMCP */ c = (c + 0x80) & 0xFF;
{
for ( c = 0; c < 0x80; c++ )
{
if ( src == Tbl[c] )
{
break;
}
}
c = ( c + 0x80 ) & 0xFF;
} }
} }
@@ -566,7 +534,7 @@ WCHAR ff_wtoupper ( /* Upper converted character */
int i; int i;
for ( i = 0; tbl_lower[i] && chr != tbl_lower[i]; i++ ) ; for (i = 0; tbl_lower[i] && chr != tbl_lower[i]; i++) ;
return tbl_lower[i] ? tbl_upper[i] : chr; return tbl_lower[i] ? tbl_upper[i] : chr;
} }

View File

@@ -7,19 +7,17 @@
#include "bits.h" #include "bits.h"
#include "uart.h" #include "uart.h"
void clock_disconnect() void clock_disconnect() {
{
disconnectPLL0(); disconnectPLL0();
disablePLL0(); disablePLL0();
} }
void clock_init() void clock_init() {
{
/* set flash access time to 6 clks (safe setting) */ /* set flash access time to 6 clks (safe setting) */
setFlashAccessTime( 6 ); setFlashAccessTime(6);
/* setup PLL0 for ~44100*256*8 Hz /* setup PLL0 for ~44100*256*8 Hz
Base clock: 12MHz Base clock: 12MHz
Multiplier: 429 Multiplier: 429
Pre-Divisor: 19 Pre-Divisor: 19
@@ -28,17 +26,17 @@ void clock_init()
-> DAC freq = 44099.5 Hz -> DAC freq = 44099.5 Hz
-> FPGA freq = 11289473.7Hz -> FPGA freq = 11289473.7Hz
First, disable and disconnect PLL0. First, disable and disconnect PLL0.
*/ */
// clock_disconnect(); // clock_disconnect();
/* PLL is disabled and disconnected. setup PCLK NOW as it cannot be changed /* PLL is disabled and disconnected. setup PCLK NOW as it cannot be changed
reliably with PLL0 connected. reliably with PLL0 connected.
see: see:
http://ics.nxp.com/support/documents/microcontrollers/pdf/errata.lpc1754.pdf http://ics.nxp.com/support/documents/microcontrollers/pdf/errata.lpc1754.pdf
*/ */
/* continue with PLL0 setup: /* continue with PLL0 setup:
enable the xtal oscillator and wait for it to become stable enable the xtal oscillator and wait for it to become stable
set the oscillator as clk source for PLL0 set the oscillator as clk source for PLL0
set PLL0 multiplier+predivider set PLL0 multiplier+predivider
@@ -49,74 +47,61 @@ void clock_init()
done done
*/ */
enableMainOsc(); enableMainOsc();
setClkSrc( CLKSRC_MAINOSC ); setClkSrc(CLKSRC_MAINOSC);
setPLL0MultPrediv( 12, 1 ); setPLL0MultPrediv(12, 1);
enablePLL0(); enablePLL0();
setCCLKDiv( 3 ); setCCLKDiv(3);
connectPLL0(); connectPLL0();
} }
void setFlashAccessTime( uint8_t clocks ) void setFlashAccessTime(uint8_t clocks) {
{ LPC_SC->FLASHCFG=FLASHTIM(clocks);
LPC_SC->FLASHCFG = FLASHTIM( clocks );
} }
void setPLL0MultPrediv( uint16_t mult, uint8_t prediv ) void setPLL0MultPrediv(uint16_t mult, uint8_t prediv) {
{ LPC_SC->PLL0CFG=PLL_MULT(mult) | PLL_PREDIV(prediv);
LPC_SC->PLL0CFG = PLL_MULT( mult ) | PLL_PREDIV( prediv );
PLL0feed(); PLL0feed();
} }
void enablePLL0() void enablePLL0() {
{
LPC_SC->PLL0CON |= PLLE0; LPC_SC->PLL0CON |= PLLE0;
PLL0feed(); PLL0feed();
} }
void disablePLL0() void disablePLL0() {
{
LPC_SC->PLL0CON &= ~PLLE0; LPC_SC->PLL0CON &= ~PLLE0;
PLL0feed(); PLL0feed();
} }
void connectPLL0() void connectPLL0() {
{ while(!(LPC_SC->PLL0STAT&PLOCK0));
while ( !( LPC_SC->PLL0STAT & PLOCK0 ) );
LPC_SC->PLL0CON |= PLLC0; LPC_SC->PLL0CON |= PLLC0;
PLL0feed(); PLL0feed();
} }
void disconnectPLL0() void disconnectPLL0() {
{
LPC_SC->PLL0CON &= ~PLLC0; LPC_SC->PLL0CON &= ~PLLC0;
PLL0feed(); PLL0feed();
} }
void setCCLKDiv( uint8_t div ) void setCCLKDiv(uint8_t div) {
{ LPC_SC->CCLKCFG=CCLK_DIV(div);
LPC_SC->CCLKCFG = CCLK_DIV( div );
} }
void enableMainOsc() void enableMainOsc() {
{ LPC_SC->SCS=OSCEN;
LPC_SC->SCS = OSCEN; while(!(LPC_SC->SCS&OSCSTAT));
while ( !( LPC_SC->SCS & OSCSTAT ) );
} }
void disableMainOsc() void disableMainOsc() {
{ LPC_SC->SCS=0;
LPC_SC->SCS = 0;
} }
void PLL0feed() void PLL0feed() {
{ LPC_SC->PLL0FEED=0xaa;
LPC_SC->PLL0FEED = 0xaa; LPC_SC->PLL0FEED=0x55;
LPC_SC->PLL0FEED = 0x55;
} }
void setClkSrc( uint8_t src ) void setClkSrc(uint8_t src) {
{ LPC_SC->CLKSRCSEL=src;
LPC_SC->CLKSRCSEL = src;
} }

View File

@@ -49,31 +49,31 @@
#define PCLK_SYSCON (28) #define PCLK_SYSCON (28)
#define PCLK_MC (30) #define PCLK_MC (30)
void clock_disconnect( void ); void clock_disconnect(void);
void clock_init( void ); void clock_init(void);
void setFlashAccessTime( uint8_t clocks ); void setFlashAccessTime(uint8_t clocks);
void setPLL0MultPrediv( uint16_t mult, uint8_t prediv ); void setPLL0MultPrediv(uint16_t mult, uint8_t prediv);
void enablePLL0( void ); void enablePLL0(void);
void disablePLL0( void ); void disablePLL0(void);
void connectPLL0( void ); void connectPLL0(void);
void disconnectPLL0( void ); void disconnectPLL0(void);
void setCCLKDiv( uint8_t div ); void setCCLKDiv(uint8_t div);
void enableMainOsc( void ); void enableMainOsc(void);
void disableMainOsc( void ); void disableMainOsc(void);
void PLL0feed( void ); void PLL0feed(void);
void setClkSrc( uint8_t src ); void setClkSrc(uint8_t src);
#endif #endif

View File

@@ -4,7 +4,7 @@
# file to a C header. No copyright claimed. # file to a C header. No copyright claimed.
BEGIN { BEGIN {
print "// autoconf.h generated from " ARGV[1] " at NOW\n" \ print "// autoconf.h generated from " ARGV[1] " at TODAY \n" \
"#ifndef AUTOCONF_H\n" \ "#ifndef AUTOCONF_H\n" \
"#define AUTOCONF_H" "#define AUTOCONF_H"
} }

View File

@@ -27,12 +27,12 @@
#define IN_AHBRAM __attribute__ ((section(".ahbram"))) #define IN_AHBRAM __attribute__ ((section(".ahbram")))
#define SD_DT_INT_SETUP() do {\ #define SD_DT_INT_SETUP() do {\
BITBANG(LPC_GPIOINT->IO2IntEnR, SD_DT_BIT) = 1;\ BITBAND(LPC_GPIOINT->IO2IntEnR, SD_DT_BIT) = 1;\
BITBANG(LPC_GPIOINT->IO2IntEnF, SD_DT_BIT) = 1;\ BITBAND(LPC_GPIOINT->IO2IntEnF, SD_DT_BIT) = 1;\
} while(0) } while(0)
#define SD_CHANGE_DETECT (BITBANG(LPC_GPIOINT->IO2IntStatR, SD_DT_BIT)\ #define SD_CHANGE_DETECT (BITBAND(LPC_GPIOINT->IO2IntStatR, SD_DT_BIT)\
|BITBANG(LPC_GPIOINT->IO2IntStatF, SD_DT_BIT)) |BITBAND(LPC_GPIOINT->IO2IntStatF, SD_DT_BIT))
#define SD_CHANGE_CLR() do {LPC_GPIOINT->IO2IntClr = BV(SD_DT_BIT);} while(0) #define SD_CHANGE_CLR() do {LPC_GPIOINT->IO2IntClr = BV(SD_DT_BIT);} while(0)
@@ -41,8 +41,8 @@
#define SD_WP_REG LPC_GPIO0 #define SD_WP_REG LPC_GPIO0
#define SD_WP_BIT 6 #define SD_WP_BIT 6
#define SDCARD_DETECT (!(BITBANG(SD_DT_REG->FIOPIN, SD_DT_BIT))) #define SDCARD_DETECT (!(BITBAND(SD_DT_REG->FIOPIN, SD_DT_BIT)))
#define SDCARD_WP (BITBANG(SD_WP_REG->FIOPIN, SD_WP_BIT)) #define SDCARD_WP (BITBAND(SD_WP_REG->FIOPIN, SD_WP_BIT))
#define SD_SUPPLY_VOLTAGE (1L<<21) /* 3.3V - 3.4V */ #define SD_SUPPLY_VOLTAGE (1L<<21) /* 3.3V - 3.4V */
#define CONFIG_SD_BLOCKTRANSFER 1 #define CONFIG_SD_BLOCKTRANSFER 1
#define CONFIG_SD_AUTO_RETRIES 10 #define CONFIG_SD_AUTO_RETRIES 10
@@ -55,8 +55,8 @@
//#define CONFIG_CPU_FREQUENCY 46000000 //#define CONFIG_CPU_FREQUENCY 46000000
#define CONFIG_UART_PCLKDIV 1 #define CONFIG_UART_PCLKDIV 1
#define CONFIG_UART_TX_BUF_SHIFT 8 #define CONFIG_UART_TX_BUF_SHIFT 8
//#define CONFIG_UART_BAUDRATE 921600 #define CONFIG_UART_BAUDRATE 921600
#define CONFIG_UART_BAUDRATE 115200 //#define CONFIG_UART_BAUDRATE 115200
#define CONFIG_UART_DEADLOCKABLE #define CONFIG_UART_DEADLOCKABLE
#define SSP_CLK_DIVISOR_FAST 2 #define SSP_CLK_DIVISOR_FAST 2

View File

@@ -1,9 +1,9 @@
#ifndef CRC_H #ifndef CRC_H
#define CRC_H #define CRC_H
uint8_t crc7update( uint8_t crc, uint8_t data ); uint8_t crc7update(uint8_t crc, uint8_t data);
uint16_t crc_xmodem_update( uint16_t crc, uint8_t data ); uint16_t crc_xmodem_update(uint16_t crc, uint8_t data);
uint16_t crc_xmodem_block( uint16_t crc, const uint8_t *data, uint32_t length ); uint16_t crc_xmodem_block(uint16_t crc, const uint8_t *data, uint32_t length);
// AVR-libc compatibility // AVR-libc compatibility
#define _crc_xmodem_update(crc,data) crc_xmodem_update(crc,data) #define _crc_xmodem_update(crc,data) crc_xmodem_update(crc,data)

View File

@@ -26,19 +26,17 @@
* \param data_len The width of \a data expressed in number of bits. * \param data_len The width of \a data expressed in number of bits.
* \return The reflected data. * \return The reflected data.
******************************************************************************/ ******************************************************************************/
uint32_t crc_reflect( uint32_t data, size_t data_len ) uint32_t crc_reflect(uint32_t data, size_t data_len)
{ {
unsigned int i; unsigned int i;
uint32_t ret; uint32_t ret;
ret = data & 0x01; ret = data & 0x01;
for (i = 1; i < data_len; i++)
for ( i = 1; i < data_len; i++ )
{ {
data >>= 1; data >>= 1;
ret = ( ret << 1 ) | ( data & 0x01 ); ret = (ret << 1) | (data & 0x01);
} }
return ret; return ret;
} }
@@ -51,31 +49,23 @@ uint32_t crc_reflect( uint32_t data, size_t data_len )
* \param data_len Number of bytes in the \a data buffer. * \param data_len Number of bytes in the \a data buffer.
* \return The updated crc value. * \return The updated crc value.
*****************************************************************************/ *****************************************************************************/
uint32_t crc32_update( uint32_t crc, const unsigned char data ) uint32_t crc32_update(uint32_t crc, const unsigned char data)
{ {
unsigned int i; unsigned int i;
uint32_t bit; uint32_t bit;
unsigned char c; unsigned char c;
c = data; c = data;
for (i = 0x01; i & 0xff; i <<= 1) {
for ( i = 0x01; i & 0xff; i <<= 1 )
{
bit = crc & 0x80000000; bit = crc & 0x80000000;
if (c & i) {
if ( c & i )
{
bit = !bit; bit = !bit;
} }
crc <<= 1; crc <<= 1;
if (bit) {
if ( bit )
{
crc ^= 0x04c11db7; crc ^= 0x04c11db7;
} }
} }
return crc & 0xffffffff; return crc & 0xffffffff;
} }

View File

@@ -42,14 +42,14 @@ extern "C" {
* \param data_len The width of \a data expressed in number of bits. * \param data_len The width of \a data expressed in number of bits.
* \return The reflected data. * \return The reflected data.
*****************************************************************************/ *****************************************************************************/
uint32_t crc_reflect( uint32_t data, size_t data_len ); uint32_t crc_reflect(uint32_t data, size_t data_len);
/** /**
* Calculate the initial crc value. * Calculate the initial crc value.
* *
* \return The initial crc value. * \return The initial crc value.
*****************************************************************************/ *****************************************************************************/
static inline uint32_t crc_init( void ) static inline uint32_t crc_init(void)
{ {
return 0xffffffff; return 0xffffffff;
} }
@@ -62,7 +62,7 @@ static inline uint32_t crc_init( void )
* \param data_len Number of bytes in the \a data buffer. * \param data_len Number of bytes in the \a data buffer.
* \return The updated crc value. * \return The updated crc value.
*****************************************************************************/ *****************************************************************************/
uint32_t crc32_update( uint32_t crc, const unsigned char data ); uint32_t crc32_update(uint32_t crc, const unsigned char data);
/** /**
* Calculate the final crc value. * Calculate the final crc value.
@@ -70,9 +70,9 @@ uint32_t crc32_update( uint32_t crc, const unsigned char data );
* \param crc The current crc value. * \param crc The current crc value.
* \return The final crc value. * \return The final crc value.
*****************************************************************************/ *****************************************************************************/
static inline uint32_t crc_finalize( uint32_t crc ) static inline uint32_t crc_finalize(uint32_t crc)
{ {
return crc_reflect( crc, 32 ) ^ 0xffffffff; return crc_reflect(crc, 32) ^ 0xffffffff;
} }

View File

@@ -16,8 +16,7 @@
typedef BYTE DSTATUS; typedef BYTE DSTATUS;
/* Results of Disk Functions */ /* Results of Disk Functions */
typedef enum typedef enum {
{
RES_OK = 0, /* 0: Successful */ RES_OK = 0, /* 0: Successful */
RES_ERROR, /* 1: R/W Error */ RES_ERROR, /* 1: R/W Error */
RES_WRPRT, /* 2: Write Protected */ RES_WRPRT, /* 2: Write Protected */
@@ -36,8 +35,7 @@ typedef enum
* This is the struct returned in the data buffer when disk_getinfo * This is the struct returned in the data buffer when disk_getinfo
* is called with page=0. * is called with page=0.
*/ */
typedef struct typedef struct {
{
uint8_t validbytes; uint8_t validbytes;
uint8_t maxpage; uint8_t maxpage;
uint8_t disktype; uint8_t disktype;
@@ -50,17 +48,17 @@ typedef struct
/*---------------------------------------*/ /*---------------------------------------*/
/* Prototypes for disk control functions */ /* Prototypes for disk control functions */
int assign_drives ( int, int ); int assign_drives (int, int);
DSTATUS disk_initialize ( BYTE ); DSTATUS disk_initialize (BYTE);
DSTATUS disk_status ( BYTE ); DSTATUS disk_status (BYTE);
DRESULT disk_read ( BYTE, BYTE *, DWORD, BYTE ); DRESULT disk_read (BYTE, BYTE*, DWORD, BYTE);
#if _READONLY == 0 #if _READONLY == 0
DRESULT disk_write ( BYTE, const BYTE *, DWORD, BYTE ); DRESULT disk_write (BYTE, const BYTE*, DWORD, BYTE);
#endif #endif
#define disk_ioctl(a,b,c) RES_OK #define disk_ioctl(a,b,c) RES_OK
#define get_fattime() (0) #define get_fattime() (0)
void disk_init( void ); void disk_init(void);
/* Will be set to DISK_ERROR if any access on the card fails */ /* Will be set to DISK_ERROR if any access on the card fails */
enum diskstates { DISK_CHANGED = 0, DISK_REMOVED, DISK_OK, DISK_ERROR }; enum diskstates { DISK_CHANGED = 0, DISK_REMOVED, DISK_OK, DISK_ERROR };

View File

@@ -2,26 +2,21 @@
#include "config.h" #include "config.h"
#include "uart.h" #include "uart.h"
void HardFault_Handler( void ) void HardFault_Handler(void) {
{ DBG_BL printf("HFSR: %lx\n", SCB->HFSR);
DBG_BL printf( "HFSR: %lx\n", SCB->HFSR ); DBG_UART uart_putc('H');
DBG_UART uart_putc( 'H' ); while (1) ;
while ( 1 ) ;
} }
void MemManage_Handler( void ) void MemManage_Handler(void) {
{ DBG_BL printf("MemManage - CFSR: %lx; MMFAR: %lx\n", SCB->CFSR, SCB->MMFAR);
DBG_BL printf( "MemManage - CFSR: %lx; MMFAR: %lx\n", SCB->CFSR, SCB->MMFAR );
} }
void BusFault_Handler( void ) void BusFault_Handler(void) {
{ DBG_BL printf("BusFault - CFSR: %lx; BFAR: %lx\n", SCB->CFSR, SCB->BFAR);
DBG_BL printf( "BusFault - CFSR: %lx; BFAR: %lx\n", SCB->CFSR, SCB->BFAR );
} }
void UsageFault_Handler( void ) void UsageFault_Handler(void) {
{ DBG_BL printf("UsageFault - CFSR: %lx; BFAR: %lx\n", SCB->CFSR, SCB->BFAR);
DBG_BL printf( "UsageFault - CFSR: %lx; BFAR: %lx\n", SCB->CFSR, SCB->BFAR );
} }

File diff suppressed because it is too large Load Diff

View File

@@ -229,8 +229,7 @@ extern "C" {
#if _MULTI_PARTITION /* Multiple partition configuration */ #if _MULTI_PARTITION /* Multiple partition configuration */
#define LD2PD(vol) (VolToPart[vol].pd) /* Get physical drive# */ #define LD2PD(vol) (VolToPart[vol].pd) /* Get physical drive# */
#define LD2PT(vol) (VolToPart[vol].pt) /* Get partition# */ #define LD2PT(vol) (VolToPart[vol].pt) /* Get partition# */
typedef struct typedef struct {
{
BYTE pd; /* Physical drive# */ BYTE pd; /* Physical drive# */
BYTE pt; /* Partition # (0-3) */ BYTE pt; /* Partition # (0-3) */
} PARTITION; } PARTITION;
@@ -269,8 +268,7 @@ typedef char TCHAR;
/* File system object structure (FATFS) */ /* File system object structure (FATFS) */
typedef struct typedef struct {
{
BYTE fs_type; /* FAT sub-type (0:Not mounted) */ BYTE fs_type; /* FAT sub-type (0:Not mounted) */
BYTE drv; /* Physical drive number */ BYTE drv; /* Physical drive number */
BYTE csize; /* Sectors per cluster (1,2,4...128) */ BYTE csize; /* Sectors per cluster (1,2,4...128) */
@@ -306,9 +304,8 @@ typedef struct
/* File object structure (FIL) */ /* File object structure (FIL) */
typedef struct typedef struct {
{ FATFS* fs; /* Pointer to the owner file system object */
FATFS *fs; /* Pointer to the owner file system object */
WORD id; /* Owner file system mount ID */ WORD id; /* Owner file system mount ID */
BYTE flag; /* File status flags */ BYTE flag; /* File status flags */
BYTE pad1; BYTE pad1;
@@ -319,10 +316,10 @@ typedef struct
DWORD dsect; /* Current data sector */ DWORD dsect; /* Current data sector */
#if !_FS_READONLY #if !_FS_READONLY
DWORD dir_sect; /* Sector containing the directory entry */ DWORD dir_sect; /* Sector containing the directory entry */
BYTE *dir_ptr; /* Ponter to the directory entry in the window */ BYTE* dir_ptr; /* Ponter to the directory entry in the window */
#endif #endif
#if _USE_FASTSEEK #if _USE_FASTSEEK
DWORD *cltbl; /* Pointer to the cluster link map table (null on file open) */ DWORD* cltbl; /* Pointer to the cluster link map table (null on file open) */
#endif #endif
#if _FS_SHARE #if _FS_SHARE
UINT lockid; /* File lock ID (index of file semaphore table) */ UINT lockid; /* File lock ID (index of file semaphore table) */
@@ -336,18 +333,17 @@ typedef struct
/* Directory object structure (DIR) */ /* Directory object structure (DIR) */
typedef struct typedef struct {
{ FATFS* fs; /* Pointer to the owner file system object */
FATFS *fs; /* Pointer to the owner file system object */
WORD id; /* Owner file system mount ID */ WORD id; /* Owner file system mount ID */
WORD index; /* Current read/write index number */ WORD index; /* Current read/write index number */
DWORD sclust; /* Table start cluster (0:Root dir) */ DWORD sclust; /* Table start cluster (0:Root dir) */
DWORD clust; /* Current cluster */ DWORD clust; /* Current cluster */
DWORD sect; /* Current sector */ DWORD sect; /* Current sector */
BYTE *dir; /* Pointer to the current SFN entry in the win[] */ BYTE* dir; /* Pointer to the current SFN entry in the win[] */
BYTE *fn; /* Pointer to the SFN (in/out) {file[8],ext[3],status[1]} */ BYTE* fn; /* Pointer to the SFN (in/out) {file[8],ext[3],status[1]} */
#if _USE_LFN #if _USE_LFN
WCHAR *lfn; /* Pointer to the LFN working buffer */ WCHAR* lfn; /* Pointer to the LFN working buffer */
WORD lfn_idx; /* Last matched LFN index number (0xFFFF:No LFN) */ WORD lfn_idx; /* Last matched LFN index number (0xFFFF:No LFN) */
#endif #endif
} DIR; } DIR;
@@ -356,8 +352,7 @@ typedef struct
/* File status structure (FILINFO) */ /* File status structure (FILINFO) */
typedef struct typedef struct {
{
DWORD fsize; /* File size */ DWORD fsize; /* File size */
WORD fdate; /* Last modified date */ WORD fdate; /* Last modified date */
WORD ftime; /* Last modified time */ WORD ftime; /* Last modified time */
@@ -365,7 +360,7 @@ typedef struct
TCHAR fname[13]; /* Short file name (8.3 format) */ TCHAR fname[13]; /* Short file name (8.3 format) */
DWORD clust; /* start cluster */ DWORD clust; /* start cluster */
#if _USE_LFN #if _USE_LFN
TCHAR *lfname; /* Pointer to the LFN buffer */ TCHAR* lfname; /* Pointer to the LFN buffer */
UINT lfsize; /* Size of LFN buffer in TCHAR */ UINT lfsize; /* Size of LFN buffer in TCHAR */
#endif #endif
} FILINFO; } FILINFO;
@@ -374,8 +369,7 @@ typedef struct
/* File function return code (FRESULT) */ /* File function return code (FRESULT) */
typedef enum typedef enum {
{
FR_OK = 0, /* (0) Succeeded */ FR_OK = 0, /* (0) Succeeded */
FR_DISK_ERR, /* (1) A hard error occured in the low level disk I/O layer */ FR_DISK_ERR, /* (1) A hard error occured in the low level disk I/O layer */
FR_INT_ERR, /* (2) Assertion failed */ FR_INT_ERR, /* (2) Assertion failed */
@@ -403,50 +397,49 @@ typedef enum
/* FatFs module application interface */ /* FatFs module application interface */
/* Low Level functions */ /* Low Level functions */
FRESULT l_openfilebycluster( FATFS *fs, FIL *fp, const TCHAR *path, DWORD clust, FRESULT l_openfilebycluster(FATFS *fs, FIL *fp, const TCHAR *path, DWORD clust, DWORD fsize); /* Open a file by its start cluster using supplied file size */
DWORD fsize ); /* Open a file by its start cluster using supplied file size */
/* application level functions */ /* application level functions */
FRESULT f_mount ( BYTE, FATFS * ); /* Mount/Unmount a logical drive */ FRESULT f_mount (BYTE, FATFS*); /* Mount/Unmount a logical drive */
FRESULT f_open ( FIL *, const TCHAR *, BYTE ); /* Open or create a file */ FRESULT f_open (FIL*, const TCHAR*, BYTE); /* Open or create a file */
FRESULT f_read ( FIL *, void *, UINT, UINT * ); /* Read data from a file */ FRESULT f_read (FIL*, void*, UINT, UINT*); /* Read data from a file */
FRESULT f_lseek ( FIL *, DWORD ); /* Move file pointer of a file object */ FRESULT f_lseek (FIL*, DWORD); /* Move file pointer of a file object */
FRESULT f_close ( FIL * ); /* Close an open file object */ FRESULT f_close (FIL*); /* Close an open file object */
FRESULT f_opendir ( DIR *, const TCHAR * ); /* Open an existing directory */ FRESULT f_opendir (DIR*, const TCHAR*); /* Open an existing directory */
FRESULT f_readdir ( DIR *, FILINFO * ); /* Read a directory item */ FRESULT f_readdir (DIR*, FILINFO*); /* Read a directory item */
FRESULT f_stat ( const TCHAR *, FILINFO * ); /* Get file status */ FRESULT f_stat (const TCHAR*, FILINFO*); /* Get file status */
#if !_FS_READONLY #if !_FS_READONLY
FRESULT f_write ( FIL *, const void *, UINT, UINT * ); /* Write data to a file */ FRESULT f_write (FIL*, const void*, UINT, UINT*); /* Write data to a file */
FRESULT f_getfree ( const TCHAR *, DWORD *, FATFS ** ); /* Get number of free clusters on the drive */ FRESULT f_getfree (const TCHAR*, DWORD*, FATFS**); /* Get number of free clusters on the drive */
FRESULT f_truncate ( FIL * ); /* Truncate file */ FRESULT f_truncate (FIL*); /* Truncate file */
FRESULT f_sync ( FIL * ); /* Flush cached data of a writing file */ FRESULT f_sync (FIL*); /* Flush cached data of a writing file */
FRESULT f_unlink ( const TCHAR * ); /* Delete an existing file or directory */ FRESULT f_unlink (const TCHAR*); /* Delete an existing file or directory */
FRESULT f_mkdir ( const TCHAR * ); /* Create a new directory */ FRESULT f_mkdir (const TCHAR*); /* Create a new directory */
FRESULT f_chmod ( const TCHAR *, BYTE, BYTE ); /* Change attriburte of the file/dir */ FRESULT f_chmod (const TCHAR*, BYTE, BYTE); /* Change attriburte of the file/dir */
FRESULT f_utime ( const TCHAR *, const FILINFO * ); /* Change timestamp of the file/dir */ FRESULT f_utime (const TCHAR*, const FILINFO*); /* Change timestamp of the file/dir */
FRESULT f_rename ( const TCHAR *, const TCHAR * ); /* Rename/Move a file or directory */ FRESULT f_rename (const TCHAR*, const TCHAR*); /* Rename/Move a file or directory */
#endif #endif
#if _USE_FORWARD #if _USE_FORWARD
FRESULT f_forward ( FIL *, UINT( * )( const BYTE *, UINT ), UINT, UINT * ); /* Forward data to the stream */ FRESULT f_forward (FIL*, UINT(*)(const BYTE*,UINT), UINT, UINT*); /* Forward data to the stream */
#endif #endif
#if _USE_MKFS #if _USE_MKFS
FRESULT f_mkfs ( BYTE, BYTE, UINT ); /* Create a file system on the drive */ FRESULT f_mkfs (BYTE, BYTE, UINT); /* Create a file system on the drive */
#endif #endif
#if _FS_RPATH #if _FS_RPATH
FRESULT f_chdrive ( BYTE ); /* Change current drive */ FRESULT f_chdrive (BYTE); /* Change current drive */
FRESULT f_chdir ( const TCHAR * ); /* Change current directory */ FRESULT f_chdir (const TCHAR*); /* Change current directory */
FRESULT f_getcwd ( TCHAR *, UINT ); /* Get current directory */ FRESULT f_getcwd (TCHAR*, UINT); /* Get current directory */
#endif #endif
#if _USE_STRFUNC #if _USE_STRFUNC
int f_putc ( TCHAR, FIL * ); /* Put a character to the file */ int f_putc (TCHAR, FIL*); /* Put a character to the file */
int f_puts ( const TCHAR *, FIL * ); /* Put a string to the file */ int f_puts (const TCHAR*, FIL*); /* Put a string to the file */
int f_printf ( FIL *, const TCHAR *, ... ); /* Put a formatted string to the file */ int f_printf (FIL*, const TCHAR*, ...); /* Put a formatted string to the file */
TCHAR *f_gets ( TCHAR *, int, FIL * ); /* Get a string from the file */ TCHAR* f_gets (TCHAR*, int, FIL*); /* Get a string from the file */
#ifndef EOF #ifndef EOF
#define EOF (-1) #define EOF (-1)
#endif #endif
@@ -464,25 +457,25 @@ TCHAR *f_gets ( TCHAR *, int, FIL * ); /* Get a string from the fil
/* RTC function */ /* RTC function */
#if !_FS_READONLY #if !_FS_READONLY
DWORD get_fattime ( void ); DWORD get_fattime (void);
#endif #endif
/* Unicode support functions */ /* Unicode support functions */
#if _USE_LFN /* Unicode - OEM code conversion */ #if _USE_LFN /* Unicode - OEM code conversion */
WCHAR ff_convert ( WCHAR, UINT ); /* OEM-Unicode bidirectional conversion */ WCHAR ff_convert (WCHAR, UINT); /* OEM-Unicode bidirectional conversion */
WCHAR ff_wtoupper ( WCHAR ); /* Unicode upper-case conversion */ WCHAR ff_wtoupper (WCHAR); /* Unicode upper-case conversion */
#if _USE_LFN == 3 /* Memory functions */ #if _USE_LFN == 3 /* Memory functions */
void *ff_memalloc ( UINT ); /* Allocate memory block */ void* ff_memalloc (UINT); /* Allocate memory block */
void ff_memfree ( void * ); /* Free memory block */ void ff_memfree (void*); /* Free memory block */
#endif #endif
#endif #endif
/* Sync functions */ /* Sync functions */
#if _FS_REENTRANT #if _FS_REENTRANT
int ff_cre_syncobj ( BYTE, _SYNC_t * ); /* Create a sync object */ int ff_cre_syncobj (BYTE, _SYNC_t*);/* Create a sync object */
int ff_del_syncobj ( _SYNC_t ); /* Delete a sync object */ int ff_del_syncobj (_SYNC_t); /* Delete a sync object */
int ff_req_grant ( _SYNC_t ); /* Lock sync object */ int ff_req_grant (_SYNC_t); /* Lock sync object */
void ff_rel_grant ( _SYNC_t ); /* Unlock sync object */ void ff_rel_grant (_SYNC_t); /* Unlock sync object */
#endif #endif

View File

@@ -12,46 +12,38 @@ WCHAR ff_convert(WCHAR w, UINT dir) {
int newcard; int newcard;
void file_init() void file_init() {
{ file_res=f_mount(0, &fatfs);
file_res = f_mount( 0, &fatfs );
newcard = 0; newcard = 0;
} }
void file_reinit( void ) void file_reinit(void) {
{
disk_init(); disk_init();
file_init(); file_init();
} }
void file_open_by_filinfo( FILINFO *fno ) void file_open_by_filinfo(FILINFO* fno) {
{ file_res = l_openfilebycluster(&fatfs, &file_handle, (TCHAR*)"", fno->clust, fno->fsize);
file_res = l_openfilebycluster( &fatfs, &file_handle, ( TCHAR * )"", fno->clust, fno->fsize );
} }
void file_open( uint8_t *filename, BYTE flags ) void file_open(uint8_t* filename, BYTE flags) {
{ if (disk_state == DISK_CHANGED) {
if ( disk_state == DISK_CHANGED )
{
file_reinit(); file_reinit();
newcard = 1; newcard = 1;
} }
file_res = f_open(&file_handle, (TCHAR*)filename, flags);
file_res = f_open( &file_handle, ( TCHAR * )filename, flags ); file_block_off = sizeof(file_buf);
file_block_off = sizeof( file_buf ); file_block_max = sizeof(file_buf);
file_block_max = sizeof( file_buf );
file_status = file_res ? FILE_ERR : FILE_OK; file_status = file_res ? FILE_ERR : FILE_OK;
} }
void file_close() void file_close() {
{ file_res = f_close(&file_handle);
file_res = f_close( &file_handle );
} }
UINT file_read() UINT file_read() {
{
UINT bytes_read; UINT bytes_read;
file_res = f_read( &file_handle, file_buf, sizeof( file_buf ), &bytes_read ); file_res = f_read(&file_handle, file_buf, sizeof(file_buf), &bytes_read);
return bytes_read; return bytes_read;
} }
@@ -64,17 +56,13 @@ UINT file_read()
return bytes_written; return bytes_written;
}*/ }*/
UINT file_readblock( void *buf, uint32_t addr, uint16_t size ) UINT file_readblock(void* buf, uint32_t addr, uint16_t size) {
{
UINT bytes_read; UINT bytes_read;
file_res = f_lseek( &file_handle, addr ); file_res = f_lseek(&file_handle, addr);
if(file_handle.fptr != addr) {
if ( file_handle.fptr != addr )
{
return 0; return 0;
} }
file_res = f_read(&file_handle, buf, size, &bytes_read);
file_res = f_read( &file_handle, buf, size, &bytes_read );
return bytes_read; return bytes_read;
} }
@@ -86,19 +74,11 @@ UINT file_readblock( void *buf, uint32_t addr, uint16_t size )
return bytes_written; return bytes_written;
}*/ }*/
uint8_t file_getc() uint8_t file_getc() {
{ if(file_block_off == file_block_max) {
if ( file_block_off == file_block_max )
{
file_block_max = file_read(); file_block_max = file_read();
if(file_block_max == 0) file_status = FILE_EOF;
if ( file_block_max == 0 )
{
file_status = FILE_EOF;
}
file_block_off = 0; file_block_off = 0;
} }
return file_buf[file_block_off++]; return file_buf[file_block_off++];
} }

View File

@@ -29,25 +29,26 @@
#include <arm/NXP/LPC17xx/LPC17xx.h> #include <arm/NXP/LPC17xx/LPC17xx.h>
#include "ff.h" #include "ff.h"
enum filestates { FILE_OK = 0, FILE_ERR, FILE_EOF }; enum filestates { FILE_OK=0, FILE_ERR, FILE_EOF };
#define GCC_ALIGN_WORKAROUND __attribute__ ((aligned(4))) #define GCC_ALIGN_WORKAROUND __attribute__ ((aligned(4)))
extern BYTE file_buf[512]; BYTE file_buf[512] GCC_ALIGN_WORKAROUND;
extern FATFS fatfs;
extern FIL file_handle;
extern FRESULT file_res;
extern uint8_t file_lfn[258];
extern uint16_t file_block_off, file_block_max;
extern enum filestates file_status;
void file_init( void ); FATFS fatfs;
void file_open( uint8_t *filename, BYTE flags ); FIL file_handle;
void file_open_by_filinfo( FILINFO *fno ); FRESULT file_res;
void file_close( void ); uint8_t file_lfn[258];
UINT file_read( void ); uint16_t file_block_off, file_block_max;
UINT file_write( void ); enum filestates file_status;
UINT file_readblock( void *buf, uint32_t addr, uint16_t size );
UINT file_writeblock( void *buf, uint32_t addr, uint16_t size );
uint8_t file_getc( void ); void file_init(void);
void file_open(uint8_t* filename, BYTE flags);
void file_open_by_filinfo(FILINFO* fno);
void file_close(void);
UINT file_read(void);
UINT file_write(void);
UINT file_readblock(void* buf, uint32_t addr, uint16_t size);
UINT file_writeblock(void* buf, uint32_t addr, uint16_t size);
uint8_t file_getc(void);
#endif #endif

View File

@@ -12,284 +12,197 @@ uint32_t iap_cmd[5];
uint32_t iap_res[5]; uint32_t iap_res[5];
uint32_t flash_sig[4]; uint32_t flash_sig[4];
IAP iap_entry = ( IAP ) IAP_LOCATION; IAP iap_entry = (IAP) IAP_LOCATION;
uint32_t calc_flash_crc( uint32_t start, uint32_t len ) uint32_t calc_flash_crc(uint32_t start, uint32_t len) {
{ DBG_BL printf("calc_flash_crc(%08lx, %08lx) {\n", start, len);
DBG_BL printf( "calc_flash_crc(%08lx, %08lx) {\n", start, len );
uint32_t end = start + len; uint32_t end = start + len;
if(end > 0x20000) {
if ( end > 0x20000 )
{
len = 0x1ffff - start; len = 0x1ffff - start;
end = 0x20000; end = 0x20000;
} }
uint32_t crc = 0xffffffff; uint32_t crc = 0xffffffff;
uint32_t s = start; uint32_t s = start;
while(s < end) {
while ( s < end ) crc = crc32_update(crc, *(const unsigned char*)(s));
{
crc = crc32_update( crc, *( const unsigned char * )( s ) );
s++; s++;
} }
crc = crc_finalize(crc);
crc = crc_finalize( crc ); DBG_BL printf(" crc generated. result=%08lx\n", crc);
DBG_BL printf( " crc generated. result=%08lx\n", crc ); DBG_BL printf("} //calc_flash_crc\n");
DBG_BL printf( "} //calc_flash_crc\n" );
return crc; return crc;
} }
void test_iap() void test_iap() {
{ iap_cmd[0]=54;
iap_cmd[0] = 54; iap_entry(iap_cmd, iap_res);
iap_entry( iap_cmd, iap_res ); DBG_BL printf("Part ID=%08lx\n", iap_res[1]);
DBG_BL printf( "Part ID=%08lx\n", iap_res[1] );
} }
void print_header( sd2snes_fw_header *header ) void print_header(sd2snes_fw_header *header) {
{ DBG_BL printf(" magic = %08lx\n version = %08lx\n size = %08lx\n crc = %08lx\n ~crc = %08lx\n",
DBG_BL printf( " magic = %08lx\n version = %08lx\n size = %08lx\n crc = %08lx\n ~crc = %08lx\n",
header->magic, header->version, header->size, header->magic, header->version, header->size,
header->crc, header->crcc ); header->crc, header->crcc);
} }
int check_header( sd2snes_fw_header *header, uint32_t crc ) int check_header(sd2snes_fw_header *header, uint32_t crc) {
{ if((header->magic != FW_MAGIC)
if ( ( header->magic != FW_MAGIC ) || (header->size < 0x200)
|| ( header->size < 0x200 ) || (header->size > (0x1ffff - FW_START))
|| ( header->size > ( 0x1ffff - FW_START ) ) || ((header->crc ^ header->crcc) != 0xffffffff)) {
|| ( ( header->crc ^ header->crcc ) != 0xffffffff ) )
{
return ERR_FLASHHD; return ERR_FLASHHD;
} }
if(header->crc != crc) {
if ( header->crc != crc )
{
return ERR_FLASHCRC; return ERR_FLASHCRC;
} }
return ERR_OK; return ERR_OK;
} }
FLASH_RES check_flash() FLASH_RES check_flash() {
{ sd2snes_fw_header *fw_header = (sd2snes_fw_header*) FW_START;
sd2snes_fw_header *fw_header = ( sd2snes_fw_header * ) FW_START;
uint32_t flash_addr = FW_START; uint32_t flash_addr = FW_START;
if(flash_addr != FW_START) {
if ( flash_addr != FW_START ) DBG_BL printf("address sanity check failed. expected 0x%08lx, got 0x%08lx.\nSomething is terribly wrong.\nBailing out to avoid bootldr self-corruption.\n", FW_START, flash_addr);
{
DBG_BL printf( "address sanity check failed. expected 0x%08lx, got 0x%08lx.\nSomething is terribly wrong.\nBailing out to avoid bootldr self-corruption.\n",
FW_START, flash_addr );
return ERR_HW; return ERR_HW;
} }
DBG_BL printf("Current flash contents:\n");
DBG_BL printf( "Current flash contents:\n" ); DBG_BL print_header(fw_header);
DBG_BL print_header( fw_header ); uint32_t crc = calc_flash_crc(flash_addr + 0x100, (fw_header->size & 0x1ffff));
uint32_t crc = calc_flash_crc( flash_addr + 0x100, ( fw_header->size & 0x1ffff ) ); return check_header(fw_header, crc);
return check_header( fw_header, crc );
} }
IAP_RES iap_wrap( uint32_t *iap_cmd, uint32_t *iap_res ) IAP_RES iap_wrap(uint32_t *iap_cmd, uint32_t *iap_res) {
{ // NVIC_DisableIRQ(RIT_IRQn);
// NVIC_DisableIRQ(RIT_IRQn); // NVIC_DisableIRQ(UART_IRQ);
// NVIC_DisableIRQ(UART_IRQ); for(volatile int i=0; i<2048; i++);
for ( volatile int i = 0; i < 2048; i++ ); iap_entry(iap_cmd, iap_res);
for(volatile int i=0; i<2048; i++);
iap_entry( iap_cmd, iap_res ); // NVIC_EnableIRQ(UART_IRQ);
for ( volatile int i = 0; i < 2048; i++ );
// NVIC_EnableIRQ(UART_IRQ);
return iap_res[0]; return iap_res[0];
} }
IAP_RES iap_prepare_for_write( uint32_t start, uint32_t end ) IAP_RES iap_prepare_for_write(uint32_t start, uint32_t end) {
{ if(start < (FW_START / 0x1000)) return INVALID_SECTOR;
if ( start < ( FW_START / 0x1000 ) )
{
return INVALID_SECTOR;
}
iap_cmd[0] = 50; iap_cmd[0] = 50;
iap_cmd[1] = start; iap_cmd[1] = start;
iap_cmd[2] = end; iap_cmd[2] = end;
iap_wrap( iap_cmd, iap_res ); iap_wrap(iap_cmd, iap_res);
return iap_res[0]; return iap_res[0];
} }
IAP_RES iap_erase( uint32_t start, uint32_t end ) IAP_RES iap_erase(uint32_t start, uint32_t end) {
{ if(start < (FW_START / 0x1000)) return INVALID_SECTOR;
if ( start < ( FW_START / 0x1000 ) )
{
return INVALID_SECTOR;
}
iap_cmd[0] = 52; iap_cmd[0] = 52;
iap_cmd[1] = start; iap_cmd[1] = start;
iap_cmd[2] = end; iap_cmd[2] = end;
iap_cmd[3] = CONFIG_CPU_FREQUENCY / 1000L; iap_cmd[3] = CONFIG_CPU_FREQUENCY / 1000L;
iap_wrap( iap_cmd, iap_res ); iap_wrap(iap_cmd, iap_res);
return iap_res[0]; return iap_res[0];
} }
IAP_RES iap_ram2flash( uint32_t tgt, uint8_t *src, int num ) IAP_RES iap_ram2flash(uint32_t tgt, uint8_t *src, int num) {
{
iap_cmd[0] = 51; iap_cmd[0] = 51;
iap_cmd[1] = tgt; iap_cmd[1] = tgt;
iap_cmd[2] = ( uint32_t )src; iap_cmd[2] = (uint32_t)src;
iap_cmd[3] = num; iap_cmd[3] = num;
iap_cmd[4] = CONFIG_CPU_FREQUENCY / 1000L; iap_cmd[4] = CONFIG_CPU_FREQUENCY / 1000L;
iap_wrap( iap_cmd, iap_res ); iap_wrap(iap_cmd, iap_res);
return iap_res[0]; return iap_res[0];
} }
FLASH_RES flash_file( uint8_t *filename ) FLASH_RES flash_file(uint8_t *filename) {
{ sd2snes_fw_header *fw_header = (sd2snes_fw_header*) FW_START;
sd2snes_fw_header *fw_header = ( sd2snes_fw_header * ) FW_START;
uint32_t flash_addr = FW_START; uint32_t flash_addr = FW_START;
uint32_t file_crc = 0xffffffff; uint32_t file_crc = 0xffffffff;
uint16_t count; uint16_t count;
sd2snes_fw_header file_header; sd2snes_fw_header file_header;
UINT bytes_read; UINT bytes_read;
if(flash_addr != FW_START) {
if ( flash_addr != FW_START ) DBG_BL printf("address sanity check failed. expected 0x%08lx, got 0x%08lx.\nSomething is terribly wrong.\nBailing out to avoid bootldr self-corruption.\n", FW_START, flash_addr);
{
DBG_BL printf( "address sanity check failed. expected 0x%08lx, got 0x%08lx.\nSomething is terribly wrong.\nBailing out to avoid bootldr self-corruption.\n",
FW_START, flash_addr );
return ERR_HW; return ERR_HW;
} }
file_open(filename, FA_READ);
file_open( filename, FA_READ ); if(file_res) {
DBG_BL printf("file_open: error %d\n", file_res);
if ( file_res )
{
DBG_BL printf( "file_open: error %d\n", file_res );
return ERR_FS; return ERR_FS;
} }
DBG_BL printf("firmware image found. file size: %ld\n", file_handle.fsize);
DBG_BL printf( "firmware image found. file size: %ld\n", file_handle.fsize ); DBG_BL printf("reading header...\n");
DBG_BL printf( "reading header...\n" ); f_read(&file_handle, &file_header, 32, &bytes_read);
f_read( &file_handle, &file_header, 32, &bytes_read ); DBG_BL print_header(&file_header);
DBG_BL print_header( &file_header ); if(check_flash() || file_header.version != fw_header->version || file_header.version == FW_MAGIC || fw_header->version == FW_MAGIC) {
DBG_UART uart_putc('F');
if ( check_flash() || file_header.version != fw_header->version || file_header.version == FW_MAGIC f_read(&file_handle, file_buf, 0xe0, &bytes_read);
|| fw_header->version == FW_MAGIC ) for(;;) {
{
DBG_UART uart_putc( 'F' );
f_read( &file_handle, file_buf, 0xe0, &bytes_read );
for ( ;; )
{
bytes_read = file_read(); bytes_read = file_read();
if(file_res || !bytes_read) break;
if ( file_res || !bytes_read ) for(count = 0; count < bytes_read; count++) {
{ file_crc = crc32_update(file_crc, file_buf[count]);
break;
}
for ( count = 0; count < bytes_read; count++ )
{
file_crc = crc32_update( file_crc, file_buf[count] );
} }
} }
file_crc = crc_finalize(file_crc);
file_crc = crc_finalize( file_crc ); DBG_BL printf("file crc=%08lx\n", file_crc);
DBG_BL printf( "file crc=%08lx\n", file_crc ); if(check_header(&file_header, file_header.crc) != ERR_OK) {
DBG_BL printf("Invalid firmware file (header corrupted).\n");
if ( check_header( &file_header, file_header.crc ) != ERR_OK )
{
DBG_BL printf( "Invalid firmware file (header corrupted).\n" );
return ERR_FILEHD; return ERR_FILEHD;
} }
if(file_header.crc != file_crc) {
if ( file_header.crc != file_crc ) DBG_BL printf("Firmware file checksum error.\n");
{
DBG_BL printf( "Firmware file checksum error.\n" );
return ERR_FILECHK; return ERR_FILECHK;
} }
uint32_t res; uint32_t res;
writeled( 1 ); writeled(1);
DBG_BL printf( "erasing flash...\n" ); DBG_BL printf("erasing flash...\n");
DBG_UART uart_putc( 'P' ); DBG_UART uart_putc('P');
if((res = iap_prepare_for_write(FW_START / 0x1000, FLASH_SECTORS)) != CMD_SUCCESS) {
if ( ( res = iap_prepare_for_write( FW_START / 0x1000, FLASH_SECTORS ) ) != CMD_SUCCESS ) DBG_BL printf("error %ld while preparing for erase\n", res);
{ DBG_UART uart_putc('X');
DBG_BL printf( "error %ld while preparing for erase\n", res );
DBG_UART uart_putc( 'X' );
return ERR_FLASHPREP; return ERR_FLASHPREP;
}; };
DBG_UART uart_putc('E');
DBG_UART uart_putc( 'E' ); if((res = iap_erase(FW_START / 0x1000, FLASH_SECTORS)) != CMD_SUCCESS) {
DBG_BL printf("error %ld while erasing\n", res);
if ( ( res = iap_erase( FW_START / 0x1000, FLASH_SECTORS ) ) != CMD_SUCCESS ) DBG_UART uart_putc('X');
{
DBG_BL printf( "error %ld while erasing\n", res );
DBG_UART uart_putc( 'X' );
return ERR_FLASHERASE; return ERR_FLASHERASE;
} }
DBG_BL printf("writing... @%08lx\n", flash_addr);
DBG_BL printf( "writing... @%08lx\n", flash_addr );
file_close(); file_close();
file_open( filename, FA_READ ); file_open(filename, FA_READ);
uint8_t current_sec; uint8_t current_sec;
uint32_t total_read = 0; uint32_t total_read = 0;
for(flash_addr = FW_START; flash_addr < 0x00020000; flash_addr += 0x200) {
for ( flash_addr = FW_START; flash_addr < 0x00020000; flash_addr += 0x200 ) total_read += (bytes_read = file_read());
{ if(file_res || !bytes_read) break;
total_read += ( bytes_read = file_read() ); current_sec = flash_addr & 0x10000 ? (16 + ((flash_addr >> 15) & 1))
: (flash_addr >> 12);
if ( file_res || !bytes_read ) DBG_BL printf("current_sec=%d flash_addr=%08lx\n", current_sec, flash_addr);
{ DBG_UART uart_putc('.');
break; if(current_sec < (FW_START / 0x1000)) return ERR_FLASH;
} DBG_UART uart_putc(current_sec["0123456789ABCDEFGH"]);
DBG_UART uart_putc('p');
current_sec = flash_addr & 0x10000 ? ( 16 + ( ( flash_addr >> 15 ) & 1 ) ) if((res = iap_prepare_for_write(current_sec, current_sec)) != CMD_SUCCESS) {
: ( flash_addr >> 12 ); DBG_BL printf("error %ld while preparing sector %d for write\n", res, current_sec);
DBG_BL printf( "current_sec=%d flash_addr=%08lx\n", current_sec, flash_addr ); DBG_UART uart_putc('X');
DBG_UART uart_putc( '.' );
if ( current_sec < ( FW_START / 0x1000 ) )
{
return ERR_FLASH; return ERR_FLASH;
} }
DBG_UART uart_putc('w');
DBG_UART uart_putc( current_sec["0123456789ABCDEFGH"] ); if((res = iap_ram2flash(flash_addr, file_buf, 512)) != CMD_SUCCESS) {
DBG_UART uart_putc( 'p' ); DBG_BL printf("error %ld while writing to address %08lx (sector %d)\n", res, flash_addr, current_sec);
DBG_UART uart_putc('X');
if ( ( res = iap_prepare_for_write( current_sec, current_sec ) ) != CMD_SUCCESS )
{
DBG_BL printf( "error %ld while preparing sector %d for write\n", res, current_sec );
DBG_UART uart_putc( 'X' );
return ERR_FLASH;
}
DBG_UART uart_putc( 'w' );
if ( ( res = iap_ram2flash( flash_addr, file_buf, 512 ) ) != CMD_SUCCESS )
{
//printf("error %ld while writing to address %08lx (sector %d)\n", res, flash_addr, current_sec);
DBG_UART uart_putc( 'X' );
return ERR_FLASH; return ERR_FLASH;
} }
} }
if(total_read != (file_header.size + 0x100)) {
if ( total_read != ( file_header.size + 0x100 ) ) DBG_BL printf("wrote less data than expected! (%08lx vs. %08lx)\n", total_read, file_header.size);
{ // DBG_UART uart_putc('X');
DBG_BL printf( "wrote less data than expected! (%08lx vs. %08lx)\n", total_read, file_header.size );
// DBG_UART uart_putc('X');
return ERR_FILECHK; return ERR_FILECHK;
} }
writeled(0);
writeled( 0 ); } else {
DBG_UART uart_putc('n');
DBG_BL printf("flash content is ok, no version mismatch, no forced upgrade. No need to flash\n");
} }
else
{
DBG_UART uart_putc( 'n' );
DBG_BL printf( "flash content is ok, no version mismatch, no forced upgrade. No need to flash\n" );
}
return ERR_OK; return ERR_OK;
} }

View File

@@ -2,30 +2,28 @@
#define IAP_H #define IAP_H
#define IAP_LOCATION 0x1fff1ff1 #define IAP_LOCATION 0x1fff1ff1
typedef void ( *IAP )( uint32_t *, uint32_t * ); typedef void (*IAP)(uint32_t*, uint32_t*);
typedef enum {ERR_OK = 0, ERR_HW, ERR_FS, ERR_FILEHD, ERR_FILECHK, ERR_FLASHHD, ERR_FLASHCRC, ERR_FLASHPREP, ERR_FLASHERASE, ERR_FLASH} FLASH_RES; typedef enum {ERR_OK = 0, ERR_HW, ERR_FS, ERR_FILEHD, ERR_FILECHK, ERR_FLASHHD, ERR_FLASHCRC, ERR_FLASHPREP, ERR_FLASHERASE, ERR_FLASH} FLASH_RES;
typedef enum typedef enum {
{ /* 0*/ CMD_SUCCESS = 0,
/* 0*/ CMD_SUCCESS = 0, /* 1*/ INVALID_COMMAND,
/* 1*/ INVALID_COMMAND, /* 2*/ SRC_ADDR_ERROR,
/* 2*/ SRC_ADDR_ERROR, /* 3*/ DST_ADDR_ERROR,
/* 3*/ DST_ADDR_ERROR, /* 4*/ SRC_ADDR_NOT_MAPPED,
/* 4*/ SRC_ADDR_NOT_MAPPED, /* 5*/ DST_ADDR_NOT_MAPPED,
/* 5*/ DST_ADDR_NOT_MAPPED, /* 6*/ COUNT_ERROR,
/* 6*/ COUNT_ERROR, /* 7*/ INVALID_SECTOR,
/* 7*/ INVALID_SECTOR, /* 8*/ SECTOR_NOT_BLANK,
/* 8*/ SECTOR_NOT_BLANK, /* 9*/ SECTOR_NOT_PREPARED_FOR_WRITE_OPERATION,
/* 9*/ SECTOR_NOT_PREPARED_FOR_WRITE_OPERATION, /*10*/ COMPARE_ERROR,
/*10*/ COMPARE_ERROR, /*11*/ BUSY
/*11*/ BUSY
} IAP_RES; } IAP_RES;
#define FW_MAGIC (0x44534E53) #define FW_MAGIC (0x44534E53)
typedef struct typedef struct {
{
uint32_t magic; uint32_t magic;
uint32_t version; uint32_t version;
uint32_t size; uint32_t size;
@@ -33,10 +31,10 @@ typedef struct
uint32_t crcc; uint32_t crcc;
} sd2snes_fw_header; } sd2snes_fw_header;
uint32_t calc_flash_crc( uint32_t start, uint32_t end ); uint32_t calc_flash_crc(uint32_t start, uint32_t end);
void test_iap( void ); void test_iap(void);
FLASH_RES check_flash( void ); FLASH_RES check_flash(void);
FLASH_RES flash_file( uint8_t *filename ); FLASH_RES flash_file(uint8_t* filename);
#endif #endif

View File

@@ -18,85 +18,73 @@ int led_writeledstate = 0;
write red P1.23 PWM1[4] write red P1.23 PWM1[4]
*/ */
void rdyled( unsigned int state ) void rdyled(unsigned int state) {
{ BITBAND(LPC_GPIO2->FIODIR, 4) = state;
BITBANG( LPC_GPIO2->FIODIR, 4 ) = state;
led_rdyledstate = state; led_rdyledstate = state;
} }
void readled( unsigned int state ) void readled(unsigned int state) {
{ BITBAND(LPC_GPIO2->FIODIR, 5) = state;
BITBANG( LPC_GPIO2->FIODIR, 5 ) = state;
led_readledstate = state; led_readledstate = state;
} }
void writeled( unsigned int state ) void writeled(unsigned int state) {
{ BITBAND(LPC_GPIO1->FIODIR, 23) = state;
BITBANG( LPC_GPIO1->FIODIR, 23 ) = state;
led_writeledstate = state; led_writeledstate = state;
} }
void led_clkout32( uint32_t val ) void led_clkout32(uint32_t val) {
{ while(1) {
while ( 1 ) rdyled(1);
{ delay_ms(400);
rdyled( 1 ); readled((val & BV(31))>>31);
delay_ms( 400 ); rdyled(0);
readled( ( val & BV( 31 ) ) >> 31 ); val<<=1;
rdyled( 0 ); delay_ms(400);
val <<= 1;
delay_ms( 400 );
} }
} }
void toggle_rdy_led() void toggle_rdy_led() {
{ rdyled(~led_rdyledstate);
rdyled( ~led_rdyledstate );
} }
void toggle_read_led() void toggle_read_led() {
{ readled(~led_readledstate);
readled( ~led_readledstate );
} }
void toggle_write_led() void toggle_write_led() {
{ writeled(~led_writeledstate);
writeled( ~led_writeledstate );
} }
void led_panic() void led_panic() {
{ while(1) {
while ( 1 ) LPC_GPIO2->FIODIR |= BV(4) | BV(5);
{ LPC_GPIO1->FIODIR |= BV(23);
LPC_GPIO2->FIODIR |= BV( 4 ) | BV( 5 ); delay_ms(350);
LPC_GPIO1->FIODIR |= BV( 23 ); LPC_GPIO2->FIODIR &= ~(BV(4) | BV(5));
delay_ms( 350 ); LPC_GPIO1->FIODIR &= ~BV(23);
LPC_GPIO2->FIODIR &= ~( BV( 4 ) | BV( 5 ) ); delay_ms(350);
LPC_GPIO1->FIODIR &= ~BV( 23 );
delay_ms( 350 );
} }
} }
void led_std() void led_std() {
{ BITBAND(LPC_PINCON->PINSEL4, 9) = 0;
BITBANG( LPC_PINCON->PINSEL4, 9 ) = 0; BITBAND(LPC_PINCON->PINSEL4, 8) = 0;
BITBANG( LPC_PINCON->PINSEL4, 8 ) = 0;
BITBANG( LPC_PINCON->PINSEL4, 11 ) = 0; BITBAND(LPC_PINCON->PINSEL4, 11) = 0;
BITBANG( LPC_PINCON->PINSEL4, 10 ) = 0; BITBAND(LPC_PINCON->PINSEL4, 10) = 0;
BITBANG( LPC_PINCON->PINSEL3, 15 ) = 0; BITBAND(LPC_PINCON->PINSEL3, 15) = 0;
BITBANG( LPC_PINCON->PINSEL3, 14 ) = 0; BITBAND(LPC_PINCON->PINSEL3, 14) = 0;
BITBANG( LPC_PWM1->PCR, 12 ) = 0; BITBAND(LPC_PWM1->PCR, 12) = 0;
BITBANG( LPC_PWM1->PCR, 13 ) = 0; BITBAND(LPC_PWM1->PCR, 13) = 0;
BITBANG( LPC_PWM1->PCR, 14 ) = 0; BITBAND(LPC_PWM1->PCR, 14) = 0;
} }
void led_init() void led_init() {
{ /* power is already connected by default */
/* power is already connected by default */ /* set PCLK divider to 8 */
/* set PCLK divider to 8 */ BITBAND(LPC_SC->PCLKSEL1, 21) = 1;
BITBANG( LPC_SC->PCLKSEL1, 21 ) = 1; BITBAND(LPC_SC->PCLKSEL1, 20) = 1;
BITBANG( LPC_SC->PCLKSEL1, 20 ) = 1;
} }

View File

@@ -3,15 +3,15 @@
#ifndef _LED_H #ifndef _LED_H
#define _LED_H #define _LED_H
void readled( unsigned int state ); void readled(unsigned int state);
void writeled( unsigned int state ); void writeled(unsigned int state);
void rdyled( unsigned int state ); void rdyled(unsigned int state);
void led_clkout32( uint32_t val ); void led_clkout32(uint32_t val);
void toggle_rdy_led( void ); void toggle_rdy_led(void);
void toggle_read_led( void ); void toggle_read_led(void);
void toggle_write_led( void ); void toggle_write_led(void);
void led_panic( void ); void led_panic(void);
void led_std( void ); void led_std(void);
void led_init( void ); void led_init(void);
#endif #endif

View File

@@ -27,9 +27,9 @@ if { [info exists CPUTAPID ] } {
#delays on reset lines #delays on reset lines
#if your OpenOCD version rejects "jtag_nsrst_delay" replace it with: #if your OpenOCD version rejects "jtag_nsrst_delay" replace it with:
adapter_nsrst_delay 200 #adapter_nsrst_delay 200
#jtag_nsrst_delay 200 jtag_nsrst_delay 200
#jtag_ntrst_delay 200 jtag_ntrst_delay 200
# LPC2000 & LPC1700 -> SRST causes TRST # LPC2000 & LPC1700 -> SRST causes TRST
#reset_config srst_pulls_trst #reset_config srst_pulls_trst
@@ -56,7 +56,7 @@ flash bank $_FLASHNAME lpc2000 0x0 0x20000 0 0 $_TARGETNAME \
# Run with *real slow* clock by default since the # Run with *real slow* clock by default since the
# boot rom could have been playing with the PLL, so # boot rom could have been playing with the PLL, so
# we have no idea what clock the target is running at. # we have no idea what clock the target is running at.
adapter_khz 1000 jtag_khz 1000
$_TARGETNAME configure -event reset-init { $_TARGETNAME configure -event reset-init {
# Do not remap 0x0000-0x0020 to anything but the flash (i.e. select # Do not remap 0x0000-0x0020 to anything but the flash (i.e. select

View File

@@ -20,113 +20,83 @@
int i; int i;
BYTE file_buf[512] GCC_ALIGN_WORKAROUND;
FATFS fatfs;
FIL file_handle;
FRESULT file_res;
uint8_t file_lfn[258];
uint16_t file_block_off, file_block_max;
enum filestates file_status;
volatile enum diskstates disk_state; volatile enum diskstates disk_state;
extern volatile tick_t ticks; extern volatile tick_t ticks;
int ( *chain )( void ); int (*chain)(void);
int main( void ) int main(void) {
{ SNES_CIC_PAIR_REG->FIODIR = BV(SNES_CIC_PAIR_BIT);
SNES_CIC_PAIR_REG->FIODIR = BV( SNES_CIC_PAIR_BIT ); BITBAND(SNES_CIC_PAIR_REG->FIOSET, SNES_CIC_PAIR_BIT) = 1;
BITBANG( SNES_CIC_PAIR_REG->FIOSET, SNES_CIC_PAIR_BIT ) = 1; /* LPC_GPIO2->FIODIR = BV(0) | BV(1) | BV(2); */
// LPC_GPIO0->FIODIR = BV(16);
/* LPC_GPIO2->FIODIR = BV(0) | BV(1) | BV(2); */
// LPC_GPIO0->FIODIR = BV(16);
/* connect UART3 on P0[25:26] + SSP0 on P0[15:18] + MAT3.0 on P0[10] */ /* connect UART3 on P0[25:26] + SSP0 on P0[15:18] + MAT3.0 on P0[10] */
LPC_PINCON->PINSEL1 = BV( 18 ) | BV( 19 ) | BV( 20 ) | BV( 21 ) /* UART3 */ LPC_PINCON->PINSEL1 = BV(18) | BV(19) | BV(20) | BV(21) /* UART3 */
| BV( 3 ) | BV( 5 ); /* SSP0 (FPGA) except SS */ | BV(3) | BV(5); /* SSP0 (FPGA) except SS */
LPC_PINCON->PINSEL0 = BV( 31 ); /* SSP0 */ LPC_PINCON->PINSEL0 = BV(31); /* SSP0 */
/* | BV(13) | BV(15) | BV(17) | BV(19) SSP1 (SD) */ /* | BV(13) | BV(15) | BV(17) | BV(19) SSP1 (SD) */
/* pull-down CIC data lines */ /* pull-down CIC data lines */
LPC_PINCON->PINMODE0 = BV( 0 ) | BV( 1 ) | BV( 2 ) | BV( 3 ); LPC_PINCON->PINMODE0 = BV(0) | BV(1) | BV(2) | BV(3);
clock_disconnect(); clock_disconnect();
power_init(); power_init();
timer_init(); timer_init();
DBG_UART uart_init(); DBG_UART uart_init();
led_init(); led_init();
readled( 0 ); readled(0);
rdyled( 1 ); rdyled(1);
writeled( 0 ); writeled(0);
/* do this last because the peripheral init()s change PCLK dividers */ /* do this last because the peripheral init()s change PCLK dividers */
clock_init(); clock_init();
// LPC_PINCON->PINSEL0 |= BV(20) | BV(21); /* MAT3.0 (FPGA clock) */ // LPC_PINCON->PINSEL0 |= BV(20) | BV(21); /* MAT3.0 (FPGA clock) */
sdn_init(); sdn_init();
DBG_BL printf("chksum=%08lx\n", *(uint32_t*)28);
for ( i = 0; i < 20; i++ ) DBG_BL printf("\n\nsd2snes mk.2 bootloader\nver.: " VER "\ncpu clock: %ld Hz\n", CONFIG_CPU_FREQUENCY);
{ DBG_BL printf("PCONP=%lx\n", LPC_SC->PCONP);
uart_putc( '-' ); /* setup timer (fpga clk) */
} LPC_TIM3->CTCR=0;
LPC_TIM3->EMR=EMC0TOGGLE;
uart_putc( '\n' ); LPC_TIM3->MCR=MR0R;
LPC_TIM3->MR0=1;
DBG_BL printf( "chksum=%08lx\n", *( uint32_t * )28 ); LPC_TIM3->TCR=1;
/*DBG_BL*/ printf( "\n\nsd2snes mk.2 bootloader\nver.: " VER "\ncpu clock: %ld Hz\n", CONFIG_CPU_FREQUENCY );
DBG_BL printf( "PCONP=%lx\n", LPC_SC->PCONP );
/* setup timer (fpga clk) */
LPC_TIM3->CTCR = 0;
LPC_TIM3->EMR = EMC0TOGGLE;
LPC_TIM3->MCR = MR0R;
LPC_TIM3->MR0 = 1;
LPC_TIM3->TCR = 1;
NVIC->ICER[0] = 0xffffffff; NVIC->ICER[0] = 0xffffffff;
NVIC->ICER[1] = 0xffffffff; NVIC->ICER[1] = 0xffffffff;
FLASH_RES res = flash_file( ( uint8_t * )"/sd2snes/firmware.img" ); FLASH_RES res = flash_file((uint8_t*)"/sd2snes/firmware.img");
if(res == ERR_FLASHPREP || res == ERR_FLASHERASE || res == ERR_FLASH) {
if ( res == ERR_FLASHPREP || res == ERR_FLASHERASE || res == ERR_FLASH ) rdyled(0);
{ writeled(1);
rdyled( 0 );
writeled( 1 );
} }
if(res == ERR_FILEHD || res == ERR_FILECHK) {
if ( res == ERR_FILEHD || res == ERR_FILECHK ) rdyled(0);
{ readled(1);
rdyled( 0 );
readled( 1 );
} }
DBG_BL printf("flash result = %d\n", res);
DBG_BL printf( "flash result = %d\n", res ); if(res != ERR_OK) {
if((res = check_flash()) != ERR_OK) {
if ( res != ERR_OK ) DBG_BL printf("check_flash() failed with error %d, not booting.\n", res);
{ while(1) {
if ( ( res = check_flash() ) != ERR_OK )
{
DBG_BL printf( "check_flash() failed with error %d, not booting.\n", res );
while ( 1 )
{
toggle_rdy_led(); toggle_rdy_led();
delay_ms( 500 ); delay_ms(500);
} }
} }
} }
NVIC_DisableIRQ(RIT_IRQn);
NVIC_DisableIRQ(UART_IRQ);
NVIC_DisableIRQ( RIT_IRQn ); SCB->VTOR=FW_START+0x00000100;
NVIC_DisableIRQ( UART_IRQ ); chain = (void*)(*((uint32_t*)(FW_START+0x00000104)));
uart_putc("0123456789abcdef"[((uint32_t)chain>>28)&15]);
SCB->VTOR = FW_START + 0x00000100; uart_putc("0123456789abcdef"[((uint32_t)chain>>24)&15]);
chain = ( void * )( *( ( uint32_t * )( FW_START + 0x00000104 ) ) ); uart_putc("0123456789abcdef"[((uint32_t)chain>>20)&15]);
uart_putc( "0123456789abcdef"[( ( uint32_t )chain >> 28 ) & 15] ); uart_putc("0123456789abcdef"[((uint32_t)chain>>16)&15]);
uart_putc( "0123456789abcdef"[( ( uint32_t )chain >> 24 ) & 15] ); uart_putc("0123456789abcdef"[((uint32_t)chain>>12)&15]);
uart_putc( "0123456789abcdef"[( ( uint32_t )chain >> 20 ) & 15] ); uart_putc("0123456789abcdef"[((uint32_t)chain>>8)&15]);
uart_putc( "0123456789abcdef"[( ( uint32_t )chain >> 16 ) & 15] ); uart_putc("0123456789abcdef"[((uint32_t)chain>>4)&15]);
uart_putc( "0123456789abcdef"[( ( uint32_t )chain >> 12 ) & 15] ); uart_putc("0123456789abcdef"[((uint32_t)chain)&15]);
uart_putc( "0123456789abcdef"[( ( uint32_t )chain >> 8 ) & 15] ); uart_putc('\n');
uart_putc( "0123456789abcdef"[( ( uint32_t )chain >> 4 ) & 15] );
uart_putc( "0123456789abcdef"[( ( uint32_t )chain ) & 15] );
uart_putc( '\n' );
chain(); chain();
while(1);
while ( 1 );
} }

View File

@@ -15,13 +15,12 @@
* USB [enabled via usb_init] * USB [enabled via usb_init]
* PWM1 * PWM1
*/ */
void power_init() void power_init() {
{ LPC_SC->PCONP = BV(PCSSP0)
LPC_SC->PCONP = BV( PCSSP0 ) | BV(PCTIM3)
| BV( PCTIM3 ) | BV(PCRTC)
| BV( PCRTC ) | BV(PCGPIO)
| BV( PCGPIO ) | BV(PCPWM1)
| BV( PCPWM1 ) // | BV(PCUSB)
// | BV(PCUSB)
; ;
} }

View File

@@ -38,6 +38,6 @@
#define PCQEI (18) #define PCQEI (18)
#define PCGPIO (15) #define PCGPIO (15)
void power_init( void ); void power_init(void);
#endif #endif

View File

@@ -62,29 +62,24 @@ static char *outptr;
static int maxlen; static int maxlen;
/* printf */ /* printf */
static void outchar( char x ) static void outchar(char x) {
{ if (maxlen) {
if ( maxlen )
{
maxlen--; maxlen--;
outfunc( x ); outfunc(x);
outlength++; outlength++;
} }
} }
/* sprintf */ /* sprintf */
static void outstr( char x ) static void outstr(char x) {
{ if (maxlen) {
if ( maxlen )
{
maxlen--; maxlen--;
*outptr++ = x; *outptr++ = x;
outlength++; outlength++;
} }
} }
static int internal_nprintf( void ( *output_function )( char c ), const char *fmt, va_list ap ) static int internal_nprintf(void (*output_function)(char c), const char *fmt, va_list ap) {
{
unsigned int width; unsigned int width;
unsigned int flags; unsigned int flags;
unsigned int base = 0; unsigned int base = 0;
@@ -92,38 +87,27 @@ static int internal_nprintf( void ( *output_function )( char c ), const char *fm
outlength = 0; outlength = 0;
while ( *fmt ) while (*fmt) {
{ while (1) {
while ( 1 ) if (*fmt == 0)
{
if ( *fmt == 0 )
{
goto end; goto end;
}
if ( *fmt == '%' ) if (*fmt == '%') {
{
fmt++; fmt++;
if (*fmt != '%')
if ( *fmt != '%' )
{
break; break;
} }
}
output_function( *fmt++ ); output_function(*fmt++);
} }
flags = 0; flags = 0;
width = 0; width = 0;
/* read all flags */ /* read all flags */
do do {
{ if (flags < FLAG_WIDTH) {
if ( flags < FLAG_WIDTH ) switch (*fmt) {
{
switch ( *fmt )
{
case '0': case '0':
flags |= FLAG_ZEROPAD; flags |= FLAG_ZEROPAD;
continue; continue;
@@ -142,44 +126,36 @@ static int internal_nprintf( void ( *output_function )( char c ), const char *fm
} }
} }
if ( flags < FLAG_LONG ) if (flags < FLAG_LONG) {
{ if (*fmt >= '0' && *fmt <= '9') {
if ( *fmt >= '0' && *fmt <= '9' )
{
unsigned char tmp = *fmt - '0'; unsigned char tmp = *fmt - '0';
width = 10 * width + tmp; width = 10*width + tmp;
flags |= FLAG_WIDTH; flags |= FLAG_WIDTH;
continue; continue;
} }
if ( *fmt == 'h' ) if (*fmt == 'h')
{
continue; continue;
}
if ( *fmt == 'l' ) if (*fmt == 'l') {
{
flags |= FLAG_LONG; flags |= FLAG_LONG;
continue; continue;
} }
} }
break; break;
} } while (*fmt++);
while ( *fmt++ );
/* Strings */ /* Strings */
if ( *fmt == 'c' || *fmt == 's' ) if (*fmt == 'c' || *fmt == 's') {
{ switch (*fmt) {
switch ( *fmt )
{
case 'c': case 'c':
buffer[0] = va_arg( ap, int ); buffer[0] = va_arg(ap, int);
ptr = buffer; ptr = buffer;
break; break;
case 's': case 's':
ptr = va_arg( ap, char * ); ptr = va_arg(ap, char *);
break; break;
} }
@@ -187,11 +163,9 @@ static int internal_nprintf( void ( *output_function )( char c ), const char *fm
} }
/* Numbers */ /* Numbers */
switch ( *fmt ) switch (*fmt) {
{
case 'u': case 'u':
flags |= FLAG_UNSIGNED; flags |= FLAG_UNSIGNED;
case 'd': case 'd':
base = 10; base = 10;
break; break;
@@ -202,10 +176,9 @@ static int internal_nprintf( void ( *output_function )( char c ), const char *fm
break; break;
case 'p': // pointer case 'p': // pointer
output_function( '0' ); output_function('0');
output_function( 'x' ); output_function('x');
width -= 2; width -= 2;
case 'x': case 'x':
case 'X': case 'X':
base = 16; base = 16;
@@ -215,90 +188,60 @@ static int internal_nprintf( void ( *output_function )( char c ), const char *fm
unsigned int num; unsigned int num;
if ( !( flags & FLAG_UNSIGNED ) ) if (!(flags & FLAG_UNSIGNED)) {
{ int tmp = va_arg(ap, int);
int tmp = va_arg( ap, int ); if (tmp < 0) {
if ( tmp < 0 )
{
num = -tmp; num = -tmp;
flags |= FLAG_NEGATIVE; flags |= FLAG_NEGATIVE;
} } else
else
{
num = tmp; num = tmp;
} } else {
} num = va_arg(ap, unsigned int);
else
{
num = va_arg( ap, unsigned int );
} }
/* Convert number into buffer */ /* Convert number into buffer */
ptr = buffer + sizeof( buffer ); ptr = buffer + sizeof(buffer);
*--ptr = 0; *--ptr = 0;
do {
do
{
*--ptr = hexdigits[num % base]; *--ptr = hexdigits[num % base];
num /= base; num /= base;
} } while (num != 0);
while ( num != 0 );
/* Sign */ /* Sign */
if ( flags & FLAG_NEGATIVE ) if (flags & FLAG_NEGATIVE) {
{ output_function('-');
output_function( '-' );
width--; width--;
} } else if (flags & FLAG_FORCESIGN) {
else if ( flags & FLAG_FORCESIGN ) output_function('+');
{
output_function( '+' );
width--; width--;
} } else if (flags & FLAG_BLANK) {
else if ( flags & FLAG_BLANK ) output_function(' ');
{
output_function( ' ' );
width--; width--;
} }
output: output:
/* left padding */ /* left padding */
if ( ( flags & FLAG_WIDTH ) && !( flags & FLAG_LEFTADJ ) ) if ((flags & FLAG_WIDTH) && !(flags & FLAG_LEFTADJ)) {
{ while (strlen(ptr) < width) {
while ( strlen( ptr ) < width ) if (flags & FLAG_ZEROPAD)
{ output_function('0');
if ( flags & FLAG_ZEROPAD )
{
output_function( '0' );
}
else else
{ output_function(' ');
output_function( ' ' );
}
width--; width--;
} }
} }
/* data */ /* data */
while ( *ptr ) while (*ptr) {
{ output_function(*ptr++);
output_function( *ptr++ ); if (width)
if ( width )
{
width--; width--;
} }
}
/* right padding */ /* right padding */
if ( flags & FLAG_WIDTH ) if (flags & FLAG_WIDTH) {
{ while (width) {
while ( width ) output_function(' ');
{
output_function( ' ' );
width--; width--;
} }
} }
@@ -306,69 +249,52 @@ output:
fmt++; fmt++;
} }
end: end:
return outlength; return outlength;
} }
int printf( const char *format, ... ) int printf(const char *format, ...) {
{
va_list ap; va_list ap;
int res; int res;
maxlen = -1; maxlen = -1;
va_start( ap, format ); va_start(ap, format);
res = internal_nprintf( outchar, format, ap ); res = internal_nprintf(outchar, format, ap);
va_end( ap ); va_end(ap);
return res; return res;
} }
int snprintf( char *str, size_t size, const char *format, ... ) int snprintf(char *str, size_t size, const char *format, ...) {
{
va_list ap; va_list ap;
int res; int res;
maxlen = size; maxlen = size;
outptr = str; outptr = str;
va_start( ap, format ); va_start(ap, format);
res = internal_nprintf( outstr, format, ap ); res = internal_nprintf(outstr, format, ap);
va_end( ap ); va_end(ap);
if (res < size)
if ( res < size )
{
str[res] = 0; str[res] = 0;
}
return res; return res;
} }
/* Required for gcc compatibility */ /* Required for gcc compatibility */
int puts( const char *str ) int puts(const char *str) {
{ uart_puts(str);
uart_puts( str ); uart_putc('\n');
uart_putc( '\n' );
return 0; return 0;
} }
#undef putchar #undef putchar
int putchar( int c ) int putchar(int c) {
{ uart_putc(c);
uart_putc( c );
return 0; return 0;
} }
#else #else
int printf( const char *format, ... ) int printf(const char *format, ...) { return 0; }
{ int snprintf(char *str, size_t size, const char *format, ...) { return 0; }
return 0; int puts(const char *str) { return 0; }
}
//int snprintf(char *str, size_t size, const char *format, ...) { return 0; }
int puts( const char *str )
{
return 0;
}
#undef putchar #undef putchar
int putchar( int c ) int putchar(int c) { return 0; }
{
return 0;
}
#endif #endif

File diff suppressed because it is too large Load Diff

View File

@@ -1,4 +1,5 @@
/* ___INGO___ */ /* ___INGO___ */
#include <arm/NXP/LPC17xx/LPC17xx.h> #include <arm/NXP/LPC17xx/LPC17xx.h>
#include "bits.h" #include "bits.h"
#include "config.h" #include "config.h"
@@ -17,42 +18,39 @@ extern volatile int sd_changed;
volatile tick_t ticks; volatile tick_t ticks;
volatile int wokefromrit; volatile int wokefromrit;
void timer_init( void ) void timer_init(void) {
{
/* turn on power to RIT */ /* turn on power to RIT */
BITBANG( LPC_SC->PCONP, PCRIT ) = 1; BITBAND(LPC_SC->PCONP, PCRIT) = 1;
/* clear RIT mask */ /* clear RIT mask */
LPC_RIT->RIMASK = 0; /*xffffffff;*/ LPC_RIT->RIMASK = 0; /*xffffffff;*/
/* PCLK = CCLK */ /* PCLK = CCLK */
BITBANG( LPC_SC->PCLKSEL1, 26 ) = 1; BITBAND(LPC_SC->PCLKSEL1, 26) = 1;
BITBANG( LPC_SC->PCLKSEL1, PCLK_TIMER3 ) = 1; BITBAND(LPC_SC->PCLKSEL1, PCLK_TIMER3) = 1;
} }
void delay_us( unsigned int time ) void delay_us(unsigned int time) {
{
/* Prepare RIT */ /* Prepare RIT */
LPC_RIT->RICOUNTER = 0; LPC_RIT->RICOUNTER = 0;
LPC_RIT->RICOMPVAL = ( CONFIG_CPU_FREQUENCY / 1000000 ) * time; LPC_RIT->RICOMPVAL = (CONFIG_CPU_FREQUENCY / 1000000) * time;
LPC_RIT->RICTRL = BV( RITEN ) | BV( RITINT ); LPC_RIT->RICTRL = BV(RITEN) | BV(RITINT);
/* Wait until RIT signals an interrupt */ /* Wait until RIT signals an interrupt */
while ( !( BITBANG( LPC_RIT->RICTRL, RITINT ) ) ) ; while (!(BITBAND(LPC_RIT->RICTRL, RITINT))) ;
/* Disable RIT */ /* Disable RIT */
LPC_RIT->RICTRL = 0; LPC_RIT->RICTRL = 0;
} }
void delay_ms( unsigned int time ) void delay_ms(unsigned int time) {
{
/* Prepare RIT */ /* Prepare RIT */
LPC_RIT->RICOUNTER = 0; LPC_RIT->RICOUNTER = 0;
LPC_RIT->RICOMPVAL = ( CONFIG_CPU_FREQUENCY / 1000 ) * time; LPC_RIT->RICOMPVAL = (CONFIG_CPU_FREQUENCY / 1000) * time;
LPC_RIT->RICTRL = BV( RITEN ) | BV( RITINT ); LPC_RIT->RICTRL = BV(RITEN) | BV(RITINT);
/* Wait until RIT signals an interrupt */ /* Wait until RIT signals an interrupt */
while ( !( BITBANG( LPC_RIT->RICTRL, RITINT ) ) ) ; while (!(BITBAND(LPC_RIT->RICTRL, RITINT))) ;
/* Disable RIT */ /* Disable RIT */
LPC_RIT->RICTRL = 0; LPC_RIT->RICTRL = 0;

View File

@@ -13,8 +13,7 @@ extern volatile tick_t ticks;
* *
* This inline function returns the current system tick count. * This inline function returns the current system tick count.
*/ */
static inline tick_t getticks( void ) static inline tick_t getticks(void) {
{
return ticks; return ticks;
} }
@@ -40,13 +39,13 @@ static inline tick_t getticks( void )
#define time_before(a,b) time_after(b,a) #define time_before(a,b) time_after(b,a)
void timer_init( void ); void timer_init(void);
/* delay for "time" microseconds - uses the RIT */ /* delay for "time" microseconds - uses the RIT */
void delay_us( unsigned int time ); void delay_us(unsigned int time);
/* delay for "time" milliseconds - uses the RIT */ /* delay for "time" milliseconds - uses the RIT */
void delay_ms( unsigned int time ); void delay_ms(unsigned int time);
void sleep_ms( unsigned int time ); void sleep_ms(unsigned int time);
#endif #endif

View File

@@ -75,179 +75,128 @@
} }
*/ */
//static char txbuf[1 << CONFIG_UART_TX_BUF_SHIFT]; //static char txbuf[1 << CONFIG_UART_TX_BUF_SHIFT];
static volatile unsigned int read_idx, write_idx; static volatile unsigned int read_idx,write_idx;
void uart_putc( char c )
{
if ( c == '\n' )
{
uart_putc( '\r' );
}
while ( !( UART_REGS->LSR & ( 0x20 ) ) );
void uart_putc(char c) {
if (c == '\n')
uart_putc('\r');
while(!(UART_REGS->LSR & (0x20)));
UART_REGS->THR = c; UART_REGS->THR = c;
} }
/* Polling version only */ /* Polling version only */
unsigned char uart_getc( void ) unsigned char uart_getc(void) {
{
/* wait for character */ /* wait for character */
while ( !( BITBANG( UART_REGS->LSR, 0 ) ) ) ; while (!(BITBAND(UART_REGS->LSR, 0))) ;
return UART_REGS->RBR; return UART_REGS->RBR;
} }
/* Returns true if a char is ready */ /* Returns true if a char is ready */
unsigned char uart_gotc( void ) unsigned char uart_gotc(void) {
{ return BITBAND(UART_REGS->LSR, 0);
return BITBANG( UART_REGS->LSR, 0 );
} }
void uart_init( void ) void uart_init(void) {
{
uint32_t div; uint32_t div;
/* Turn on power to UART */ /* Turn on power to UART */
BITBANG( LPC_SC->PCONP, UART_PCONBIT ) = 1; BITBAND(LPC_SC->PCONP, UART_PCONBIT) = 1;
/* UART clock = CPU clock - this block is reduced at compile-time */ /* UART clock = CPU clock - this block is reduced at compile-time */
if ( CONFIG_UART_PCLKDIV == 1 ) if (CONFIG_UART_PCLKDIV == 1) {
{ BITBAND(LPC_SC->UART_PCLKREG, UART_PCLKBIT ) = 1;
BITBANG( LPC_SC->UART_PCLKREG, UART_PCLKBIT ) = 1; BITBAND(LPC_SC->UART_PCLKREG, UART_PCLKBIT+1) = 0;
BITBANG( LPC_SC->UART_PCLKREG, UART_PCLKBIT + 1 ) = 0; } else if (CONFIG_UART_PCLKDIV == 2) {
} BITBAND(LPC_SC->UART_PCLKREG, UART_PCLKBIT ) = 0;
else if ( CONFIG_UART_PCLKDIV == 2 ) BITBAND(LPC_SC->UART_PCLKREG, UART_PCLKBIT+1) = 1;
{ } else if (CONFIG_UART_PCLKDIV == 4) {
BITBANG( LPC_SC->UART_PCLKREG, UART_PCLKBIT ) = 0; BITBAND(LPC_SC->UART_PCLKREG, UART_PCLKBIT ) = 0;
BITBANG( LPC_SC->UART_PCLKREG, UART_PCLKBIT + 1 ) = 1; BITBAND(LPC_SC->UART_PCLKREG, UART_PCLKBIT+1) = 0;
} } else { // Fallback: Divide by 8
else if ( CONFIG_UART_PCLKDIV == 4 ) BITBAND(LPC_SC->UART_PCLKREG, UART_PCLKBIT ) = 1;
{ BITBAND(LPC_SC->UART_PCLKREG, UART_PCLKBIT+1) = 1;
BITBANG( LPC_SC->UART_PCLKREG, UART_PCLKBIT ) = 0;
BITBANG( LPC_SC->UART_PCLKREG, UART_PCLKBIT + 1 ) = 0;
}
else // Fallback: Divide by 8
{
BITBANG( LPC_SC->UART_PCLKREG, UART_PCLKBIT ) = 1;
BITBANG( LPC_SC->UART_PCLKREG, UART_PCLKBIT + 1 ) = 1;
} }
/* set baud rate - no fractional stuff for now */ /* set baud rate - no fractional stuff for now */
UART_REGS->LCR = BV( 7 ) | 3; // always 8n1 UART_REGS->LCR = BV(7) | 3; // always 8n1
div = 0xF80022; //0x850004; // baud2divisor(CONFIG_UART_BAUDRATE); div = 0xF80022; //0x850004; // baud2divisor(CONFIG_UART_BAUDRATE);
UART_REGS->DLL = div & 0xff; UART_REGS->DLL = div & 0xff;
UART_REGS->DLM = ( div >> 8 ) & 0xff; UART_REGS->DLM = (div >> 8) & 0xff;
BITBANG( UART_REGS->LCR, 7 ) = 0; BITBAND(UART_REGS->LCR, 7) = 0;
if ( div & 0xff0000 ) if (div & 0xff0000) {
{ UART_REGS->FDR = (div >> 16) & 0xff;
UART_REGS->FDR = ( div >> 16 ) & 0xff;
} }
/* reset and enable FIFO */ /* reset and enable FIFO */
UART_REGS->FCR = BV( 0 ); UART_REGS->FCR = BV(0);
UART_REGS->THR = '?'; UART_REGS->THR = '?';
} }
/* --- generic code below --- */ /* --- generic code below --- */
void uart_puthex( uint8_t num ) void uart_puthex(uint8_t num) {
{
uint8_t tmp; uint8_t tmp;
tmp = ( num & 0xf0 ) >> 4; tmp = (num & 0xf0) >> 4;
if (tmp < 10)
if ( tmp < 10 ) uart_putc('0'+tmp);
{
uart_putc( '0' + tmp );
}
else else
{ uart_putc('a'+tmp-10);
uart_putc( 'a' + tmp - 10 );
}
tmp = num & 0x0f; tmp = num & 0x0f;
if (tmp < 10)
if ( tmp < 10 ) uart_putc('0'+tmp);
{
uart_putc( '0' + tmp );
}
else else
{ uart_putc('a'+tmp-10);
uart_putc( 'a' + tmp - 10 );
}
} }
void uart_trace( void *ptr, uint16_t start, uint16_t len ) void uart_trace(void *ptr, uint16_t start, uint16_t len) {
{
uint16_t i; uint16_t i;
uint8_t j; uint8_t j;
uint8_t ch; uint8_t ch;
uint8_t *data = ptr; uint8_t *data = ptr;
data += start; data+=start;
for(i=0;i<len;i+=16) {
for ( i = 0; i < len; i += 16 ) uart_puthex(start>>8);
{ uart_puthex(start&0xff);
uart_putc('|');
uart_puthex( start >> 8 ); uart_putc(' ');
uart_puthex( start & 0xff ); for(j=0;j<16;j++) {
uart_putc( '|' ); if(i+j<len) {
uart_putc( ' ' ); ch=*(data + j);
uart_puthex(ch);
for ( j = 0; j < 16; j++ ) } else {
{ uart_putc(' ');
if ( i + j < len ) uart_putc(' ');
{
ch = *( data + j );
uart_puthex( ch );
} }
else uart_putc(' ');
{
uart_putc( ' ' );
uart_putc( ' ' );
} }
uart_putc('|');
uart_putc( ' ' ); for(j=0;j<16;j++) {
} if(i+j<len) {
ch=*(data++);
uart_putc( '|' ); if(ch<32 || ch>0x7e)
ch='.';
for ( j = 0; j < 16; j++ ) uart_putc(ch);
{ } else {
if ( i + j < len ) uart_putc(' ');
{
ch = *( data++ );
if ( ch < 32 || ch > 0x7e )
{
ch = '.';
}
uart_putc( ch );
}
else
{
uart_putc( ' ' );
} }
} }
uart_putc('|');
uart_putc( '|' );
uart_putcrlf(); uart_putcrlf();
start += 16; start+=16;
} }
} }
void uart_flush( void ) void uart_flush(void) {
{ while (read_idx != write_idx) ;
while ( read_idx != write_idx ) ;
} }
void uart_puts( const char *text ) void uart_puts(const char *text) {
{ while (*text) {
while ( *text ) uart_putc(*text++);
{
uart_putc( *text++ );
} }
} }

View File

@@ -16,21 +16,21 @@
#ifdef __AVR__ #ifdef __AVR__
# include <avr/pgmspace.h> # include <avr/pgmspace.h>
void uart_puts_P( prog_char *text ); void uart_puts_P(prog_char *text);
#else #else
# define uart_puts_P(str) uart_puts(str) # define uart_puts_P(str) uart_puts(str)
#endif #endif
void uart_init( void ); void uart_init(void);
unsigned char uart_getc( void ); unsigned char uart_getc(void);
unsigned char uart_gotc( void ); unsigned char uart_gotc(void);
void uart_putc( char c ); void uart_putc(char c);
void uart_puts( const char *str ); void uart_puts(const char *str);
void uart_puthex( uint8_t num ); void uart_puthex(uint8_t num);
void uart_trace( void *ptr, uint16_t start, uint16_t len ); void uart_trace(void *ptr, uint16_t start, uint16_t len);
void uart_flush( void ); void uart_flush(void);
int printf( const char *fmt, ... ); int printf(const char *fmt, ...);
int snprintf( char *str, size_t size, const char *format, ... ); int snprintf(char *str, size_t size, const char *format, ...);
#define uart_putcrlf() uart_putc('\n') #define uart_putcrlf() uart_putc('\n')
/* A few symbols to make this code work for all four UARTs */ /* A few symbols to make this code work for all four UARTs */

View File

@@ -31,8 +31,7 @@
#if _CODE_PAGE == 437 #if _CODE_PAGE == 437
#define _TBLDEF 1 #define _TBLDEF 1
static static
const WCHAR Tbl[] = /* CP437(0x80-0xFF) to Unicode conversion table */ const WCHAR Tbl[] = { /* CP437(0x80-0xFF) to Unicode conversion table */
{
0x00C7, 0x00FC, 0x00E9, 0x00E2, 0x00E4, 0x00E0, 0x00E5, 0x00E7, 0x00C7, 0x00FC, 0x00E9, 0x00E2, 0x00E4, 0x00E0, 0x00E5, 0x00E7,
0x00EA, 0x00EB, 0x00E8, 0x00EF, 0x00EE, 0x00EC, 0x00C4, 0x00C5, 0x00EA, 0x00EB, 0x00E8, 0x00EF, 0x00EE, 0x00EC, 0x00C4, 0x00C5,
0x00C9, 0x00E6, 0x00C6, 0x00F4, 0x00F6, 0x00F2, 0x00FB, 0x00F9, 0x00C9, 0x00E6, 0x00C6, 0x00F4, 0x00F6, 0x00F2, 0x00FB, 0x00F9,
@@ -54,8 +53,7 @@ const WCHAR Tbl[] = /* CP437(0x80-0xFF) to Unicode conversion table */
#elif _CODE_PAGE == 720 #elif _CODE_PAGE == 720
#define _TBLDEF 1 #define _TBLDEF 1
static static
const WCHAR Tbl[] = /* CP720(0x80-0xFF) to Unicode conversion table */ const WCHAR Tbl[] = { /* CP720(0x80-0xFF) to Unicode conversion table */
{
0x0000, 0x0000, 0x00E9, 0x00E2, 0x0000, 0x00E0, 0x0000, 0x00E7, 0x0000, 0x0000, 0x00E9, 0x00E2, 0x0000, 0x00E0, 0x0000, 0x00E7,
0x00EA, 0x00EB, 0x00E8, 0x00EF, 0x00EE, 0x0000, 0x0000, 0x0000, 0x00EA, 0x00EB, 0x00E8, 0x00EF, 0x00EE, 0x0000, 0x0000, 0x0000,
0x0000, 0x0651, 0x0652, 0x00F4, 0x00A4, 0x0640, 0x00FB, 0x00F9, 0x0000, 0x0651, 0x0652, 0x00F4, 0x00A4, 0x0640, 0x00FB, 0x00F9,
@@ -77,8 +75,7 @@ const WCHAR Tbl[] = /* CP720(0x80-0xFF) to Unicode conversion table */
#elif _CODE_PAGE == 737 #elif _CODE_PAGE == 737
#define _TBLDEF 1 #define _TBLDEF 1
static static
const WCHAR Tbl[] = /* CP737(0x80-0xFF) to Unicode conversion table */ const WCHAR Tbl[] = { /* CP737(0x80-0xFF) to Unicode conversion table */
{
0x0391, 0x0392, 0x0393, 0x0394, 0x0395, 0x0396, 0x0397, 0x0398, 0x0391, 0x0392, 0x0393, 0x0394, 0x0395, 0x0396, 0x0397, 0x0398,
0x0399, 0x039A, 0x039B, 0x039C, 0x039D, 0x039E, 0x039F, 0x03A0, 0x0399, 0x039A, 0x039B, 0x039C, 0x039D, 0x039E, 0x039F, 0x03A0,
0x03A1, 0x03A3, 0x03A4, 0x03A5, 0x03A6, 0x03A7, 0x03A8, 0x03A9, 0x03A1, 0x03A3, 0x03A4, 0x03A5, 0x03A6, 0x03A7, 0x03A8, 0x03A9,
@@ -100,8 +97,7 @@ const WCHAR Tbl[] = /* CP737(0x80-0xFF) to Unicode conversion table */
#elif _CODE_PAGE == 775 #elif _CODE_PAGE == 775
#define _TBLDEF 1 #define _TBLDEF 1
static static
const WCHAR Tbl[] = /* CP775(0x80-0xFF) to Unicode conversion table */ const WCHAR Tbl[] = { /* CP775(0x80-0xFF) to Unicode conversion table */
{
0x0106, 0x00FC, 0x00E9, 0x0101, 0x00E4, 0x0123, 0x00E5, 0x0107, 0x0106, 0x00FC, 0x00E9, 0x0101, 0x00E4, 0x0123, 0x00E5, 0x0107,
0x0142, 0x0113, 0x0156, 0x0157, 0x012B, 0x0179, 0x00C4, 0x00C5, 0x0142, 0x0113, 0x0156, 0x0157, 0x012B, 0x0179, 0x00C4, 0x00C5,
0x00C9, 0x00E6, 0x00C6, 0x014D, 0x00F6, 0x0122, 0x00A2, 0x015A, 0x00C9, 0x00E6, 0x00C6, 0x014D, 0x00F6, 0x0122, 0x00A2, 0x015A,
@@ -123,8 +119,7 @@ const WCHAR Tbl[] = /* CP775(0x80-0xFF) to Unicode conversion table */
#elif _CODE_PAGE == 850 #elif _CODE_PAGE == 850
#define _TBLDEF 1 #define _TBLDEF 1
static static
const WCHAR Tbl[] = /* CP850(0x80-0xFF) to Unicode conversion table */ const WCHAR Tbl[] = { /* CP850(0x80-0xFF) to Unicode conversion table */
{
0x00C7, 0x00FC, 0x00E9, 0x00E2, 0x00E4, 0x00E0, 0x00E5, 0x00E7, 0x00C7, 0x00FC, 0x00E9, 0x00E2, 0x00E4, 0x00E0, 0x00E5, 0x00E7,
0x00EA, 0x00EB, 0x00E8, 0x00EF, 0x00EE, 0x00EC, 0x00C4, 0x00C5, 0x00EA, 0x00EB, 0x00E8, 0x00EF, 0x00EE, 0x00EC, 0x00C4, 0x00C5,
0x00C9, 0x00E6, 0x00C6, 0x00F4, 0x00F6, 0x00F2, 0x00FB, 0x00F9, 0x00C9, 0x00E6, 0x00C6, 0x00F4, 0x00F6, 0x00F2, 0x00FB, 0x00F9,
@@ -146,8 +141,7 @@ const WCHAR Tbl[] = /* CP850(0x80-0xFF) to Unicode conversion table */
#elif _CODE_PAGE == 852 #elif _CODE_PAGE == 852
#define _TBLDEF 1 #define _TBLDEF 1
static static
const WCHAR Tbl[] = /* CP852(0x80-0xFF) to Unicode conversion table */ const WCHAR Tbl[] = { /* CP852(0x80-0xFF) to Unicode conversion table */
{
0x00C7, 0x00FC, 0x00E9, 0x00E2, 0x00E4, 0x016F, 0x0107, 0x00E7, 0x00C7, 0x00FC, 0x00E9, 0x00E2, 0x00E4, 0x016F, 0x0107, 0x00E7,
0x0142, 0x00EB, 0x0150, 0x0151, 0x00EE, 0x0179, 0x00C4, 0x0106, 0x0142, 0x00EB, 0x0150, 0x0151, 0x00EE, 0x0179, 0x00C4, 0x0106,
0x00C9, 0x0139, 0x013A, 0x00F4, 0x00F6, 0x013D, 0x013E, 0x015A, 0x00C9, 0x0139, 0x013A, 0x00F4, 0x00F6, 0x013D, 0x013E, 0x015A,
@@ -169,8 +163,7 @@ const WCHAR Tbl[] = /* CP852(0x80-0xFF) to Unicode conversion table */
#elif _CODE_PAGE == 855 #elif _CODE_PAGE == 855
#define _TBLDEF 1 #define _TBLDEF 1
static static
const WCHAR Tbl[] = /* CP855(0x80-0xFF) to Unicode conversion table */ const WCHAR Tbl[] = { /* CP855(0x80-0xFF) to Unicode conversion table */
{
0x0452, 0x0402, 0x0453, 0x0403, 0x0451, 0x0401, 0x0454, 0x0404, 0x0452, 0x0402, 0x0453, 0x0403, 0x0451, 0x0401, 0x0454, 0x0404,
0x0455, 0x0405, 0x0456, 0x0406, 0x0457, 0x0407, 0x0458, 0x0408, 0x0455, 0x0405, 0x0456, 0x0406, 0x0457, 0x0407, 0x0458, 0x0408,
0x0459, 0x0409, 0x045A, 0x040A, 0x045B, 0x040B, 0x045C, 0x040C, 0x0459, 0x0409, 0x045A, 0x040A, 0x045B, 0x040B, 0x045C, 0x040C,
@@ -192,8 +185,7 @@ const WCHAR Tbl[] = /* CP855(0x80-0xFF) to Unicode conversion table */
#elif _CODE_PAGE == 857 #elif _CODE_PAGE == 857
#define _TBLDEF 1 #define _TBLDEF 1
static static
const WCHAR Tbl[] = /* CP857(0x80-0xFF) to Unicode conversion table */ const WCHAR Tbl[] = { /* CP857(0x80-0xFF) to Unicode conversion table */
{
0x00C7, 0x00FC, 0x00E9, 0x00E2, 0x00E4, 0x00E0, 0x00E5, 0x00E7, 0x00C7, 0x00FC, 0x00E9, 0x00E2, 0x00E4, 0x00E0, 0x00E5, 0x00E7,
0x00EA, 0x00EB, 0x00E8, 0x00EF, 0x00EE, 0x0131, 0x00C4, 0x00C5, 0x00EA, 0x00EB, 0x00E8, 0x00EF, 0x00EE, 0x0131, 0x00C4, 0x00C5,
0x00C9, 0x00E6, 0x00C6, 0x00F4, 0x00F6, 0x00F2, 0x00FB, 0x00F9, 0x00C9, 0x00E6, 0x00C6, 0x00F4, 0x00F6, 0x00F2, 0x00FB, 0x00F9,
@@ -215,8 +207,7 @@ const WCHAR Tbl[] = /* CP857(0x80-0xFF) to Unicode conversion table */
#elif _CODE_PAGE == 858 #elif _CODE_PAGE == 858
#define _TBLDEF 1 #define _TBLDEF 1
static static
const WCHAR Tbl[] = /* CP858(0x80-0xFF) to Unicode conversion table */ const WCHAR Tbl[] = { /* CP858(0x80-0xFF) to Unicode conversion table */
{
0x00C7, 0x00FC, 0x00E9, 0x00E2, 0x00E4, 0x00E0, 0x00E5, 0x00E7, 0x00C7, 0x00FC, 0x00E9, 0x00E2, 0x00E4, 0x00E0, 0x00E5, 0x00E7,
0x00EA, 0x00EB, 0x00E8, 0x00EF, 0x00EE, 0x00EC, 0x00C4, 0x00C5, 0x00EA, 0x00EB, 0x00E8, 0x00EF, 0x00EE, 0x00EC, 0x00C4, 0x00C5,
0x00C9, 0x00E6, 0x00C6, 0x00F4, 0x00F6, 0x00F2, 0x00FB, 0x00F9, 0x00C9, 0x00E6, 0x00C6, 0x00F4, 0x00F6, 0x00F2, 0x00FB, 0x00F9,
@@ -238,8 +229,7 @@ const WCHAR Tbl[] = /* CP858(0x80-0xFF) to Unicode conversion table */
#elif _CODE_PAGE == 862 #elif _CODE_PAGE == 862
#define _TBLDEF 1 #define _TBLDEF 1
static static
const WCHAR Tbl[] = /* CP862(0x80-0xFF) to Unicode conversion table */ const WCHAR Tbl[] = { /* CP862(0x80-0xFF) to Unicode conversion table */
{
0x05D0, 0x05D1, 0x05D2, 0x05D3, 0x05D4, 0x05D5, 0x05D6, 0x05D7, 0x05D0, 0x05D1, 0x05D2, 0x05D3, 0x05D4, 0x05D5, 0x05D6, 0x05D7,
0x05D8, 0x05D9, 0x05DA, 0x05DB, 0x05DC, 0x05DD, 0x05DE, 0x05DF, 0x05D8, 0x05D9, 0x05DA, 0x05DB, 0x05DC, 0x05DD, 0x05DE, 0x05DF,
0x05E0, 0x05E1, 0x05E2, 0x05E3, 0x05E4, 0x05E5, 0x05E6, 0x05E7, 0x05E0, 0x05E1, 0x05E2, 0x05E3, 0x05E4, 0x05E5, 0x05E6, 0x05E7,
@@ -261,8 +251,7 @@ const WCHAR Tbl[] = /* CP862(0x80-0xFF) to Unicode conversion table */
#elif _CODE_PAGE == 866 #elif _CODE_PAGE == 866
#define _TBLDEF 1 #define _TBLDEF 1
static static
const WCHAR Tbl[] = /* CP866(0x80-0xFF) to Unicode conversion table */ const WCHAR Tbl[] = { /* CP866(0x80-0xFF) to Unicode conversion table */
{
0x0410, 0x0411, 0x0412, 0x0413, 0x0414, 0x0415, 0x0416, 0x0417, 0x0410, 0x0411, 0x0412, 0x0413, 0x0414, 0x0415, 0x0416, 0x0417,
0x0418, 0x0419, 0x041A, 0x041B, 0x041C, 0x041D, 0x041E, 0x041F, 0x0418, 0x0419, 0x041A, 0x041B, 0x041C, 0x041D, 0x041E, 0x041F,
0x0420, 0x0421, 0x0422, 0x0423, 0x0424, 0x0425, 0x0426, 0x0427, 0x0420, 0x0421, 0x0422, 0x0423, 0x0424, 0x0425, 0x0426, 0x0427,
@@ -284,8 +273,7 @@ const WCHAR Tbl[] = /* CP866(0x80-0xFF) to Unicode conversion table */
#elif _CODE_PAGE == 874 #elif _CODE_PAGE == 874
#define _TBLDEF 1 #define _TBLDEF 1
static static
const WCHAR Tbl[] = /* CP874(0x80-0xFF) to Unicode conversion table */ const WCHAR Tbl[] = { /* CP874(0x80-0xFF) to Unicode conversion table */
{
0x20AC, 0x0000, 0x0000, 0x0000, 0x0000, 0x2026, 0x0000, 0x0000, 0x20AC, 0x0000, 0x0000, 0x0000, 0x0000, 0x2026, 0x0000, 0x0000,
0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
0x0000, 0x2018, 0x2019, 0x201C, 0x201D, 0x2022, 0x2013, 0x2014, 0x0000, 0x2018, 0x2019, 0x201C, 0x201D, 0x2022, 0x2013, 0x2014,
@@ -307,8 +295,7 @@ const WCHAR Tbl[] = /* CP874(0x80-0xFF) to Unicode conversion table */
#elif _CODE_PAGE == 1250 #elif _CODE_PAGE == 1250
#define _TBLDEF 1 #define _TBLDEF 1
static static
const WCHAR Tbl[] = /* CP1250(0x80-0xFF) to Unicode conversion table */ const WCHAR Tbl[] = { /* CP1250(0x80-0xFF) to Unicode conversion table */
{
0x20AC, 0x0000, 0x201A, 0x0000, 0x201E, 0x2026, 0x2020, 0x2021, 0x20AC, 0x0000, 0x201A, 0x0000, 0x201E, 0x2026, 0x2020, 0x2021,
0x0000, 0x2030, 0x0160, 0x2039, 0x015A, 0x0164, 0x017D, 0x0179, 0x0000, 0x2030, 0x0160, 0x2039, 0x015A, 0x0164, 0x017D, 0x0179,
0x0000, 0x2018, 0x2019, 0x201C, 0x201D, 0x2022, 0x2013, 0x2014, 0x0000, 0x2018, 0x2019, 0x201C, 0x201D, 0x2022, 0x2013, 0x2014,
@@ -330,8 +317,7 @@ const WCHAR Tbl[] = /* CP1250(0x80-0xFF) to Unicode conversion table */
#elif _CODE_PAGE == 1251 #elif _CODE_PAGE == 1251
#define _TBLDEF 1 #define _TBLDEF 1
static static
const WCHAR Tbl[] = /* CP1251(0x80-0xFF) to Unicode conversion table */ const WCHAR Tbl[] = { /* CP1251(0x80-0xFF) to Unicode conversion table */
{
0x0402, 0x0403, 0x201A, 0x0453, 0x201E, 0x2026, 0x2020, 0x2021, 0x0402, 0x0403, 0x201A, 0x0453, 0x201E, 0x2026, 0x2020, 0x2021,
0x20AC, 0x2030, 0x0409, 0x2039, 0x040A, 0x040C, 0x040B, 0x040F, 0x20AC, 0x2030, 0x0409, 0x2039, 0x040A, 0x040C, 0x040B, 0x040F,
0x0452, 0x2018, 0x2019, 0x201C, 0x201D, 0x2022, 0x2013, 0x2014, 0x0452, 0x2018, 0x2019, 0x201C, 0x201D, 0x2022, 0x2013, 0x2014,
@@ -353,8 +339,7 @@ const WCHAR Tbl[] = /* CP1251(0x80-0xFF) to Unicode conversion table */
#elif _CODE_PAGE == 1252 #elif _CODE_PAGE == 1252
#define _TBLDEF 1 #define _TBLDEF 1
static static
const WCHAR Tbl[] = /* CP1252(0x80-0xFF) to Unicode conversion table */ const WCHAR Tbl[] = { /* CP1252(0x80-0xFF) to Unicode conversion table */
{
0x20AC, 0x0000, 0x201A, 0x0192, 0x201E, 0x2026, 0x2020, 0x2021, 0x20AC, 0x0000, 0x201A, 0x0192, 0x201E, 0x2026, 0x2020, 0x2021,
0x02C6, 0x2030, 0x0160, 0x2039, 0x0152, 0x0000, 0x017D, 0x0000, 0x02C6, 0x2030, 0x0160, 0x2039, 0x0152, 0x0000, 0x017D, 0x0000,
0x0000, 0x2018, 0x2019, 0x201C, 0x201D, 0x2022, 0x2013, 0x2014, 0x0000, 0x2018, 0x2019, 0x201C, 0x201D, 0x2022, 0x2013, 0x2014,
@@ -376,8 +361,7 @@ const WCHAR Tbl[] = /* CP1252(0x80-0xFF) to Unicode conversion table */
#elif _CODE_PAGE == 1253 #elif _CODE_PAGE == 1253
#define _TBLDEF 1 #define _TBLDEF 1
static static
const WCHAR Tbl[] = /* CP1253(0x80-0xFF) to Unicode conversion table */ const WCHAR Tbl[] = { /* CP1253(0x80-0xFF) to Unicode conversion table */
{
0x20AC, 0x0000, 0x201A, 0x0192, 0x201E, 0x2026, 0x2020, 0x2021, 0x20AC, 0x0000, 0x201A, 0x0192, 0x201E, 0x2026, 0x2020, 0x2021,
0x0000, 0x2030, 0x0000, 0x2039, 0x000C, 0x0000, 0x0000, 0x0000, 0x0000, 0x2030, 0x0000, 0x2039, 0x000C, 0x0000, 0x0000, 0x0000,
0x0000, 0x2018, 0x2019, 0x201C, 0x201D, 0x2022, 0x2013, 0x2014, 0x0000, 0x2018, 0x2019, 0x201C, 0x201D, 0x2022, 0x2013, 0x2014,
@@ -399,8 +383,7 @@ const WCHAR Tbl[] = /* CP1253(0x80-0xFF) to Unicode conversion table */
#elif _CODE_PAGE == 1254 #elif _CODE_PAGE == 1254
#define _TBLDEF 1 #define _TBLDEF 1
static static
const WCHAR Tbl[] = /* CP1254(0x80-0xFF) to Unicode conversion table */ const WCHAR Tbl[] = { /* CP1254(0x80-0xFF) to Unicode conversion table */
{
0x20AC, 0x0000, 0x210A, 0x0192, 0x201E, 0x2026, 0x2020, 0x2021, 0x20AC, 0x0000, 0x210A, 0x0192, 0x201E, 0x2026, 0x2020, 0x2021,
0x02C6, 0x2030, 0x0160, 0x2039, 0x0152, 0x0000, 0x0000, 0x0000, 0x02C6, 0x2030, 0x0160, 0x2039, 0x0152, 0x0000, 0x0000, 0x0000,
0x0000, 0x2018, 0x2019, 0x201C, 0x201D, 0x2022, 0x2013, 0x2014, 0x0000, 0x2018, 0x2019, 0x201C, 0x201D, 0x2022, 0x2013, 0x2014,
@@ -422,8 +405,7 @@ const WCHAR Tbl[] = /* CP1254(0x80-0xFF) to Unicode conversion table */
#elif _CODE_PAGE == 1255 #elif _CODE_PAGE == 1255
#define _TBLDEF 1 #define _TBLDEF 1
static static
const WCHAR Tbl[] = /* CP1255(0x80-0xFF) to Unicode conversion table */ const WCHAR Tbl[] = { /* CP1255(0x80-0xFF) to Unicode conversion table */
{
0x20AC, 0x0000, 0x201A, 0x0192, 0x201E, 0x2026, 0x2020, 0x2021, 0x20AC, 0x0000, 0x201A, 0x0192, 0x201E, 0x2026, 0x2020, 0x2021,
0x02C6, 0x2030, 0x0000, 0x2039, 0x0000, 0x0000, 0x0000, 0x0000, 0x02C6, 0x2030, 0x0000, 0x2039, 0x0000, 0x0000, 0x0000, 0x0000,
0x0000, 0x2018, 0x2019, 0x201C, 0x201D, 0x2022, 0x2013, 0x2014, 0x0000, 0x2018, 0x2019, 0x201C, 0x201D, 0x2022, 0x2013, 0x2014,
@@ -445,8 +427,7 @@ const WCHAR Tbl[] = /* CP1255(0x80-0xFF) to Unicode conversion table */
#elif _CODE_PAGE == 1256 #elif _CODE_PAGE == 1256
#define _TBLDEF 1 #define _TBLDEF 1
static static
const WCHAR Tbl[] = /* CP1256(0x80-0xFF) to Unicode conversion table */ const WCHAR Tbl[] = { /* CP1256(0x80-0xFF) to Unicode conversion table */
{
0x20AC, 0x067E, 0x201A, 0x0192, 0x201E, 0x2026, 0x2020, 0x2021, 0x20AC, 0x067E, 0x201A, 0x0192, 0x201E, 0x2026, 0x2020, 0x2021,
0x02C6, 0x2030, 0x0679, 0x2039, 0x0152, 0x0686, 0x0698, 0x0688, 0x02C6, 0x2030, 0x0679, 0x2039, 0x0152, 0x0686, 0x0698, 0x0688,
0x06AF, 0x2018, 0x2019, 0x201C, 0x201D, 0x2022, 0x2013, 0x2014, 0x06AF, 0x2018, 0x2019, 0x201C, 0x201D, 0x2022, 0x2013, 0x2014,
@@ -468,8 +449,7 @@ const WCHAR Tbl[] = /* CP1256(0x80-0xFF) to Unicode conversion table */
#elif _CODE_PAGE == 1257 #elif _CODE_PAGE == 1257
#define _TBLDEF 1 #define _TBLDEF 1
static static
const WCHAR Tbl[] = /* CP1257(0x80-0xFF) to Unicode conversion table */ const WCHAR Tbl[] = { /* CP1257(0x80-0xFF) to Unicode conversion table */
{
0x20AC, 0x0000, 0x201A, 0x0000, 0x201E, 0x2026, 0x2020, 0x2021, 0x20AC, 0x0000, 0x201A, 0x0000, 0x201E, 0x2026, 0x2020, 0x2021,
0x0000, 0x2030, 0x0000, 0x2039, 0x0000, 0x00A8, 0x02C7, 0x00B8, 0x0000, 0x2030, 0x0000, 0x2039, 0x0000, 0x00A8, 0x02C7, 0x00B8,
0x0000, 0x2018, 0x2019, 0x201C, 0x201D, 0x2022, 0x2013, 0x2014, 0x0000, 0x2018, 0x2019, 0x201C, 0x201D, 0x2022, 0x2013, 0x2014,
@@ -491,8 +471,7 @@ const WCHAR Tbl[] = /* CP1257(0x80-0xFF) to Unicode conversion table */
#elif _CODE_PAGE == 1258 #elif _CODE_PAGE == 1258
#define _TBLDEF 1 #define _TBLDEF 1
static static
const WCHAR Tbl[] = /* CP1258(0x80-0xFF) to Unicode conversion table */ const WCHAR Tbl[] = { /* CP1258(0x80-0xFF) to Unicode conversion table */
{
0x20AC, 0x0000, 0x201A, 0x0192, 0x201E, 0x2026, 0x2020, 0x2021, 0x20AC, 0x0000, 0x201A, 0x0192, 0x201E, 0x2026, 0x2020, 0x2021,
0x02C6, 0x2030, 0x0000, 0x2039, 0x0152, 0x0000, 0x0000, 0x0000, 0x02C6, 0x2030, 0x0000, 0x2039, 0x0152, 0x0000, 0x0000, 0x0000,
0x0000, 0x2018, 0x2019, 0x201C, 0x201D, 0x2022, 0x2013, 0x2014, 0x0000, 0x2018, 0x2019, 0x201C, 0x201D, 0x2022, 0x2013, 0x2014,
@@ -527,29 +506,18 @@ WCHAR ff_convert ( /* Converted character, Returns zero on error */
WCHAR c; WCHAR c;
if ( src < 0x80 ) /* ASCII */ if (src < 0x80) { /* ASCII */
{
c = src; c = src;
} } else {
else if (dir) { /* OEMCP to Unicode */
{ c = (src >= 0x100) ? 0 : Tbl[src - 0x80];
if ( dir ) /* OEMCP to Unicode */
{
c = ( src >= 0x100 ) ? 0 : Tbl[src - 0x80];
} else { /* Unicode to OEMCP */
for (c = 0; c < 0x80; c++) {
if (src == Tbl[c]) break;
} }
else /* Unicode to OEMCP */ c = (c + 0x80) & 0xFF;
{
for ( c = 0; c < 0x80; c++ )
{
if ( src == Tbl[c] )
{
break;
}
}
c = ( c + 0x80 ) & 0xFF;
} }
} }
@@ -566,7 +534,7 @@ WCHAR ff_wtoupper ( /* Upper converted character */
int i; int i;
for ( i = 0; tbl_lower[i] && chr != tbl_lower[i]; i++ ) ; for (i = 0; tbl_lower[i] && chr != tbl_lower[i]; i++) ;
return tbl_lower[i] ? tbl_upper[i] : chr; return tbl_lower[i] ? tbl_upper[i] : chr;
} }

View File

@@ -3,8 +3,7 @@
#include "uart.h" #include "uart.h"
#include "fileops.h" #include "fileops.h"
cfg_t CFG = cfg_t CFG = {
{
.cfg_ver_maj = 1, .cfg_ver_maj = 1,
.cfg_ver_min = 0, .cfg_ver_min = 0,
.last_game_valid = 0, .last_game_valid = 0,
@@ -15,58 +14,46 @@ cfg_t CFG =
.bsx_time = 0x0619970301180530LL .bsx_time = 0x0619970301180530LL
}; };
int cfg_save() int cfg_save() {
{
int err = 0; int err = 0;
file_open( CFG_FILE, FA_CREATE_ALWAYS | FA_WRITE ); file_open(CFG_FILE, FA_CREATE_ALWAYS | FA_WRITE);
if(file_writeblock(&CFG, 0, sizeof(CFG)) < sizeof(CFG)) {
if ( file_writeblock( &CFG, 0, sizeof( CFG ) ) < sizeof( CFG ) )
{
err = file_res; err = file_res;
} }
file_close(); file_close();
return err; return err;
} }
int cfg_load() int cfg_load() {
{
int err = 0; int err = 0;
file_open( CFG_FILE, FA_READ ); file_open(CFG_FILE, FA_READ);
if(file_readblock(&CFG, 0, sizeof(CFG)) < sizeof(CFG)) {
if ( file_readblock( &CFG, 0, sizeof( CFG ) ) < sizeof( CFG ) )
{
err = file_res; err = file_res;
} }
file_close(); file_close();
return err; return err;
} }
int cfg_save_last_game( uint8_t *fn ) int cfg_save_last_game(uint8_t *fn) {
{
int err = 0; int err = 0;
file_open( LAST_FILE, FA_CREATE_ALWAYS | FA_WRITE ); file_open(LAST_FILE, FA_CREATE_ALWAYS | FA_WRITE);
err = f_puts( ( const TCHAR * )fn, &file_handle ); err = f_puts((const TCHAR*)fn, &file_handle);
file_close(); file_close();
return err; return err;
} }
int cfg_get_last_game( uint8_t *fn ) int cfg_get_last_game(uint8_t *fn) {
{
int err = 0; int err = 0;
file_open( LAST_FILE, FA_READ ); file_open(LAST_FILE, FA_READ);
f_gets( ( TCHAR * )fn, 255, &file_handle ); f_gets((TCHAR*)fn, 255, &file_handle);
file_close(); file_close();
return err; return err;
} }
void cfg_set_last_game_valid( uint8_t valid ) void cfg_set_last_game_valid(uint8_t valid) {
{
CFG.last_game_valid = valid; CFG.last_game_valid = valid;
} }
uint8_t cfg_is_last_game_valid() uint8_t cfg_is_last_game_valid() {
{
return CFG.last_game_valid; return CFG.last_game_valid;
} }

View File

@@ -6,15 +6,13 @@
#define CFG_FILE ((const uint8_t*)"/sd2snes/sd2snes.cfg") #define CFG_FILE ((const uint8_t*)"/sd2snes/sd2snes.cfg")
#define LAST_FILE ((const uint8_t*)"/sd2snes/lastgame.cfg") #define LAST_FILE ((const uint8_t*)"/sd2snes/lastgame.cfg")
typedef enum typedef enum {
{
VIDMODE_AUTO = 0, VIDMODE_AUTO = 0,
VIDMODE_60, VIDMODE_60,
VIDMODE_50 VIDMODE_50
} cfg_vidmode_t; } cfg_vidmode_t;
typedef struct _cfg_block typedef struct _cfg_block {
{
uint8_t cfg_ver_maj; uint8_t cfg_ver_maj;
uint8_t cfg_ver_min; uint8_t cfg_ver_min;
uint8_t last_game_valid; uint8_t last_game_valid;
@@ -25,17 +23,17 @@ typedef struct _cfg_block
uint64_t bsx_time; uint64_t bsx_time;
} cfg_t; } cfg_t;
int cfg_save( void ); int cfg_save(void);
int cfg_load( void ); int cfg_load(void);
int cfg_save_last_game( uint8_t *fn ); int cfg_save_last_game(uint8_t *fn);
int cfg_get_last_game( uint8_t *fn ); int cfg_get_last_game(uint8_t *fn);
cfg_vidmode_t cfg_get_vidmode_menu( void ); cfg_vidmode_t cfg_get_vidmode_menu(void);
cfg_vidmode_t cfg_get_vidmode_game( void ); cfg_vidmode_t cfg_get_vidmode_game(void);
void cfg_set_last_game_valid( uint8_t ); void cfg_set_last_game_valid(uint8_t);
uint8_t cfg_is_last_game_valid( void ); uint8_t cfg_is_last_game_valid(void);
uint8_t cfg_is_pair_mode_allowed( void ); uint8_t cfg_is_pair_mode_allowed(void);
#endif #endif

2429
src/cfgware.h Normal file

File diff suppressed because it is too large Load Diff

108
src/cic.c
View File

@@ -7,108 +7,74 @@
char *cicstatenames[4] = { "CIC_OK", "CIC_FAIL", "CIC_PAIR", "CIC_SCIC" }; char *cicstatenames[4] = { "CIC_OK", "CIC_FAIL", "CIC_PAIR", "CIC_SCIC" };
char *cicstatefriendly[4] = {"Original or no CIC", "Original CIC(failed)", "SuperCIC enhanced", "SuperCIC detected, not used"}; char *cicstatefriendly[4] = {"Original or no CIC", "Original CIC(failed)", "SuperCIC enhanced", "SuperCIC detected, not used"};
void print_cic_state() void print_cic_state() {
{ printf("CIC state: %s\n", get_cic_statename(get_cic_state()));
printf( "CIC state: %s\n", get_cic_statename( get_cic_state() ) );
} }
inline char *get_cic_statefriendlyname( enum cicstates state ) inline char *get_cic_statefriendlyname(enum cicstates state) {
{
return cicstatefriendly[state]; return cicstatefriendly[state];
} }
inline char *get_cic_statename( enum cicstates state ) inline char *get_cic_statename(enum cicstates state) {
{
return cicstatenames[state]; return cicstatenames[state];
} }
enum cicstates get_cic_state() enum cicstates get_cic_state() {
{
uint32_t count; uint32_t count;
uint32_t togglecount = 0; uint32_t togglecount = 0;
uint8_t state, state_old; uint8_t state, state_old;
state_old = BITBAND( SNES_CIC_STATUS_REG->FIOPIN, SNES_CIC_STATUS_BIT ); state_old = BITBAND(SNES_CIC_STATUS_REG->FIOPIN, SNES_CIC_STATUS_BIT);
/* this loop samples at ~10MHz */
/* this loop samples at ~10MHz */ for(count=0; count<CIC_SAMPLECOUNT; count++) {
for ( count = 0; count < CIC_SAMPLECOUNT; count++ ) state = BITBAND(SNES_CIC_STATUS_REG->FIOPIN, SNES_CIC_STATUS_BIT);
{ if(state != state_old) {
state = BITBAND( SNES_CIC_STATUS_REG->FIOPIN, SNES_CIC_STATUS_BIT );
if ( state != state_old )
{
togglecount++; togglecount++;
} }
state_old = state; state_old = state;
} }
printf("%ld\n", togglecount);
printf( "%ld\n", togglecount ); /* CIC_TOGGLE_THRESH_PAIR > CIC_TOGGLE_THRESH_SCIC */
if(togglecount > CIC_TOGGLE_THRESH_PAIR) {
/* CIC_TOGGLE_THRESH_PAIR > CIC_TOGGLE_THRESH_SCIC */
if ( togglecount > CIC_TOGGLE_THRESH_PAIR )
{
return CIC_PAIR; return CIC_PAIR;
} } else if(togglecount > CIC_TOGGLE_THRESH_SCIC) {
else if ( togglecount > CIC_TOGGLE_THRESH_SCIC )
{
return CIC_SCIC; return CIC_SCIC;
} } else if(state) {
else if ( state )
{
return CIC_OK; return CIC_OK;
} } else return CIC_FAIL;
else
{
return CIC_FAIL;
}
} }
void cic_init( int allow_pairmode ) void cic_init(int allow_pairmode) {
{ BITBAND(SNES_CIC_PAIR_REG->FIODIR, SNES_CIC_PAIR_BIT) = 1;
BITBAND( SNES_CIC_PAIR_REG->FIODIR, SNES_CIC_PAIR_BIT ) = 1; if(allow_pairmode) {
BITBAND(SNES_CIC_PAIR_REG->FIOCLR, SNES_CIC_PAIR_BIT) = 1;
if ( allow_pairmode ) } else {
{ BITBAND(SNES_CIC_PAIR_REG->FIOSET, SNES_CIC_PAIR_BIT) = 1;
BITBAND( SNES_CIC_PAIR_REG->FIOCLR, SNES_CIC_PAIR_BIT ) = 1;
}
else
{
BITBAND( SNES_CIC_PAIR_REG->FIOSET, SNES_CIC_PAIR_BIT ) = 1;
} }
} }
/* prepare GPIOs for pair mode + set initial modes */ /* prepare GPIOs for pair mode + set initial modes */
void cic_pair( int init_vmode, int init_d4 ) void cic_pair(int init_vmode, int init_d4) {
{ cic_videomode(init_vmode);
cic_videomode( init_vmode ); cic_d4(init_d4);
cic_d4( init_d4 );
BITBAND( SNES_CIC_D0_REG->FIODIR, SNES_CIC_D0_BIT ) = 1; BITBAND(SNES_CIC_D0_REG->FIODIR, SNES_CIC_D0_BIT) = 1;
BITBAND( SNES_CIC_D1_REG->FIODIR, SNES_CIC_D1_BIT ) = 1; BITBAND(SNES_CIC_D1_REG->FIODIR, SNES_CIC_D1_BIT) = 1;
} }
void cic_videomode( int value ) void cic_videomode(int value) {
{ if(value) {
if ( value ) BITBAND(SNES_CIC_D0_REG->FIOSET, SNES_CIC_D0_BIT) = 1;
{ } else {
BITBAND( SNES_CIC_D0_REG->FIOSET, SNES_CIC_D0_BIT ) = 1; BITBAND(SNES_CIC_D0_REG->FIOCLR, SNES_CIC_D0_BIT) = 1;
}
else
{
BITBAND( SNES_CIC_D0_REG->FIOCLR, SNES_CIC_D0_BIT ) = 1;
} }
} }
void cic_d4( int value ) void cic_d4(int value) {
{ if(value) {
if ( value ) BITBAND(SNES_CIC_D1_REG->FIOSET, SNES_CIC_D1_BIT) = 1;
{ } else {
BITBAND( SNES_CIC_D1_REG->FIOSET, SNES_CIC_D1_BIT ) = 1; BITBAND(SNES_CIC_D1_REG->FIOCLR, SNES_CIC_D1_BIT) = 1;
}
else
{
BITBAND( SNES_CIC_D1_REG->FIOCLR, SNES_CIC_D1_BIT ) = 1;
} }
} }

View File

@@ -11,14 +11,14 @@
enum cicstates { CIC_OK = 0, CIC_FAIL, CIC_PAIR, CIC_SCIC }; enum cicstates { CIC_OK = 0, CIC_FAIL, CIC_PAIR, CIC_SCIC };
enum cic_region { CIC_NTSC = 0, CIC_PAL }; enum cic_region { CIC_NTSC = 0, CIC_PAL };
void print_cic_state( void ); void print_cic_state(void);
char *get_cic_statename( enum cicstates state ); char *get_cic_statename(enum cicstates state);
char *get_cic_statefriendlyname( enum cicstates state ); char *get_cic_statefriendlyname(enum cicstates state);
enum cicstates get_cic_state( void ); enum cicstates get_cic_state(void);
void cic_init( int allow_pairmode ); void cic_init(int allow_pairmode);
void cic_pair( int init_vmode, int init_d4 ); void cic_pair(int init_vmode, int init_d4);
void cic_videomode( int value ); void cic_videomode(int value);
void cic_d4( int value ); void cic_d4(int value);
#endif #endif

599
src/cli.c
View File

@@ -42,7 +42,6 @@
#include "fileops.h" #include "fileops.h"
#include "memory.h" #include "memory.h"
#include "snes.h" #include "snes.h"
#include "tests.h"
#include "fpga.h" #include "fpga.h"
#include "fpga_spi.h" #include "fpga_spi.h"
#include "cic.h" #include "cic.h"
@@ -54,214 +53,161 @@
#define MAX_LINE 250 #define MAX_LINE 250
/* Variables */ /* Variables */
static char cmdbuffer[MAX_LINE + 1]; static char cmdbuffer[MAX_LINE+1];
static char *curchar; static char *curchar;
/* Word lists */ /* Word lists */
static char command_words[] = static char command_words[] =
"cd\0reset\0sreset\0dir\0ls\0test\0exit\0loadrom\0loadraw\0saveraw\0put\0rm\0mkdir\0d4\0vmode\0mapper\0settime\0time\0setfeature\0hexdump\0w8\0w16\0memset\0memtest\0"; "cd\0reset\0sreset\0dir\0ls\0test\0resume\0loadrom\0loadraw\0saveraw\0put\0rm\0d4\0vmode\0mapper\0settime\0time\0setfeature\0hexdump\0w8\0w16\0stramtest\0";
enum { CMD_CD = 0, CMD_RESET, CMD_SRESET, CMD_DIR, CMD_LS, CMD_TEST, CMD_EXIT, CMD_LOADROM, CMD_LOADRAW, CMD_SAVERAW, CMD_PUT, CMD_RM, CMD_MKDIR, CMD_D4, CMD_VMODE, CMD_MAPPER, CMD_SETTIME, CMD_TIME, CMD_SETFEATURE, CMD_HEXDUMP, CMD_W8, CMD_W16, CMD_MEMSET, CMD_MEMTEST }; enum { CMD_CD = 0, CMD_RESET, CMD_SRESET, CMD_DIR, CMD_LS, CMD_TEST, CMD_RESUME, CMD_LOADROM, CMD_LOADRAW, CMD_SAVERAW, CMD_PUT, CMD_RM, CMD_D4, CMD_VMODE, CMD_MAPPER, CMD_SETTIME, CMD_TIME, CMD_SETFEATURE, CMD_HEXDUMP, CMD_W8, CMD_W16, CMD_SRAMTEST };
/* ------------------------------------------------------------------------- */ /* ------------------------------------------------------------------------- */
/* Parse functions */ /* Parse functions */
/* ------------------------------------------------------------------------- */ /* ------------------------------------------------------------------------- */
/* Skip spaces at curchar */ /* Skip spaces at curchar */
static uint8_t skip_spaces( void ) static uint8_t skip_spaces(void) {
{ uint8_t res = (*curchar == ' ' || *curchar == 0);
uint8_t res = ( *curchar == ' ' || *curchar == 0 );
while ( *curchar == ' ' ) while (*curchar == ' ')
{
curchar++; curchar++;
}
return res; return res;
} }
/* Parse the string in curchar for an integer with bounds [lower,upper] */ /* Parse the string in curchar for an integer with bounds [lower,upper] */
static int32_t parse_unsigned( uint32_t lower, uint32_t upper, uint8_t base ) static int32_t parse_unsigned(uint32_t lower, uint32_t upper, uint8_t base) {
{
char *end; char *end;
uint32_t result; uint32_t result;
if ( strlen( curchar ) == 1 && *curchar == '?' ) if (strlen(curchar) == 1 && *curchar == '?') {
{ printf("Number between %ld[0x%lx] and %ld[0x%lx] expected\n",lower,lower,upper,upper);
printf( "Number between %ld[0x%lx] and %ld[0x%lx] expected\n", lower, lower, upper, upper );
return -2; return -2;
} }
result = strtoul( curchar, &end, base ); result = strtoul(curchar, &end, base);
if ((*end != ' ' && *end != 0) || errno != 0) {
if ( ( *end != ' ' && *end != 0 ) || errno != 0 ) printf("Invalid numeric argument\n");
{
printf( "Invalid numeric argument\n" );
return -1; return -1;
} }
curchar = end; curchar = end;
skip_spaces(); skip_spaces();
if ( result < lower || result > upper ) if (result < lower || result > upper) {
{ printf("Numeric argument out of range (%ld..%ld)\n",lower,upper);
printf( "Numeric argument out of range (%ld..%ld)\n", lower, upper );
return -1; return -1;
} }
return result; return result;
} }
/* Parse the string starting with curchar for a word in wordlist */ /* Parse the string starting with curchar for a word in wordlist */
static int8_t parse_wordlist( char *wordlist ) static int8_t parse_wordlist(char *wordlist) {
{
uint8_t i, matched; uint8_t i, matched;
unsigned char *cur, *ptr; char *cur, *ptr;
unsigned char c; char c;
i = 0; i = 0;
ptr = ( unsigned char * )wordlist; ptr = wordlist;
// Command list on "?" // Command list on "?"
if ( strlen( curchar ) == 1 && *curchar == '?' ) if (strlen(curchar) == 1 && *curchar == '?') {
{ printf("Commands available: \n ");
printf( "Commands available: \n " ); while (1) {
while ( 1 )
{
c = *ptr++; c = *ptr++;
if (c == 0) {
if ( c == 0 ) if (*ptr == 0) {
{ printf("\n");
if ( *ptr == 0 )
{
printf( "\n" );
return -2; return -2;
} else {
printf("\n ");
} }
else } else
{ uart_putc(c);
printf( "\n " );
}
}
else
{
uart_putc( c );
}
} }
} }
while ( 1 ) while (1) {
{ cur = curchar;
cur = ( unsigned char * )curchar;
matched = 1; matched = 1;
c = *ptr; c = *ptr;
do {
do
{
// If current word list character is \0: No match found // If current word list character is \0: No match found
if ( c == 0 ) if (c == 0) {
{ printf("Unknown word: %s\n(use ? for help)",curchar);
printf( "Unknown word: %s\n(use ? for help)", curchar );
return -1; return -1;
} }
if ( tolower( ( int )c ) != tolower( ( int )*cur ) ) if (tolower(c) != tolower(*cur)) {
{
// Check for end-of-word // Check for end-of-word
if ( cur != ( unsigned char * )curchar && ( *cur == ' ' || *cur == 0 ) ) if (cur != curchar && (*cur == ' ' || *cur == 0)) {
{
// Partial match found, return that // Partial match found, return that
break; break;
} } else {
else
{
matched = 0; matched = 0;
break; break;
} }
} }
ptr++; ptr++;
cur++; cur++;
c = *ptr; c = *ptr;
} } while (c != 0);
while ( c != 0 );
if ( matched ) if (matched) {
{
char *tmp = curchar; char *tmp = curchar;
curchar = ( char * )cur; curchar = cur;
// Return match only if whitespace or end-of-string follows // Return match only if whitespace or end-of-string follows
// (avoids mismatching partial words) // (avoids mismatching partial words)
if ( skip_spaces() ) if (skip_spaces()) {
{
return i; return i;
} } else {
else printf("Unknown word: %s\n(use ? for help)\n",tmp);
{
printf( "Unknown word: %s\n(use ? for help)\n", tmp );
return -1; return -1;
} }
} } else {
else
{
// Try next word in list // Try next word in list
i++; i++;
while (*ptr++ != 0) ;
while ( *ptr++ != 0 ) ;
} }
} }
} }
/* Read a line from serial, uses cmdbuffer as storage */ /* Read a line from serial, uses cmdbuffer as storage */
static char *getline( char *prompt ) static char *getline(char *prompt) {
{ int i=0;
int i = 0;
char c; char c;
printf( "\n%s", prompt ); printf("\n%s",prompt);
memset( cmdbuffer, 0, sizeof( cmdbuffer ) ); memset(cmdbuffer,0,sizeof(cmdbuffer));
while ( 1 ) while (1) {
{
c = uart_getc(); c = uart_getc();
if (c == 13)
if ( c == 13 )
{
break; break;
}
if ( c == 27 || c == 3 ) if (c == 27 || c == 3) {
{ printf("\\\n%s",prompt);
printf( "\\\n%s", prompt );
i = 0; i = 0;
memset( cmdbuffer, 0, sizeof( cmdbuffer ) ); memset(cmdbuffer,0,sizeof(cmdbuffer));
continue; continue;
} }
if ( c == 127 || c == 8 ) if (c == 127 || c == 8) {
{ if (i > 0) {
if ( i > 0 )
{
i--; i--;
uart_putc( 8 ); // backspace uart_putc(8); // backspace
uart_putc( ' ' ); // erase character uart_putc(' '); // erase character
uart_putc( 8 ); // backspace uart_putc(8); // backspace
} } else
else
{
continue; continue;
} } else {
} if (i < sizeof(cmdbuffer)-1) {
else
{
if ( i < sizeof( cmdbuffer ) - 1 )
{
cmdbuffer[i++] = c; cmdbuffer[i++] = c;
uart_putc( c ); uart_putc(c);
} }
} }
} }
cmdbuffer[i] = 0; cmdbuffer[i] = 0;
return cmdbuffer; return cmdbuffer;
} }
@@ -272,391 +218,277 @@ static char *getline( char *prompt )
/* ------------------------------------------------------------------------- */ /* ------------------------------------------------------------------------- */
/* Reset */ /* Reset */
static void cmd_reset( void ) static void cmd_reset(void) {
{
/* force watchdog reset */ /* force watchdog reset */
LPC_WDT->WDTC = 256; // minimal timeout LPC_WDT->WDTC = 256; // minimal timeout
LPC_WDT->WDCLKSEL = BV( 31 ); // internal RC, lock register LPC_WDT->WDCLKSEL = BV(31); // internal RC, lock register
LPC_WDT->WDMOD = BV( 0 ) | BV( 1 ); // enable watchdog and reset-by-watchdog LPC_WDT->WDMOD = BV(0) | BV(1); // enable watchdog and reset-by-watchdog
LPC_WDT->WDFEED = 0xaa; LPC_WDT->WDFEED = 0xaa;
LPC_WDT->WDFEED = 0x55; // initial feed to really enable WDT LPC_WDT->WDFEED = 0x55; // initial feed to really enable WDT
} }
/* Show the contents of the current directory */ /* Show the contents of the current directory */
static void cmd_show_directory( void ) static void cmd_show_directory(void) {
{
FRESULT res; FRESULT res;
DIR dh; DIR dh;
FILINFO finfo; FILINFO finfo;
uint8_t *name; uint8_t *name;
f_getcwd( ( TCHAR * )file_lfn, 255 ); f_getcwd((TCHAR*)file_lfn, 255);
res = f_opendir( &dh, ( TCHAR * )file_lfn ); res = f_opendir(&dh, (TCHAR*)file_lfn);
if (res != FR_OK) {
if ( res != FR_OK ) printf("f_opendir failed, result %d\n",res);
{
printf( "f_opendir failed, result %d\n", res );
return; return;
} }
finfo.lfname = ( TCHAR * )file_lfn; finfo.lfname = (TCHAR*)file_lfn;
finfo.lfsize = 255; finfo.lfsize = 255;
do do {
{
/* Read the next entry */ /* Read the next entry */
res = f_readdir( &dh, &finfo ); res = f_readdir(&dh, &finfo);
if (res != FR_OK) {
if ( res != FR_OK ) printf("f_readdir failed, result %d\n",res);
{
printf( "f_readdir failed, result %d\n", res );
return; return;
} }
/* Abort if none was found */ /* Abort if none was found */
if ( !finfo.fname[0] ) if (!finfo.fname[0])
{
break; break;
}
/* Skip volume labels */ /* Skip volume labels */
if ( finfo.fattrib & AM_VOL ) if (finfo.fattrib & AM_VOL)
{
continue; continue;
}
/* Select between LFN and 8.3 name */ /* Select between LFN and 8.3 name */
if ( finfo.lfname[0] ) if (finfo.lfname[0])
{ name = (uint8_t*)finfo.lfname;
name = ( uint8_t * )finfo.lfname; else {
} name = (uint8_t*)finfo.fname;
else strlwr((char *)name);
{
name = ( uint8_t * )finfo.fname;
strlwr( ( char * )name );
} }
printf( "%s [%s] (%ld)", finfo.lfname, finfo.fname, finfo.fsize ); printf("%s",name);
/* Directory indicator (Unix-style) */ /* Directory indicator (Unix-style) */
if ( finfo.fattrib & AM_DIR ) if (finfo.fattrib & AM_DIR)
{ uart_putc('/');
uart_putc( '/' );
}
printf( "\n" ); printf("\n");
} } while (finfo.fname[0]);
while ( finfo.fname[0] );
} }
static void cmd_loadrom( void ) static void cmd_loadrom(void) {
{
uint32_t address = 0; uint32_t address = 0;
uint8_t flags = LOADROM_WITH_SRAM | LOADROM_WITH_RESET; uint8_t flags = LOADROM_WITH_SRAM | LOADROM_WITH_RESET;
load_rom( ( uint8_t * )curchar, address, flags ); load_rom((uint8_t*)curchar, address, flags);
} }
static void cmd_loadraw( void ) static void cmd_loadraw(void) {
{ uint32_t address = parse_unsigned(0,16777216,16);
uint32_t address = parse_unsigned( 0, 16777216, 16 ); load_sram((uint8_t*)curchar, address);
load_sram( ( uint8_t * )curchar, address );
} }
static void cmd_saveraw( void ) static void cmd_saveraw(void) {
{ uint32_t address = parse_unsigned(0,16777216,16);
uint32_t address = parse_unsigned( 0, 16777216, 16 ); uint32_t length = parse_unsigned(0,16777216,16);
uint32_t length = parse_unsigned( 0, 16777216, 16 ); save_sram((uint8_t*)curchar, length, address);
if ( address != -1 && length != -1 )
{
save_sram( ( uint8_t * )curchar, length, address );
}
} }
static void cmd_d4( void ) static void cmd_d4(void) {
{
int32_t hz; int32_t hz;
if ( get_cic_state() != CIC_PAIR ) if(get_cic_state() != CIC_PAIR) {
{ printf("not in pair mode\n");
printf( "not in pair mode\n" ); } else {
hz = parse_unsigned(50,60,10);
if(hz==50) {
cic_d4(CIC_PAL);
} else {
cic_d4(CIC_NTSC);
} }
else printf("ok\n");
{
hz = parse_unsigned( 50, 60, 10 );
if ( hz == 50 )
{
cic_d4( CIC_PAL );
}
else
{
cic_d4( CIC_NTSC );
}
printf( "ok\n" );
} }
} }
static void cmd_vmode( void ) static void cmd_vmode(void) {
{
int32_t hz; int32_t hz;
if(get_cic_state() != CIC_PAIR) {
if ( get_cic_state() != CIC_PAIR ) printf("not in pair mode\n");
{ } else {
printf( "not in pair mode\n" ); hz = parse_unsigned(50,60,10);
if(hz==50) {
cic_videomode(CIC_PAL);
} else {
cic_videomode(CIC_NTSC);
} }
else printf("ok\n");
{
hz = parse_unsigned( 50, 60, 10 );
if ( hz == 50 )
{
cic_videomode( CIC_PAL );
}
else
{
cic_videomode( CIC_NTSC );
}
printf( "ok\n" );
} }
} }
void cmd_put( void ) void cmd_put(void) {
{ if(*curchar != 0) {
if ( *curchar != 0 ) file_open((uint8_t*)curchar, FA_CREATE_ALWAYS | FA_WRITE);
{ if(file_res) {
file_open( ( uint8_t * )curchar, FA_CREATE_ALWAYS | FA_WRITE ); printf("FAIL: error opening file %s\n", curchar);
} else {
if ( file_res ) printf("OK, start xmodem transfer now.\n");
{ xmodem_rxfile(&file_handle);
printf( "FAIL: error opening file %s\n", curchar );
} }
else
{
printf( "OK, start xmodem transfer now.\n" );
xmodem_rxfile( &file_handle );
}
file_close(); file_close();
} } else {
else printf("Usage: put <filename>\n");
{
printf( "Usage: put <filename>\n" );
} }
} }
void cmd_rm( void ) void cmd_rm(void) {
{ FRESULT res = f_unlink(curchar);
FRESULT res = f_unlink( curchar ); if(res) printf("Error %d removing %s\n", res, curchar);
if ( res )
{
printf( "Error %d removing %s\n", res, curchar );
}
} }
void cmd_mkdir( void ) void cmd_mapper(void) {
{
FRESULT res = f_mkdir( curchar );
if ( res )
{
printf( "Error %d creating directory %s\n", res, curchar );
}
}
void cmd_mapper( void )
{
int32_t mapper; int32_t mapper;
mapper = parse_unsigned( 0, 7, 10 ); mapper = parse_unsigned(0,7,10);
set_mapper( ( uint8_t )mapper & 0x7 ); set_mapper((uint8_t)mapper & 0x7);
printf( "mapper set to %ld\n", mapper ); printf("mapper set to %ld\n", mapper);
} }
void cmd_sreset( void ) void cmd_sreset(void) {
{ if(*curchar != 0) {
if ( *curchar != 0 )
{
int32_t resetstate; int32_t resetstate;
resetstate = parse_unsigned( 0, 1, 10 ); resetstate = parse_unsigned(0,1,10);
snes_reset( resetstate ); snes_reset(resetstate);
} } else {
else snes_reset(1);
{ delay_ms(20);
snes_reset_pulse(); snes_reset(0);
} }
} }
void cmd_settime( void ) void cmd_settime(void) {
{
struct tm time; struct tm time;
if(strlen(curchar) != 4+2+2 + 2+2+2) {
if ( strlen( curchar ) != 4 + 2 + 2 + 2 + 2 + 2 ) printf("invalid time format (need YYYYMMDDhhmmss)\n");
{ } else {
printf( "invalid time format (need YYYYMMDDhhmmss)\n" ); time.tm_sec = atoi(curchar+4+2+2+2+2);
} curchar[4+2+2+2+2] = 0;
else time.tm_min = atoi(curchar+4+2+2+2);
{ curchar[4+2+2+2] = 0;
time.tm_sec = atoi( curchar + 4 + 2 + 2 + 2 + 2 ); time.tm_hour = atoi(curchar+4+2+2);
curchar[4 + 2 + 2 + 2 + 2] = 0; curchar[4+2+2] = 0;
time.tm_min = atoi( curchar + 4 + 2 + 2 + 2 ); time.tm_mday = atoi(curchar+4+2);
curchar[4 + 2 + 2 + 2] = 0; curchar[4+2] = 0;
time.tm_hour = atoi( curchar + 4 + 2 + 2 ); time.tm_mon = atoi(curchar+4);
curchar[4 + 2 + 2] = 0;
time.tm_mday = atoi( curchar + 4 + 2 );
curchar[4 + 2] = 0;
time.tm_mon = atoi( curchar + 4 );
curchar[4] = 0; curchar[4] = 0;
time.tm_year = atoi( curchar ); time.tm_year = atoi(curchar);
set_rtc( &time ); set_rtc(&time);
} }
} }
void cmd_time( void ) void cmd_time(void) {
{
struct tm time; struct tm time;
read_rtc( &time ); read_rtc(&time);
printf( "%04d-%02d-%02d %02d:%02d:%02d\n", time.tm_year, time.tm_mon, printf("%04d-%02d-%02d %02d:%02d:%02d\n", time.tm_year, time.tm_mon,
time.tm_mday, time.tm_hour, time.tm_min, time.tm_sec ); time.tm_mday, time.tm_hour, time.tm_min, time.tm_sec);
} }
void cmd_setfeature( void ) void cmd_setfeature(void) {
{ uint8_t feat = parse_unsigned(0, 255, 16);
uint8_t feat = parse_unsigned( 0, 255, 16 ); fpga_set_features(feat);
fpga_set_features( feat );
} }
void cmd_hexdump( void ) void cmd_hexdump(void) {
{ uint32_t offset = parse_unsigned(0, 16777215, 16);
uint32_t offset = parse_unsigned( 0, 16777215, 16 ); uint32_t len = parse_unsigned(0, 16777216, 16);
uint32_t len = parse_unsigned( 0, 16777216, 16 ); sram_hexdump(offset, len);
sram_hexdump( offset, len );
} }
void cmd_w8( void ) void cmd_w8(void) {
{ uint32_t offset = parse_unsigned(0, 16777215, 16);
uint32_t offset = parse_unsigned( 0, 16777215, 16 ); uint8_t val = parse_unsigned(0, 255, 16);
uint8_t val = parse_unsigned( 0, 255, 16 ); sram_writebyte(val, offset);
sram_writebyte( val, offset );
} }
void cmd_w16( void ) void cmd_w16(void) {
{ uint32_t offset = parse_unsigned(0, 16777215, 16);
uint32_t offset = parse_unsigned( 0, 16777215, 16 ); uint16_t val = parse_unsigned(0, 65535, 16);
uint16_t val = parse_unsigned( 0, 65535, 16 ); sram_writeshort(val, offset);
sram_writeshort( val, offset );
} }
void cmd_memset( void ) void cmd_sramtest(void) {
{ sram_memtest();
uint32_t offset = parse_unsigned( 0, 16777215, 16 );
uint32_t len = parse_unsigned( 0, 16777216, 16 );
uint8_t val = parse_unsigned( 0, 255, 16 );
sram_memset( offset, len, val );
} }
/* ------------------------------------------------------------------------- */ /* ------------------------------------------------------------------------- */
/* CLI interface functions */ /* CLI interface functions */
/* ------------------------------------------------------------------------- */ /* ------------------------------------------------------------------------- */
void cli_init( void ) void cli_init(void) {
{
} }
void cli_entrycheck() void cli_entrycheck() {
{ if(uart_gotc() && ((uart_getc() == 27) || (uart_getc() == 13))) {
if ( uart_gotc() && uart_getc() == 27 ) printf("*** BREAK\n");
{
printf( "*** BREAK\n" );
cli_loop(); cli_loop();
} }
} }
void cli_loop( void ) void cli_loop(void) {
{ while (1) {
while ( 1 ) curchar = getline(">");
{ printf("\n");
curchar = getline( ">" );
printf( "\n" );
/* Process medium changes before executing the command */ /* Process medium changes before executing the command */
if ( disk_state != DISK_OK && disk_state != DISK_REMOVED ) if (disk_state != DISK_OK && disk_state != DISK_REMOVED) {
{
FRESULT res; FRESULT res;
printf( "Medium changed... " ); printf("Medium changed... ");
res = f_mount( 0, &fatfs ); res = f_mount(0,&fatfs);
if (res != FR_OK) {
if ( res != FR_OK ) printf("Failed to mount new medium, result %d\n",res);
{ } else {
printf( "Failed to mount new medium, result %d\n", res ); printf("Ok\n");
}
else
{
printf( "Ok\n" );
} }
} }
/* Remove whitespace */ /* Remove whitespace */
while ( *curchar == ' ' ) while (*curchar == ' ') curchar++;
{ while (strlen(curchar) > 0 && curchar[strlen(curchar)-1] == ' ')
curchar++; curchar[strlen(curchar)-1] = 0;
}
while ( strlen( curchar ) > 0 && curchar[strlen( curchar ) - 1] == ' ' )
{
curchar[strlen( curchar ) - 1] = 0;
}
/* Ignore empty lines */ /* Ignore empty lines */
if ( strlen( curchar ) == 0 ) if (strlen(curchar) == 0)
{
continue; continue;
}
/* Parse command */ /* Parse command */
int8_t command = parse_wordlist( command_words ); int8_t command = parse_wordlist(command_words);
if (command < 0)
if ( command < 0 )
{
continue; continue;
}
FRESULT res; FRESULT res;
switch (command) {
switch ( command )
{
case CMD_CD: case CMD_CD:
#if _FS_RPATH #if _FS_RPATH
if ( strlen( curchar ) == 0 ) if (strlen(curchar) == 0) {
{ f_getcwd((TCHAR*)file_lfn, 255);
f_getcwd( ( TCHAR * )file_lfn, 255 ); printf("%s\n",file_lfn);
printf( "%s\n", file_lfn );
break; break;
} }
res = f_chdir( ( const TCHAR * )curchar ); res = f_chdir((const TCHAR *)curchar);
if (res != FR_OK) {
if ( res != FR_OK ) printf("chdir %s failed with result %d\n",curchar,res);
{ } else {
printf( "chdir %s failed with result %d\n", curchar, res ); printf("Ok.\n");
} }
else
{
printf( "Ok.\n" );
}
#else #else
printf( "cd not supported.\n" ); printf("cd not supported.\n");
res; res;
#endif #endif
break; break;
case CMD_RESET: case CMD_RESET:
cmd_reset(); cmd_reset();
break; break;
@@ -670,7 +502,7 @@ void cli_loop( void )
cmd_show_directory(); cmd_show_directory();
break; break;
case CMD_EXIT: case CMD_RESUME:
return; return;
break; break;
@@ -690,10 +522,6 @@ void cli_loop( void )
cmd_rm(); cmd_rm();
break; break;
case CMD_MKDIR:
cmd_mkdir();
break;
case CMD_D4: case CMD_D4:
cmd_d4(); cmd_d4();
break; break;
@@ -738,14 +566,9 @@ void cli_loop( void )
cmd_w16(); cmd_w16();
break; break;
case CMD_MEMSET: case CMD_SRAMTEST:
cmd_memset(); cmd_sramtest();
break; break;
case CMD_MEMTEST:
test_mem();
break;
} }
} }
} }

View File

@@ -27,8 +27,8 @@
#ifndef CLI_H #ifndef CLI_H
#define CLI_H #define CLI_H
void cli_init( void ); void cli_init(void);
void cli_loop( void ); void cli_loop(void);
void cli_entrycheck( void ); void cli_entrycheck(void);
#endif #endif

View File

@@ -7,19 +7,17 @@
#include "bits.h" #include "bits.h"
#include "uart.h" #include "uart.h"
void clock_disconnect() void clock_disconnect() {
{
disconnectPLL0(); disconnectPLL0();
disablePLL0(); disablePLL0();
} }
void clock_init() void clock_init() {
{
/* set flash access time to 5 clks (80<f<=100MHz) */ /* set flash access time to 5 clks (80<f<=100MHz) */
setFlashAccessTime( 5 ); setFlashAccessTime(5);
/* setup PLL0 for ~44100*256*8 Hz /* setup PLL0 for ~44100*256*8 Hz
Base clock: 12MHz Base clock: 12MHz
Multiplier: 429 Multiplier: 429
Pre-Divisor: 19 Pre-Divisor: 19
@@ -28,17 +26,17 @@ void clock_init()
-> DAC freq = 44099.5 Hz -> DAC freq = 44099.5 Hz
-> FPGA freq = 11289473.7Hz -> FPGA freq = 11289473.7Hz
First, disable and disconnect PLL0. First, disable and disconnect PLL0.
*/ */
clock_disconnect(); // clock_disconnect();
/* PLL is disabled and disconnected. setup PCLK NOW as it cannot be changed /* PLL is disabled and disconnected. setup PCLK NOW as it cannot be changed
reliably with PLL0 connected. reliably with PLL0 connected.
see: see:
http://ics.nxp.com/support/documents/microcontrollers/pdf/errata.lpc1754.pdf http://ics.nxp.com/support/documents/microcontrollers/pdf/errata.lpc1754.pdf
*/ */
/* continue with PLL0 setup: /* continue with PLL0 setup:
enable the xtal oscillator and wait for it to become stable enable the xtal oscillator and wait for it to become stable
set the oscillator as clk source for PLL0 set the oscillator as clk source for PLL0
set PLL0 multiplier+predivider set PLL0 multiplier+predivider
@@ -49,74 +47,63 @@ void clock_init()
done done
*/ */
enableMainOsc(); enableMainOsc();
setClkSrc( CLKSRC_MAINOSC ); setClkSrc(CLKSRC_MAINOSC);
setPLL0MultPrediv( 22, 1 ); // XXX setPLL0MultPrediv(429, 19);
// XXX setPLL0MultPrediv(23, 2);
setPLL0MultPrediv(12, 1);
enablePLL0(); enablePLL0();
setCCLKDiv( 6 ); setCCLKDiv(3);
connectPLL0(); connectPLL0();
} }
void setFlashAccessTime( uint8_t clocks ) void setFlashAccessTime(uint8_t clocks) {
{ LPC_SC->FLASHCFG=FLASHTIM(clocks);
LPC_SC->FLASHCFG = FLASHTIM( clocks );
} }
void setPLL0MultPrediv( uint16_t mult, uint8_t prediv ) void setPLL0MultPrediv(uint16_t mult, uint8_t prediv) {
{ LPC_SC->PLL0CFG=PLL_MULT(mult) | PLL_PREDIV(prediv);
LPC_SC->PLL0CFG = PLL_MULT( mult ) | PLL_PREDIV( prediv );
PLL0feed(); PLL0feed();
} }
void enablePLL0() void enablePLL0() {
{
LPC_SC->PLL0CON |= PLLE0; LPC_SC->PLL0CON |= PLLE0;
PLL0feed(); PLL0feed();
} }
void disablePLL0() void disablePLL0() {
{
LPC_SC->PLL0CON &= ~PLLE0; LPC_SC->PLL0CON &= ~PLLE0;
PLL0feed(); PLL0feed();
} }
void connectPLL0() void connectPLL0() {
{ while(!(LPC_SC->PLL0STAT&PLOCK0));
while ( !( LPC_SC->PLL0STAT & PLOCK0 ) );
LPC_SC->PLL0CON |= PLLC0; LPC_SC->PLL0CON |= PLLC0;
PLL0feed(); PLL0feed();
} }
void disconnectPLL0() void disconnectPLL0() {
{
LPC_SC->PLL0CON &= ~PLLC0; LPC_SC->PLL0CON &= ~PLLC0;
PLL0feed(); PLL0feed();
} }
void setCCLKDiv( uint8_t div ) void setCCLKDiv(uint8_t div) {
{ LPC_SC->CCLKCFG=CCLK_DIV(div);
LPC_SC->CCLKCFG = CCLK_DIV( div );
} }
void enableMainOsc() void enableMainOsc() {
{ LPC_SC->SCS=OSCEN;
LPC_SC->SCS = OSCEN; while(!(LPC_SC->SCS&OSCSTAT));
while ( !( LPC_SC->SCS & OSCSTAT ) );
} }
void disableMainOsc() void disableMainOsc() {
{ LPC_SC->SCS=0;
LPC_SC->SCS = 0;
} }
void PLL0feed() void PLL0feed() {
{ LPC_SC->PLL0FEED=0xaa;
LPC_SC->PLL0FEED = 0xaa; LPC_SC->PLL0FEED=0x55;
LPC_SC->PLL0FEED = 0x55;
} }
void setClkSrc( uint8_t src ) void setClkSrc(uint8_t src) {
{ LPC_SC->CLKSRCSEL=src;
LPC_SC->CLKSRCSEL = src;
} }

View File

@@ -49,29 +49,31 @@
#define PCLK_SYSCON (28) #define PCLK_SYSCON (28)
#define PCLK_MC (30) #define PCLK_MC (30)
void clock_disconnect( void ); void clock_disconnect(void);
void clock_init( void ); void clock_init(void);
void setFlashAccessTime( uint8_t clocks ); void setFlashAccessTime(uint8_t clocks);
void setPLL0MultPrediv( uint16_t mult, uint8_t prediv ); void setPLL0MultPrediv(uint16_t mult, uint8_t prediv);
void enablePLL0( void ); void enablePLL0(void);
void disablePLL0( void ); void disablePLL0(void);
void connectPLL0( void ); void connectPLL0(void);
void disconnectPLL0( void ); void disconnectPLL0(void);
void setCCLKDiv( uint8_t div ); void setCCLKDiv(uint8_t div);
void enableMainOsc( void ); void enableMainOsc(void);
void disableMainOsc( void ); void disableMainOsc(void);
void PLL0feed(void);
void setClkSrc(uint8_t src);
void PLL0feed( void );
void setClkSrc( uint8_t src );
#endif #endif

View File

@@ -4,7 +4,7 @@
# file to a C header. No copyright claimed. # file to a C header. No copyright claimed.
BEGIN { BEGIN {
print "// autoconf.h generated from " ARGV[1] " at " strftime() "\n" \ print "// autoconf.h generated from " ARGV[1] " at TODAY\n" \
"#ifndef AUTOCONF_H\n" \ "#ifndef AUTOCONF_H\n" \
"#define AUTOCONF_H" "#define AUTOCONF_H"
} }

View File

@@ -1,4 +1,4 @@
CONFIG_VERSION="0.1.5" CONFIG_VERSION="0.1.30"
#FWVER=00010300 #FWVER=00010300
CONFIG_FWVER=0x00010500 CONFIG_FWVER=66305
CONFIG_MCU_FOSC=12000000 CONFIG_MCU_FOSC=12000000

View File

@@ -35,7 +35,7 @@
#define CONFIG_UART_NUM 3 #define CONFIG_UART_NUM 3
// #define CONFIG_CPU_FREQUENCY 90315789 // #define CONFIG_CPU_FREQUENCY 90315789
#define CONFIG_CPU_FREQUENCY 88000000 #define CONFIG_CPU_FREQUENCY 96000000
//#define CONFIG_CPU_FREQUENCY 46000000 //#define CONFIG_CPU_FREQUENCY 46000000
#define CONFIG_UART_PCLKDIV 1 #define CONFIG_UART_PCLKDIV 1
#define CONFIG_UART_TX_BUF_SHIFT 8 #define CONFIG_UART_TX_BUF_SHIFT 8
@@ -43,7 +43,11 @@
#define CONFIG_UART_BAUDRATE 115200 #define CONFIG_UART_BAUDRATE 115200
#define CONFIG_UART_DEADLOCKABLE #define CONFIG_UART_DEADLOCKABLE
#define SSP_CLK_DIVISOR 2 #define SSP_CLK_DIVISOR_FAST 2
#define SSP_CLK_DIVISOR_SLOW 250
#define SSP_CLK_DIVISOR_FPGA_FAST 6
#define SSP_CLK_DIVISOR_FPGA_SLOW 20
#define SNES_RESET_REG LPC_GPIO1 #define SNES_RESET_REG LPC_GPIO1
#define SNES_RESET_BIT 26 #define SNES_RESET_BIT 26
@@ -64,11 +68,7 @@
#define FPGA_MCU_RDY_BIT 9 #define FPGA_MCU_RDY_BIT 9
#define QSORT_MAXELEM 2048 #define QSORT_MAXELEM 2048
#define SORT_STRLEN 256
#define CLTBL_SIZE 100 #define CLTBL_SIZE 100
#define DIR_FILE_MAX 16380
#define SSP_REGS LPC_SSP0 #define SSP_REGS LPC_SSP0
#define SSP_PCLKREG PCLKSEL1 #define SSP_PCLKREG PCLKSEL1
// 1: PCLKSEL0 // 1: PCLKSEL0

View File

@@ -1,9 +1,9 @@
#ifndef CRC_H #ifndef CRC_H
#define CRC_H #define CRC_H
uint8_t crc7update( uint8_t crc, uint8_t data ); uint8_t crc7update(uint8_t crc, uint8_t data);
uint16_t crc_xmodem_update( uint16_t crc, uint8_t data ); uint16_t crc_xmodem_update(uint16_t crc, uint8_t data);
uint16_t crc_xmodem_block( uint16_t crc, const uint8_t *data, uint32_t length ); uint16_t crc_xmodem_block(uint16_t crc, const uint8_t *data, uint32_t length);
// AVR-libc compatibility // AVR-libc compatibility
#define _crc_xmodem_update(crc,data) crc_xmodem_update(crc,data) #define _crc_xmodem_update(crc,data) crc_xmodem_update(crc,data)

View File

@@ -20,8 +20,7 @@
/** /**
* Static table used for the table_driven implementation. * Static table used for the table_driven implementation.
*****************************************************************************/ *****************************************************************************/
static const uint16_t crc_table[256] = static const uint16_t crc_table[256] = {
{
0x0000, 0xc0c1, 0xc181, 0x0140, 0xc301, 0x03c0, 0x0280, 0xc241, 0x0000, 0xc0c1, 0xc181, 0x0140, 0xc301, 0x03c0, 0x0280, 0xc241,
0xc601, 0x06c0, 0x0780, 0xc741, 0x0500, 0xc5c1, 0xc481, 0x0440, 0xc601, 0x06c0, 0x0780, 0xc741, 0x0500, 0xc5c1, 0xc481, 0x0440,
0xcc01, 0x0cc0, 0x0d80, 0xcd41, 0x0f00, 0xcfc1, 0xce81, 0x0e40, 0xcc01, 0x0cc0, 0x0d80, 0xcd41, 0x0f00, 0xcfc1, 0xce81, 0x0e40,
@@ -64,11 +63,11 @@ static const uint16_t crc_table[256] =
* \param data_len Number of bytes in the \a data buffer. * \param data_len Number of bytes in the \a data buffer.
* \return The updated crc value. * \return The updated crc value.
*****************************************************************************/ *****************************************************************************/
uint16_t crc16_update( uint16_t crc, const unsigned char data ) uint16_t crc16_update(uint16_t crc, const unsigned char data)
{ {
unsigned int tbl_idx; unsigned int tbl_idx;
tbl_idx = ( crc ^ data ) & 0xff; tbl_idx = (crc ^ data) & 0xff;
crc = ( crc_table[tbl_idx] ^ ( crc >> 8 ) ) & 0xffff; crc = (crc_table[tbl_idx] ^ (crc >> 8)) & 0xffff;
return crc & 0xffff; return crc & 0xffff;
} }

View File

@@ -37,7 +37,7 @@ extern "C" {
* \param data_len Number of bytes in the \a data buffer. * \param data_len Number of bytes in the \a data buffer.
* \return The updated crc value. * \return The updated crc value.
*****************************************************************************/ *****************************************************************************/
uint16_t crc16_update( uint16_t crc, const unsigned char data ); uint16_t crc16_update(uint16_t crc, const unsigned char data);
#ifdef __cplusplus #ifdef __cplusplus
} /* closing brace for extern "C" */ } /* closing brace for extern "C" */

View File

@@ -22,8 +22,7 @@
/** /**
* Static table used for the table_driven implementation. * Static table used for the table_driven implementation.
*****************************************************************************/ *****************************************************************************/
static const uint32_t crc32_table[256] = static const uint32_t crc32_table[256] = {
{
0x00000000, 0x77073096, 0xee0e612c, 0x990951ba, 0x00000000, 0x77073096, 0xee0e612c, 0x990951ba,
0x076dc419, 0x706af48f, 0xe963a535, 0x9e6495a3, 0x076dc419, 0x706af48f, 0xe963a535, 0x9e6495a3,
0x0edb8832, 0x79dcb8a4, 0xe0d5e91e, 0x97d2d988, 0x0edb8832, 0x79dcb8a4, 0xe0d5e91e, 0x97d2d988,
@@ -98,12 +97,12 @@ static const uint32_t crc32_table[256] =
* \param data_len Number of bytes in the \a data buffer. * \param data_len Number of bytes in the \a data buffer.
* \return The updated crc value. * \return The updated crc value.
*****************************************************************************/ *****************************************************************************/
uint32_t crc32_update( uint32_t crc, const unsigned char data ) uint32_t crc32_update(uint32_t crc, const unsigned char data)
{ {
unsigned int tbl_idx; unsigned int tbl_idx;
tbl_idx = ( crc ^ data ) & 0xff; tbl_idx = (crc ^ data) & 0xff;
crc = ( crc32_table[tbl_idx] ^ ( crc >> 8 ) ) & 0xffffffff; crc = (crc32_table[tbl_idx] ^ (crc >> 8)) & 0xffffffff;
return crc & 0xffffffff; return crc & 0xffffffff;
} }

View File

@@ -34,7 +34,7 @@ extern "C" {
* *
* \return The initial crc value. * \return The initial crc value.
*****************************************************************************/ *****************************************************************************/
static inline uint32_t crc_init( void ) static inline uint32_t crc_init(void)
{ {
return 0xffffffff; return 0xffffffff;
} }
@@ -47,7 +47,7 @@ static inline uint32_t crc_init( void )
* \param data_len Number of bytes in the \a data buffer. * \param data_len Number of bytes in the \a data buffer.
* \return The updated crc value. * \return The updated crc value.
*****************************************************************************/ *****************************************************************************/
uint32_t crc32_update( uint32_t crc, const unsigned char data ); uint32_t crc32_update(uint32_t crc, const unsigned char data);
/** /**
* Calculate the final crc value. * Calculate the final crc value.
@@ -55,7 +55,7 @@ uint32_t crc32_update( uint32_t crc, const unsigned char data );
* \param crc The current crc value. * \param crc The current crc value.
* \return The final crc value. * \return The final crc value.
*****************************************************************************/ *****************************************************************************/
static inline uint32_t crc32_finalize( uint32_t crc ) static inline uint32_t crc32_finalize(uint32_t crc)
{ {
return crc ^ 0xffffffff; return crc ^ 0xffffffff;
} }

View File

@@ -16,8 +16,7 @@
typedef BYTE DSTATUS; typedef BYTE DSTATUS;
/* Results of Disk Functions */ /* Results of Disk Functions */
typedef enum typedef enum {
{
RES_OK = 0, /* 0: Successful */ RES_OK = 0, /* 0: Successful */
RES_ERROR, /* 1: R/W Error */ RES_ERROR, /* 1: R/W Error */
RES_WRPRT, /* 2: Write Protected */ RES_WRPRT, /* 2: Write Protected */
@@ -36,8 +35,7 @@ typedef enum
* This is the struct returned in the data buffer when disk_getinfo * This is the struct returned in the data buffer when disk_getinfo
* is called with page=0. * is called with page=0.
*/ */
typedef struct typedef struct {
{
uint8_t validbytes; uint8_t validbytes;
uint8_t maxpage; uint8_t maxpage;
uint8_t disktype; uint8_t disktype;
@@ -50,16 +48,16 @@ typedef struct
/*---------------------------------------*/ /*---------------------------------------*/
/* Prototypes for disk control functions */ /* Prototypes for disk control functions */
int assign_drives ( int, int ); int assign_drives (int, int);
DSTATUS disk_initialize ( BYTE ); DSTATUS disk_initialize (BYTE);
DSTATUS disk_status ( BYTE ); DSTATUS disk_status (BYTE);
DRESULT disk_read ( BYTE, BYTE *, DWORD, BYTE ); DRESULT disk_read (BYTE, BYTE*, DWORD, BYTE);
#if _READONLY == 0 #if _READONLY == 0
DRESULT disk_write ( BYTE, const BYTE *, DWORD, BYTE ); DRESULT disk_write (BYTE, const BYTE*, DWORD, BYTE);
#endif #endif
DRESULT disk_ioctl ( BYTE, BYTE, void * ); #define disk_ioctl(a,b,c) RES_OK
void disk_init( void ); void disk_init(void);
/* Will be set to DISK_ERROR if any access on the card fails */ /* Will be set to DISK_ERROR if any access on the card fails */
enum diskstates { DISK_CHANGED = 0, DISK_REMOVED, DISK_OK, DISK_ERROR }; enum diskstates { DISK_CHANGED = 0, DISK_REMOVED, DISK_OK, DISK_ERROR };

View File

@@ -1,25 +1,20 @@
#include <arm/NXP/LPC17xx/LPC17xx.h> #include <arm/NXP/LPC17xx/LPC17xx.h>
#include "uart.h" #include "uart.h"
void HardFault_Handler( void ) void HardFault_Handler(void) {
{ printf("HFSR: %lx\n", SCB->HFSR);
printf( "HFSR: %lx\n", SCB->HFSR ); while (1) ;
while ( 1 ) ;
} }
void MemManage_Handler( void ) void MemManage_Handler(void) {
{ printf("MemManage - CFSR: %lx; MMFAR: %lx\n", SCB->CFSR, SCB->MMFAR);
printf( "MemManage - CFSR: %lx; MMFAR: %lx\n", SCB->CFSR, SCB->MMFAR );
} }
void BusFault_Handler( void ) void BusFault_Handler(void) {
{ printf("BusFault - CFSR: %lx; BFAR: %lx\n", SCB->CFSR, SCB->BFAR);
printf( "BusFault - CFSR: %lx; BFAR: %lx\n", SCB->CFSR, SCB->BFAR );
} }
void UsageFault_Handler( void ) void UsageFault_Handler(void) {
{ printf("UsageFault - CFSR: %lx; BFAR: %lx\n", SCB->CFSR, SCB->BFAR);
printf( "UsageFault - CFSR: %lx; BFAR: %lx\n", SCB->CFSR, SCB->BFAR );
} }

4458
src/ff.c

File diff suppressed because it is too large Load Diff

109
src/ff.h
View File

@@ -229,8 +229,7 @@ extern "C" {
#if _MULTI_PARTITION /* Multiple partition configuration */ #if _MULTI_PARTITION /* Multiple partition configuration */
#define LD2PD(vol) (VolToPart[vol].pd) /* Get physical drive# */ #define LD2PD(vol) (VolToPart[vol].pd) /* Get physical drive# */
#define LD2PT(vol) (VolToPart[vol].pt) /* Get partition# */ #define LD2PT(vol) (VolToPart[vol].pt) /* Get partition# */
typedef struct typedef struct {
{
BYTE pd; /* Physical drive# */ BYTE pd; /* Physical drive# */
BYTE pt; /* Partition # (0-3) */ BYTE pt; /* Partition # (0-3) */
} PARTITION; } PARTITION;
@@ -269,8 +268,7 @@ typedef char TCHAR;
/* File system object structure (FATFS) */ /* File system object structure (FATFS) */
typedef struct typedef struct {
{
BYTE fs_type; /* FAT sub-type (0:Not mounted) */ BYTE fs_type; /* FAT sub-type (0:Not mounted) */
BYTE drv; /* Physical drive number */ BYTE drv; /* Physical drive number */
BYTE csize; /* Sectors per cluster (1,2,4...128) */ BYTE csize; /* Sectors per cluster (1,2,4...128) */
@@ -306,9 +304,8 @@ typedef struct
/* File object structure (FIL) */ /* File object structure (FIL) */
typedef struct typedef struct {
{ FATFS* fs; /* Pointer to the owner file system object */
FATFS *fs; /* Pointer to the owner file system object */
WORD id; /* Owner file system mount ID */ WORD id; /* Owner file system mount ID */
BYTE flag; /* File status flags */ BYTE flag; /* File status flags */
BYTE pad1; BYTE pad1;
@@ -319,10 +316,10 @@ typedef struct
DWORD dsect; /* Current data sector */ DWORD dsect; /* Current data sector */
#if !_FS_READONLY #if !_FS_READONLY
DWORD dir_sect; /* Sector containing the directory entry */ DWORD dir_sect; /* Sector containing the directory entry */
BYTE *dir_ptr; /* Ponter to the directory entry in the window */ BYTE* dir_ptr; /* Ponter to the directory entry in the window */
#endif #endif
#if _USE_FASTSEEK #if _USE_FASTSEEK
DWORD *cltbl; /* Pointer to the cluster link map table (null on file open) */ DWORD* cltbl; /* Pointer to the cluster link map table (null on file open) */
#endif #endif
#if _FS_SHARE #if _FS_SHARE
UINT lockid; /* File lock ID (index of file semaphore table) */ UINT lockid; /* File lock ID (index of file semaphore table) */
@@ -336,18 +333,17 @@ typedef struct
/* Directory object structure (DIR) */ /* Directory object structure (DIR) */
typedef struct typedef struct {
{ FATFS* fs; /* Pointer to the owner file system object */
FATFS *fs; /* Pointer to the owner file system object */
WORD id; /* Owner file system mount ID */ WORD id; /* Owner file system mount ID */
WORD index; /* Current read/write index number */ WORD index; /* Current read/write index number */
DWORD sclust; /* Table start cluster (0:Root dir) */ DWORD sclust; /* Table start cluster (0:Root dir) */
DWORD clust; /* Current cluster */ DWORD clust; /* Current cluster */
DWORD sect; /* Current sector */ DWORD sect; /* Current sector */
BYTE *dir; /* Pointer to the current SFN entry in the win[] */ BYTE* dir; /* Pointer to the current SFN entry in the win[] */
BYTE *fn; /* Pointer to the SFN (in/out) {file[8],ext[3],status[1]} */ BYTE* fn; /* Pointer to the SFN (in/out) {file[8],ext[3],status[1]} */
#if _USE_LFN #if _USE_LFN
WCHAR *lfn; /* Pointer to the LFN working buffer */ WCHAR* lfn; /* Pointer to the LFN working buffer */
WORD lfn_idx; /* Last matched LFN index number (0xFFFF:No LFN) */ WORD lfn_idx; /* Last matched LFN index number (0xFFFF:No LFN) */
#endif #endif
} DIR; } DIR;
@@ -356,8 +352,7 @@ typedef struct
/* File status structure (FILINFO) */ /* File status structure (FILINFO) */
typedef struct typedef struct {
{
DWORD fsize; /* File size */ DWORD fsize; /* File size */
WORD fdate; /* Last modified date */ WORD fdate; /* Last modified date */
WORD ftime; /* Last modified time */ WORD ftime; /* Last modified time */
@@ -365,7 +360,7 @@ typedef struct
TCHAR fname[13]; /* Short file name (8.3 format) */ TCHAR fname[13]; /* Short file name (8.3 format) */
DWORD clust; /* start cluster */ DWORD clust; /* start cluster */
#if _USE_LFN #if _USE_LFN
TCHAR *lfname; /* Pointer to the LFN buffer */ TCHAR* lfname; /* Pointer to the LFN buffer */
UINT lfsize; /* Size of LFN buffer in TCHAR */ UINT lfsize; /* Size of LFN buffer in TCHAR */
#endif #endif
} FILINFO; } FILINFO;
@@ -374,8 +369,7 @@ typedef struct
/* File function return code (FRESULT) */ /* File function return code (FRESULT) */
typedef enum typedef enum {
{
FR_OK = 0, /* (0) Succeeded */ FR_OK = 0, /* (0) Succeeded */
FR_DISK_ERR, /* (1) A hard error occured in the low level disk I/O layer */ FR_DISK_ERR, /* (1) A hard error occured in the low level disk I/O layer */
FR_INT_ERR, /* (2) Assertion failed */ FR_INT_ERR, /* (2) Assertion failed */
@@ -403,51 +397,50 @@ typedef enum
/* FatFs module application interface */ /* FatFs module application interface */
/* Low Level functions */ /* Low Level functions */
FRESULT l_openfilebycluster( FATFS *fs, FIL *fp, const TCHAR *path, DWORD clust, FRESULT l_openfilebycluster(FATFS *fs, FIL *fp, const TCHAR *path, DWORD clust, DWORD fsize); /* Open a file by its start cluster using supplied file size */
DWORD fsize ); /* Open a file by its start cluster using supplied file size */ FRESULT l_opendirbycluster (FATFS *fs, DIR *dj, const TCHAR *path, DWORD clust);
FRESULT l_opendirbycluster ( FATFS *fs, DIR *dj, const TCHAR *path, DWORD clust );
/* application level functions */ /* application level functions */
FRESULT f_mount ( BYTE, FATFS * ); /* Mount/Unmount a logical drive */ FRESULT f_mount (BYTE, FATFS*); /* Mount/Unmount a logical drive */
FRESULT f_open ( FIL *, const TCHAR *, BYTE ); /* Open or create a file */ FRESULT f_open (FIL*, const TCHAR*, BYTE); /* Open or create a file */
FRESULT f_read ( FIL *, void *, UINT, UINT * ); /* Read data from a file */ FRESULT f_read (FIL*, void*, UINT, UINT*); /* Read data from a file */
FRESULT f_lseek ( FIL *, DWORD ); /* Move file pointer of a file object */ FRESULT f_lseek (FIL*, DWORD); /* Move file pointer of a file object */
FRESULT f_close ( FIL * ); /* Close an open file object */ FRESULT f_close (FIL*); /* Close an open file object */
FRESULT f_opendir ( DIR *, const TCHAR * ); /* Open an existing directory */ FRESULT f_opendir (DIR*, const TCHAR*); /* Open an existing directory */
FRESULT f_readdir ( DIR *, FILINFO * ); /* Read a directory item */ FRESULT f_readdir (DIR*, FILINFO*); /* Read a directory item */
FRESULT f_stat ( const TCHAR *, FILINFO * ); /* Get file status */ FRESULT f_stat (const TCHAR*, FILINFO*); /* Get file status */
#if !_FS_READONLY #if !_FS_READONLY
FRESULT f_write ( FIL *, const void *, UINT, UINT * ); /* Write data to a file */ FRESULT f_write (FIL*, const void*, UINT, UINT*); /* Write data to a file */
FRESULT f_getfree ( const TCHAR *, DWORD *, FATFS ** ); /* Get number of free clusters on the drive */ FRESULT f_getfree (const TCHAR*, DWORD*, FATFS**); /* Get number of free clusters on the drive */
FRESULT f_truncate ( FIL * ); /* Truncate file */ FRESULT f_truncate (FIL*); /* Truncate file */
FRESULT f_sync ( FIL * ); /* Flush cached data of a writing file */ FRESULT f_sync (FIL*); /* Flush cached data of a writing file */
FRESULT f_unlink ( const TCHAR * ); /* Delete an existing file or directory */ FRESULT f_unlink (const TCHAR*); /* Delete an existing file or directory */
FRESULT f_mkdir ( const TCHAR * ); /* Create a new directory */ FRESULT f_mkdir (const TCHAR*); /* Create a new directory */
FRESULT f_chmod ( const TCHAR *, BYTE, BYTE ); /* Change attriburte of the file/dir */ FRESULT f_chmod (const TCHAR*, BYTE, BYTE); /* Change attriburte of the file/dir */
FRESULT f_utime ( const TCHAR *, const FILINFO * ); /* Change timestamp of the file/dir */ FRESULT f_utime (const TCHAR*, const FILINFO*); /* Change timestamp of the file/dir */
FRESULT f_rename ( const TCHAR *, const TCHAR * ); /* Rename/Move a file or directory */ FRESULT f_rename (const TCHAR*, const TCHAR*); /* Rename/Move a file or directory */
#endif #endif
#if _USE_FORWARD #if _USE_FORWARD
FRESULT f_forward ( FIL *, UINT( * )( const BYTE *, UINT ), UINT, UINT * ); /* Forward data to the stream */ FRESULT f_forward (FIL*, UINT(*)(const BYTE*,UINT), UINT, UINT*); /* Forward data to the stream */
#endif #endif
#if _USE_MKFS #if _USE_MKFS
FRESULT f_mkfs ( BYTE, BYTE, UINT ); /* Create a file system on the drive */ FRESULT f_mkfs (BYTE, BYTE, UINT); /* Create a file system on the drive */
#endif #endif
#if _FS_RPATH #if _FS_RPATH
FRESULT f_chdrive ( BYTE ); /* Change current drive */ FRESULT f_chdrive (BYTE); /* Change current drive */
FRESULT f_chdir ( const TCHAR * ); /* Change current directory */ FRESULT f_chdir (const TCHAR*); /* Change current directory */
FRESULT f_getcwd ( TCHAR *, UINT ); /* Get current directory */ FRESULT f_getcwd (TCHAR*, UINT); /* Get current directory */
#endif #endif
#if _USE_STRFUNC #if _USE_STRFUNC
int f_putc ( TCHAR, FIL * ); /* Put a character to the file */ int f_putc (TCHAR, FIL*); /* Put a character to the file */
int f_puts ( const TCHAR *, FIL * ); /* Put a string to the file */ int f_puts (const TCHAR*, FIL*); /* Put a string to the file */
int f_printf ( FIL *, const TCHAR *, ... ); /* Put a formatted string to the file */ int f_printf (FIL*, const TCHAR*, ...); /* Put a formatted string to the file */
TCHAR *f_gets ( TCHAR *, int, FIL * ); /* Get a string from the file */ TCHAR* f_gets (TCHAR*, int, FIL*); /* Get a string from the file */
#ifndef EOF #ifndef EOF
#define EOF (-1) #define EOF (-1)
#endif #endif
@@ -465,25 +458,25 @@ TCHAR *f_gets ( TCHAR *, int, FIL * ); /* Get a string from the fil
/* RTC function */ /* RTC function */
#if !_FS_READONLY #if !_FS_READONLY
DWORD get_fattime ( void ); DWORD get_fattime (void);
#endif #endif
/* Unicode support functions */ /* Unicode support functions */
#if _USE_LFN /* Unicode - OEM code conversion */ #if _USE_LFN /* Unicode - OEM code conversion */
WCHAR ff_convert ( WCHAR, UINT ); /* OEM-Unicode bidirectional conversion */ WCHAR ff_convert (WCHAR, UINT); /* OEM-Unicode bidirectional conversion */
WCHAR ff_wtoupper ( WCHAR ); /* Unicode upper-case conversion */ WCHAR ff_wtoupper (WCHAR); /* Unicode upper-case conversion */
#if _USE_LFN == 3 /* Memory functions */ #if _USE_LFN == 3 /* Memory functions */
void *ff_memalloc ( UINT ); /* Allocate memory block */ void* ff_memalloc (UINT); /* Allocate memory block */
void ff_memfree ( void * ); /* Free memory block */ void ff_memfree (void*); /* Free memory block */
#endif #endif
#endif #endif
/* Sync functions */ /* Sync functions */
#if _FS_REENTRANT #if _FS_REENTRANT
int ff_cre_syncobj ( BYTE, _SYNC_t * ); /* Create a sync object */ int ff_cre_syncobj (BYTE, _SYNC_t*);/* Create a sync object */
int ff_del_syncobj ( _SYNC_t ); /* Delete a sync object */ int ff_del_syncobj (_SYNC_t); /* Delete a sync object */
int ff_req_grant ( _SYNC_t ); /* Lock sync object */ int ff_req_grant (_SYNC_t); /* Lock sync object */
void ff_rel_grant ( _SYNC_t ); /* Unlock sync object */ void ff_rel_grant (_SYNC_t); /* Unlock sync object */
#endif #endif

View File

@@ -37,113 +37,81 @@ WCHAR ff_convert(WCHAR w, UINT dir) {
int newcard; int newcard;
void file_init() void file_init() {
{ file_res=f_mount(0, &fatfs);
file_res = f_mount( 0, &fatfs );
newcard = 0; newcard = 0;
} }
void file_reinit( void ) void file_reinit(void) {
{
disk_init(); disk_init();
file_init(); file_init();
} }
FRESULT dir_open_by_filinfo( DIR *dir, FILINFO *fno ) FRESULT dir_open_by_filinfo(DIR* dir, FILINFO* fno) {
{ return l_opendirbycluster(&fatfs, dir, (TCHAR*)"", fno->clust);
return l_opendirbycluster( &fatfs, dir, ( TCHAR * )"", fno->clust );
} }
void file_open_by_filinfo( FILINFO *fno ) void file_open_by_filinfo(FILINFO* fno) {
{ file_res = l_openfilebycluster(&fatfs, &file_handle, (TCHAR*)"", fno->clust, fno->fsize);
file_res = l_openfilebycluster( &fatfs, &file_handle, ( TCHAR * )"", fno->clust, fno->fsize );
} }
void file_open( const uint8_t *filename, BYTE flags ) void file_open(const uint8_t* filename, BYTE flags) {
{ if (disk_state == DISK_CHANGED) {
if ( disk_state == DISK_CHANGED )
{
file_reinit(); file_reinit();
newcard = 1; newcard = 1;
} }
file_res = f_open(&file_handle, (TCHAR*)filename, flags);
file_res = f_open( &file_handle, ( TCHAR * )filename, flags ); file_block_off = sizeof(file_buf);
file_block_off = sizeof( file_buf ); file_block_max = sizeof(file_buf);
file_block_max = sizeof( file_buf );
file_status = file_res ? FILE_ERR : FILE_OK; file_status = file_res ? FILE_ERR : FILE_OK;
} }
void file_close() void file_close() {
{ file_res = f_close(&file_handle);
file_res = f_close( &file_handle );
} }
void file_seek( uint32_t offset ) void file_seek(uint32_t offset) {
{ file_res = f_lseek(&file_handle, (DWORD)offset);
file_res = f_lseek( &file_handle, ( DWORD )offset );
} }
UINT file_read() UINT file_read() {
{
UINT bytes_read; UINT bytes_read;
file_res = f_read( &file_handle, file_buf, sizeof( file_buf ), &bytes_read ); file_res = f_read(&file_handle, file_buf, sizeof(file_buf), &bytes_read);
return bytes_read; return bytes_read;
} }
UINT file_write() UINT file_write() {
{
UINT bytes_written; UINT bytes_written;
file_res = f_write( &file_handle, file_buf, sizeof( file_buf ), &bytes_written ); file_res = f_write(&file_handle, file_buf, sizeof(file_buf), &bytes_written);
if(bytes_written < sizeof(file_buf)) {
if ( bytes_written < sizeof( file_buf ) ) printf("wrote less than expected - card full?\n");
{
printf( "wrote less than expected - card full?\n" );
} }
return bytes_written; return bytes_written;
} }
UINT file_readblock( void *buf, uint32_t addr, uint16_t size ) UINT file_readblock(void* buf, uint32_t addr, uint16_t size) {
{
UINT bytes_read; UINT bytes_read;
file_res = f_lseek( &file_handle, addr ); file_res = f_lseek(&file_handle, addr);
if(file_handle.fptr != addr) {
if ( file_handle.fptr != addr )
{
return 0; return 0;
} }
file_res = f_read(&file_handle, buf, size, &bytes_read);
file_res = f_read( &file_handle, buf, size, &bytes_read );
return bytes_read; return bytes_read;
} }
UINT file_writeblock( void *buf, uint32_t addr, uint16_t size ) UINT file_writeblock(void* buf, uint32_t addr, uint16_t size) {
{
UINT bytes_written; UINT bytes_written;
file_res = f_lseek( &file_handle, addr ); file_res = f_lseek(&file_handle, addr);
if(file_res) return 0;
if ( file_res ) file_res = f_write(&file_handle, buf, size, &bytes_written);
{
return 0;
}
file_res = f_write( &file_handle, buf, size, &bytes_written );
return bytes_written; return bytes_written;
} }
uint8_t file_getc() uint8_t file_getc() {
{ if(file_block_off == file_block_max) {
if ( file_block_off == file_block_max )
{
file_block_max = file_read(); file_block_max = file_read();
if(file_block_max == 0) file_status = FILE_EOF;
if ( file_block_max == 0 )
{
file_status = FILE_EOF;
}
file_block_off = 0; file_block_off = 0;
} }
return file_buf[file_block_off++]; return file_buf[file_block_off++];
} }

View File

@@ -29,7 +29,7 @@
#include <arm/NXP/LPC17xx/LPC17xx.h> #include <arm/NXP/LPC17xx/LPC17xx.h>
#include "ff.h" #include "ff.h"
enum filestates { FILE_OK = 0, FILE_ERR, FILE_EOF }; enum filestates { FILE_OK=0, FILE_ERR, FILE_EOF };
BYTE file_buf[512]; BYTE file_buf[512];
FATFS fatfs; FATFS fatfs;
@@ -39,16 +39,16 @@ uint8_t file_lfn[258];
uint16_t file_block_off, file_block_max; uint16_t file_block_off, file_block_max;
enum filestates file_status; enum filestates file_status;
void file_init( void ); void file_init(void);
void file_open( const uint8_t *filename, BYTE flags ); void file_open(const uint8_t* filename, BYTE flags);
FRESULT dir_open_by_filinfo( DIR *dir, FILINFO *fno_param ); FRESULT dir_open_by_filinfo(DIR* dir, FILINFO* fno_param);
void file_open_by_filinfo( FILINFO *fno ); void file_open_by_filinfo(FILINFO* fno);
void file_close( void ); void file_close(void);
void file_seek( uint32_t offset ); void file_seek(uint32_t offset);
UINT file_read( void ); UINT file_read(void);
UINT file_write( void ); UINT file_write(void);
UINT file_readblock( void *buf, uint32_t addr, uint16_t size ); UINT file_readblock(void* buf, uint32_t addr, uint16_t size);
UINT file_writeblock( void *buf, uint32_t addr, uint16_t size ); UINT file_writeblock(void* buf, uint32_t addr, uint16_t size);
uint8_t file_getc( void ); uint8_t file_getc(void);
#endif #endif

View File

@@ -31,47 +31,36 @@
#include "ff.h" #include "ff.h"
#include "smc.h" #include "smc.h"
#include "fileops.h" #include "fileops.h"
#include "crc.h" #include "crc32.h"
#include "memory.h" #include "memory.h"
#include "led.h" #include "led.h"
#include "sort.h" #include "sort.h"
uint16_t scan_flat( const char *path ) uint16_t scan_flat(const char* path) {
{
DIR dir; DIR dir;
FRESULT res; FRESULT res;
FILINFO fno; FILINFO fno;
fno.lfname = NULL; fno.lfname = NULL;
res = f_opendir( &dir, ( TCHAR * )path ); res = f_opendir(&dir, (TCHAR*)path);
uint16_t numentries = 0; uint16_t numentries = 0;
if (res == FR_OK) {
if ( res == FR_OK ) for (;;) {
{ res = f_readdir(&dir, &fno);
for ( ;; ) if(res != FR_OK || fno.fname[0] == 0)break;
{
res = f_readdir( &dir, &fno );
if ( res != FR_OK || fno.fname[0] == 0 )
{
break;
}
numentries++; numentries++;
} }
} }
return numentries; return numentries;
} }
uint32_t scan_dir( char *path, FILINFO *fno_param, char mkdb, uint32_t this_dir_tgt ) uint32_t scan_dir(char* path, FILINFO* fno_param, char mkdb, uint32_t this_dir_tgt) {
{
DIR dir; DIR dir;
FILINFO fno; FILINFO fno;
FRESULT res; FRESULT res;
uint8_t len; uint8_t len;
TCHAR *fn; TCHAR* fn;
static unsigned char depth = 0; static unsigned char depth = 0;
static uint32_t crc, fncrc; static uint32_t crc;
static uint32_t db_tgt; static uint32_t db_tgt;
static uint32_t next_subdir_tgt; static uint32_t next_subdir_tgt;
static uint32_t parent_tgt; static uint32_t parent_tgt;
@@ -80,7 +69,6 @@ uint32_t scan_dir( char *path, FILINFO *fno_param, char mkdb, uint32_t this_dir_
static uint16_t num_files_total = 0; static uint16_t num_files_total = 0;
static uint16_t num_dirs_total = 0; static uint16_t num_dirs_total = 0;
uint32_t dir_tgt; uint32_t dir_tgt;
uint32_t switched_dir_tgt = 0;
uint16_t numentries; uint16_t numentries;
uint32_t dirsize; uint32_t dirsize;
uint8_t pass = 0; uint8_t pass = 0;
@@ -88,376 +76,246 @@ uint32_t scan_dir( char *path, FILINFO *fno_param, char mkdb, uint32_t this_dir_
char *size_units[3] = {" ", "k", "M"}; char *size_units[3] = {" ", "k", "M"};
uint32_t entry_fsize; uint32_t entry_fsize;
uint8_t entry_unit_idx; uint8_t entry_unit_idx;
uint16_t entrycnt;
dir_tgt = this_dir_tgt; dir_tgt = this_dir_tgt;
if(depth==0) {
if ( depth == 0 )
{
crc = 0; crc = 0;
db_tgt = SRAM_DB_ADDR + 0x10; db_tgt = SRAM_DB_ADDR+0x10;
dir_tgt = SRAM_DIR_ADDR; dir_tgt = SRAM_DIR_ADDR;
next_subdir_tgt = SRAM_DIR_ADDR; next_subdir_tgt = SRAM_DIR_ADDR;
this_dir_tgt = SRAM_DIR_ADDR; this_dir_tgt = SRAM_DIR_ADDR;
parent_tgt = 0; parent_tgt = 0;
printf( "root dir @%lx\n", dir_tgt ); printf("root dir @%lx\n", dir_tgt);
} }
fno.lfsize = 255; fno.lfsize = 255;
fno.lfname = ( TCHAR * )file_lfn; fno.lfname = (TCHAR*)file_lfn;
numentries = 0; numentries=0;
for(pass = 0; pass < 2; pass++) {
for ( pass = 0; pass < ( mkdb ? 2 : 1 ); pass++ ) if(pass) {
{ num_dirs_total++;
if ( pass ) dirsize = 4*(numentries);
{
dirsize = 4 * ( numentries );
if ( ( ( next_subdir_tgt + dirsize + 8 ) & 0xff0000 ) > ( next_subdir_tgt & 0xff0000 ) )
{
printf( "switchdir! old=%lX ", next_subdir_tgt + dirsize + 4 );
next_subdir_tgt &= 0xffff0000;
next_subdir_tgt += 0x00010004;
printf( "new=%lx\n", next_subdir_tgt );
dir_tgt &= 0xffff0000;
dir_tgt += 0x00010004;
}
switched_dir_tgt = dir_tgt;
next_subdir_tgt += dirsize + 4; next_subdir_tgt += dirsize + 4;
if(parent_tgt) next_subdir_tgt += 4;
if ( parent_tgt ) if(next_subdir_tgt > dir_end) {
{
next_subdir_tgt += 4;
}
if ( next_subdir_tgt > dir_end )
{
dir_end = next_subdir_tgt; dir_end = next_subdir_tgt;
} }
DBG_FS printf("path=%s depth=%d ptr=%lx entries=%d parent=%lx next subdir @%lx\n", path, depth, db_tgt, numentries, parent_tgt, next_subdir_tgt);
DBG_FS printf( "path=%s depth=%d ptr=%lx entries=%d parent=%lx next subdir @%lx\n", path, depth, db_tgt, numentries, if(mkdb) {
parent_tgt, next_subdir_tgt ); // printf("d=%d Saving %lx to Address %lx [end]\n", depth, 0L, next_subdir_tgt - 4);
sram_writelong(0L, next_subdir_tgt - 4);
if ( mkdb )
{
num_dirs_total++;
// printf("d=%d Saving %lx to Address %lx [end]\n", depth, 0L, next_subdir_tgt - 4);
sram_writelong( 0L, next_subdir_tgt - 4 );
} }
} }
if(fno_param) {
if ( fno_param ) res = dir_open_by_filinfo(&dir, fno_param);
{ } else {
res = dir_open_by_filinfo( &dir, fno_param ); res = f_opendir(&dir, path);
} }
else if (res == FR_OK) {
{ if(pass && parent_tgt && mkdb) {
res = f_opendir( &dir, path );
}
if ( res == FR_OK )
{
if ( pass && parent_tgt && mkdb )
{
/* write backlink to parent dir /* write backlink to parent dir
switch to next bank if record does not fit in current bank */ switch to next bank if record does not fit in current bank */
if ( ( db_tgt & 0xffff ) > ( ( 0x10000 - ( sizeof( next_subdir_tgt ) + sizeof( len ) + 4 ) ) & 0xffff ) ) if((db_tgt&0xffff) > ((0x10000-(sizeof(next_subdir_tgt)+sizeof(len)+4))&0xffff)) {
{ printf("switch! old=%lx ", db_tgt);
printf( "switch! old=%lx ", db_tgt );
db_tgt &= 0xffff0000; db_tgt &= 0xffff0000;
db_tgt += 0x00010000; db_tgt += 0x00010000;
printf( "new=%lx\n", db_tgt ); printf("new=%lx\n", db_tgt);
} }
// printf("writing link to parent, %lx to address %lx [../]\n", parent_tgt-SRAM_MENU_ADDR, db_tgt);
// printf("writing link to parent, %lx to address %lx [../]\n", parent_tgt-SRAM_MENU_ADDR, db_tgt); sram_writelong((parent_tgt-SRAM_MENU_ADDR), db_tgt);
sram_writelong( ( parent_tgt - SRAM_MENU_ADDR ), db_tgt ); sram_writebyte(0, db_tgt+sizeof(next_subdir_tgt));
sram_writebyte( 0, db_tgt + sizeof( next_subdir_tgt ) ); sram_writeblock("../\0", db_tgt+sizeof(next_subdir_tgt)+sizeof(len), 4);
sram_writeblock( "../\0", db_tgt + sizeof( next_subdir_tgt ) + sizeof( len ), 4 ); sram_writelong((db_tgt-SRAM_MENU_ADDR)|((uint32_t)0x81<<24), dir_tgt);
sram_writelong( ( db_tgt - SRAM_MENU_ADDR ) | ( ( uint32_t )0x81 << 24 ), dir_tgt ); db_tgt += sizeof(next_subdir_tgt)+sizeof(len)+4;
db_tgt += sizeof( next_subdir_tgt ) + sizeof( len ) + 4;
dir_tgt += 4; dir_tgt += 4;
} }
len = strlen((char*)path);
len = strlen( ( char * )path ); for (;;) {
// toggle_read_led();
/* scan at most DIR_FILE_MAX entries per directory */ res = f_readdir(&dir, &fno);
for ( entrycnt = 0; entrycnt < DIR_FILE_MAX; entrycnt++ ) if (res != FR_OK || fno.fname[0] == 0) {
{ if(pass) {
// toggle_read_led(); if(!numentries) was_empty=1;
res = f_readdir( &dir, &fno );
if ( res != FR_OK || fno.fname[0] == 0 )
{
if ( pass )
{
/* if(!numentries) was_empty=1;*/
} }
break; break;
} }
fn = *fno.lfname ? fno.lfname : fno.fname; fn = *fno.lfname ? fno.lfname : fno.fname;
if ((*fn == '.') || !(memcmp(fn, SYS_DIR_NAME, sizeof(SYS_DIR_NAME)))) continue;
if ( ( *fn == '.' ) || !( strncasecmp( fn, SYS_DIR_NAME, sizeof( SYS_DIR_NAME ) ) ) ) if (fno.fattrib & AM_DIR) {
{
continue;
}
if ( fno.fattrib & AM_DIR )
{
depth++; depth++;
if(depth < FS_MAX_DEPTH) {
if ( depth < FS_MAX_DEPTH )
{
numentries++; numentries++;
if(pass) {
if ( pass && mkdb ) path[len]='/';
{ strncpy(path+len+1, (char*)fn, sizeof(fs_path)-len);
path[len] = '/'; if(mkdb) {
strncpy( path + len + 1, ( char * )fn, sizeof( fs_path ) - len ); uint16_t pathlen = strlen(path);
uint16_t pathlen = 0; // printf("d=%d Saving %lx to Address %lx [dir]\n", depth, db_tgt, dir_tgt);
uint32_t old_db_tgt = 0;
if ( mkdb )
{
pathlen = strlen( path );
DBG_FS printf( "d=%d Saving %lx to Address %lx [dir]\n", depth, db_tgt, dir_tgt );
/* save element: /* save element:
- path name - path name
- pointer to sub dir structure */ - pointer to sub dir structure */
if ( ( db_tgt & 0xffff ) > ( ( 0x10000 - ( sizeof( next_subdir_tgt ) + sizeof( len ) + pathlen + 2 ) ) & 0xffff ) ) if((db_tgt&0xffff) > ((0x10000-(sizeof(next_subdir_tgt) + sizeof(len) + pathlen + 2))&0xffff)) {
{ printf("switch! old=%lx ", db_tgt);
printf( "switch! old=%lx ", db_tgt );
db_tgt &= 0xffff0000; db_tgt &= 0xffff0000;
db_tgt += 0x00010000; db_tgt += 0x00010000;
printf( "new=%lx\n", db_tgt ); printf("new=%lx\n", db_tgt);
} }
// printf(" Saving dir descriptor to %lx tgt=%lx, path=%s\n", db_tgt, next_subdir_tgt, path);
/* write element pointer to current dir structure */ /* write element pointer to current dir structure */
sram_writelong( ( db_tgt - SRAM_MENU_ADDR ) | ( ( uint32_t )0x80 << 24 ), dir_tgt ); sram_writelong((db_tgt-SRAM_MENU_ADDR)|((uint32_t)0x80<<24), dir_tgt);
/* save element: /* save element:
- path name - path name
- pointer to sub dir structure - pointer to sub dir structure */
moved below */ sram_writelong((next_subdir_tgt-SRAM_MENU_ADDR), db_tgt);
old_db_tgt = db_tgt; sram_writebyte(len+1, db_tgt+sizeof(next_subdir_tgt));
db_tgt += sizeof( next_subdir_tgt ) + sizeof( len ) + pathlen + 2; sram_writeblock(path, db_tgt+sizeof(next_subdir_tgt)+sizeof(len), pathlen);
sram_writeblock("/\0", db_tgt + sizeof(next_subdir_tgt) + sizeof(len) + pathlen, 2);
db_tgt += sizeof(next_subdir_tgt) + sizeof(len) + pathlen + 2;
} }
parent_tgt = this_dir_tgt; parent_tgt = this_dir_tgt;
/* scan subdir before writing current dir element to account for bank switches */ scan_dir(path, &fno, mkdb, next_subdir_tgt);
uint32_t corrected_subdir_tgt = scan_dir( path, &fno, mkdb, next_subdir_tgt );
if ( mkdb )
{
DBG_FS printf( " Saving dir descriptor to %lx tgt=%lx, path=%s\n", old_db_tgt, corrected_subdir_tgt, path );
sram_writelong( ( corrected_subdir_tgt - SRAM_MENU_ADDR ), old_db_tgt );
sram_writebyte( len + 1, old_db_tgt + sizeof( next_subdir_tgt ) );
sram_writeblock( path, old_db_tgt + sizeof( next_subdir_tgt ) + sizeof( len ), pathlen );
sram_writeblock( "/\0", old_db_tgt + sizeof( next_subdir_tgt ) + sizeof( len ) + pathlen, 2 );
}
dir_tgt += 4; dir_tgt += 4;
/* was_empty = 0;*/ was_empty = 0;
}
else if ( !mkdb )
{
path[len] = '/';
strncpy( path + len + 1, ( char * )fn, sizeof( fs_path ) - len );
scan_dir( path, &fno, mkdb, next_subdir_tgt );
} }
} }
depth--; depth--;
path[len] = 0; path[len]=0;
} } else {
else SNES_FTYPE type = determine_filetype((char*)fn);
{ if(type != TYPE_UNKNOWN) {
SNES_FTYPE type = determine_filetype( ( char * )fn );
if ( type != TYPE_UNKNOWN )
{
numentries++;
if ( pass )
{
if ( mkdb )
{
num_files_total++; num_files_total++;
/* snes_romprops_t romprops; */ numentries++;
path[len] = '/'; if(pass) {
strncpy( path + len + 1, ( char * )fn, sizeof( fs_path ) - len ); if(mkdb) {
uint16_t pathlen = strlen( path ); /* snes_romprops_t romprops; */
path[len]='/';
switch ( type ) strncpy(path+len+1, (char*)fn, sizeof(fs_path)-len);
{ uint16_t pathlen = strlen(path);
switch(type) {
case TYPE_IPS: case TYPE_IPS:
case TYPE_SMC: case TYPE_SMC:
case TYPE_SPC: /* file_open_by_filinfo(&fno);
/* write element pointer to current dir structure */ if(file_res){
DBG_FS printf( "d=%d Saving %lX to Address %lX [file %s]\n", depth, db_tgt, dir_tgt, path ); printf("ZOMG NOOOO %d\n", file_res);
}
smc_id(&romprops);
file_close(); */
if ( ( db_tgt & 0xffff ) > ( ( 0x10000 - ( sizeof( len ) + pathlen + sizeof( buf ) - 1 + 1 ) ) & 0xffff ) ) /* write element pointer to current dir structure */
{ DBG_FS printf("d=%d Saving %lX to Address %lX [file %s]\n", depth, db_tgt, dir_tgt, path);
printf( "switch! old=%lx ", db_tgt ); if((db_tgt&0xffff) > ((0x10000-(sizeof(len) + pathlen + sizeof(buf)-1 + 1))&0xffff)) {
printf("switch! old=%lx ", db_tgt);
db_tgt &= 0xffff0000; db_tgt &= 0xffff0000;
db_tgt += 0x00010000; db_tgt += 0x00010000;
printf( "new=%lx\n", db_tgt ); printf("new=%lx\n", db_tgt);
} }
sram_writelong((db_tgt-SRAM_MENU_ADDR) | ((uint32_t)type << 24), dir_tgt);
sram_writelong( ( db_tgt - SRAM_MENU_ADDR ) | ( ( uint32_t )type << 24 ), dir_tgt );
dir_tgt += 4; dir_tgt += 4;
/* save element: /* save element:
- index of last slash character - index of last slash character
- file name - file name
- file size */ - file size */
/* sram_writeblock((uint8_t*)&romprops, db_tgt, sizeof(romprops)); */ /* sram_writeblock((uint8_t*)&romprops, db_tgt, sizeof(romprops)); */
entry_fsize = fno.fsize; entry_fsize = fno.fsize;
entry_unit_idx = 0; entry_unit_idx = 0;
while(entry_fsize > 9999) {
while ( entry_fsize > 9999 )
{
entry_fsize >>= 10; entry_fsize >>= 10;
entry_unit_idx++; entry_unit_idx++;
} }
snprintf(buf, sizeof(buf), "% 5ld", entry_fsize);
snprintf( buf, sizeof( buf ), "% 5ld", entry_fsize ); strncat(buf, size_units[entry_unit_idx], 1);
strncat( buf, size_units[entry_unit_idx], 1 ); sram_writeblock(buf, db_tgt, sizeof(buf)-1);
sram_writeblock( buf, db_tgt, sizeof( buf ) - 1 ); sram_writebyte(len+1, db_tgt + sizeof(buf)-1);
sram_writebyte( len + 1, db_tgt + sizeof( buf ) - 1 ); sram_writeblock(path, db_tgt + sizeof(len) + sizeof(buf)-1, pathlen + 1);
sram_writeblock( path, db_tgt + sizeof( len ) + sizeof( buf ) - 1, pathlen + 1 ); // sram_writelong(fno.fsize, db_tgt + sizeof(len) + pathlen + 1);
// sram_writelong(fno.fsize, db_tgt + sizeof(len) + pathlen + 1); db_tgt += sizeof(len) + pathlen + sizeof(buf)-1 + 1;
db_tgt += sizeof( len ) + pathlen + sizeof( buf ) - 1 + 1;
break; break;
case TYPE_UNKNOWN: case TYPE_UNKNOWN:
default: default:
break; break;
} }
path[len]=0;
path[len] = 0; /* printf("%s ", path);
/* printf("%s ", path);
_delay_ms(30); */ _delay_ms(30); */
} }
} } else {
else TCHAR* fn2 = fn;
{ while(*fn2 != 0) {
TCHAR *fn2 = fn; crc += crc32_update(crc, *((unsigned char*)fn2++));
fncrc = 0;
while ( *fn2 != 0 )
{
fncrc += crc_xmodem_update( fncrc, *( ( unsigned char * )fn2++ ) );
}
crc += fncrc;
} }
} }
} }
/* printf("%s/%s\n", path, fn);
_delay_ms(50); */
} }
} }
else } else uart_putc(0x30+res);
{
uart_putc( 0x30 + res );
} }
} DBG_FS printf("db_tgt=%lx dir_end=%lx\n", db_tgt, dir_end);
sram_writelong(db_tgt, SRAM_DB_ADDR+4);
DBG_FS printf( "db_tgt=%lx dir_end=%lx\n", db_tgt, dir_end ); sram_writelong(dir_end, SRAM_DB_ADDR+8);
sram_writelong( db_tgt, SRAM_DB_ADDR + 4 ); sram_writeshort(num_files_total, SRAM_DB_ADDR+12);
sram_writelong( dir_end, SRAM_DB_ADDR + 8 ); sram_writeshort(num_dirs_total, SRAM_DB_ADDR+14);
sram_writeshort( num_files_total, SRAM_DB_ADDR + 12 );
sram_writeshort( num_dirs_total, SRAM_DB_ADDR + 14 );
if ( depth == 0 )
{
return crc; return crc;
}
else
{
return switched_dir_tgt;
}
return was_empty; // tricky!
} }
SNES_FTYPE determine_filetype( char *filename ) SNES_FTYPE determine_filetype(char* filename) {
{ char* ext = strrchr(filename, '.');
char *ext = strrchr( filename, '.' ); if(ext == NULL)
if ( ext == NULL )
{
return TYPE_UNKNOWN; return TYPE_UNKNOWN;
} if( (!strcasecmp(ext+1, "SMC"))
||(!strcasecmp(ext+1, "SFC"))
if ( ( !strcasecmp( ext + 1, "SMC" ) ) ||(!strcasecmp(ext+1, "FIG"))
|| ( !strcasecmp( ext + 1, "SFC" ) ) ||(!strcasecmp(ext+1, "BS"))
|| ( !strcasecmp( ext + 1, "FIG" ) ) ) {
|| ( !strcasecmp( ext + 1, "BS" ) )
)
{
return TYPE_SMC; return TYPE_SMC;
} }
if( (!strcasecmp(ext+1, "IPS"))
/* if( (!strcasecmp(ext+1, "IPS"))
||(!strcasecmp(ext+1, "UPS")) ||(!strcasecmp(ext+1, "UPS"))
) { ) {
return TYPE_IPS; return TYPE_IPS;
}*/
if ( !strcasecmp( ext + 1, "SPC" ) )
{
return TYPE_SPC;
} }
/* later
if(!strcasecmp_P(ext+1, PSTR("SRM"))) {
return TYPE_SRM;
}
if(!strcasecmp_P(ext+1, PSTR("SPC"))) {
return TYPE_SPC;
}*/
return TYPE_UNKNOWN; return TYPE_UNKNOWN;
} }
FRESULT get_db_id( uint32_t *id ) FRESULT get_db_id(uint32_t* id) {
{ file_open((uint8_t*)"/sd2snes/sd2snes.db", FA_READ);
file_open( ( uint8_t * )"/sd2snes/sd2snes.db", FA_READ ); if(file_res == FR_OK) {
file_readblock(id, 0, 4);
if ( file_res == FR_OK ) /* XXX */// *id=0xdead;
{
file_readblock( id, 0, 4 );
/* XXX */// *id=0xdead;
file_close(); file_close();
} else {
*id=0xdeadbeef;
} }
else
{
*id = 0xdeadbeef;
}
return file_res; return file_res;
} }
int get_num_dirent( uint32_t addr ) int get_num_dirent(uint32_t addr) {
{
int result = 0; int result = 0;
while(sram_readlong(addr+result*4)) {
while ( sram_readlong( addr + result * 4 ) )
{
result++; result++;
} }
return result; return result;
} }
void sort_all_dir( uint32_t endaddr ) void sort_all_dir(uint32_t endaddr) {
{
uint32_t entries = 0; uint32_t entries = 0;
uint32_t current_base = SRAM_DIR_ADDR; uint32_t current_base = SRAM_DIR_ADDR;
while(current_base<(endaddr)) {
while ( current_base < ( endaddr ) ) while(sram_readlong(current_base+entries*4)) {
{
while ( sram_readlong( current_base + entries * 4 ) )
{
entries++; entries++;
} }
printf("sorting dir @%lx, entries: %ld\n", current_base, entries);
printf( "sorting dir @%lx, entries: %ld\n", current_base, entries ); sort_dir(current_base, entries);
sort_dir( current_base, entries ); current_base += 4*entries + 4;
current_base += 4 * entries + 4;
entries = 0; entries = 0;
} }
} }

View File

@@ -36,9 +36,8 @@
#include "ff.h" #include "ff.h"
#define FS_MAX_DEPTH (10) #define FS_MAX_DEPTH (10)
#define SYS_DIR_NAME ((const char*)"sd2snes") #define SYS_DIR_NAME ((const uint8_t*)"sd2snes")
typedef enum typedef enum {
{
TYPE_UNKNOWN = 0, /* 0 */ TYPE_UNKNOWN = 0, /* 0 */
TYPE_SMC, /* 1 */ TYPE_SMC, /* 1 */
TYPE_SRM, /* 2 */ TYPE_SRM, /* 2 */
@@ -48,12 +47,12 @@ typedef enum
char fs_path[256]; char fs_path[256];
SNES_FTYPE determine_filetype( char *filename ); SNES_FTYPE determine_filetype(char* filename);
//uint32_t scan_fs(); //uint32_t scan_fs();
uint16_t scan_flat( const char *path ); uint16_t scan_flat(const char* path);
uint32_t scan_dir( char *path, FILINFO *fno_param, char mkdb, uint32_t this_subdir_tgt ); uint32_t scan_dir(char* path, FILINFO* fno_param, char mkdb, uint32_t this_subdir_tgt);
FRESULT get_db_id( uint32_t * ); FRESULT get_db_id(uint32_t*);
int get_num_dirent( uint32_t addr ); int get_num_dirent(uint32_t addr);
void sort_all_dir( uint32_t endaddr ); void sort_all_dir(uint32_t endaddr);
#endif #endif

View File

@@ -52,208 +52,147 @@
#include "rle.h" #include "rle.h"
#include "cfgware.h" #include "cfgware.h"
void fpga_set_prog_b( uint8_t val ) void fpga_set_prog_b(uint8_t val) {
{ if(val)
if ( val ) BITBAND(PROGBREG->FIOSET, PROGBBIT) = 1;
{
BITBAND( PROGBREG->FIOSET, PROGBBIT ) = 1;
}
else else
{ BITBAND(PROGBREG->FIOCLR, PROGBBIT) = 1;
BITBAND( PROGBREG->FIOCLR, PROGBBIT ) = 1;
}
} }
void fpga_set_cclk( uint8_t val ) void fpga_set_cclk(uint8_t val) {
{ if(val)
if ( val ) BITBAND(CCLKREG->FIOSET, CCLKBIT) = 1;
{
BITBAND( CCLKREG->FIOSET, CCLKBIT ) = 1;
}
else else
{ BITBAND(CCLKREG->FIOCLR, CCLKBIT) = 1;
BITBAND( CCLKREG->FIOCLR, CCLKBIT ) = 1;
}
} }
int fpga_get_initb() int fpga_get_initb() {
{ return BITBAND(INITBREG->FIOPIN, INITBBIT);
return BITBAND( INITBREG->FIOPIN, INITBBIT );
} }
void fpga_init() void fpga_init() {
{ /* mainly GPIO directions */
/* mainly GPIO directions */ BITBAND(CCLKREG->FIODIR, CCLKBIT) = 1; /* CCLK */
BITBAND( CCLKREG->FIODIR, CCLKBIT ) = 1; /* CCLK */ BITBAND(DONEREG->FIODIR, DONEBIT) = 0; /* DONE */
BITBAND( DONEREG->FIODIR, DONEBIT ) = 0; /* DONE */ BITBAND(PROGBREG->FIODIR, PROGBBIT) = 1; /* PROG_B */
BITBAND( PROGBREG->FIODIR, PROGBBIT ) = 1; /* PROG_B */ BITBAND(DINREG->FIODIR, DINBIT) = 1; /* DIN */
BITBAND( DINREG->FIODIR, DINBIT ) = 1; /* DIN */ BITBAND(INITBREG->FIODIR, INITBBIT) = 0; /* INIT_B */
BITBAND( INITBREG->FIODIR, INITBBIT ) = 0; /* INIT_B */
LPC_GPIO2->FIOMASK1 = 0; LPC_GPIO2->FIOMASK1 = 0;
SPI_OFFLOAD = 0;
fpga_set_cclk( 0 ); /* initial clk=0 */ SPI_OFFLOAD=0;
fpga_set_cclk(0); /* initial clk=0 */
} }
int fpga_get_done( void ) int fpga_get_done(void) {
{ return BITBAND(DONEREG->FIOPIN, DONEBIT);
return BITBAND( DONEREG->FIOPIN, DONEBIT );
} }
void fpga_postinit() void fpga_postinit() {
{
LPC_GPIO2->FIOMASK1 = 0; LPC_GPIO2->FIOMASK1 = 0;
} }
void fpga_pgm( uint8_t *filename ) void fpga_pgm(uint8_t* filename) {
{
int MAXRETRIES = 10; int MAXRETRIES = 10;
int retries = MAXRETRIES; int retries = MAXRETRIES;
uint8_t data; uint8_t data;
int i; int i;
tick_t timeout; tick_t timeout;
do {
do i=0;
{
i = 0;
timeout = getticks() + 100; timeout = getticks() + 100;
fpga_set_prog_b( 0 ); fpga_set_prog_b(0);
if(BITBAND(PROGBREG->FIOPIN, PROGBBIT)) {
if ( BITBAND( PROGBREG->FIOPIN, PROGBBIT ) ) printf("PROGB is stuck high!\n");
{
printf( "PROGB is stuck high!\n" );
led_panic(); led_panic();
} }
uart_putc('P');
uart_putc( 'P' ); fpga_set_prog_b(1);
fpga_set_prog_b( 1 ); while(!fpga_get_initb()){
if(getticks() > timeout) {
while ( !fpga_get_initb() ) printf("no response from FPGA trying to initiate configuration!\n");
{
if ( getticks() > timeout )
{
printf( "no response from FPGA trying to initiate configuration!\n" );
led_panic(); led_panic();
} }
}; };
if(fpga_get_done()) {
if ( fpga_get_done() ) printf("DONE is stuck high!\n");
{
printf( "DONE is stuck high!\n" );
led_panic(); led_panic();
} }
LPC_GPIO2->FIOMASK1 = ~(BV(0));
LPC_GPIO2->FIOMASK1 = ~( BV( 0 ) ); //uart_putc('p');
uart_putc( 'p' );
/* open configware file */ /* open configware file */
file_open( filename, FA_READ ); file_open(filename, FA_READ);
if(file_res) {
if ( file_res ) //uart_putc('?');
{ //uart_putc(0x30+file_res);
uart_putc( '?' );
uart_putc( 0x30 + file_res );
return; return;
} }
//uart_putc('C');
uart_putc( 'C' ); for (;;) {
for ( ;; )
{
data = rle_file_getc(); data = rle_file_getc();
i++; i++;
if (file_status || file_res) break; /* error or eof */
if ( file_status || file_res ) FPGA_SEND_BYTE_SERIAL(data);
{
break; /* error or eof */
} }
//uart_putc('c');
FPGA_SEND_BYTE_SERIAL( data );
}
uart_putc( 'c' );
file_close(); file_close();
printf( "fpga_pgm: %d bytes programmed\n", i ); printf("%s: %d bytes programmed\n", __func__, i);
delay_ms( 1 ); delay_ms(1);
} } while (!fpga_get_done() && retries--);
while ( !fpga_get_done() && retries-- ); if(!fpga_get_done()) {
printf("FPGA failed to configure after %d tries.\n", MAXRETRIES);
if ( !fpga_get_done() )
{
printf( "FPGA failed to configure after %d tries.\n", MAXRETRIES );
led_panic(); led_panic();
} }
printf("%s: FPGA configured\n", __func__);
printf( "FPGA configured\n" );
fpga_postinit(); fpga_postinit();
} }
void fpga_rompgm() void fpga_rompgm() {
{
int MAXRETRIES = 10; int MAXRETRIES = 10;
int retries = MAXRETRIES; int retries = MAXRETRIES;
uint8_t data; uint8_t data;
int i; int i;
tick_t timeout; tick_t timeout;
do {
do i=0;
{
i = 0;
timeout = getticks() + 100; timeout = getticks() + 100;
fpga_set_prog_b( 0 ); fpga_set_prog_b(0);
uart_putc( 'P' ); //uart_putc('P');
fpga_set_prog_b( 1 ); fpga_set_prog_b(1);
while(!fpga_get_initb()){
while ( !fpga_get_initb() ) if(getticks() > timeout) {
{ printf("no response from FPGA trying to initiate configuration!\n");
if ( getticks() > timeout )
{
printf( "no response from FPGA trying to initiate configuration!\n" );
led_panic(); led_panic();
} }
}; };
if(fpga_get_done()) {
if ( fpga_get_done() ) printf("DONE is stuck high!\n");
{
printf( "DONE is stuck high!\n" );
led_panic(); led_panic();
} }
LPC_GPIO2->FIOMASK1 = ~(BV(0));
LPC_GPIO2->FIOMASK1 = ~( BV( 0 ) ); //uart_putc('p');
uart_putc( 'p' );
/* open configware file */ /* open configware file */
rle_mem_init( cfgware, sizeof( cfgware ) ); rle_mem_init(cfgware, sizeof(cfgware));
printf( "sizeof(cfgware) = %d\n", sizeof( cfgware ) ); //printf("sizeof(cfgware) = %d\n", sizeof(cfgware));
for (;;) {
for ( ;; )
{
data = rle_mem_getc(); data = rle_mem_getc();
if(rle_state) break;
if ( rle_state )
{
break;
}
i++; i++;
FPGA_SEND_BYTE_SERIAL( data ); FPGA_SEND_BYTE_SERIAL(data);
} }
//uart_putc('c');
uart_putc( 'c' ); printf("%s: %d bytes programmed\n", __func__, i);
printf( "fpga_pgm: %d bytes programmed\n", i ); delay_ms(1);
delay_ms( 1 ); } while (!fpga_get_done() && retries--);
} if(!fpga_get_done()) {
while ( !fpga_get_done() && retries-- ); printf("FPGA failed to configure after %d tries.\n", MAXRETRIES);
if ( !fpga_get_done() )
{
printf( "FPGA failed to configure after %d tries.\n", MAXRETRIES );
led_panic(); led_panic();
} }
printf("%s: FPGA configured\n", __func__);
printf( "FPGA configured\n" );
fpga_postinit(); fpga_postinit();
} }

View File

@@ -30,14 +30,14 @@
#include <arm/NXP/LPC17xx/LPC17xx.h> #include <arm/NXP/LPC17xx/LPC17xx.h>
#include "bits.h" #include "bits.h"
void fpga_set_prog_b( uint8_t val ); void fpga_set_prog_b(uint8_t val);
void fpga_set_cclk( uint8_t val ); void fpga_set_cclk(uint8_t val);
int fpga_get_initb( void ); int fpga_get_initb(void);
void fpga_init( void ); void fpga_init(void);
void fpga_postinit( void ); void fpga_postinit(void);
void fpga_pgm( uint8_t *filename ); void fpga_pgm(uint8_t* filename);
void fpga_rompgm( void ); void fpga_rompgm(void);
uint8_t SPI_OFFLOAD; uint8_t SPI_OFFLOAD;
@@ -58,10 +58,10 @@ uint8_t SPI_OFFLOAD;
// some macros for bulk transfers (faster) // some macros for bulk transfers (faster)
#define FPGA_SEND_BYTE_SERIAL(data) do {SET_FPGA_DIN(data>>7); CCLK();\ #define FPGA_SEND_BYTE_SERIAL(data) do {SET_FPGA_DIN(data>>7); CCLK();\
SET_FPGA_DIN(data>>6); CCLK(); SET_FPGA_DIN(data>>5); CCLK();\ SET_FPGA_DIN(data>>6); CCLK(); SET_FPGA_DIN(data>>5); CCLK();\
SET_FPGA_DIN(data>>4); CCLK(); SET_FPGA_DIN(data>>3); CCLK();\ SET_FPGA_DIN(data>>4); CCLK(); SET_FPGA_DIN(data>>3); CCLK();\
SET_FPGA_DIN(data>>2); CCLK(); SET_FPGA_DIN(data>>1); CCLK();\ SET_FPGA_DIN(data>>2); CCLK(); SET_FPGA_DIN(data>>1); CCLK();\
SET_FPGA_DIN(data); CCLK();} while (0) SET_FPGA_DIN(data); CCLK();} while (0)
#define SET_CCLK() do {BITBAND(LPC_GPIO0->FIOSET, 11) = 1;} while (0) #define SET_CCLK() do {BITBAND(LPC_GPIO0->FIOSET, 11) = 1;} while (0)
#define CLR_CCLK() do {BITBAND(LPC_GPIO0->FIOCLR, 11) = 1;} while (0) #define CLR_CCLK() do {BITBAND(LPC_GPIO0->FIOCLR, 11) = 1;} while (0)
#define CCLK() do {SET_CCLK(); CLR_CCLK();} while (0) #define CCLK() do {SET_CCLK(); CLR_CCLK();} while (0)

View File

@@ -1,6 +1,6 @@
/* sd2snes - SD card based universal cartridge for the SNES /* sd2snes - SD card based universal cartridge for the SNES
Copyright (C) 2009-2012 Maximilian Rehkopf <otakon@gmx.net> Copyright (C) 2009-2010 Maximilian Rehkopf <otakon@gmx.net>
uC firmware portion AVR firmware portion
Inspired by and based on code from sd2iec, written by Ingo Korb et al. Inspired by and based on code from sd2iec, written by Ingo Korb et al.
See sdcard.c|h, config.h. See sdcard.c|h, config.h.
@@ -142,292 +142,287 @@
#include "timer.h" #include "timer.h"
#include "sdnative.h" #include "sdnative.h"
void fpga_spi_init( void ) void fpga_spi_init(void) {
{ spi_init(SPI_SPEED_FAST);
spi_init(); BITBAND(FPGA_MCU_RDY_REG->FIODIR, FPGA_MCU_RDY_BIT) = 0;
BITBAND( FPGA_MCU_RDY_REG->FIODIR, FPGA_MCU_RDY_BIT ) = 0;
} }
void set_msu_addr( uint16_t address ) void set_msu_addr(uint16_t address) {
{
FPGA_SELECT(); FPGA_SELECT();
FPGA_TX_BYTE( FPGA_CMD_SETADDR | FPGA_TGT_MSUBUF ); FPGA_TX_BYTE(0x02);
FPGA_TX_BYTE( ( address >> 8 ) & 0xff ); FPGA_TX_BYTE((address>>8)&0xff);
FPGA_TX_BYTE( ( address ) & 0xff ); FPGA_TX_BYTE((address)&0xff);
FPGA_DESELECT(); FPGA_DESELECT();
} }
void set_dac_addr( uint16_t address ) void set_dac_addr(uint16_t address) {
{
FPGA_SELECT(); FPGA_SELECT();
FPGA_TX_BYTE( FPGA_CMD_SETADDR | FPGA_TGT_DACBUF ); FPGA_TX_BYTE(0x01);
FPGA_TX_BYTE( ( address >> 8 ) & 0xff ); FPGA_TX_BYTE((address>>8)&0xff);
FPGA_TX_BYTE( ( address ) & 0xff ); FPGA_TX_BYTE((address)&0xff);
FPGA_DESELECT(); FPGA_DESELECT();
} }
void set_mcu_addr( uint32_t address ) void set_mcu_addr(uint32_t address) {
{
FPGA_SELECT(); FPGA_SELECT();
FPGA_TX_BYTE( FPGA_CMD_SETADDR | FPGA_TGT_MEM ); FPGA_TX_BYTE(0x00);
FPGA_TX_BYTE( ( address >> 16 ) & 0xff ); FPGA_TX_BYTE((address>>16)&0xff);
FPGA_TX_BYTE( ( address >> 8 ) & 0xff ); FPGA_TX_BYTE((address>>8)&0xff);
FPGA_TX_BYTE( ( address ) & 0xff ); FPGA_TX_BYTE((address)&0xff);
FPGA_DESELECT(); FPGA_DESELECT();
} }
void set_saveram_mask( uint32_t mask ) void set_saveram_mask(uint32_t mask) {
{
FPGA_SELECT(); FPGA_SELECT();
FPGA_TX_BYTE( FPGA_CMD_SETRAMMASK ); FPGA_TX_BYTE(0x20);
FPGA_TX_BYTE( ( mask >> 16 ) & 0xff ); FPGA_TX_BYTE((mask>>16)&0xff);
FPGA_TX_BYTE( ( mask >> 8 ) & 0xff ); FPGA_TX_BYTE((mask>>8)&0xff);
FPGA_TX_BYTE( ( mask ) & 0xff ); FPGA_TX_BYTE((mask)&0xff);
FPGA_DESELECT(); FPGA_DESELECT();
} }
void set_rom_mask( uint32_t mask ) void set_rom_mask(uint32_t mask) {
{
FPGA_SELECT(); FPGA_SELECT();
FPGA_TX_BYTE( FPGA_CMD_SETROMMASK ); FPGA_TX_BYTE(0x10);
FPGA_TX_BYTE( ( mask >> 16 ) & 0xff ); FPGA_TX_BYTE((mask>>16)&0xff);
FPGA_TX_BYTE( ( mask >> 8 ) & 0xff ); FPGA_TX_BYTE((mask>>8)&0xff);
FPGA_TX_BYTE( ( mask ) & 0xff ); FPGA_TX_BYTE((mask)&0xff);
FPGA_DESELECT(); FPGA_DESELECT();
} }
void set_mapper( uint8_t val ) void set_mapper(uint8_t val) {
{
FPGA_SELECT(); FPGA_SELECT();
FPGA_TX_BYTE( FPGA_CMD_SETMAPPER( val ) ); FPGA_TX_BYTE(0x30 | (val & 0x0f));
FPGA_DESELECT(); FPGA_DESELECT();
} }
uint8_t fpga_test() uint8_t fpga_test() {
{
FPGA_SELECT(); FPGA_SELECT();
FPGA_TX_BYTE( FPGA_CMD_TEST ); FPGA_TX_BYTE(0xF0); /* TEST */
FPGA_TX_BYTE(0x00); /* dummy */
uint8_t result = FPGA_RX_BYTE(); uint8_t result = FPGA_RX_BYTE();
FPGA_DESELECT(); FPGA_DESELECT();
return result; return result;
} }
uint16_t fpga_status() uint16_t fpga_status() {
{
FPGA_SELECT(); FPGA_SELECT();
FPGA_TX_BYTE( FPGA_CMD_GETSTATUS ); FPGA_TX_BYTE(0xF1); /* STATUS */
uint16_t result = ( FPGA_RX_BYTE() ) << 8; FPGA_TX_BYTE(0x00); /* dummy */
uint16_t result = (FPGA_RX_BYTE()) << 8;
result |= FPGA_RX_BYTE(); result |= FPGA_RX_BYTE();
FPGA_DESELECT(); FPGA_DESELECT();
return result; return result;
} }
void fpga_set_sddma_range( uint16_t start, uint16_t end ) void fpga_set_sddma_range(uint16_t start, uint16_t end) {
{
printf( "%s %08X -> %08X\n", __func__, start, end );
FPGA_SELECT(); FPGA_SELECT();
FPGA_TX_BYTE( FPGA_CMD_SDDMA_RANGE ); FPGA_TX_BYTE(0x60); /* DMA_RANGE */
FPGA_TX_BYTE( start >> 8 ); FPGA_TX_BYTE(start>>8);
FPGA_TX_BYTE( start & 0xff ); FPGA_TX_BYTE(start&0xff);
FPGA_TX_BYTE( end >> 8 ); FPGA_TX_BYTE(end>>8);
FPGA_TX_BYTE( end & 0xff ); FPGA_TX_BYTE(end&0xff);
//if(tgt==1 && (test=FPGA_RX_BYTE()) != 0x41) printf("!!!!!!!!!!!!!!! -%02x- \n", test);
FPGA_DESELECT(); FPGA_DESELECT();
} }
void fpga_sddma( uint8_t tgt, uint8_t partial ) void fpga_sddma(uint8_t tgt, uint8_t partial) {
{ uint32_t test = 0;
//printf("%s %02X -> %02X\n", __func__, tgt, partial); uint8_t status = 0;
//uint32_t test = 0; BITBAND(SD_CLKREG->FIODIR, SD_CLKPIN) = 0;
//uint8_t status = 0;
BITBAND( SD_CLKREG->FIODIR, SD_CLKPIN ) = 0;
FPGA_SELECT(); FPGA_SELECT();
FPGA_TX_BYTE( FPGA_CMD_SDDMA | ( tgt & 3 ) | ( partial ? FPGA_SDDMA_PARTIAL : 0 ) ); FPGA_TX_BYTE(0x40 | (tgt & 0x3) | ((partial & 1) << 2) ); /* DO DMA */
FPGA_TX_BYTE( 0x00 ); /* dummy for falling DMA_EN edge */ FPGA_TX_BYTE(0x00); /* dummy for falling DMA_EN edge */
//if(tgt==1 && (test=FPGA_RX_BYTE()) != 0x41) printf("!!!!!!!!!!!!!!! -%02x- \n", test);
FPGA_DESELECT(); FPGA_DESELECT();
FPGA_SELECT(); FPGA_SELECT();
FPGA_TX_BYTE( FPGA_CMD_GETSTATUS ); FPGA_TX_BYTE(0xF1); /* STATUS */
DBG_SD printf( "FPGA DMA request sent, wait for completion..." ); FPGA_TX_BYTE(0x00); /* dummy */
DBG_SD printf("FPGA DMA request sent, wait for completion...");
while ( FPGA_RX_BYTE() & 0x80 ) while((status=FPGA_RX_BYTE()) & 0x80) {
{
FPGA_RX_BYTE(); /* eat the 2nd status byte */ FPGA_RX_BYTE(); /* eat the 2nd status byte */
test++;
} }
DBG_SD printf("...complete\n");
DBG_SD printf( "...complete\n" );
FPGA_DESELECT(); FPGA_DESELECT();
BITBAND( SD_CLKREG->FIODIR, SD_CLKPIN ) = 1; // if(test<5)printf("loopy: %ld %02x\n", test, status);
BITBAND(SD_CLKREG->FIODIR, SD_CLKPIN) = 1;
} }
void dac_play() void set_dac_vol(uint8_t volume) {
{
FPGA_SELECT(); FPGA_SELECT();
FPGA_TX_BYTE( FPGA_CMD_DACPLAY ); FPGA_TX_BYTE(0x50);
FPGA_TX_BYTE( 0x00 ); /* latch reset */ FPGA_TX_BYTE(volume);
FPGA_TX_BYTE(0x00); /* latch rise */
FPGA_TX_BYTE(0x00); /* latch fall */
FPGA_DESELECT(); FPGA_DESELECT();
} }
void dac_pause() void dac_play() {
{
FPGA_SELECT(); FPGA_SELECT();
FPGA_TX_BYTE( FPGA_CMD_DACPAUSE ); FPGA_TX_BYTE(0xe2);
FPGA_TX_BYTE( 0x00 ); /* latch reset */ FPGA_TX_BYTE(0x00); /* latch reset */
FPGA_DESELECT(); FPGA_DESELECT();
} }
void dac_reset() void dac_pause() {
{
FPGA_SELECT(); FPGA_SELECT();
FPGA_TX_BYTE( FPGA_CMD_DACRESETPTR ); FPGA_TX_BYTE(0xe1);
FPGA_TX_BYTE( 0x00 ); /* latch reset */ FPGA_TX_BYTE(0x00); /* latch reset */
FPGA_TX_BYTE( 0x00 ); /* latch reset */
FPGA_DESELECT(); FPGA_DESELECT();
} }
void msu_reset( uint16_t address ) void dac_reset() {
{
FPGA_SELECT(); FPGA_SELECT();
FPGA_TX_BYTE( FPGA_CMD_MSUSETPTR ); FPGA_TX_BYTE(0xe3);
FPGA_TX_BYTE( ( address >> 8 ) & 0xff ); /* address hi */ FPGA_TX_BYTE(0x00); /* latch reset */
FPGA_TX_BYTE( address & 0xff ); /* address lo */ FPGA_TX_BYTE(0x00); /* latch reset */
FPGA_TX_BYTE( 0x00 ); /* latch reset */
FPGA_TX_BYTE( 0x00 ); /* latch reset */
FPGA_DESELECT(); FPGA_DESELECT();
} }
void set_msu_status( uint8_t set, uint8_t reset ) void msu_reset(uint16_t address) {
{
FPGA_SELECT(); FPGA_SELECT();
FPGA_TX_BYTE( FPGA_CMD_MSUSETBITS ); FPGA_TX_BYTE(0xe4);
FPGA_TX_BYTE( set ); FPGA_TX_BYTE((address>>8) & 0xff); /* address hi */
FPGA_TX_BYTE( reset ); FPGA_TX_BYTE(address & 0xff); /* address lo */
FPGA_TX_BYTE( 0x00 ); /* latch reset */ FPGA_TX_BYTE(0x00); /* latch reset */
FPGA_TX_BYTE(0x00); /* latch reset */
FPGA_DESELECT(); FPGA_DESELECT();
} }
uint16_t get_msu_track() void set_msu_status(uint8_t set, uint8_t reset) {
{
FPGA_SELECT(); FPGA_SELECT();
FPGA_TX_BYTE( FPGA_CMD_MSUGETTRACK ); FPGA_TX_BYTE(0xe0);
uint16_t result = ( FPGA_RX_BYTE() ) << 8; FPGA_TX_BYTE(set);
FPGA_TX_BYTE(reset);
FPGA_TX_BYTE(0x00); /* latch reset */
FPGA_DESELECT();
}
uint8_t get_msu_volume() {
FPGA_SELECT();
FPGA_TX_BYTE(0xF4); /* MSU_VOLUME */
FPGA_TX_BYTE(0x00); /* dummy */
uint8_t result = FPGA_RX_BYTE();
FPGA_DESELECT();
return result;
}
uint16_t get_msu_track() {
FPGA_SELECT();
FPGA_TX_BYTE(0xF3); /* MSU_TRACK */
FPGA_TX_BYTE(0x00); /* dummy */
uint16_t result = (FPGA_RX_BYTE()) << 8;
result |= FPGA_RX_BYTE(); result |= FPGA_RX_BYTE();
FPGA_DESELECT(); FPGA_DESELECT();
return result; return result;
} }
uint32_t get_msu_offset() uint32_t get_msu_offset() {
{
FPGA_SELECT(); FPGA_SELECT();
FPGA_TX_BYTE( FPGA_CMD_MSUGETADDR ); FPGA_TX_BYTE(0xF2); /* MSU_OFFSET */
uint32_t result = ( FPGA_RX_BYTE() ) << 24; FPGA_TX_BYTE(0x00); /* dummy */
result |= ( FPGA_RX_BYTE() ) << 16; uint32_t result = (FPGA_RX_BYTE()) << 24;
result |= ( FPGA_RX_BYTE() ) << 8; result |= (FPGA_RX_BYTE()) << 16;
result |= ( FPGA_RX_BYTE() ); result |= (FPGA_RX_BYTE()) << 8;
result |= (FPGA_RX_BYTE());
FPGA_DESELECT(); FPGA_DESELECT();
return result; return result;
} }
uint32_t get_snes_sysclk() uint32_t get_snes_sysclk() {
{
FPGA_SELECT(); FPGA_SELECT();
FPGA_TX_BYTE( FPGA_CMD_GETSYSCLK ); FPGA_TX_BYTE(0xFE); /* GET_SYSCLK */
FPGA_TX_BYTE( 0x00 ); /* dummy (copy current sysclk count to register) */ FPGA_TX_BYTE(0x00); /* dummy */
uint32_t result = ( FPGA_RX_BYTE() ) << 24; FPGA_TX_BYTE(0x00); /* dummy */
result |= ( FPGA_RX_BYTE() ) << 16; uint32_t result = (FPGA_RX_BYTE()) << 24;
result |= ( FPGA_RX_BYTE() ) << 8; result |= (FPGA_RX_BYTE()) << 16;
result |= ( FPGA_RX_BYTE() ); result |= (FPGA_RX_BYTE()) << 8;
result |= (FPGA_RX_BYTE());
FPGA_DESELECT(); FPGA_DESELECT();
return result; return result;
} }
void set_bsx_regs( uint8_t set, uint8_t reset ) void set_bsx_regs(uint8_t set, uint8_t reset) {
{
FPGA_SELECT(); FPGA_SELECT();
FPGA_TX_BYTE( FPGA_CMD_BSXSETBITS ); FPGA_TX_BYTE(0xe6);
FPGA_TX_BYTE( set ); FPGA_TX_BYTE(set);
FPGA_TX_BYTE( reset ); FPGA_TX_BYTE(reset);
FPGA_TX_BYTE( 0x00 ); /* latch reset */ FPGA_TX_BYTE(0x00); /* latch reset */
FPGA_DESELECT(); FPGA_DESELECT();
} }
void set_fpga_time( uint64_t time ) void set_fpga_time(uint64_t time) {
{
FPGA_SELECT(); FPGA_SELECT();
FPGA_TX_BYTE( FPGA_CMD_RTCSET ); FPGA_TX_BYTE(0xe5);
FPGA_TX_BYTE( ( time >> 48 ) & 0xff ); FPGA_TX_BYTE((time >> 48) & 0xff);
FPGA_TX_BYTE( ( time >> 40 ) & 0xff ); FPGA_TX_BYTE((time >> 40) & 0xff);
FPGA_TX_BYTE( ( time >> 32 ) & 0xff ); FPGA_TX_BYTE((time >> 32) & 0xff);
FPGA_TX_BYTE( ( time >> 24 ) & 0xff ); FPGA_TX_BYTE((time >> 24) & 0xff);
FPGA_TX_BYTE( ( time >> 16 ) & 0xff ); FPGA_TX_BYTE((time >> 16) & 0xff);
FPGA_TX_BYTE( ( time >> 8 ) & 0xff ); FPGA_TX_BYTE((time >> 8) & 0xff);
FPGA_TX_BYTE( time & 0xff ); FPGA_TX_BYTE(time & 0xff);
FPGA_TX_BYTE( 0x00 ); FPGA_TX_BYTE(0x00);
FPGA_DESELECT(); FPGA_DESELECT();
} }
void fpga_reset_srtc_state() void fpga_reset_srtc_state() {
{
FPGA_SELECT(); FPGA_SELECT();
FPGA_TX_BYTE( FPGA_CMD_SRTCRESET ); FPGA_TX_BYTE(0xe7);
FPGA_TX_BYTE( 0x00 ); FPGA_TX_BYTE(0x00);
FPGA_TX_BYTE( 0x00 ); FPGA_TX_BYTE(0x00);
FPGA_DESELECT(); FPGA_DESELECT();
} }
void fpga_reset_dspx_addr() void fpga_reset_dspx_addr() {
{
FPGA_SELECT(); FPGA_SELECT();
FPGA_TX_BYTE( FPGA_CMD_DSPRESETPTR ); FPGA_TX_BYTE(0xe8);
FPGA_TX_BYTE( 0x00 ); FPGA_TX_BYTE(0x00);
FPGA_TX_BYTE( 0x00 ); FPGA_TX_BYTE(0x00);
FPGA_DESELECT(); FPGA_DESELECT();
} }
void fpga_write_dspx_pgm( uint32_t data ) void fpga_write_dspx_pgm(uint32_t data) {
{
FPGA_SELECT(); FPGA_SELECT();
FPGA_TX_BYTE( FPGA_CMD_DSPWRITEPGM ); FPGA_TX_BYTE(0xe9);
FPGA_TX_BYTE( ( data >> 16 ) & 0xff ); FPGA_TX_BYTE((data>>16)&0xff);
FPGA_TX_BYTE( ( data >> 8 ) & 0xff ); FPGA_TX_BYTE((data>>8)&0xff);
FPGA_TX_BYTE( ( data ) & 0xff ); FPGA_TX_BYTE((data)&0xff);
FPGA_TX_BYTE( 0x00 ); FPGA_TX_BYTE(0x00);
FPGA_TX_BYTE( 0x00 ); FPGA_TX_BYTE(0x00);
FPGA_DESELECT(); FPGA_DESELECT();
} }
void fpga_write_dspx_dat( uint16_t data ) void fpga_write_dspx_dat(uint16_t data) {
{
FPGA_SELECT(); FPGA_SELECT();
FPGA_TX_BYTE( FPGA_CMD_DSPWRITEDAT ); FPGA_TX_BYTE(0xea);
FPGA_TX_BYTE( ( data >> 8 ) & 0xff ); FPGA_TX_BYTE((data>>8)&0xff);
FPGA_TX_BYTE( ( data ) & 0xff ); FPGA_TX_BYTE((data)&0xff);
FPGA_TX_BYTE( 0x00 ); FPGA_TX_BYTE(0x00);
FPGA_TX_BYTE( 0x00 ); FPGA_TX_BYTE(0x00);
FPGA_DESELECT(); FPGA_DESELECT();
} }
void fpga_dspx_reset( uint8_t reset ) void fpga_dspx_reset(uint8_t reset) {
{
FPGA_SELECT(); FPGA_SELECT();
FPGA_TX_BYTE( reset ? FPGA_CMD_DSPRESET : FPGA_CMD_DSPUNRESET ); FPGA_TX_BYTE(reset ? 0xeb : 0xec);
FPGA_TX_BYTE( 0x00 ); FPGA_TX_BYTE(0x00);
FPGA_DESELECT(); FPGA_DESELECT();
} }
void fpga_set_features( uint8_t feat ) void fpga_set_features(uint8_t feat) {
{ printf("set features: %02x\n", feat);
printf( "set features: %02x\n", feat );
FPGA_SELECT(); FPGA_SELECT();
FPGA_TX_BYTE( FPGA_CMD_SETFEATURE ); FPGA_TX_BYTE(0xed);
FPGA_TX_BYTE( feat ); FPGA_TX_BYTE(feat);
FPGA_DESELECT(); FPGA_DESELECT();
} }
void fpga_set_213f( uint8_t data ) void fpga_set_213f(uint8_t data) {
{ printf("set 213f: %d\n", data);
printf( "set 213f: %d\n", data );
FPGA_SELECT(); FPGA_SELECT();
FPGA_TX_BYTE( FPGA_CMD_SET213F ); FPGA_TX_BYTE(0xee);
FPGA_TX_BYTE( data ); FPGA_TX_BYTE(data);
FPGA_DESELECT(); FPGA_DESELECT();
} }

View File

@@ -47,6 +47,9 @@
#define FPGA_TX_BLOCK(x,y) spi_tx_block(x,y) #define FPGA_TX_BLOCK(x,y) spi_tx_block(x,y)
#define FPGA_RX_BLOCK(x,y) spi_rx_block(x,y) #define FPGA_RX_BLOCK(x,y) spi_rx_block(x,y)
#define FPGA_SPI_FAST() spi_set_speed(SPI_SPEED_FPGA_FAST)
#define FPGA_SPI_SLOW() spi_set_speed(SPI_SPEED_FPGA_SLOW)
#define FEAT_213F (1 << 4) #define FEAT_213F (1 << 4)
#define FEAT_MSU1 (1 << 3) #define FEAT_MSU1 (1 << 3)
#define FEAT_SRTC (1 << 2) #define FEAT_SRTC (1 << 2)
@@ -57,73 +60,37 @@
#define FPGA_WAIT_RDY() do {while(BITBAND(SSP_REGS->SR, SSP_BSY)); while(!BITBAND(FPGA_MCU_RDY_REG->FIOPIN, FPGA_MCU_RDY_BIT));} while (0) #define FPGA_WAIT_RDY() do {while(BITBAND(SSP_REGS->SR, SSP_BSY)); while(!BITBAND(FPGA_MCU_RDY_REG->FIOPIN, FPGA_MCU_RDY_BIT));} while (0)
/* command parameters */ void fpga_spi_init(void);
#define FPGA_MEM_AUTOINC (0x8) uint8_t fpga_test(void);
#define FPGA_SDDMA_PARTIAL (0x4) uint16_t fpga_status(void);
#define FPGA_TGT_MEM (0x0) void spi_fpga(void);
#define FPGA_TGT_DACBUF (0x1) void spi_sd(void);
#define FPGA_TGT_MSUBUF (0x2) void spi_none(void);
void set_mcu_addr(uint32_t);
/* commands */ void set_dac_addr(uint16_t);
#define FPGA_CMD_SETADDR (0x00) void set_dac_vol(uint8_t);
#define FPGA_CMD_SETROMMASK (0x10) void dac_play(void);
#define FPGA_CMD_SETRAMMASK (0x20) void dac_pause(void);
#define FPGA_CMD_SETMAPPER(x) (0x30 | (x & 15)) void dac_reset(void);
#define FPGA_CMD_SDDMA (0x40) void msu_reset(uint16_t);
#define FPGA_CMD_SDDMA_RANGE (0x60) void set_msu_addr(uint16_t);
#define FPGA_CMD_READMEM (0x80) void set_msu_status(uint8_t set, uint8_t reset);
#define FPGA_CMD_WRITEMEM (0x90) void set_saveram_mask(uint32_t);
#define FPGA_CMD_MSUSETBITS (0xe0) void set_rom_mask(uint32_t);
#define FPGA_CMD_DACPAUSE (0xe1) void set_mapper(uint8_t val);
#define FPGA_CMD_DACPLAY (0xe2) void fpga_sddma(uint8_t tgt, uint8_t partial);
#define FPGA_CMD_DACRESETPTR (0xe3) void fpga_set_sddma_range(uint16_t start, uint16_t end);
#define FPGA_CMD_MSUSETPTR (0xe4) uint8_t get_msu_volume(void);
#define FPGA_CMD_RTCSET (0xe5) uint16_t get_msu_track(void);
#define FPGA_CMD_BSXSETBITS (0xe6) uint32_t get_msu_offset(void);
#define FPGA_CMD_SRTCRESET (0xe7) uint32_t get_snes_sysclk(void);
#define FPGA_CMD_DSPRESETPTR (0xe8) void set_bsx_regs(uint8_t set, uint8_t reset);
#define FPGA_CMD_DSPWRITEPGM (0xe9) void set_fpga_time(uint64_t time);
#define FPGA_CMD_DSPWRITEDAT (0xea) void fpga_reset_srtc_state(void);
#define FPGA_CMD_DSPRESET (0xeb) void fpga_reset_dspx_addr(void);
#define FPGA_CMD_DSPUNRESET (0xec) void fpga_write_dspx_pgm(uint32_t data);
#define FPGA_CMD_SETFEATURE (0xed) void fpga_write_dspx_dat(uint16_t data);
#define FPGA_CMD_SET213F (0xee) void fpga_dspx_reset(uint8_t reset);
#define FPGA_CMD_TEST (0xf0) void fpga_set_features(uint8_t feat);
#define FPGA_CMD_GETSTATUS (0xf1) void fpga_set_213f(uint8_t data);
#define FPGA_CMD_MSUGETADDR (0xf2)
#define FPGA_CMD_MSUGETTRACK (0xf3)
#define FPGA_CMD_GETSYSCLK (0xfe)
#define FPGA_CMD_ECHO (0xff)
void fpga_spi_init( void );
uint8_t fpga_test( void );
uint16_t fpga_status( void );
void spi_fpga( void );
void spi_sd( void );
void spi_none( void );
void set_mcu_addr( uint32_t );
void set_dac_addr( uint16_t );
void dac_play( void );
void dac_pause( void );
void dac_reset( void );
void msu_reset( uint16_t );
void set_msu_addr( uint16_t );
void set_msu_status( uint8_t set, uint8_t reset );
void set_saveram_mask( uint32_t );
void set_rom_mask( uint32_t );
void set_mapper( uint8_t val );
void fpga_sddma( uint8_t tgt, uint8_t partial );
void fpga_set_sddma_range( uint16_t start, uint16_t end );
uint16_t get_msu_track( void );
uint32_t get_msu_offset( void );
uint32_t get_snes_sysclk( void );
void set_bsx_regs( uint8_t set, uint8_t reset );
void set_fpga_time( uint64_t time );
void fpga_reset_srtc_state( void );
void fpga_reset_dspx_addr( void );
void fpga_write_dspx_pgm( uint32_t data );
void fpga_write_dspx_dat( uint16_t data );
void fpga_dspx_reset( uint8_t reset );
void fpga_set_features( uint8_t feat );
void fpga_set_213f( uint8_t data );
#endif #endif

View File

@@ -4,12 +4,9 @@
#include "sdnative.h" #include "sdnative.h"
#include "uart.h" #include "uart.h"
void EINT3_IRQHandler( void ) void EINT3_IRQHandler(void) {
{ NVIC_ClearPendingIRQ(EINT3_IRQn);
NVIC_ClearPendingIRQ( EINT3_IRQn ); if(SD_CHANGE_DETECT) {
if ( SD_CHANGE_DETECT )
{
SD_CHANGE_CLR(); SD_CHANGE_CLR();
sdn_changed(); sdn_changed();
} }

187
src/led.c
View File

@@ -6,7 +6,7 @@
#include "led.h" #include "led.h"
#include "cli.h" #include "cli.h"
static uint8_t led_bright[16] = {255, 253, 252, 251, 249, 247, 244, 239, 232, 223, 210, 191, 165, 127, 74, 0}; static uint8_t led_bright[16]={255,253,252,251,249,247,244,239,232,223,210,191,165,127,74,0};
int led_rdyledstate = 0; int led_rdyledstate = 0;
int led_readledstate = 0; int led_readledstate = 0;
@@ -22,156 +22,127 @@ int led_pwmstate = 0;
write red P1.23 PWM1[4] write red P1.23 PWM1[4]
*/ */
void rdyled( unsigned int state ) void rdyled(unsigned int state) {
{ if(led_pwmstate) {
if ( led_pwmstate ) rdybright(state?15:0);
{ } else {
rdybright( state ? 15 : 0 ); BITBAND(LPC_GPIO2->FIODIR, 4) = state;
} }
else
{
BITBAND( LPC_GPIO2->FIODIR, 4 ) = state;
}
led_rdyledstate = state; led_rdyledstate = state;
} }
void readled( unsigned int state ) void readled(unsigned int state) {
{ if(led_pwmstate) {
if ( led_pwmstate ) readbright(state?15:0);
{ } else {
readbright( state ? 15 : 0 ); BITBAND(LPC_GPIO2->FIODIR, 5) = state;
} }
else
{
BITBAND( LPC_GPIO2->FIODIR, 5 ) = state;
}
led_readledstate = state; led_readledstate = state;
} }
void writeled( unsigned int state ) void writeled(unsigned int state) {
{ if(led_pwmstate) {
if ( led_pwmstate ) writebright(state?15:0);
{ } else {
writebright( state ? 15 : 0 ); BITBAND(LPC_GPIO1->FIODIR, 23) = state;
} }
else
{
BITBAND( LPC_GPIO1->FIODIR, 23 ) = state;
}
led_writeledstate = state; led_writeledstate = state;
} }
void rdybright( uint8_t bright ) void rdybright(uint8_t bright) {
{ LPC_PWM1->MR5 = led_bright[(bright & 15)];
LPC_PWM1->MR5 = led_bright[( bright & 15 )]; BITBAND(LPC_PWM1->LER, 5) = 1;
BITBAND( LPC_PWM1->LER, 5 ) = 1;
} }
void readbright( uint8_t bright ) void readbright(uint8_t bright) {
{ LPC_PWM1->MR6 = led_bright[(bright & 15)];
LPC_PWM1->MR6 = led_bright[( bright & 15 )]; BITBAND(LPC_PWM1->LER, 6) = 1;
BITBAND( LPC_PWM1->LER, 6 ) = 1;
} }
void writebright( uint8_t bright ) void writebright(uint8_t bright) {
{ LPC_PWM1->MR4 = led_bright[(bright & 15)];
LPC_PWM1->MR4 = led_bright[( bright & 15 )]; BITBAND(LPC_PWM1->LER, 4) = 1;
BITBAND( LPC_PWM1->LER, 4 ) = 1;
} }
void led_clkout32( uint32_t val ) void led_clkout32(uint32_t val) {
{ while(1) {
while ( 1 ) rdyled(1);
{ delay_ms(400);
rdyled( 1 ); readled((val & BV(31))>>31);
delay_ms( 400 ); rdyled(0);
readled( ( val & BV( 31 ) ) >> 31 ); val<<=1;
rdyled( 0 ); delay_ms(400);
val <<= 1;
delay_ms( 400 );
} }
} }
void toggle_rdy_led() void toggle_rdy_led() {
{ rdyled(~led_rdyledstate);
rdyled( ~led_rdyledstate );
} }
void toggle_read_led() void toggle_read_led() {
{ readled(~led_readledstate);
readled( ~led_readledstate );
} }
void toggle_write_led() void toggle_write_led() {
{ writeled(~led_writeledstate);
writeled( ~led_writeledstate );
} }
void led_panic() void led_panic() {
{
led_std(); led_std();
while(1) {
while ( 1 ) rdyled(1);
{ readled(1);
rdyled( 1 ); writeled(1);
readled( 1 ); delay_ms(100);
writeled( 1 ); rdyled(0);
delay_ms( 100 ); readled(0);
rdyled( 0 ); writeled(0);
readled( 0 ); delay_ms(100);
writeled( 0 );
delay_ms( 100 );
cli_entrycheck(); cli_entrycheck();
} }
} }
void led_pwm() void led_pwm() {
{ /* Rev.C P2.4, P2.5, P1.23 */
/* Rev.C P2.4, P2.5, P1.23 */ BITBAND(LPC_PINCON->PINSEL4, 9) = 0;
BITBAND( LPC_PINCON->PINSEL4, 9 ) = 0; BITBAND(LPC_PINCON->PINSEL4, 8) = 1;
BITBAND( LPC_PINCON->PINSEL4, 8 ) = 1;
BITBAND( LPC_PINCON->PINSEL4, 11 ) = 0; BITBAND(LPC_PINCON->PINSEL4, 11) = 0;
BITBAND( LPC_PINCON->PINSEL4, 10 ) = 1; BITBAND(LPC_PINCON->PINSEL4, 10) = 1;
BITBAND( LPC_PINCON->PINSEL3, 15 ) = 1; BITBAND(LPC_PINCON->PINSEL3, 15) = 1;
BITBAND( LPC_PINCON->PINSEL3, 14 ) = 0; BITBAND(LPC_PINCON->PINSEL3, 14) = 0;
BITBAND( LPC_PWM1->PCR, 12 ) = 1; BITBAND(LPC_PWM1->PCR, 12) = 1;
BITBAND( LPC_PWM1->PCR, 13 ) = 1; BITBAND(LPC_PWM1->PCR, 13) = 1;
BITBAND( LPC_PWM1->PCR, 14 ) = 1; BITBAND(LPC_PWM1->PCR, 14) = 1;
led_pwmstate = 1; led_pwmstate = 1;
} }
void led_std() void led_std() {
{ BITBAND(LPC_PINCON->PINSEL4, 9) = 0;
BITBAND( LPC_PINCON->PINSEL4, 9 ) = 0; BITBAND(LPC_PINCON->PINSEL4, 8) = 0;
BITBAND( LPC_PINCON->PINSEL4, 8 ) = 0;
BITBAND( LPC_PINCON->PINSEL4, 11 ) = 0; BITBAND(LPC_PINCON->PINSEL4, 11) = 0;
BITBAND( LPC_PINCON->PINSEL4, 10 ) = 0; BITBAND(LPC_PINCON->PINSEL4, 10) = 0;
BITBAND( LPC_PINCON->PINSEL3, 15 ) = 0; BITBAND(LPC_PINCON->PINSEL3, 15) = 0;
BITBAND( LPC_PINCON->PINSEL3, 14 ) = 0; BITBAND(LPC_PINCON->PINSEL3, 14) = 0;
BITBAND( LPC_PWM1->PCR, 12 ) = 0; BITBAND(LPC_PWM1->PCR, 12) = 0;
BITBAND( LPC_PWM1->PCR, 13 ) = 0; BITBAND(LPC_PWM1->PCR, 13) = 0;
BITBAND( LPC_PWM1->PCR, 14 ) = 0; BITBAND(LPC_PWM1->PCR, 14) = 0;
led_pwmstate = 0; led_pwmstate = 0;
} }
void led_init() void led_init() {
{ /* power is already connected by default */
/* power is already connected by default */ /* set PCLK divider to 8 */
/* set PCLK divider to 8 */ BITBAND(LPC_SC->PCLKSEL0, 13) = 1;
BITBAND( LPC_SC->PCLKSEL0, 13 ) = 1; BITBAND(LPC_SC->PCLKSEL0, 12) = 1;
BITBAND( LPC_SC->PCLKSEL0, 12 ) = 1;
LPC_PWM1->MR0 = 255; LPC_PWM1->MR0 = 255;
BITBAND( LPC_PWM1->LER, 0 ) = 1; BITBAND(LPC_PWM1->LER, 0) = 1;
BITBAND( LPC_PWM1->TCR, 0 ) = 1; BITBAND(LPC_PWM1->TCR, 0) = 1;
BITBAND( LPC_PWM1->TCR, 3 ) = 1; BITBAND(LPC_PWM1->TCR, 3) = 1;
BITBAND( LPC_PWM1->MCR, 1 ) = 1; BITBAND(LPC_PWM1->MCR, 1) = 1;
} }

View File

@@ -27,8 +27,8 @@ if { [info exists CPUTAPID ] } {
#delays on reset lines #delays on reset lines
#if your OpenOCD version rejects "jtag_nsrst_delay" replace it with: #if your OpenOCD version rejects "jtag_nsrst_delay" replace it with:
adapter_nsrst_delay 200 #adapter_nsrst_delay 200
#jtag_nsrst_delay 200 jtag_nsrst_delay 200
jtag_ntrst_delay 200 jtag_ntrst_delay 200
# LPC2000 & LPC1700 -> SRST causes TRST # LPC2000 & LPC1700 -> SRST causes TRST
@@ -39,8 +39,7 @@ jtag newtap $_CHIPNAME cpu -irlen 4 -expected-id $_CPUTAPID
#jtag newtap x3s tap -irlen 6 -ircapture 0x11 -irmask 0x11 -expected-id 0x0141c093 #jtag newtap x3s tap -irlen 6 -ircapture 0x11 -irmask 0x11 -expected-id 0x0141c093
set _TARGETNAME $_CHIPNAME.cpu set _TARGETNAME $_CHIPNAME.cpu
#target create $_TARGETNAME cortex_m3 -chain-position $_TARGETNAME -event reset-init 0 target create $_TARGETNAME cortex_m3 -chain-position $_TARGETNAME -event reset-init 0
target create $_TARGETNAME cortex_m -chain-position $_TARGETNAME -event reset-init 0
# LPC1754 has 16kB of SRAM In the ARMv7-M "Code" area (at 0x10000000) # LPC1754 has 16kB of SRAM In the ARMv7-M "Code" area (at 0x10000000)
# and 16K more on AHB, in the ARMv7-M "SRAM" area, (at 0x2007c000). # and 16K more on AHB, in the ARMv7-M "SRAM" area, (at 0x2007c000).
@@ -57,7 +56,7 @@ flash bank $_FLASHNAME lpc2000 0x0 0x20000 0 0 $_TARGETNAME \
# Run with *real slow* clock by default since the # Run with *real slow* clock by default since the
# boot rom could have been playing with the PLL, so # boot rom could have been playing with the PLL, so
# we have no idea what clock the target is running at. # we have no idea what clock the target is running at.
adapter_khz 1000 jtag_khz 1000
$_TARGETNAME configure -event reset-init { $_TARGETNAME configure -event reset-init {
# Do not remap 0x0000-0x0020 to anything but the flash (i.e. select # Do not remap 0x0000-0x0020 to anything but the flash (i.e. select

View File

@@ -48,389 +48,338 @@ extern volatile int reset_changed;
extern volatile cfg_t CFG; extern volatile cfg_t CFG;
enum system_states enum system_states {
{
SYS_RTC_STATUS = 0, SYS_RTC_STATUS = 0,
SYS_LAST_STATUS = 1 SYS_LAST_STATUS = 1
}; };
int main( void ) int main(void)
{ {
uint8_t card_go = 0; /* Start by initial configuration, needed in all cases */
uint32_t saved_dir_id; LPC_GPIO2->FIODIR = BV(4) | BV(5);
uint32_t mem_dir_id; LPC_GPIO1->FIODIR = BV(23) | BV(SNES_CIC_PAIR_BIT);
uint32_t mem_magic; BITBAND(SNES_CIC_PAIR_REG->FIOSET, SNES_CIC_PAIR_BIT) = 1;
uint8_t cmd = 0; LPC_GPIO0->FIODIR = BV(16);
uint64_t btime = 0;
uint32_t filesize = 0;
uint8_t snes_reset_prev = 0, snes_reset_now = 0, snes_reset_state = 0;
uint16_t reset_count = 0;
LPC_GPIO2->FIODIR = BV( 4 ) | BV( 5 );
LPC_GPIO1->FIODIR = BV( 23 ) | BV( SNES_CIC_PAIR_BIT );
BITBAND( SNES_CIC_PAIR_REG->FIOSET, SNES_CIC_PAIR_BIT ) = 1;
LPC_GPIO0->FIODIR = BV( 16 );
/* connect UART3 on P0[25:26] + SSP0 on P0[15:18] + MAT3.0 on P0[10] */ /* connect UART3 on P0[25:26] + SSP0 on P0[15:18] + MAT3.0 on P0[10] */
LPC_PINCON->PINSEL1 = BV( 18 ) | BV( 19 ) | BV( 20 ) | BV( 21 ) /* UART3 */ LPC_PINCON->PINSEL1 = BV(18) | BV(19) | BV(20) | BV(21) /* UART3 */
| BV( 3 ) | BV( 5 ); /* SSP0 (FPGA) except SS */ | BV(3) | BV(5); /* SSP0 (FPGA) except SS */
LPC_PINCON->PINSEL0 = BV( 31 ); /* SSP0 */ LPC_PINCON->PINSEL0 = BV(31); /* SSP0 */
/* | BV(13) | BV(15) | BV(17) | BV(19) SSP1 (SD) */ /* | BV(13) | BV(15) | BV(17) | BV(19) SSP1 (SD) */
/* pull-down CIC data lines */ /* pull-down CIC data lines */
LPC_PINCON->PINMODE0 = BV( 0 ) | BV( 1 ) | BV( 2 ) | BV( 3 ); LPC_PINCON->PINMODE0 = BV(0) | BV(1) | BV(2) | BV(3);
clock_disconnect(); /* Disable clock */ clock_disconnect();
snes_init(); /* Set SNES Reset */ /* First init all SNES functions */
power_init(); /* Enable power block of LPC */ snes_init();
timer_init(); /* Enable internal timer */ snes_reset(1); /* Maintain RESET UP, to prevent SNES to start */
uart_init(); /* Configure UART */
fpga_spi_init(); /* Configure FPGA_SPI IOs */
spi_preinit(); /* Initialise SPI IO */
led_init(); /* Initialise LEDs IO */
/* Init all other parts */
power_init();
timer_init();
uart_init();
fpga_spi_init();
spi_preinit();
led_init();
/* do this last because the peripheral init()s change PCLK dividers */ /* do this last because the peripheral init()s change PCLK dividers */
clock_init(); clock_init();
/* Output FPGA clock */
LPC_PINCON->PINSEL0 |= BV( 20 ) | BV( 21 ); /* MAT3.0 (FPGA clock) */
led_pwm(); /* Enabke PWM on LED (even if not used...) */ LPC_PINCON->PINSEL0 |= BV(20) | BV(21); /* MAT3.0 (FPGA clock) */
sdn_init(); /* SD init */ led_pwm();
sdn_init();
/* Print banner */ /* Banner */
printf( "\n\nsd2snes mk.2\n============\nfw ver.: " CONFIG_VERSION "\ncpu clock: %d Hz\n", CONFIG_CPU_FREQUENCY ); printf("\n\nsd2snes mk.2\n============\nfw ver.: " CONFIG_VERSION "\nfwver: %d\ncpu clock: %d Hz\n", CONFIG_FWVER, CONFIG_CPU_FREQUENCY);
printf("PCONP=%lx\n", LPC_SC->PCONP);
/* Init file manager */
file_init(); file_init();
cic_init(0);
/* */ /* FPGA Initialisation */
cic_init( 0 );
/* setup timer (fpga clk) */ /* setup timer (fpga clk) */
LPC_TIM3->TCR = 2;
LPC_TIM3->CTCR = 0; LPC_TIM3->CTCR = 0;
LPC_TIM3->PR = 0;
LPC_TIM3->EMR = EMC0TOGGLE; LPC_TIM3->EMR = EMC0TOGGLE;
LPC_TIM3->MCR = MR0R; LPC_TIM3->MCR = MR0R;
LPC_TIM3->MR0 = 1; LPC_TIM3->MR0 = 1;
LPC_TIM3->TCR = 1; LPC_TIM3->TCR = 1;
fpga_init(); fpga_init();
fpga_rompgm(); fpga_rompgm();
sram_writebyte( 0, SRAM_CMD_ADDR );
while ( 1 ) /* Main loop */ sram_writebyte(0, SRAM_CMD_ADDR);
/* Should test SRAM here */
while(1)
{ {
if ( disk_state == DISK_CHANGED ) if(disk_state == DISK_CHANGED)
{ {
sdn_init(); /* Reinit SD card */ sdn_init();
newcard = 1; newcard = 1;
} }
load_bootrle( SRAM_MENU_ADDR ); load_bootrle(SRAM_MENU_ADDR);
set_saveram_mask( 0xffff ); set_saveram_mask(0x1fff);
set_rom_mask( 0x3fffff ); set_rom_mask(0x3fffff);
set_mapper( 0x7 ); set_mapper(0x7);
snes_reset( 0 );
while ( get_cic_state() == CIC_FAIL ) /* Unlock SNES */
snes_reset(0);
/* Check CIC status */
while(get_cic_state() == CIC_FAIL)
{ {
rdyled( 0 ); rdyled(0);
readled( 0 ); readled(0);
writeled( 0 ); writeled(0);
delay_ms( 500 ); delay_ms(500);
rdyled( 1 ); rdyled(1);
readled( 1 ); readled(1);
writeled( 1 ); writeled(1);
delay_ms( 500 ); delay_ms(500);
} }
/* Wait for valid card inserted */ fpga_pgm((uint8_t*)"/sd2snes/fpga_base.bit");
card_go = 0; sram_memtest();
while ( !card_go ) /* some sanity checks */
uint8_t card_go = 0;
while(!card_go)
{ {
if ( disk_status( 0 ) & ( STA_NOINIT | STA_NODISK ) ) if(disk_status(0) & (STA_NOINIT|STA_NODISK))
{ {
snes_bootprint( " No SD Card found! \0" ); snes_bootprint(" No SD Card found! \0");
while(disk_status(0) & (STA_NOINIT|STA_NODISK));
while ( disk_status( 0 ) & ( STA_NOINIT | STA_NODISK ) ); delay_ms(200);
delay_ms( 200 );
} }
file_open((uint8_t*)"/sd2snes/menu.bin", FA_READ);
file_open( ( uint8_t * )"/sd2snes/menu.bin", FA_READ ); if(file_status != FILE_OK)
if ( file_status != FILE_OK )
{ {
snes_bootprint( " /sd2snes/menu.bin not found! \0" ); snes_bootprint(" /sd2snes/menu.bin not found! \0");
while(disk_status(0) == RES_OK);
while ( disk_status( 0 ) == RES_OK );
} }
else else
{ {
/* Card found ! */
card_go = 1; card_go = 1;
} }
file_close(); file_close();
} }
snes_bootprint(" Loading ... \0");
snes_bootprint( " Loading ... \0" ); if(get_cic_state() == CIC_PAIR)
if ( get_cic_state() == CIC_PAIR )
{ {
printf( "PAIR MODE ENGAGED!\n" ); printf("PAIR MODE ENGAGED!\n");
cic_pair( CIC_NTSC, CIC_NTSC ); cic_pair(CIC_NTSC, CIC_NTSC);
} }
rdyled( 1 ); rdyled(1);
readled( 0 ); readled(0);
writeled( 0 ); writeled(0);
/* Load user config */
cfg_load(); cfg_load();
cfg_save(); cfg_save();
sram_writebyte( cfg_is_last_game_valid(), SRAM_STATUS_ADDR + SYS_LAST_STATUS ); sram_writebyte(cfg_is_last_game_valid(), SRAM_STATUS_ADDR+SYS_LAST_STATUS);
cfg_get_last_game(file_lfn);
sram_writeblock(strrchr((const char*)file_lfn, '/')+1, SRAM_LASTGAME_ADDR, 256);
cfg_get_last_game( file_lfn ); *fs_path=0;
sram_writeblock( strrchr( ( const char * )file_lfn, '/' ) + 1, SRAM_LASTGAME_ADDR, 256 ); uint32_t saved_dir_id;
get_db_id(&saved_dir_id);
*fs_path = 0; uint32_t mem_dir_id = sram_readlong(SRAM_DIRID);
uint32_t mem_magic = sram_readlong(SRAM_SCRATCHPAD);
get_db_id( &saved_dir_id ); printf("mem_magic=%lx mem_dir_id=%lx saved_dir_id=%lx\n", mem_magic, mem_dir_id, saved_dir_id);
mem_dir_id = sram_readlong( SRAM_DIRID ); if((mem_magic != 0x12345678) || (mem_dir_id != saved_dir_id) || (newcard))
mem_magic = sram_readlong( SRAM_SCRATCHPAD );
printf( "mem_magic=%lx mem_dir_id=%lx saved_dir_id=%lx\n", mem_magic, mem_dir_id, saved_dir_id );
if ( ( mem_magic != 0x12345678 ) || ( mem_dir_id != saved_dir_id ) || ( newcard ) )
{ {
newcard = 0; newcard = 0;
/* generate fs footprint (interesting files only) */ /* generate fs footprint (interesting files only) */
uint32_t curr_dir_id = scan_dir( fs_path, NULL, 0, 0 ); uint32_t curr_dir_id = scan_dir(fs_path, NULL, 0, 0);
printf("curr dir id = %lx\n", curr_dir_id);
printf( "curr dir id = %lx\n", curr_dir_id );
/* files changed or no database found? */ /* files changed or no database found? */
if ( ( get_db_id( &saved_dir_id ) != FR_OK ) || saved_dir_id != curr_dir_id ) if((get_db_id(&saved_dir_id) != FR_OK) || saved_dir_id != curr_dir_id)
{ {
uint32_t endaddr, direndaddr;
/* rebuild database */ /* rebuild database */
printf( "saved dir id = %lx\n", saved_dir_id ); printf("saved dir id = %lx\n", saved_dir_id);
printf( "rebuilding database..." ); snes_bootprint(" rebuilding database ... \0");
snes_bootprint( " rebuilding database ... \0" ); curr_dir_id = scan_dir(fs_path, NULL, 1, 0);
curr_dir_id = scan_dir( fs_path, NULL, 1, 0 ); sram_writeblock(&curr_dir_id, SRAM_DB_ADDR, 4);
sram_writeblock( &curr_dir_id, SRAM_DB_ADDR, 4 ); uint32_t endaddr, direndaddr;
sram_readblock( &endaddr, SRAM_DB_ADDR + 4, 4 ); sram_readblock(&endaddr, SRAM_DB_ADDR+4, 4);
sram_readblock( &direndaddr, SRAM_DB_ADDR + 8, 4 ); sram_readblock(&direndaddr, SRAM_DB_ADDR+8, 4);
printf( "%lx %lx\n", endaddr, direndaddr ); printf("endaddr: 0x%lX dirend: 0x%lX\n", endaddr, direndaddr);
printf( "sorting database..." ); snes_bootprint(" sorting database ... \0");
snes_bootprint( " sorting database ... \0" ); sort_all_dir(direndaddr);
sort_all_dir( direndaddr ); printf("done\n");
printf( "done\n" ); snes_bootprint(" saving database ... \0");
snes_bootprint( " saving database ... \0" ); save_sram((uint8_t*)"/sd2snes/sd2snes.db", endaddr-SRAM_DB_ADDR, SRAM_DB_ADDR);
save_sram( ( uint8_t * )"/sd2snes/sd2snes.db", endaddr - SRAM_DB_ADDR, SRAM_DB_ADDR ); save_sram((uint8_t*)"/sd2snes/sd2snes.dir", direndaddr-(SRAM_DIR_ADDR), SRAM_DIR_ADDR);
save_sram( ( uint8_t * )"/sd2snes/sd2snes.dir", direndaddr - ( SRAM_DIR_ADDR ), SRAM_DIR_ADDR ); printf("done\n");
fpga_pgm( ( uint8_t * )"/sd2snes/fpga_base.bit" );
printf( "done\n" );
} }
else else
{ {
printf( "saved dir id = %lx\n", saved_dir_id ); printf("saved dir id = %lx\n", saved_dir_id);
printf( "different card, consistent db, loading db...\n" ); printf("different card, consistent db, loading db...\n");
fpga_pgm( ( uint8_t * )"/sd2snes/fpga_base.bit" ); load_sram((uint8_t*)"/sd2snes/sd2snes.db", SRAM_DB_ADDR);
load_sram_offload( ( uint8_t * )"/sd2snes/sd2snes.db", SRAM_DB_ADDR ); load_sram((uint8_t*)"/sd2snes/sd2snes.dir", SRAM_DIR_ADDR);
load_sram_offload( ( uint8_t * )"/sd2snes/sd2snes.dir", SRAM_DIR_ADDR );
} }
sram_writelong( curr_dir_id, SRAM_DIRID ); sram_writelong(curr_dir_id, SRAM_DIRID);
sram_writelong( 0x12345678, SRAM_SCRATCHPAD ); sram_writelong(0x12345678, SRAM_SCRATCHPAD);
} }
else else
{ {
snes_bootprint( " same card, loading db... \n" ); snes_bootprint(" same card, loading db... \0");
fpga_pgm( ( uint8_t * )"/sd2snes/fpga_base.bit" ); printf("same card, loading db...\n");
load_sram_offload( ( uint8_t * )"/sd2snes/sd2snes.db", SRAM_DB_ADDR ); load_sram((uint8_t*)"/sd2snes/sd2snes.db", SRAM_DB_ADDR);
load_sram_offload( ( uint8_t * )"/sd2snes/sd2snes.dir", SRAM_DIR_ADDR ); load_sram((uint8_t*)"/sd2snes/sd2snes.dir", SRAM_DIR_ADDR);
} }
/* cli_loop(); */ #if 1
cli_loop();
#endif
/* load menu */ /* load menu */
fpga_pgm((uint8_t*)"/sd2snes/fpga_base.bit");
fpga_dspx_reset(1);
fpga_dspx_reset( 1 ); uart_putc('(');
uart_putc( '(' ); load_rom((uint8_t*)"/sd2snes/menu.bin", SRAM_MENU_ADDR, 0);
uart_putcrlf();
load_rom( ( uint8_t * )"/sd2snes/menu.bin", SRAM_MENU_ADDR, 0 );
/* force memory size + mapper */ /* force memory size + mapper */
set_rom_mask( 0x3fffff ); set_rom_mask(0x3fffff);
set_mapper( 0x7 ); set_mapper(0x7);
uart_putc( ')' ); uart_putc(')');
uart_putcrlf(); uart_putcrlf();
sram_writebyte( 0, SRAM_CMD_ADDR ); sram_writebyte(0, SRAM_CMD_ADDR);
snes_bootprint( " same card, loading db... \n" ); if((rtc_state = rtc_isvalid()) != RTC_OK)
if ( ( rtc_state = rtc_isvalid() ) != RTC_OK )
{ {
printf( "RTC invalid!\n" ); printf("RTC invalid!\n");
sram_writebyte( 0xff, SRAM_STATUS_ADDR + SYS_RTC_STATUS ); sram_writebyte(0xff, SRAM_STATUS_ADDR+SYS_RTC_STATUS);
set_bcdtime( 0x20120701000000LL ); set_bcdtime(0x20110401000000LL);
set_fpga_time( 0x20120701000000LL ); set_fpga_time(0x20110401000000LL);
invalidate_rtc(); invalidate_rtc();
} }
else else
{ {
printf( "RTC valid!\n" ); printf("RTC valid!\n");
sram_writebyte( 0x00, SRAM_STATUS_ADDR + SYS_RTC_STATUS ); sram_writebyte(0x00, SRAM_STATUS_ADDR+SYS_RTC_STATUS);
set_fpga_time( get_bcdtime() ); set_fpga_time(get_bcdtime());
} }
sram_memset(SRAM_SYSINFO_ADDR, 13*40, 0x20);
printf("SNES GO!\n");
snes_reset(1);
delay_ms(1);
snes_reset(0);
sram_memset( SRAM_SYSINFO_ADDR, 13 * 40, 0x20 ); uint8_t cmd = 0;
printf( "SNES GO!\n" ); uint64_t btime = 0;
snes_reset( 1 ); uint32_t filesize=0;
fpga_reset_srtc_state(); sram_writebyte(32, SRAM_CMD_ADDR);
delay_ms( SNES_RESET_PULSELEN_MS );
sram_writebyte( 32, SRAM_CMD_ADDR );
snes_reset( 0 );
cmd = 0; printf("test sram\n");
btime = 0; while(!sram_reliable()) cli_entrycheck();
filesize = 0;
printf( "test sram... " ); printf("ok\n");
while ( !sram_reliable() ) //while(1) {
{ // delay_ms(1000);
cli_entrycheck(); // printf("Estimated SNES master clock: %ld Hz\n", get_snes_sysclk());
} //}
printf( "ok\nWaiting command from menu...\n" );
//while(1) {
// delay_ms(1000);
// printf("Estimated SNES master clock: %ld Hz\n", get_snes_sysclk());
//}
//sram_hexdump(SRAM_DB_ADDR, 0x200); //sram_hexdump(SRAM_DB_ADDR, 0x200);
//sram_hexdump(SRAM_MENU_ADDR, 0x400); //sram_hexdump(SRAM_MENU_ADDR, 0x400);
while ( !cmd ) while(!cmd)
{ {
cmd = menu_main_loop(); cmd=menu_main_loop();
printf( "cmd: %d\n", cmd ); printf("cmd: %d\n", cmd);
uart_putc('-');
switch ( cmd ) switch(cmd)
{ {
case SNES_CMD_LOADROM: case SNES_CMD_LOADROM:
get_selected_name( file_lfn ); get_selected_name(file_lfn);
printf( "Selected name: %s\n", file_lfn ); printf("Selected name: %s\n", file_lfn);
cfg_save_last_game( file_lfn ); cfg_save_last_game(file_lfn);
cfg_set_last_game_valid( 1 ); cfg_set_last_game_valid(1);
cfg_save(); cfg_save();
filesize = load_rom( file_lfn, SRAM_ROM_ADDR, LOADROM_WITH_SRAM | LOADROM_WITH_RESET ); filesize = load_rom(file_lfn, SRAM_ROM_ADDR, LOADROM_WITH_SRAM | LOADROM_WITH_RESET);
printf( "Filesize = %lu\n", filesize );
break; break;
case SNES_CMD_SETRTC: case SNES_CMD_SETRTC:
/* get time from RAM */ /* get time from RAM */
btime = sram_gettime( SRAM_PARAM_ADDR ); btime = sram_gettime(SRAM_PARAM_ADDR);
/* set RTC */ /* set RTC */
set_bcdtime( btime ); set_bcdtime(btime);
set_fpga_time( btime ); set_fpga_time(btime);
cmd = 0; /* stay in menu loop */ cmd=0; /* stay in menu loop */
break; break;
case SNES_CMD_SYSINFO: case SNES_CMD_SYSINFO:
/* go to sysinfo loop */ /* go to sysinfo loop */
sysinfo_loop(); sysinfo_loop();
cmd = 0; /* stay in menu loop */ cmd=0; /* stay in menu loop */
break;
case SNES_CMD_LOADSPC:
/* load SPC file */
get_selected_name( file_lfn );
printf( "Selected name: %s\n", file_lfn );
filesize = load_spc( file_lfn, SRAM_SPC_DATA_ADDR, SRAM_SPC_HEADER_ADDR );
cmd = 0; /* stay in menu loop */
break;
case SNES_CMD_RESET:
/* process RESET request from SNES */
printf( "RESET requested by SNES\n" );
snes_reset_pulse();
cmd = 0; /* stay in menu loop */
break; break;
case SNES_CMD_LOADLAST: case SNES_CMD_LOADLAST:
cfg_get_last_game( file_lfn ); cfg_get_last_game(file_lfn);
printf( "Selected name: %s\n", file_lfn ); printf("Selected name: %s\n", file_lfn);
filesize = load_rom( file_lfn, SRAM_ROM_ADDR, LOADROM_WITH_SRAM | LOADROM_WITH_RESET ); filesize = load_rom(file_lfn, SRAM_ROM_ADDR, LOADROM_WITH_SRAM | LOADROM_WITH_RESET);
break; break;
default: default:
printf( "unknown cmd: %d\n", cmd ); printf("unknown cmd: %d\n", cmd);
cmd = 0; /* unknown cmd: stay in loop */ cmd=0; /* unknown cmd: stay in loop */
break; break;
} }
} }
printf( "loaded %lu bytes\n", filesize ); printf("cmd was %x, going to snes main loop\n", cmd);
printf( "cmd was %x, going to snes main loop\n", cmd );
if ( romprops.has_msu1 ) if(romprops.has_msu1 && msu1_loop())
{ {
while ( !msu1_loop() );
prepare_reset(); prepare_reset();
continue; continue;
} }
cmd = 0; cmd=0;
snes_reset_prev = 0; uint8_t snes_reset_prev=0, snes_reset_now=0, snes_reset_state=0;
snes_reset_now = 0; uint16_t reset_count=0;
snes_reset_state = 0; while(fpga_test() == FPGA_TEST_TOKEN)
reset_count = 0;
while ( fpga_test() == FPGA_TEST_TOKEN )
{ {
cli_entrycheck(); cli_entrycheck();
sleep_ms( 250 ); sleep_ms(250);
sram_reliable(); sram_reliable();
printf( "%s ", get_cic_statename( get_cic_state() ) ); printf("%s ", get_cic_statename(get_cic_state()));
if(reset_changed)
if ( reset_changed )
{ {
printf( "reset\n" ); printf("reset\n");
reset_changed = 0; reset_changed = 0;
fpga_reset_srtc_state(); fpga_reset_srtc_state();
} }
snes_reset_now=get_snes_reset();
snes_reset_now = get_snes_reset(); if(snes_reset_now)
if ( snes_reset_now )
{ {
if ( !snes_reset_prev ) if(!snes_reset_prev)
{ {
printf( "RESET BUTTON DOWN\n" ); printf("RESET BUTTON DOWN\n");
snes_reset_state = 1; snes_reset_state=1;
reset_count = 0; reset_count=0;
} }
} }
else else
{ {
if ( snes_reset_prev ) if(snes_reset_prev)
{ {
printf( "RESET BUTTON UP\n" ); printf("RESET BUTTON UP\n");
snes_reset_state = 0; snes_reset_state=0;
} }
} }
if(snes_reset_state)
if ( snes_reset_state )
{ {
reset_count++; reset_count++;
} }
@@ -439,23 +388,20 @@ int main( void )
sram_reliable(); sram_reliable();
snes_main_loop(); snes_main_loop();
} }
if(reset_count>4)
if ( reset_count > 4 )
{ {
reset_count = 0; reset_count=0;
prepare_reset(); prepare_reset();
break; break;
} }
snes_reset_prev = snes_reset_now; snes_reset_prev = snes_reset_now;
} }
/* fpga test fail: panic */ /* fpga test fail: panic */
if ( fpga_test() != FPGA_TEST_TOKEN ) if(fpga_test() != FPGA_TEST_TOKEN)
{ {
led_panic(); led_panic();
} }
/* else reset */ /* else reset */
} }
} }

File diff suppressed because it is too large Load Diff

View File

@@ -30,74 +30,47 @@
#include <arm/NXP/LPC17xx/LPC17xx.h> #include <arm/NXP/LPC17xx/LPC17xx.h>
#include "smc.h" #include "smc.h"
#define MASK_BITS (0x000000) #define SRAM_ROM_ADDR (0x000000L)
#if 0 #define SRAM_SAVE_ADDR (0xE00000L)
#define SRAM_ROM_ADDR ((0x000000L) & ~MASK_BITS)
#define SRAM_SAVE_ADDR ((0x400000L) & ~MASK_BITS)
#define SRAM_MENU_ADDR ((0x7A0000L) & ~MASK_BITS) #define SRAM_MENU_ADDR (0xE00000L)
#define SRAM_DIR_ADDR ((0x410000L) & ~MASK_BITS) #define SRAM_DB_ADDR (0xE40000L)
#define SRAM_DB_ADDR ((0x420000L) & ~MASK_BITS) #define SRAM_DIR_ADDR (0xE10000L)
#define SRAM_CMD_ADDR (0xFF1000L)
#define SRAM_SPC_DATA_ADDR ((0x430000L) & ~MASK_BITS) #define SRAM_PARAM_ADDR (0xFF1004L)
#define SRAM_SPC_HEADER_ADDR ((0x440000L) & ~MASK_BITS) #define SRAM_STATUS_ADDR (0xFF1100L)
#define SRAM_SYSINFO_ADDR (0xFF1200L)
#define SRAM_MENU_SAVE_ADDR ((0x7F0000L) & ~MASK_BITS) #define SRAM_LASTGAME_ADDR (0xFF1420L)
#define SRAM_CMD_ADDR ((0x7F1000L) & ~MASK_BITS) #define SRAM_MENU_SAVE_ADDR (0xFF0000L)
#define SRAM_PARAM_ADDR ((0x7F1004L) & ~MASK_BITS) #define SRAM_SCRATCHPAD (0xFFFF00L)
#define SRAM_STATUS_ADDR ((0x7F1100L) & ~MASK_BITS) #define SRAM_DIRID (0xFFFFF0L)
#define SRAM_SYSINFO_ADDR ((0x7F1200L) & ~MASK_BITS)
#define SRAM_LASTGAME_ADDR ((0x7F1420L) & ~MASK_BITS)
#define SRAM_SCRATCHPAD ((0x7FFF00L) & ~MASK_BITS)
#define SRAM_DIRID ((0x7FFFF0L) & ~MASK_BITS)
#define SRAM_RELIABILITY_SCORE (0x100) #define SRAM_RELIABILITY_SCORE (0x100)
#else
#define SRAM_ROM_ADDR ((0x000000L) & ~MASK_BITS)
#define SRAM_SAVE_ADDR ((0x600000L) & ~MASK_BITS)
#define SRAM_MENU_ADDR ((0x500000L) & ~MASK_BITS)
#define SRAM_DIR_ADDR ((0x510000L) & ~MASK_BITS)
#define SRAM_DB_ADDR ((0x580000L) & ~MASK_BITS)
#define SRAM_SPC_DATA_ADDR ((0x7D0000L) & ~MASK_BITS)
#define SRAM_SPC_HEADER_ADDR ((0x7E0000L) & ~MASK_BITS)
#define SRAM_MENU_SAVE_ADDR ((0x7F0000L) & ~MASK_BITS)
#define SRAM_CMD_ADDR ((0x7F1000L) & ~MASK_BITS)
#define SRAM_PARAM_ADDR ((0x7F1004L) & ~MASK_BITS)
#define SRAM_STATUS_ADDR ((0x7F1100L) & ~MASK_BITS)
#define SRAM_SYSINFO_ADDR ((0x7F1200L) & ~MASK_BITS)
#define SRAM_LASTGAME_ADDR ((0x7F1420L) & ~MASK_BITS)
#define SRAM_SCRATCHPAD ((0x7FFF00L) & ~MASK_BITS)
#define SRAM_DIRID ((0x7FFFF0L) & ~MASK_BITS)
#define SRAM_RELIABILITY_SCORE (0x100)
#endif
#define LOADROM_WITH_SRAM (1) #define LOADROM_WITH_SRAM (1)
#define LOADROM_WITH_RESET (2) #define LOADROM_WITH_RESET (2)
uint32_t load_rom( uint8_t *filename, uint32_t base_addr, uint8_t flags ); uint32_t load_rom(uint8_t* filename, uint32_t base_addr, uint8_t flags);
uint32_t load_spc( uint8_t *filename, uint32_t spc_data_addr, uint32_t spc_header_addr ); uint32_t load_sram(uint8_t* filename, uint32_t base_addr);
uint32_t load_sram( uint8_t *filename, uint32_t base_addr ); uint32_t load_sram_offload(uint8_t* filename, uint32_t base_addr);
uint32_t load_sram_offload( uint8_t *filename, uint32_t base_addr ); uint32_t load_sram_rle(uint8_t* filename, uint32_t base_addr);
uint32_t load_sram_rle( uint8_t *filename, uint32_t base_addr ); uint32_t load_bootrle(uint32_t base_addr);
uint32_t load_bootrle( uint32_t base_addr ); void load_dspx(const uint8_t* filename, uint8_t st0010);
void load_dspx( const uint8_t *filename, uint8_t st0010 ); void sram_hexdump(uint32_t addr, uint32_t len);
void sram_hexdump( uint32_t addr, uint32_t len ); uint8_t sram_readbyte(uint32_t addr);
uint8_t sram_readbyte( uint32_t addr ); uint16_t sram_readshort(uint32_t addr);
uint16_t sram_readshort( uint32_t addr ); uint32_t sram_readlong(uint32_t addr);
uint32_t sram_readlong( uint32_t addr ); void sram_writebyte(uint8_t val, uint32_t addr);
void sram_writebyte( uint8_t val, uint32_t addr ); void sram_writeshort(uint16_t val, uint32_t addr);
void sram_writeshort( uint16_t val, uint32_t addr ); void sram_writelong(uint32_t val, uint32_t addr);
void sram_writelong( uint32_t val, uint32_t addr ); void sram_readblock(void* buf, uint32_t addr, uint16_t size);
void sram_readblock( void *buf, uint32_t addr, uint16_t size ); void sram_readlongblock(uint32_t* buf, uint32_t addr, uint16_t count);
void sram_readlongblock( uint32_t *buf, uint32_t addr, uint16_t count ); void sram_writeblock(void* buf, uint32_t addr, uint16_t size);
void sram_writeblock( void *buf, uint32_t addr, uint16_t size ); void save_sram(uint8_t* filename, uint32_t sram_size, uint32_t base_addr);
void save_sram( uint8_t *filename, uint32_t sram_size, uint32_t base_addr ); uint32_t calc_sram_crc(uint32_t base_addr, uint32_t size);
uint32_t calc_sram_crc( uint32_t base_addr, uint32_t size ); uint8_t sram_reliable(void);
uint8_t sram_reliable( void ); void sram_memset(uint32_t base_addr, uint32_t len, uint8_t val);
void sram_memset( uint32_t base_addr, uint32_t len, uint8_t val ); uint64_t sram_gettime(uint32_t base_addr);
uint64_t sram_gettime( uint32_t base_addr );
void sram_readstrn( void *buf, uint32_t addr, uint16_t size ); uint8_t sram_memtest(void);
#endif #endif

View File

@@ -13,321 +13,227 @@
#include "smc.h" #include "smc.h"
FIL msufile; FIL msufile;
FRESULT msu_res;
DWORD msu_cltbl[CLTBL_SIZE] IN_AHBRAM; DWORD msu_cltbl[CLTBL_SIZE] IN_AHBRAM;
DWORD pcm_cltbl[CLTBL_SIZE] IN_AHBRAM; DWORD pcm_cltbl[CLTBL_SIZE] IN_AHBRAM;
UINT msu_audio_bytes_read = 1024;
UINT msu_data_bytes_read = 1;
extern snes_romprops_t romprops; extern snes_romprops_t romprops;
uint32_t msu_loop_point = 0;
uint32_t msu_page1_start = 0x0000;
uint32_t msu_page2_start = 0x2000;
uint32_t msu_page_size = 0x2000;
uint16_t fpga_status_prev;
uint16_t fpga_status_now;
enum msu_reset_state { MSU_RESET_NONE = 0, MSU_RESET_SHORT, MSU_RESET_LONG }; int msu1_check_reset(void) {
void prepare_audio_track( uint16_t msu_track )
{
/* open file, fill buffer */
char suffix[11];
f_close( &file_handle );
snprintf( suffix, sizeof( suffix ), "-%d.pcm", msu_track );
strcpy( ( char * )file_buf, ( char * )file_lfn );
strcpy( strrchr( ( char * )file_buf, ( int )'.' ), suffix );
DBG_MSU1 printf( "filename: %s\n", file_buf );
if ( f_open( &file_handle, ( const TCHAR * )file_buf, FA_READ ) == FR_OK )
{
file_handle.cltbl = pcm_cltbl;
pcm_cltbl[0] = CLTBL_SIZE;
f_lseek( &file_handle, CREATE_LINKMAP );
f_lseek( &file_handle, 4L );
f_read( &file_handle, &msu_loop_point, 4, &msu_audio_bytes_read );
DBG_MSU1 printf( "loop point: %ld samples\n", msu_loop_point );
ff_sd_offload = 1;
sd_offload_tgt = 1;
f_lseek( &file_handle, 8L );
set_dac_addr( 0 );
dac_pause();
dac_reset();
ff_sd_offload = 1;
sd_offload_tgt = 1;
f_read( &file_handle, file_buf, MSU_DAC_BUFSIZE, &msu_audio_bytes_read );
/* clear busy bit */
set_msu_status( 0x00, 0x28 ); /* set no bits, reset audio_busy + audio_error */
}
else
{
f_close( &file_handle );
set_msu_status( 0x08, 0x20 ); /* reset audio_busy, set audio_error */
}
}
void prepare_data( uint32_t msu_offset )
{
DBG_MSU1 printf( "Data requested! Offset=%08lx page1=%08lx page2=%08lx\n", msu_offset, msu_page1_start,
msu_page2_start );
if ( ( ( msu_offset < msu_page1_start )
|| ( msu_offset >= msu_page1_start + msu_page_size ) )
&& ( ( msu_offset < msu_page2_start )
|| ( msu_offset >= msu_page2_start + msu_page_size ) ) )
{
DBG_MSU1 printf( "offset %08lx out of range (%08lx-%08lx, %08lx-%08lx), reload\n", msu_offset, msu_page1_start,
msu_page1_start + msu_page_size - 1, msu_page2_start, msu_page2_start + msu_page_size - 1 );
/* "cache miss" */
/* fill buffer */
set_msu_addr( 0x0 );
sd_offload_tgt = 2;
ff_sd_offload = 1;
msu_res = f_lseek( &msufile, msu_offset );
DBG_MSU1 printf( "seek to %08lx, res = %d\n", msu_offset, msu_res );
sd_offload_tgt = 2;
ff_sd_offload = 1;
msu_res = f_read( &msufile, file_buf, 16384, &msu_data_bytes_read );
DBG_MSU1 printf( "read res = %d\n", msu_res );
DBG_MSU1 printf( "read %d bytes\n", msu_data_bytes_read );
msu_reset( 0x0 );
msu_page1_start = msu_offset;
msu_page2_start = msu_offset + msu_page_size;
}
else
{
if ( msu_offset >= msu_page1_start && msu_offset <= msu_page1_start + msu_page_size )
{
msu_reset( 0x0000 + msu_offset - msu_page1_start );
DBG_MSU1 printf( "inside page1, new offset: %08lx\n", 0x0000 + msu_offset - msu_page1_start );
if ( !( msu_page2_start == msu_page1_start + msu_page_size ) )
{
set_msu_addr( 0x2000 );
sd_offload_tgt = 2;
ff_sd_offload = 1;
f_read( &msufile, file_buf, 8192, &msu_data_bytes_read );
DBG_MSU1 printf( "next page dirty (was: %08lx), loaded page2 (start now: ", msu_page2_start );
msu_page2_start = msu_page1_start + msu_page_size;
DBG_MSU1 printf( "%08lx)\n", msu_page2_start );
}
}
else if ( msu_offset >= msu_page2_start && msu_offset <= msu_page2_start + msu_page_size )
{
DBG_MSU1 printf( "inside page2, new offset: %08lx\n", 0x2000 + msu_offset - msu_page2_start );
msu_reset( 0x2000 + msu_offset - msu_page2_start );
if ( !( msu_page1_start == msu_page2_start + msu_page_size ) )
{
set_msu_addr( 0x0 );
sd_offload_tgt = 2;
ff_sd_offload = 1;
f_read( &msufile, file_buf, 8192, &msu_data_bytes_read );
DBG_MSU1 printf( "next page dirty (was: %08lx), loaded page1 (start now: ", msu_page1_start );
msu_page1_start = msu_page2_start + msu_page_size;
DBG_MSU1 printf( "%08lx)\n", msu_page1_start );
}
}
else
{
printf( "!!!WATWATWAT!!!\n" );
}
}
/* clear bank bit to mask bank reset artifact */
fpga_status_now &= ~0x2000;
fpga_status_prev &= ~0x2000;
/* clear busy bit */
set_msu_status( 0x00, 0x10 );
}
int msu1_check_reset( void )
{
static tick_t rising_ticks; static tick_t rising_ticks;
static uint8_t resbutton = 0, resbutton_prev = 0; static uint8_t resbutton=0, resbutton_prev=0;
int result = MSU_RESET_NONE;
resbutton = get_snes_reset(); resbutton = get_snes_reset();
if(resbutton && !resbutton_prev) { /* push */
if ( resbutton && !resbutton_prev ) /* push */
{
rising_ticks = getticks(); rising_ticks = getticks();
} } else if(resbutton && resbutton_prev) { /* hold */
else if ( resbutton && resbutton_prev ) /* hold */ if(getticks() > rising_ticks + 99) {
{ return 1;
if ( getticks() > rising_ticks + 99 )
{
result = MSU_RESET_LONG;
} }
} }
else if ( !resbutton && resbutton_prev ) /* release */
{
if ( getticks() < rising_ticks + 99 )
{
result = MSU_RESET_SHORT;
}
}
else
{
result = MSU_RESET_NONE;
}
resbutton_prev = resbutton; resbutton_prev = resbutton;
return result; return 0;
} }
int msu1_check( uint8_t *filename ) int msu1_check(uint8_t* filename) {
{ /* open MSU file */
/* open MSU file */ strcpy((char*)file_buf, (char*)filename);
strcpy( ( char * )file_buf, ( char * )filename ); strcpy(strrchr((char*)file_buf, (int)'.'), ".msu");
strcpy( strrchr( ( char * )file_buf, ( int )'.' ), ".msu" ); printf("MSU datafile: %s\n", file_buf);
printf( "MSU datafile: %s\n", file_buf ); if(f_open(&msufile, (const TCHAR*)file_buf, FA_READ) != FR_OK) {
printf("MSU datafile not found\n");
if ( f_open( &msufile, ( const TCHAR * )file_buf, FA_READ ) != FR_OK )
{
printf( "MSU datafile not found\n" );
return 0; return 0;
} }
msufile.cltbl = msu_cltbl; msufile.cltbl = msu_cltbl;
msu_cltbl[0] = CLTBL_SIZE; msu_cltbl[0] = CLTBL_SIZE;
if(f_lseek(&msufile, CREATE_LINKMAP)) {
if ( f_lseek( &msufile, CREATE_LINKMAP ) ) printf("Error creating FF linkmap for MSU file!\n");
{
printf( "Error creating FF linkmap for MSU file!\n" );
} }
romprops.fpga_features |= FEAT_MSU1; romprops.fpga_features |= FEAT_MSU1;
return 1; return 1;
} }
int msu1_loop() int msu1_loop() {
{ /* it is assumed that the MSU file is already opened by calling msu1_check(). */
/* it is assumed that the MSU file is already opened by calling msu1_check(). */ UINT bytes_read = 1024;
while ( fpga_status() & 0x4000 ); UINT bytes_read2 = 1;
FRESULT res;
set_dac_vol(0x00);
while(fpga_status() & 0x4000);
uint16_t fpga_status_prev = fpga_status();
uint16_t fpga_status_now = fpga_status();
uint16_t dac_addr = 0; uint16_t dac_addr = 0;
uint16_t msu_addr = 0; uint16_t msu_addr = 0;
uint8_t msu_repeat = 0; uint8_t msu_repeat = 0;
uint16_t msu_track = 0; uint16_t msu_track = 0;
uint32_t msu_offset = 0; uint32_t msu_offset = 0;
fpga_status_prev = fpga_status(); uint32_t msu_loop_point = 0;
fpga_status_now = fpga_status();
int msu_res;
/* set_msu_addr(0x0); uint32_t msu_page1_start = 0x0000;
uint32_t msu_page2_start = 0x2000;
uint32_t msu_page_size = 0x2000;
set_msu_addr(0x0);
msu_reset(0x0); msu_reset(0x0);
ff_sd_offload=1; ff_sd_offload=1;
sd_offload_tgt=2; sd_offload_tgt=2;
f_lseek(&msufile, 0L); f_lseek(&msufile, 0L);
ff_sd_offload=1; ff_sd_offload=1;
sd_offload_tgt=2; sd_offload_tgt=2;
f_read(&msufile, file_buf, 16384, &msu_data_bytes_read); f_read(&msufile, file_buf, 16384, &bytes_read2);
*/
set_dac_addr( dac_addr ); set_dac_addr(dac_addr);
dac_pause(); dac_pause();
dac_reset(); dac_reset();
/* audio_start, data_start, 0, audio_ctrl[1:0], ctrl_start */
set_msu_addr( 0x0 ); while(1){
msu_reset( 0x0 );
ff_sd_offload = 1;
sd_offload_tgt = 2;
f_lseek( &msufile, 0L );
ff_sd_offload = 1;
sd_offload_tgt = 2;
f_read( &msufile, file_buf, 16384, &msu_data_bytes_read );
prepare_audio_track( 0 );
prepare_data( 0 );
/* audio_start, data_start, 0, audio_ctrl[1:0], ctrl_start */
while ( ( msu_res = msu1_check_reset() ) == MSU_RESET_NONE )
{
cli_entrycheck(); cli_entrycheck();
fpga_status_now = fpga_status(); fpga_status_now = fpga_status();
/* Data buffer refill */ /* Data buffer refill */
if ( ( fpga_status_now & 0x2000 ) != ( fpga_status_prev & 0x2000 ) ) if((fpga_status_now & 0x2000) != (fpga_status_prev & 0x2000)) {
{ DBG_MSU1 printf("data\n");
DBG_MSU1 printf( "data\n" ); uint8_t pageno = 0;
if(fpga_status_now & 0x2000) {
if ( fpga_status_now & 0x2000 )
{
msu_addr = 0x0; msu_addr = 0x0;
msu_page1_start = msu_page2_start + msu_page_size; msu_page1_start = msu_page2_start + msu_page_size;
} pageno = 1;
else } else {
{
msu_addr = 0x2000; msu_addr = 0x2000;
msu_page2_start = msu_page1_start + msu_page_size; msu_page2_start = msu_page1_start + msu_page_size;
pageno = 2;
} }
set_msu_addr(msu_addr);
set_msu_addr( msu_addr ); sd_offload_tgt=2;
sd_offload_tgt = 2; ff_sd_offload=1;
ff_sd_offload = 1; res = f_read(&msufile, file_buf, 8192, &bytes_read2);
msu_res = f_read( &msufile, file_buf, 8192, &msu_data_bytes_read ); DBG_MSU1 printf("data buffer refilled. res=%d page1=%08lx page2=%08lx\n", res, msu_page1_start, msu_page2_start);
DBG_MSU1 printf( "data buffer refilled. res=%d page1=%08lx page2=%08lx\n", msu_res, msu_page1_start, msu_page2_start );
} }
/* Audio buffer refill */ /* Audio buffer refill */
if ( ( fpga_status_now & 0x4000 ) != ( fpga_status_prev & 0x4000 ) ) if((fpga_status_now & 0x4000) != (fpga_status_prev & 0x4000)) {
{ if(fpga_status_now & 0x4000) {
if ( fpga_status_now & 0x4000 )
{
dac_addr = 0; dac_addr = 0;
} else {
dac_addr = MSU_DAC_BUFSIZE/2;
} }
else set_dac_addr(dac_addr);
{ sd_offload_tgt=1;
dac_addr = MSU_DAC_BUFSIZE / 2; ff_sd_offload=1;
f_read(&file_handle, file_buf, MSU_DAC_BUFSIZE/2, &bytes_read);
} }
set_dac_addr( dac_addr ); if(fpga_status_now & 0x0020) {
sd_offload_tgt = 1; char suffix[11];
ff_sd_offload = 1;
f_read( &file_handle, file_buf, MSU_DAC_BUFSIZE / 2, &msu_audio_bytes_read );
}
if ( fpga_status_now & 0x0020 )
{
/* get trackno */ /* get trackno */
msu_track = get_msu_track(); msu_track = get_msu_track();
DBG_MSU1 printf( "Audio requested! Track=%d\n", msu_track ); DBG_MSU1 printf("Audio requested! Track=%d\n", msu_track);
prepare_audio_track( msu_track ); /* open file, fill buffer */
f_close(&file_handle);
snprintf(suffix, sizeof(suffix), "-%d.pcm", msu_track);
strcpy((char*)file_buf, (char*)file_lfn);
strcpy(strrchr((char*)file_buf, (int)'.'), suffix);
DBG_MSU1 printf("filename: %s\n", file_buf);
f_open(&file_handle, (const TCHAR*)file_buf, FA_READ);
file_handle.cltbl = pcm_cltbl;
pcm_cltbl[0] = CLTBL_SIZE;
f_lseek(&file_handle, CREATE_LINKMAP);
f_lseek(&file_handle, 4L);
f_read(&file_handle, &msu_loop_point, 4, &bytes_read);
DBG_MSU1 printf("loop point: %ld samples\n", msu_loop_point);
ff_sd_offload=1;
sd_offload_tgt=1;
f_lseek(&file_handle, 8L);
set_dac_addr(0);
dac_pause();
dac_reset();
ff_sd_offload=1;
sd_offload_tgt=1;
f_read(&file_handle, file_buf, MSU_DAC_BUFSIZE, &bytes_read);
/* clear busy bit */
set_msu_status(0x00, 0x20); /* set no bits, reset bit 5 */
} }
if ( fpga_status_now & 0x0010 ) if(fpga_status_now & 0x0010) {
{
/* get address */ /* get address */
msu_offset = get_msu_offset(); msu_offset=get_msu_offset();
prepare_data( msu_offset ); DBG_MSU1 printf("Data requested! Offset=%08lx page1=%08lx page2=%08lx\n", msu_offset, msu_page1_start, msu_page2_start);
if( ((msu_offset < msu_page1_start)
|| (msu_offset >= msu_page1_start + msu_page_size))
&& ((msu_offset < msu_page2_start)
|| (msu_offset >= msu_page2_start + msu_page_size))) {
DBG_MSU1 printf("offset %08lx out of range (%08lx-%08lx, %08lx-%08lx), reload\n", msu_offset, msu_page1_start,
msu_page1_start+msu_page_size-1, msu_page2_start, msu_page2_start+msu_page_size-1);
/* "cache miss" */
/* fill buffer */
set_msu_addr(0x0);
sd_offload_tgt=2;
ff_sd_offload=1;
res = f_lseek(&msufile, msu_offset);
DBG_MSU1 printf("seek to %08lx, res = %d\n", msu_offset, res);
sd_offload_tgt=2;
ff_sd_offload=1;
res = f_read(&msufile, file_buf, 16384, &bytes_read2);
DBG_MSU1 printf("read res = %d\n", res);
DBG_MSU1 printf("read %d bytes\n", bytes_read2);
msu_reset(0x0);
msu_page1_start = msu_offset;
msu_page2_start = msu_offset + msu_page_size;
} else {
if (msu_offset >= msu_page1_start && msu_offset <= msu_page1_start + msu_page_size) {
msu_reset(0x0000 + msu_offset - msu_page1_start);
DBG_MSU1 printf("inside page1, new offset: %08lx\n", 0x0000 + msu_offset-msu_page1_start);
if(!(msu_page2_start == msu_page1_start + msu_page_size)) {
set_msu_addr(0x2000);
sd_offload_tgt=2;
ff_sd_offload=1;
f_read(&msufile, file_buf, 8192, &bytes_read2);
DBG_MSU1 printf("next page dirty (was: %08lx), loaded page2 (start now: ", msu_page2_start);
msu_page2_start = msu_page1_start + msu_page_size;
DBG_MSU1 printf("%08lx)\n", msu_page2_start);
}
} else if (msu_offset >= msu_page2_start && msu_offset <= msu_page2_start + msu_page_size) {
DBG_MSU1 printf("inside page2, new offset: %08lx\n", 0x2000 + msu_offset-msu_page2_start);
msu_reset(0x2000 + msu_offset - msu_page2_start);
if(!(msu_page1_start == msu_page2_start + msu_page_size)) {
set_msu_addr(0x0);
sd_offload_tgt=2;
ff_sd_offload=1;
f_read(&msufile, file_buf, 8192, &bytes_read2);
DBG_MSU1 printf("next page dirty (was: %08lx), loaded page1 (start now: ", msu_page1_start);
msu_page1_start = msu_page2_start + msu_page_size;
DBG_MSU1 printf("%08lx)\n", msu_page1_start);
}
} else printf("!!!WATWATWAT!!!\n");
}
/* clear bank bit to mask bank reset artifact */
fpga_status_now &= ~0x2000;
fpga_status_prev &= ~0x2000;
/* clear busy bit */
set_msu_status(0x00, 0x10);
} }
if ( fpga_status_now & 0x0001 ) if(fpga_status_now & 0x0001) {
{ if(fpga_status_now & 0x0004) {
if ( fpga_status_now & 0x0004 )
{
msu_repeat = 1; msu_repeat = 1;
set_msu_status( 0x04, 0x01 ); /* set bit 2, reset bit 0 */ set_msu_status(0x04, 0x01); /* set bit 2, reset bit 0 */
DBG_MSU1 printf( "Repeat set!\n" ); DBG_MSU1 printf("Repeat set!\n");
} } else {
else
{
msu_repeat = 0; msu_repeat = 0;
set_msu_status( 0x00, 0x05 ); /* set no bits, reset bit 0+2 */ set_msu_status(0x00, 0x05); /* set no bits, reset bit 0+2 */
DBG_MSU1 printf( "Repeat clear!\n" ); DBG_MSU1 printf("Repeat clear!\n");
} }
if ( fpga_status_now & 0x0002 ) if(fpga_status_now & 0x0002) {
{ DBG_MSU1 printf("PLAY!\n");
DBG_MSU1 printf( "PLAY!\n" ); set_msu_status(0x02, 0x01); /* set bit 0, reset bit 1 */
set_msu_status( 0x02, 0x01 ); /* set bit 0, reset bit 1 */
dac_play(); dac_play();
} } else {
else DBG_MSU1 printf("PAUSE!\n");
{ set_msu_status(0x00, 0x03); /* set no bits, reset bit 1+0 */
DBG_MSU1 printf( "PAUSE!\n" );
set_msu_status( 0x00, 0x03 ); /* set no bits, reset bit 1+0 */
dac_pause(); dac_pause();
} }
} }
@@ -335,42 +241,28 @@ int msu1_loop()
fpga_status_prev = fpga_status_now; fpga_status_prev = fpga_status_now;
/* handle loop / end */ /* handle loop / end */
if ( msu_audio_bytes_read < MSU_DAC_BUFSIZE / 2 ) if(bytes_read < MSU_DAC_BUFSIZE / 2) {
{ ff_sd_offload=0;
ff_sd_offload = 0; sd_offload=0;
sd_offload = 0; if(msu_repeat) {
DBG_MSU1 printf("loop\n");
if ( msu_repeat ) ff_sd_offload=1;
{ sd_offload_tgt=1;
DBG_MSU1 printf( "loop\n" ); f_lseek(&file_handle, 8L+msu_loop_point*4);
ff_sd_offload = 1; ff_sd_offload=1;
sd_offload_tgt = 1; sd_offload_tgt=1;
f_lseek( &file_handle, 8L + msu_loop_point * 4 ); f_read(&file_handle, file_buf, (MSU_DAC_BUFSIZE / 2) - bytes_read, &bytes_read);
ff_sd_offload = 1; } else {
sd_offload_tgt = 1; set_msu_status(0x00, 0x02); /* clear play bit */
f_read( &file_handle, file_buf, ( MSU_DAC_BUFSIZE / 2 ) - msu_audio_bytes_read, &msu_audio_bytes_read );
}
else
{
set_msu_status( 0x00, 0x02 ); /* clear play bit */
dac_pause(); dac_pause();
} }
bytes_read = MSU_DAC_BUFSIZE;
msu_audio_bytes_read = MSU_DAC_BUFSIZE;
} }
} if(msu1_check_reset()) {
f_close(&msufile);
f_close( &file_handle ); f_close(&file_handle);
DBG_MSU1 printf( "Reset " );
if ( msu_res == MSU_RESET_LONG )
{
f_close( &msufile );
DBG_MSU1 printf( "to menu\n" );
return 1; return 1;
} }
}
DBG_MSU1 printf( "game\n" );
return 0;
} }
/* END OF MSU1 STUFF */ /* END OF MSU1 STUFF */

View File

@@ -9,7 +9,7 @@
#define MSU_DAC_BUFSIZE (2048) #define MSU_DAC_BUFSIZE (2048)
int msu1_check( uint8_t * ); int msu1_check(uint8_t*);
int msu1_loop( void ); int msu1_loop(void);
#endif #endif

View File

@@ -4,11 +4,10 @@
# http://www.hs-augsburg.de/~hhoegl/proj/usbjtag/usbjtag.html # http://www.hs-augsburg.de/~hhoegl/proj/usbjtag/usbjtag.html
# #
#interface ft2232 interface ft2232
interface ftdi ft2232_vid_pid 0x15ba 0x0003
#ft2232_vid_pid 0x15ba 0x0003 ft2232_device_desc "Olimex OpenOCD JTAG"
#ft2232_device_desc "Olimex OpenOCD JTAG" ft2232_layout "olimex-jtag"
#ft2232_layout "olimex-jtag"
#interface ft2232 #interface ft2232

View File

@@ -15,12 +15,12 @@
* USB [enabled via usb_init] * USB [enabled via usb_init]
* PWM1 * PWM1
*/ */
void power_init() void power_init() {
{ LPC_SC->PCONP = BV(PCSSP0)
LPC_SC->PCONP = BV( PCSSP0 ) | BV(PCTIM3)
| BV( PCTIM3 ) | BV(PCRTC)
| BV( PCRTC ) | BV(PCGPIO)
| BV( PCGPIO ) | BV(PCPWM1)
| BV( PCPWM1 ) // | BV(PCUSB)
| BV( PCUSB ); ;
} }

View File

@@ -38,6 +38,6 @@
#define PCQEI (18) #define PCQEI (18)
#define PCGPIO (15) #define PCGPIO (15)
void power_init( void ); void power_init(void);
#endif #endif

View File

@@ -61,29 +61,24 @@ static char *outptr;
static int maxlen; static int maxlen;
/* printf */ /* printf */
static void outchar( char x ) static void outchar(char x) {
{ if (maxlen) {
if ( maxlen )
{
maxlen--; maxlen--;
outfunc( x ); outfunc(x);
outlength++; outlength++;
} }
} }
/* sprintf */ /* sprintf */
static void outstr( char x ) static void outstr(char x) {
{ if (maxlen) {
if ( maxlen )
{
maxlen--; maxlen--;
*outptr++ = x; *outptr++ = x;
outlength++; outlength++;
} }
} }
static int internal_nprintf( void ( *output_function )( char c ), const char *fmt, va_list ap ) static int internal_nprintf(void (*output_function)(char c), const char *fmt, va_list ap) {
{
unsigned int width; unsigned int width;
unsigned int flags; unsigned int flags;
unsigned int base = 0; unsigned int base = 0;
@@ -91,38 +86,27 @@ static int internal_nprintf( void ( *output_function )( char c ), const char *fm
outlength = 0; outlength = 0;
while ( *fmt ) while (*fmt) {
{ while (1) {
while ( 1 ) if (*fmt == 0)
{
if ( *fmt == 0 )
{
goto end; goto end;
}
if ( *fmt == '%' ) if (*fmt == '%') {
{
fmt++; fmt++;
if (*fmt != '%')
if ( *fmt != '%' )
{
break; break;
} }
}
output_function( *fmt++ ); output_function(*fmt++);
} }
flags = 0; flags = 0;
width = 0; width = 0;
/* read all flags */ /* read all flags */
do do {
{ if (flags < FLAG_WIDTH) {
if ( flags < FLAG_WIDTH ) switch (*fmt) {
{
switch ( *fmt )
{
case '0': case '0':
flags |= FLAG_ZEROPAD; flags |= FLAG_ZEROPAD;
continue; continue;
@@ -141,44 +125,36 @@ static int internal_nprintf( void ( *output_function )( char c ), const char *fm
} }
} }
if ( flags < FLAG_LONG ) if (flags < FLAG_LONG) {
{ if (*fmt >= '0' && *fmt <= '9') {
if ( *fmt >= '0' && *fmt <= '9' )
{
unsigned char tmp = *fmt - '0'; unsigned char tmp = *fmt - '0';
width = 10 * width + tmp; width = 10*width + tmp;
flags |= FLAG_WIDTH; flags |= FLAG_WIDTH;
continue; continue;
} }
if ( *fmt == 'h' ) if (*fmt == 'h')
{
continue; continue;
}
if ( *fmt == 'l' ) if (*fmt == 'l') {
{
flags |= FLAG_LONG; flags |= FLAG_LONG;
continue; continue;
} }
} }
break; break;
} } while (*fmt++);
while ( *fmt++ );
/* Strings */ /* Strings */
if ( *fmt == 'c' || *fmt == 's' ) if (*fmt == 'c' || *fmt == 's') {
{ switch (*fmt) {
switch ( *fmt )
{
case 'c': case 'c':
buffer[0] = va_arg( ap, int ); buffer[0] = va_arg(ap, int);
ptr = buffer; ptr = buffer;
break; break;
case 's': case 's':
ptr = va_arg( ap, char * ); ptr = va_arg(ap, char *);
break; break;
} }
@@ -186,11 +162,9 @@ static int internal_nprintf( void ( *output_function )( char c ), const char *fm
} }
/* Numbers */ /* Numbers */
switch ( *fmt ) switch (*fmt) {
{
case 'u': case 'u':
flags |= FLAG_UNSIGNED; flags |= FLAG_UNSIGNED;
case 'd': case 'd':
base = 10; base = 10;
break; break;
@@ -201,10 +175,9 @@ static int internal_nprintf( void ( *output_function )( char c ), const char *fm
break; break;
case 'p': // pointer case 'p': // pointer
output_function( '0' ); output_function('0');
output_function( 'x' ); output_function('x');
width -= 2; width -= 2;
case 'x': case 'x':
case 'X': case 'X':
base = 16; base = 16;
@@ -214,90 +187,60 @@ static int internal_nprintf( void ( *output_function )( char c ), const char *fm
unsigned int num; unsigned int num;
if ( !( flags & FLAG_UNSIGNED ) ) if (!(flags & FLAG_UNSIGNED)) {
{ int tmp = va_arg(ap, int);
int tmp = va_arg( ap, int ); if (tmp < 0) {
if ( tmp < 0 )
{
num = -tmp; num = -tmp;
flags |= FLAG_NEGATIVE; flags |= FLAG_NEGATIVE;
} } else
else
{
num = tmp; num = tmp;
} } else {
} num = va_arg(ap, unsigned int);
else
{
num = va_arg( ap, unsigned int );
} }
/* Convert number into buffer */ /* Convert number into buffer */
ptr = buffer + sizeof( buffer ); ptr = buffer + sizeof(buffer);
*--ptr = 0; *--ptr = 0;
do {
do
{
*--ptr = hexdigits[num % base]; *--ptr = hexdigits[num % base];
num /= base; num /= base;
} } while (num != 0);
while ( num != 0 );
/* Sign */ /* Sign */
if ( flags & FLAG_NEGATIVE ) if (flags & FLAG_NEGATIVE) {
{ output_function('-');
output_function( '-' );
width--; width--;
} } else if (flags & FLAG_FORCESIGN) {
else if ( flags & FLAG_FORCESIGN ) output_function('+');
{
output_function( '+' );
width--; width--;
} } else if (flags & FLAG_BLANK) {
else if ( flags & FLAG_BLANK ) output_function(' ');
{
output_function( ' ' );
width--; width--;
} }
output: output:
/* left padding */ /* left padding */
if ( ( flags & FLAG_WIDTH ) && !( flags & FLAG_LEFTADJ ) ) if ((flags & FLAG_WIDTH) && !(flags & FLAG_LEFTADJ)) {
{ while (strlen(ptr) < width) {
while ( strlen( ptr ) < width ) if (flags & FLAG_ZEROPAD)
{ output_function('0');
if ( flags & FLAG_ZEROPAD )
{
output_function( '0' );
}
else else
{ output_function(' ');
output_function( ' ' );
}
width--; width--;
} }
} }
/* data */ /* data */
while ( *ptr ) while (*ptr) {
{ output_function(*ptr++);
output_function( *ptr++ ); if (width)
if ( width )
{
width--; width--;
} }
}
/* right padding */ /* right padding */
if ( flags & FLAG_WIDTH ) if (flags & FLAG_WIDTH) {
{ while (width) {
while ( width ) output_function(' ');
{
output_function( ' ' );
width--; width--;
} }
} }
@@ -305,52 +248,44 @@ output:
fmt++; fmt++;
} }
end: end:
return outlength; return outlength;
} }
int printf( const char *format, ... ) int printf(const char *format, ...) {
{
va_list ap; va_list ap;
int res; int res;
maxlen = -1; maxlen = -1;
va_start( ap, format ); va_start(ap, format);
res = internal_nprintf( outchar, format, ap ); res = internal_nprintf(outchar, format, ap);
va_end( ap ); va_end(ap);
return res; return res;
} }
int snprintf( char *str, size_t size, const char *format, ... ) int snprintf(char *str, size_t size, const char *format, ...) {
{
va_list ap; va_list ap;
int res; int res;
maxlen = size; maxlen = size;
outptr = str; outptr = str;
va_start( ap, format ); va_start(ap, format);
res = internal_nprintf( outstr, format, ap ); res = internal_nprintf(outstr, format, ap);
va_end( ap ); va_end(ap);
if (res < size)
if ( res < size )
{
str[res] = 0; str[res] = 0;
}
return res; return res;
} }
/* Required for gcc compatibility */ /* Required for gcc compatibility */
int puts( const char *str ) int puts(const char *str) {
{ uart_puts(str);
uart_puts( str ); uart_putc('\n');
uart_putc( '\n' );
return 0; return 0;
} }
#undef putchar #undef putchar
int putchar( int c ) int putchar(int c) {
{ uart_putc(c);
uart_putc( c );
return 0; return 0;
} }

View File

@@ -2,92 +2,65 @@
#include "rle.h" #include "rle.h"
#include "fileops.h" #include "fileops.h"
uint8_t rle_file_getc() uint8_t rle_file_getc() {
{
static uint16_t rle_filled = 0; static uint16_t rle_filled = 0;
static uint8_t data; static uint8_t data;
if(!rle_filled) {
if ( !rle_filled )
{
data = file_getc(); data = file_getc();
switch(data) {
switch ( data )
{
case RLE_RUN: case RLE_RUN:
data = file_getc(); data = file_getc();
rle_filled = file_getc() - 1; rle_filled = file_getc()-1;
break; break;
case RLE_RUNLONG: case RLE_RUNLONG:
data = file_getc(); data = file_getc();
rle_filled = file_getc(); rle_filled = file_getc();
rle_filled |= file_getc() << 8; rle_filled |= file_getc() << 8;
rle_filled--; rle_filled--;
break; break;
case RLE_ESC: case RLE_ESC:
data = file_getc(); data = file_getc();
break; break;
} }
} } else {
else
{
rle_filled--; rle_filled--;
} }
if(file_status || file_res) rle_filled = 0;
if ( file_status || file_res )
{
rle_filled = 0;
}
return data; return data;
} }
void rle_mem_init( const uint8_t *address, uint32_t len ) void rle_mem_init(const uint8_t* address, uint32_t len) {
{
rle_mem_ptr = address; rle_mem_ptr = address;
rle_mem_endptr = address + len; rle_mem_endptr = address+len;
rle_state = 0; rle_state = 0;
} }
uint8_t rle_mem_getc() uint8_t rle_mem_getc() {
{
static uint16_t rle_mem_filled = 0; static uint16_t rle_mem_filled = 0;
static uint8_t rle_mem_data; static uint8_t rle_mem_data;
if(!rle_mem_filled) {
if ( !rle_mem_filled ) rle_mem_data = *(rle_mem_ptr++);
{ switch(rle_mem_data) {
rle_mem_data = *( rle_mem_ptr++ );
switch ( rle_mem_data )
{
case RLE_RUN: case RLE_RUN:
rle_mem_data = *( rle_mem_ptr )++; rle_mem_data = *(rle_mem_ptr)++;
rle_mem_filled = *( rle_mem_ptr )++ - 1; rle_mem_filled = *(rle_mem_ptr)++ - 1;
break; break;
case RLE_RUNLONG: case RLE_RUNLONG:
rle_mem_data = *( rle_mem_ptr )++; rle_mem_data = *(rle_mem_ptr)++;
rle_mem_filled = *( rle_mem_ptr )++; rle_mem_filled = *(rle_mem_ptr)++;
rle_mem_filled |= *( rle_mem_ptr )++ << 8; rle_mem_filled |= *(rle_mem_ptr)++ << 8;
rle_mem_filled--; rle_mem_filled--;
break; break;
case RLE_ESC: case RLE_ESC:
rle_mem_data = *( rle_mem_ptr )++; rle_mem_data = *(rle_mem_ptr)++;
break; break;
} }
} } else {
else
{
rle_mem_filled--; rle_mem_filled--;
} }
if(rle_mem_ptr>=rle_mem_endptr){
if ( rle_mem_ptr >= rle_mem_endptr )
{
rle_mem_filled = 0; rle_mem_filled = 0;
rle_state = 1; rle_state = 1;
} }
return rle_mem_data; return rle_mem_data;
} }

View File

@@ -7,9 +7,9 @@
#define RLE_RUN (0x5b) #define RLE_RUN (0x5b)
#define RLE_RUNLONG (0x77) #define RLE_RUNLONG (0x77)
uint8_t rle_file_getc( void ); uint8_t rle_file_getc(void);
uint8_t rle_mem_getc( void ); uint8_t rle_mem_getc(void);
void rle_mem_init( const uint8_t *address, uint32_t len ); void rle_mem_init(const uint8_t *address, uint32_t len);
const uint8_t *rle_mem_ptr; const uint8_t *rle_mem_ptr;
const uint8_t *rle_mem_endptr; const uint8_t *rle_mem_endptr;
uint8_t rle_state; uint8_t rle_state;

152
src/rtc.c
View File

@@ -11,32 +11,23 @@ rtcstate_t rtc_state;
#define CLKEN 0 #define CLKEN 0
#define CTCRST 1 #define CTCRST 1
uint8_t rtc_isvalid( void ) uint8_t rtc_isvalid(void) {
{ if(LPC_RTC->GPREG0 == RTC_MAGIC) {
if ( LPC_RTC->GPREG0 == RTC_MAGIC )
{
return RTC_OK; return RTC_OK;
} }
return RTC_INVALID; return RTC_INVALID;
} }
void rtc_init( void ) void rtc_init(void) {
{ if (LPC_RTC->CCR & BV(CLKEN)) {
if ( LPC_RTC->CCR & BV( CLKEN ) )
{
rtc_state = RTC_OK; rtc_state = RTC_OK;
} } else {
else
{
rtc_state = RTC_INVALID; rtc_state = RTC_INVALID;
} }
} }
void read_rtc( struct tm *time ) void read_rtc(struct tm *time) {
{ do {
do
{
time->tm_sec = LPC_RTC->SEC; time->tm_sec = LPC_RTC->SEC;
time->tm_min = LPC_RTC->MIN; time->tm_min = LPC_RTC->MIN;
time->tm_hour = LPC_RTC->HOUR; time->tm_hour = LPC_RTC->HOUR;
@@ -44,116 +35,101 @@ void read_rtc( struct tm *time )
time->tm_mon = LPC_RTC->MONTH; time->tm_mon = LPC_RTC->MONTH;
time->tm_year = LPC_RTC->YEAR; time->tm_year = LPC_RTC->YEAR;
time->tm_wday = LPC_RTC->DOW; time->tm_wday = LPC_RTC->DOW;
} } while (time->tm_sec != LPC_RTC->SEC);
while ( time->tm_sec != LPC_RTC->SEC );
} }
uint8_t calc_weekday( struct tm *time ) uint8_t calc_weekday(struct tm *time) {
{
int month = time->tm_mon; int month = time->tm_mon;
int year = time->tm_year; int year = time->tm_year;
int day = time->tm_mday; int day = time->tm_mday;
/* Variation of Sillke for the Gregorian calendar. /* Variation of Sillke for the Gregorian calendar.
* http://www.mathematik.uni-bielefeld.de/~sillke/ALGORITHMS/calendar/weekday.c */ * http://www.mathematik.uni-bielefeld.de/~sillke/ALGORITHMS/calendar/weekday.c */
if ( month <= 2 ) if (month <= 2) {
{
month += 10; month += 10;
year--; year--;
} } else month -= 2;
else return (83*month/32 + day + year + year/4 - year/100 + year/400) % 7;
{
month -= 2;
}
return ( 83 * month / 32 + day + year + year / 4 - year / 100 + year / 400 ) % 7;
} }
void set_rtc( struct tm *time ) void set_rtc(struct tm *time) {
{ LPC_RTC->CCR = BV(CTCRST);
LPC_RTC->CCR = BV( CTCRST );
LPC_RTC->SEC = time->tm_sec; LPC_RTC->SEC = time->tm_sec;
LPC_RTC->MIN = time->tm_min; LPC_RTC->MIN = time->tm_min;
LPC_RTC->HOUR = time->tm_hour; LPC_RTC->HOUR = time->tm_hour;
LPC_RTC->DOM = time->tm_mday; LPC_RTC->DOM = time->tm_mday;
LPC_RTC->MONTH = time->tm_mon; LPC_RTC->MONTH = time->tm_mon;
LPC_RTC->YEAR = time->tm_year; LPC_RTC->YEAR = time->tm_year;
LPC_RTC->DOW = calc_weekday( time ); LPC_RTC->DOW = calc_weekday(time);
LPC_RTC->CCR = BV( CLKEN ); LPC_RTC->CCR = BV(CLKEN);
LPC_RTC->GPREG0 = RTC_MAGIC; LPC_RTC->GPREG0 = RTC_MAGIC;
} }
void invalidate_rtc() void invalidate_rtc() {
{
LPC_RTC->GPREG0 = 0; LPC_RTC->GPREG0 = 0;
} }
uint32_t get_fattime( void ) uint32_t get_fattime(void) {
{
struct tm time; struct tm time;
read_rtc( &time ); read_rtc(&time);
return ( ( uint32_t )time.tm_year - 1980 ) << 25 | return ((uint32_t)time.tm_year-1980) << 25 |
( ( uint32_t )time.tm_mon ) << 21 | ((uint32_t)time.tm_mon) << 21 |
( ( uint32_t )time.tm_mday ) << 16 | ((uint32_t)time.tm_mday) << 16 |
( ( uint32_t )time.tm_hour ) << 11 | ((uint32_t)time.tm_hour) << 11 |
( ( uint32_t )time.tm_min ) << 5 | ((uint32_t)time.tm_min) << 5 |
( ( uint32_t )time.tm_sec ) >> 1; ((uint32_t)time.tm_sec) >> 1;
} }
uint64_t get_bcdtime( void ) uint64_t get_bcdtime(void) {
{
struct tm time; struct tm time;
read_rtc( &time ); read_rtc(&time);
uint16_t year = time.tm_year; uint16_t year = time.tm_year;
return ( ( uint64_t )( time.tm_wday % 7 ) << 56 ) return ((uint64_t)(time.tm_wday % 7) << 56)
| ( ( uint64_t )( ( year / 1000 ) % 10 ) << 52 ) |((uint64_t)((year / 1000) % 10) << 52)
| ( ( uint64_t )( ( year / 100 ) % 10 ) << 48 ) |((uint64_t)((year / 100) % 10) << 48)
| ( ( uint64_t )( ( year / 10 ) % 10 ) << 44 ) |((uint64_t)((year / 10) % 10) << 44)
| ( ( uint64_t )( year % 10 ) << 40 ) |((uint64_t)(year % 10) << 40)
| ( ( uint64_t )( time.tm_mon / 10 ) << 36 ) |((uint64_t)(time.tm_mon / 10) << 36)
| ( ( uint64_t )( time.tm_mon % 10 ) << 32 ) |((uint64_t)(time.tm_mon % 10) << 32)
| ( ( time.tm_mday / 10 ) << 28 ) |((time.tm_mday / 10) << 28)
| ( ( time.tm_mday % 10 ) << 24 ) |((time.tm_mday % 10) << 24)
| ( ( time.tm_hour / 10 ) << 20 ) |((time.tm_hour / 10) << 20)
| ( ( time.tm_hour % 10 ) << 16 ) |((time.tm_hour % 10) << 16)
| ( ( time.tm_min / 10 ) << 12 ) |((time.tm_min / 10) << 12)
| ( ( time.tm_min % 10 ) << 8 ) |((time.tm_min % 10) << 8)
| ( ( time.tm_sec / 10 ) << 4 ) |((time.tm_sec / 10) << 4)
| ( time.tm_sec % 10 ); |(time.tm_sec % 10);
} }
void set_bcdtime( uint64_t btime ) void set_bcdtime(uint64_t btime) {
{
struct tm time; struct tm time;
time.tm_sec = ( btime & 0xf ) + ( ( btime >> 4 ) & 0xf ) * 10; time.tm_sec = (btime & 0xf) + ((btime >> 4) & 0xf) * 10;
time.tm_min = ( ( btime >> 8 ) & 0xf ) + ( ( btime >> 12 ) & 0xf ) * 10; time.tm_min = ((btime >> 8) & 0xf) + ((btime >> 12) & 0xf) * 10;
time.tm_hour = ( ( btime >> 16 ) & 0xf ) + ( ( btime >> 20 ) & 0xf ) * 10; time.tm_hour = ((btime >> 16) & 0xf) + ((btime >> 20) & 0xf) * 10;
time.tm_mday = ( ( btime >> 24 ) & 0xf ) + ( ( btime >> 28 ) & 0xf ) * 10; time.tm_mday = ((btime >> 24) & 0xf) + ((btime >> 28) & 0xf) * 10;
time.tm_mon = ( ( btime >> 32 ) & 0xf ) + ( ( btime >> 36 ) & 0xf ) * 10; time.tm_mon = ((btime >> 32) & 0xf) + ((btime >> 36) & 0xf) * 10;
time.tm_year = ( ( btime >> 40 ) & 0xf ) + ( ( btime >> 44 ) & 0xf ) * 10 time.tm_year = ((btime >> 40) & 0xf) + ((btime >> 44) & 0xf) * 10
+ ( ( btime >> 48 ) & 0xf ) * 100 + ( ( btime >> 52 ) & 0xf ) * 1000; + ((btime >> 48) & 0xf) * 100 + ((btime >> 52) & 0xf) * 1000;
printtime( &time ); printtime(&time);
set_rtc( &time ); set_rtc(&time);
} }
void printtime( struct tm *time ) void printtime(struct tm *time) {
{ printf("%04d-%02d-%02d %02d:%02d:%02d\n", time->tm_year, time->tm_mon,
printf( "%04d-%02d-%02d %02d:%02d:%02d\n", time->tm_year, time->tm_mon, time->tm_mday, time->tm_hour, time->tm_min, time->tm_sec);
time->tm_mday, time->tm_hour, time->tm_min, time->tm_sec );
} }
void testbattery() void testbattery() {
{ printf("%lx\n", LPC_RTC->GPREG0);
printf( "%lx\n", LPC_RTC->GPREG0 );
LPC_RTC->GPREG0 = RTC_MAGIC; LPC_RTC->GPREG0 = RTC_MAGIC;
printf( "%lx\n", LPC_RTC->GPREG0 ); printf("%lx\n", LPC_RTC->GPREG0);
LPC_RTC->CCR = 0; LPC_RTC->CCR = 0;
BITBAND( LPC_SC->PCONP, PCRTC ) = 0; BITBAND(LPC_SC->PCONP, PCRTC) = 0;
delay_ms( 20000 ); delay_ms(20000);
BITBAND( LPC_SC->PCONP, PCRTC ) = 1; BITBAND(LPC_SC->PCONP, PCRTC) = 1;
printf( "%lx\n", LPC_RTC->GPREG0 ); printf("%lx\n", LPC_RTC->GPREG0);
delay_ms( 20 ); delay_ms(20);
LPC_RTC->CCR = BV( CLKEN ); LPC_RTC->CCR = BV(CLKEN);
} }

Some files were not shown because too many files have changed in this diff Show More