Nyaaori/rockbox
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Code police myself. Somehow got that full of tabs.

Browse source 
git-svn-id: svn://svn.rockbox.org/rockbox/trunk@12401 a1c6a512-1295-4272-9138-f99709370657
This commit is contained in:
Michael Sevakis 2007-02-19 03:29:37 +00:00
parent ac07222b83
commit 03c8b15f55
1 changed files with 107 additions and 107 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

214
apps/dsp_cf.S
View file

@ -20,8 +20,8 @@
/****************************************************************************
* apply_crossfeed(int32_t* src[], int count)
*/
.section .text
.global apply_crossfeed
.section .text
.global apply_crossfeed
apply_crossfeed:
lea.l (-44, %sp), %sp
movem.l %d2-%d7/%a2-%a6, (%sp) | save all regs
@ -85,137 +85,137 @@ apply_crossfeed:
lea.l (44, %sp), %sp
rts
.cfend:
.size apply_crossfeed,.cfend-apply_crossfeed
.size apply_crossfeed,.cfend-apply_crossfeed
/****************************************************************************
* dsp_downsample(int channels, int count, struct resample_data *r,
* in32_t **src, int32_t **dst)
*/
.section .text
.global dsp_downsample
.section .text
.global dsp_downsample
dsp_downsample:
lea.l -40(%sp), %sp | save non-clobberables
movem.l %d2-%d7/%a2-%a5, (%sp) |
movem.l 44(%sp), %d2-%d3/%a0-%a2| %d2 = ch = channels
lea.l -40(%sp), %sp | save non-clobberables
movem.l %d2-%d7/%a2-%a5, (%sp) |
movem.l 44(%sp), %d2-%d3/%a0-%a2| %d2 = ch = channels
| %d3 = count
| %a0 = r
| %a1 = src
| %a2 = dst
move.l 4(%a0), %d4 | %d4 = delta = r->delta
move.l #16, %d7 | %d7 = shift
| %a1 = src
| %a2 = dst
move.l 4(%a0), %d4 | %d4 = delta = r->delta
move.l #16, %d7 | %d7 = shift
.dschannel_loop:
move.l (%a0), %d5 | %d5 = phase = r->phase
move.l -4(%a1, %d2.l*4), %a3 | %a3 = s = src[ch-1]
move.l -4(%a2, %d2.l*4), %a4 | %a4 = d = dst[ch-1]
lea.l 4(%a0, %d2.l*4), %a5 | %a5 = &r->last_sample[ch-1]
move.l (%a5), %d0 | %d0 = last = r->last_sample[ch-1]
move.l -4(%a3, %d3.l*4), %d1 | r->last_sample[ch-1] = s[count-1]
move.l %d1, (%a5) |
move.l %d5, %d6 | %d6 = pos = phase >> 16
lsr.l %d7, %d6 |
cmp.l %d3, %d6 | past end of samples?
bge.b .dsloop_skip | yes? skip loop
tst.l %d6 | need last sample of prev. frame?
bne.b .dsloop | no? start main loop
move.l (%a3, %d6.l*4), %d1 | %d1 = s[pos]
bra.b .dsuse_last_start | start with last (last in %d0)
move.l (%a0), %d5 | %d5 = phase = r->phase
move.l -4(%a1, %d2.l*4), %a3 | %a3 = s = src[ch-1]
move.l -4(%a2, %d2.l*4), %a4 | %a4 = d = dst[ch-1]
lea.l 4(%a0, %d2.l*4), %a5 | %a5 = &r->last_sample[ch-1]
move.l (%a5), %d0 | %d0 = last = r->last_sample[ch-1]
move.l -4(%a3, %d3.l*4), %d1 | r->last_sample[ch-1] = s[count-1]
move.l %d1, (%a5) |
move.l %d5, %d6 | %d6 = pos = phase >> 16
lsr.l %d7, %d6 |
cmp.l %d3, %d6 | past end of samples?
bge.b .dsloop_skip | yes? skip loop
tst.l %d6 | need last sample of prev. frame?
bne.b .dsloop | no? start main loop
move.l (%a3, %d6.l*4), %d1 | %d1 = s[pos]
bra.b .dsuse_last_start | start with last (last in %d0)
.dsloop:
lea.l -4(%a3, %d6.l*4), %a5 | load s[pos-1] and s[pos]
movem.l (%a5), %d0-%d1 |
lea.l -4(%a3, %d6.l*4), %a5 | load s[pos-1] and s[pos]
movem.l (%a5), %d0-%d1 |
.dsuse_last_start:
sub.l %d0, %d1 | %d1 = diff = s[pos] - s[pos-1]
move.l %d0, %acc0 | %acc0 = previous sample
move.l %d5, %d0 | frac = (phase << 16) >> 1
lsl.l %d7, %d0 |
lsr.l #1, %d0 |
mac.l %d0, %d1, %acc0 | %acc0 += frac * diff
move.l %acc0, %d0 |
add.l %d4, %d5 | phase += delta
move.l %d5, %d6 | pos = phase >> 16
lsr.l %d7, %d6 |
move.l %d0, (%a4)+ | *d++ = %d0
cmp.l %d3, %d6 | pos < count?
blt.b .dsloop | yes? continue resampling
sub.l %d0, %d1 | %d1 = diff = s[pos] - s[pos-1]
move.l %d0, %acc0 | %acc0 = previous sample
move.l %d5, %d0 | frac = (phase << 16) >> 1
lsl.l %d7, %d0 |
lsr.l #1, %d0 |
mac.l %d0, %d1, %acc0 | %acc0 += frac * diff
move.l %acc0, %d0 |
add.l %d4, %d5 | phase += delta
move.l %d5, %d6 | pos = phase >> 16
lsr.l %d7, %d6 |
move.l %d0, (%a4)+ | *d++ = %d0
cmp.l %d3, %d6 | pos < count?
blt.b .dsloop | yes? continue resampling
.dsloop_skip:
subq.l #1, %d2 | ch > 0?
bgt.b .dschannel_loop | yes? process next channel
asl.l %d7, %d3 | wrap phase to start of next frame
sub.l %d3, %d5 | r->phase = phase - (count << 16)
move.l %d5, (%a0) |
move.l %a4, %d0 | return d - d[0]
sub.l (%a2), %d0 |
asr.l #2, %d0 | convert bytes->samples
movem.l (%sp), %d2-%d7/%a2-%a5 | restore non-clobberables
move.l %acc1, %acc0 | clear %acc0
lea.l 40(%sp), %sp | cleanup stack
rts | buh-bye
subq.l #1, %d2 | ch > 0?
bgt.b .dschannel_loop | yes? process next channel
asl.l %d7, %d3 | wrap phase to start of next frame
sub.l %d3, %d5 | r->phase = phase - (count << 16)
move.l %d5, (%a0) |
move.l %a4, %d0 | return d - d[0]
sub.l (%a2), %d0 |
asr.l #2, %d0 | convert bytes->samples
movem.l (%sp), %d2-%d7/%a2-%a5 | restore non-clobberables
move.l %acc1, %acc0 | clear %acc0
lea.l 40(%sp), %sp | cleanup stack
rts | buh-bye
.dsend:
.size dsp_downsample,.dsend-dsp_downsample
.size dsp_downsample,.dsend-dsp_downsample
/****************************************************************************
* dsp_upsample(int channels, int count, struct resample_data *r,
* in32_t **src, int32_t **dst)
*/
.section .text
.global dsp_upsample
.section .text
.global dsp_upsample
dsp_upsample:
lea.l -40(%sp), %sp | save non-clobberables
movem.l %d2-%d7/%a2-%a5, (%sp) |
movem.l 44(%sp), %d2-%d3/%a0-%a2| %d2 = ch = channels
lea.l -40(%sp), %sp | save non-clobberables
movem.l %d2-%d7/%a2-%a5, (%sp) |
movem.l 44(%sp), %d2-%d3/%a0-%a2| %d2 = ch = channels
| %d3 = count
| %a0 = r
| %a1 = src
| %a2 = dst
move.l 4(%a0), %d4 | %d4 = delta = r->delta
swap %d4 | swap delta to high word to use
| %a1 = src
| %a2 = dst
move.l 4(%a0), %d4 | %d4 = delta = r->delta
swap %d4 | swap delta to high word to use
| carries to increment position
.uschannel_loop:
move.l (%a0), %d5 | %d5 = phase = r->phase
move.l -4(%a1, %d2.l*4), %a3 | %a3 = s = src[ch-1]
move.l -4(%a2, %d2.l*4), %a4 | %a4 = d = dst[ch-1]
lea.l 4(%a0, %d2.l*4), %a5 | %a5 = &r->last_sample[ch-1]
move.l (%a5), %d0 | %d0 = last = r->last_sample[ch-1]
move.l -4(%a3, %d3.l*4), %d1 | r->last_sample[ch-1] = s[count-1]
move.l %d1, (%a5) |
moveq.l #16, %d1 | %d0 = shift
move.l %d5, %d6 | %d6 = pos = phase >> 16
lsl.l %d1, %d5 | swap phase to high word to use
move.l (%a0), %d5 | %d5 = phase = r->phase
move.l -4(%a1, %d2.l*4), %a3 | %a3 = s = src[ch-1]
move.l -4(%a2, %d2.l*4), %a4 | %a4 = d = dst[ch-1]
lea.l 4(%a0, %d2.l*4), %a5 | %a5 = &r->last_sample[ch-1]
move.l (%a5), %d0 | %d0 = last = r->last_sample[ch-1]
move.l -4(%a3, %d3.l*4), %d1 | r->last_sample[ch-1] = s[count-1]
move.l %d1, (%a5) |
moveq.l #16, %d1 | %d0 = shift
move.l %d5, %d6 | %d6 = pos = phase >> 16
lsl.l %d1, %d5 | swap phase to high word to use
| carries to increment position
lsr.l %d1, %d6 | pos == 0?
bne.b .usstart_1 | no? transistion from down
move.l (%a3), %d1 | %d1 = s[0]
sub.l %d0, %d1 | diff = s[pos] - last
bra.b .usloop_0 | jump to typical start point
lsr.l %d1, %d6 | pos == 0?
bne.b .usstart_1 | no? transistion from down
move.l (%a3), %d1 | %d1 = s[0]
sub.l %d0, %d1 | diff = s[pos] - last
bra.b .usloop_0 | jump to typical start point
.usstart_1:
cmp.l %d3, %d6 | past end of samples?
bge.b .usloop_skip | yes? skip loop
cmp.l %d3, %d6 | past end of samples?
bge.b .usloop_skip | yes? skip loop
.usloop_1:
lea.l -4(%a3, %d6.l*4), %a5 | load s[pos-1] and s[pos]
movem.l (%a5), %d0-%d1 |
sub.l %d0, %d1 | %d1 = diff = s[pos] - s[pos-1]
lea.l -4(%a3, %d6.l*4), %a5 | load s[pos-1] and s[pos]
movem.l (%a5), %d0-%d1 |
sub.l %d0, %d1 | %d1 = diff = s[pos] - s[pos-1]
.usloop_0:
move.l %d0, %acc0 | %acc0 = previous sample
lsr.l #1, %d5 | make phase into frac
mac.l %d1, %d5, %acc0 | %acc0 += diff * frac
move.l %acc0, %d7 |
lsl.l #1, %d5 | restore frac to phase
move.l %d7, (%a4)+ | *d++ = %d0
add.l %d4, %d5 | phase += delta
bcc.b .usloop_0 | load next values?
addq.l #1, %d6 | increment position
cmp.l %d3, %d6 | pos < count?
blt.b .usloop_1 | yes? continue resampling
move.l %d0, %acc0 | %acc0 = previous sample
lsr.l #1, %d5 | make phase into frac
mac.l %d1, %d5, %acc0 | %acc0 += diff * frac
move.l %acc0, %d7 |
lsl.l #1, %d5 | restore frac to phase
move.l %d7, (%a4)+ | *d++ = %d0
add.l %d4, %d5 | phase += delta
bcc.b .usloop_0 | load next values?
addq.l #1, %d6 | increment position
cmp.l %d3, %d6 | pos < count?
blt.b .usloop_1 | yes? continue resampling
.usloop_skip:
subq.l #1, %d2 | ch > 0?
bgt.b .uschannel_loop | yes? process next channel
swap %d5 | wrap phase to start of next frame
move.l %d5, (%a0) | ...and save in r->phase
move.l %a4, %d0 | return d - d[0]
sub.l (%a2), %d0 |
asr.l #2, %d0 | convert bytes->samples
movem.l (%sp), %d2-%d7/%a2-%a5 | restore non-clobberables
move.l %acc1, %acc0 | clear %acc0
lea.l 40(%sp), %sp | cleanup stack
rts | buh-bye
subq.l #1, %d2 | ch > 0?
bgt.b .uschannel_loop | yes? process next channel
swap %d5 | wrap phase to start of next frame
move.l %d5, (%a0) | ...and save in r->phase
move.l %a4, %d0 | return d - d[0]
sub.l (%a2), %d0 |
asr.l #2, %d0 | convert bytes->samples
movem.l (%sp), %d2-%d7/%a2-%a5 | restore non-clobberables
move.l %acc1, %acc0 | clear %acc0
lea.l 40(%sp), %sp | cleanup stack
rts | buh-bye
.usend:
.size dsp_upsample,.usend-dsp_upsample
.size dsp_upsample,.usend-dsp_upsample