rockbox/firmware/target/arm/ipod/lcd-as-gray.S
Jens Arnold 28cd26c471 Some cleanup for readability. No code change.
git-svn-id: svn://svn.rockbox.org/rockbox/trunk@16076 a1c6a512-1295-4272-9138-f99709370657
2008-01-13 13:58:18 +00:00

282 lines
6.1 KiB
ArmAsm

/***************************************************************************
* __________ __ ___.
* Open \______ \ ____ ____ | | _\_ |__ _______ ___
* Source | _// _ \_/ ___\| |/ /| __ \ / _ \ \/ /
* Jukebox | | ( <_> ) \___| < | \_\ ( <_> > < <
* Firmware |____|_ /\____/ \___ >__|_ \|___ /\____/__/\_ \
* \/ \/ \/ \/ \/
* $Id$
*
* Copyright (C) 2008 by Jens Arnold
*
* All files in this archive are subject to the GNU General Public License.
* See the file COPYING in the source tree root for full license agreement.
*
* This software is distributed on an "AS IS" basis, WITHOUT WARRANTY OF ANY
* KIND, either express or implied.
*
****************************************************************************/
#include "config.h"
#include "cpu.h"
#if CONFIG_CPU == PP5002
.section .icode,"ax",%progbits
#else
.text
#endif
.align 2
.global lcd_write_data
.type lcd_write_data,%function
lcd_write_data:
stmfd sp!, {r4, lr}
ldr r2, =LCD1_BASE
.loop:
ldrb r3, [r0], #1
#ifdef IPOD_MINI2G
ldrb r4, [r0], #1
orr r3, r4, r3, lsl #8
orr r3, r3, #0x760000
1:
ldr r4, [r2]
tst r4, #LCD1_BUSY_MASK
bne 1b
str r3, [r2, #0x08]
#else
1:
ldr r4, [r2]
tst r4, #LCD1_BUSY_MASK
bne 1b
str r3, [r2, #0x10]
ldrb r3, [r0], #1
1:
ldr r4, [r2]
tst r4, #LCD1_BUSY_MASK
bne 1b
str r3, [r2, #0x10]
#endif
subs r1, r1, #1
bne .loop
ldmfd sp!, {r4, pc}
.size lcd_write_data,.-lcd_write_data
#ifdef IPOD_MINI2G
.global lcd_write_data_shifted
.type lcd_write_data_shifted,%function
lcd_write_data_shifted:
stmfd sp!, {r4-r6, lr}
ldr r2, =LCD1_BASE
mov r6, #0x760000
ldrb r3, [r0], #1
.sloop:
ldrb r4, [r0], #1
orr r3, r4, r3, lsl #8
ldrb r4, [r0], #1
orr r3, r4, r3, lsl #8
mov r5, r3, lsl #12
orr r5, r6, r5, lsr #16
1:
ldr r4, [r2]
tst r4, #LCD1_BUSY_MASK
bne 1b
str r5, [r2, #0x08]
subs r1, r1, #1
bne .sloop
ldmfd sp!, {r4-r6, pc}
.size lcd_write_data_shifted,.-lcd_write_data_shifted
#elif defined IPOD_MINI
.global lcd_write_data_shifted
.type lcd_write_data_shifted,%function
lcd_write_data_shifted:
stmfd sp!, {r4, r5, lr}
ldr r2, =LCD1_BASE
ldrb r3, [r0], #1
.sloop:
ldrb r4, [r0], #1
orr r3, r4, r3, lsl #8
mov r5, r3, lsr #4
1:
ldr r4, [r2]
tst r4, #LCD1_BUSY_MASK
bne 1b
str r5, [r2, #0x10]
ldrb r4, [r0], #1
orr r3, r4, r3, lsl #8
mov r5, r3, lsr #4
1:
ldr r4, [r2]
tst r4, #LCD1_BUSY_MASK
bne 1b
str r5, [r2, #0x10]
subs r1, r1, #1
bne .sloop
ldmfd sp!, {r4, r5, pc}
.size lcd_write_data_shifted,.-lcd_write_data_shifted
#endif
.global lcd_mono_data
.type lcd_mono_data,%function
lcd_mono_data:
stmfd sp!, {r4-r6, lr}
ldr r2, =LCD1_BASE
adr r6, .dibits
.mloop:
ldrb r3, [r0], #1
mov r4, r3, lsr #4
ldrb r5, [r6, r4]
#ifdef IPOD_MINI2G
and r4, r3, #0x0f
ldrb r4, [r6, r4]
orr r5, r4, r5, lsl #8
orr r5, r5, #0x760000
1:
ldr r4, [r2]
tst r4, #LCD1_BUSY_MASK
bne 1b
str r5, [r2, #0x08]
#else
1:
ldr r4, [r2]
tst r4, #LCD1_BUSY_MASK
bne 1b
str r5, [r2, #0x10]
and r4, r3, #0x0f
ldrb r5, [r6, r4]
1:
ldr r4, [r2]
tst r4, #LCD1_BUSY_MASK
bne 1b
str r5, [r2, #0x10]
#endif
subs r1, r1, #1
bne .mloop
ldmfd sp!, {r4-r6, pc}
.dibits:
.byte 0x00, 0x03, 0x0C, 0x0F, 0x30, 0x33, 0x3C, 0x3F
.byte 0xC0, 0xC3, 0xCC, 0xCF, 0xF0, 0xF3, 0xFC, 0xFF
.size lcd_mono_data,.-lcd_mono_data
.global lcd_grey_data
.type lcd_grey_data,%function
/* A high performance function to write grey phase data to the display,
* one or multiple pixels.
*
* Arguments:
* r0 - pixel value data address
* r1 - pixel phase data address
* r2 - pixel block count
*
* Register usage:
* r3/r4 - current block of phases
* r5/r6 - current block of values
* r7 - lcd data accumulator
* r8 - phase signs mask
* r9 - lcd bridge address
*/
lcd_grey_data:
stmfd sp!, {r4-r9, lr}
mov r8, #0x80
orr r8, r8, r8, lsl #8
orr r8, r8, r8, lsl #16
ldr r9, =LCD1_BASE
.greyloop:
ldmia r1, {r3-r4} /* Fetch 8 pixel phases */
ldmia r0!, {r5-r6} /* Fetch 8 pixel values */
#ifdef IPOD_MINI2G /* Serial bridge mode */
mov r7, #0x760000
tst r3, #0x80
orreq r7, r7, #0xc000
tst r3, #0x8000
orreq r7, r7, #0x3000
tst r3, #0x800000
orreq r7, r7, #0x0c00
tst r3, #0x80000000
orreq r7, r7, #0x0300
bic r3, r3, r8
add r3, r3, r5
#else /* Parallel bridge mode */
mov r7, #0
tst r3, #0x80
orreq r7, r7, #0xc0
tst r3, #0x8000
orreq r7, r7, #0x30
tst r3, #0x800000
orreq r7, r7, #0x0c
tst r3, #0x80000000
orreq r7, r7, #0x03
bic r3, r3, r8
add r3, r3, r5
1:
ldr r5, [r9]
tst r5, #LCD1_BUSY_MASK
bne 1b
str r7, [r9, #0x10]
mov r7, #0
#endif
tst r4, #0x80
orreq r7, r7, #0xc0
tst r4, #0x8000
orreq r7, r7, #0x30
tst r4, #0x800000
orreq r7, r7, #0x0c
tst r4, #0x80000000
orreq r7, r7, #0x03
bic r4, r4, r8
add r4, r4, r6
stmia r1!, {r3-r4}
1:
ldr r5, [r9]
tst r5, #LCD1_BUSY_MASK
bne 1b
#ifdef IPOD_MINI2G
str r7, [r9, #0x08]
#else
str r7, [r9, #0x10]
#endif
subs r2, r2, #1
bne .greyloop
ldmfd sp!, {r4-r9, pc}
.size lcd_grey_data,.-lcd_grey_data