[deb_ffmpeg.git] / ffmpeg / libavcodec / arm / vp8_armv6.S

/*
 * Copyright (C) 2010 Mans Rullgard
 *
 * This file is part of FFmpeg.
 *
 * FFmpeg is free software; you can redistribute it and/or
 * modify it under the terms of the GNU Lesser General Public
 * License as published by the Free Software Foundation; either
 * version 2.1 of the License, or (at your option) any later version.
 *
 * FFmpeg is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
 * Lesser General Public License for more details.
 *
 * You should have received a copy of the GNU Lesser General Public
 * License along with FFmpeg; if not, write to the Free Software
 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
 */

#include "libavutil/arm/asm.S"

.macro rac_get_prob     h, bs, buf, cw, pr, t0, t1
        adds            \bs, \bs, \t0
        lsl             \cw, \cw, \t0
        lsl             \t0, \h,  \t0
        rsb             \h,  \pr, #256
        it              cs
        ldrhcs          \t1, [\buf], #2
        smlabb          \h,  \t0, \pr, \h
T       itttt           cs
        rev16cs         \t1, \t1
A       orrcs           \cw, \cw, \t1, lsl \bs
T       lslcs           \t1, \t1, \bs
T       orrcs           \cw, \cw, \t1
        subcs           \bs, \bs, #16
        lsr             \h,  \h,  #8
        cmp             \cw, \h,  lsl #16
        itt             ge
        subge           \cw, \cw, \h,  lsl #16
        subge           \h,  \t0, \h
.endm

.macro rac_get_128      h, bs, buf, cw, t0, t1
        adds            \bs, \bs, \t0
        lsl             \cw, \cw, \t0
        lsl             \t0, \h,  \t0
        it              cs
        ldrhcs          \t1, [\buf], #2
        mov             \h,  #128
        it              cs
        rev16cs         \t1, \t1
        add             \h,  \h,  \t0, lsl #7
A       orrcs           \cw, \cw, \t1, lsl \bs
T       ittt            cs
T       lslcs           \t1, \t1, \bs
T       orrcs           \cw, \cw, \t1
        subcs           \bs, \bs, #16
        lsr             \h,  \h,  #8
        cmp             \cw, \h,  lsl #16
        itt             ge
        subge           \cw, \cw, \h,  lsl #16
        subge           \h,  \t0, \h
.endm

function ff_decode_block_coeffs_armv6, export=1
        push            {r0,r1,r4-r11,lr}
        movrelx         lr,  X(ff_vp56_norm_shift)
        ldrd            r4,  r5,  [sp, #44]             @ token_prob, qmul
        cmp             r3,  #0
        ldr             r11, [r5]
        ldm             r0,  {r5-r7}                    @ high, bits, buf
        it              ne
        pkhtbne         r11, r11, r11, asr #16
        ldr             r8,  [r0, #16]                  @ code_word
0:
        ldrb            r9,  [lr, r5]
        add             r3,  r3,  #1
        ldrb            r0,  [r4, #1]
        rac_get_prob    r5,  r6,  r7,  r8,  r0,  r9,  r10
        blt             2f

        ldrb            r9,  [lr, r5]
        ldrb            r0,  [r4, #2]
        rac_get_prob    r5,  r6,  r7,  r8,  r0,  r9,  r10
        ldrb            r9,  [lr, r5]
        bge             3f

        add             r4,  r3,  r3,  lsl #5
        sxth            r12, r11
        add             r4,  r4,  r2
        adds            r6,  r6,  r9
        add             r4,  r4,  #11
        lsl             r8,  r8,  r9
        it              cs
        ldrhcs          r10, [r7], #2
        lsl             r9,  r5,  r9
        mov             r5,  #128
        it              cs
        rev16cs         r10, r10
        add             r5,  r5,  r9,  lsl #7
T       ittt            cs
T       lslcs           r10, r10, r6
T       orrcs           r8,  r8,  r10
A       orrcs           r8,  r8,  r10, lsl r6
        subcs           r6,  r6,  #16
        lsr             r5,  r5,  #8
        cmp             r8,  r5,  lsl #16
        movrel          r10, zigzag_scan-1
        itt             ge
        subge           r8,  r8,  r5,  lsl #16
        subge           r5,  r9,  r5
        ldrb            r10, [r10, r3]
        it              ge
        rsbge           r12, r12, #0
        cmp             r3,  #16
        strh            r12, [r1, r10]
        bge             6f
5:
        ldrb            r9,  [lr, r5]
        ldrb            r0,  [r4]
        rac_get_prob    r5,  r6,  r7,  r8,  r0,  r9,  r10
        pkhtb           r11, r11, r11, asr #16
        bge             0b

6:
        ldr             r0,  [sp]
        ldr             r9,  [r0, #12]
        cmp             r7,  r9
        it              hi
        movhi           r7,  r9
        stm             r0,  {r5-r7}                    @ high, bits, buf
        str             r8,  [r0, #16]                  @ code_word

        add             sp,  sp,  #8
        mov             r0,  r3
        pop             {r4-r11,pc}
2:
        add             r4,  r3,  r3,  lsl #5
        cmp             r3,  #16
        add             r4,  r4,  r2
        pkhtb           r11, r11, r11, asr #16
        bne             0b
        b               6b
3:
        ldrb            r0,  [r4, #3]
        rac_get_prob    r5,  r6,  r7,  r8,  r0,  r9,  r10
        ldrb            r9,  [lr, r5]
        bge             1f

        mov             r12, #2
        ldrb            r0,  [r4, #4]
        rac_get_prob    r5,  r6,  r7,  r8,  r0,  r9,  r10
        it              ge
        addge           r12, #1
        ldrb            r9,  [lr, r5]
        blt             4f
        ldrb            r0,  [r4, #5]
        rac_get_prob    r5,  r6,  r7,  r8,  r0,  r9,  r10
        it              ge
        addge           r12, #1
        ldrb            r9,  [lr, r5]
        b               4f
1:
        ldrb            r0,  [r4, #6]
        rac_get_prob    r5,  r6,  r7,  r8,  r0,  r9,  r10
        ldrb            r9,  [lr, r5]
        bge             3f

        ldrb            r0,  [r4, #7]
        rac_get_prob    r5,  r6,  r7,  r8,  r0,  r9,  r10
        ldrb            r9,  [lr, r5]
        bge             2f

        mov             r12, #5
        mov             r0,  #159
        rac_get_prob    r5,  r6,  r7,  r8,  r0,  r9,  r10
        it              ge
        addge           r12, r12, #1
        ldrb            r9,  [lr, r5]
        b               4f
2:
        mov             r12, #7
        mov             r0,  #165
        rac_get_prob    r5,  r6,  r7,  r8,  r0,  r9,  r10
        it              ge
        addge           r12, r12, #2
        ldrb            r9,  [lr, r5]
        mov             r0,  #145
        rac_get_prob    r5,  r6,  r7,  r8,  r0,  r9,  r10
        it              ge
        addge           r12, r12, #1
        ldrb            r9,  [lr, r5]
        b               4f
3:
        ldrb            r0,  [r4, #8]
        rac_get_prob    r5,  r6,  r7,  r8,  r0,  r9,  r10
        it              ge
        addge           r4,  r4,  #1
        ldrb            r9,  [lr, r5]
        ite             ge
        movge           r12, #2
        movlt           r12, #0
        ldrb            r0,  [r4, #9]
        rac_get_prob    r5,  r6,  r7,  r8,  r0,  r9,  r10
        mov             r9,  #8
        it              ge
        addge           r12, r12, #1
        movrelx         r4,  X(ff_vp8_dct_cat_prob), r1
        lsl             r9,  r9,  r12
        ldr             r4,  [r4, r12, lsl #2]
        add             r12, r9,  #3
        mov             r1,  #0
        ldrb            r0,  [r4], #1
1:
        ldrb            r9,  [lr, r5]
        lsl             r1,  r1,  #1
        rac_get_prob    r5,  r6,  r7,  r8,  r0,  r9,  r10
        ldrb            r0,  [r4], #1
        it              ge
        addge           r1,  r1,  #1
        cmp             r0,  #0
        bne             1b
        ldrb            r9,  [lr, r5]
        add             r12, r12, r1
        ldr             r1,  [sp, #4]
4:
        add             r4,  r3,  r3,  lsl #5
        add             r4,  r4,  r2
        add             r4,  r4,  #22
        rac_get_128     r5,  r6,  r7,  r8,  r9,  r10
        it              ge
        rsbge           r12, r12, #0
        smulbb          r12, r12, r11
        movrel          r9,  zigzag_scan-1
        ldrb            r9,  [r9, r3]
        cmp             r3,  #16
        strh            r12, [r1, r9]
        bge             6b
        b               5b
endfunc

const zigzag_scan
        .byte            0,  2,  8, 16
        .byte           10,  4,  6, 12
        .byte           18, 24, 26, 20
        .byte           14, 22, 28, 30
endconst
Commit	Line	Data
2ba45a60 DM	1	/*
	2	* Copyright (C) 2010 Mans Rullgard
	3	*
	4	* This file is part of FFmpeg.
	5	*
	6	* FFmpeg is free software; you can redistribute it and/or
	7	* modify it under the terms of the GNU Lesser General Public
	8	* License as published by the Free Software Foundation; either
	9	* version 2.1 of the License, or (at your option) any later version.
	10	*
	11	* FFmpeg is distributed in the hope that it will be useful,
	12	* but WITHOUT ANY WARRANTY; without even the implied warranty of
	13	* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
	14	* Lesser General Public License for more details.
	15	*
	16	* You should have received a copy of the GNU Lesser General Public
	17	* License along with FFmpeg; if not, write to the Free Software
	18	* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
	19	*/
	20
	21	#include "libavutil/arm/asm.S"
	22
	23	.macro rac_get_prob h, bs, buf, cw, pr, t0, t1
	24	adds \bs, \bs, \t0
	25	lsl \cw, \cw, \t0
	26	lsl \t0, \h, \t0
	27	rsb \h, \pr, #256
	28	it cs
	29	ldrhcs \t1, [\buf], #2
	30	smlabb \h, \t0, \pr, \h
	31	T itttt cs
	32	rev16cs \t1, \t1
	33	A orrcs \cw, \cw, \t1, lsl \bs
	34	T lslcs \t1, \t1, \bs
	35	T orrcs \cw, \cw, \t1
	36	subcs \bs, \bs, #16
	37	lsr \h, \h, #8
	38	cmp \cw, \h, lsl #16
	39	itt ge
	40	subge \cw, \cw, \h, lsl #16
	41	subge \h, \t0, \h
	42	.endm
	43
	44	.macro rac_get_128 h, bs, buf, cw, t0, t1
	45	adds \bs, \bs, \t0
	46	lsl \cw, \cw, \t0
	47	lsl \t0, \h, \t0
	48	it cs
	49	ldrhcs \t1, [\buf], #2
	50	mov \h, #128
	51	it cs
	52	rev16cs \t1, \t1
	53	add \h, \h, \t0, lsl #7
	54	A orrcs \cw, \cw, \t1, lsl \bs
	55	T ittt cs
	56	T lslcs \t1, \t1, \bs
	57	T orrcs \cw, \cw, \t1
	58	subcs \bs, \bs, #16
	59	lsr \h, \h, #8
	60	cmp \cw, \h, lsl #16
	61	itt ge
	62	subge \cw, \cw, \h, lsl #16
	63	subge \h, \t0, \h
	64	.endm
65
66	function ff_decode_block_coeffs_armv6, export=1
67	push {r0,r1,r4-r11,lr}
68	movrelx lr, X(ff_vp56_norm_shift)
69	ldrd r4, r5, [sp, #44] @ token_prob, qmul
70	cmp r3, #0
71	ldr r11, [r5]
72	ldm r0, {r5-r7} @ high, bits, buf
73	it ne
74	pkhtbne r11, r11, r11, asr #16
75	ldr r8, [r0, #16] @ code_word
76	0:
77	ldrb r9, [lr, r5]
78	add r3, r3, #1
79	ldrb r0, [r4, #1]
80	rac_get_prob r5, r6, r7, r8, r0, r9, r10
81	blt 2f
82
83	ldrb r9, [lr, r5]
84	ldrb r0, [r4, #2]
85	rac_get_prob r5, r6, r7, r8, r0, r9, r10
86	ldrb r9, [lr, r5]
87	bge 3f
88
89	add r4, r3, r3, lsl #5
90	sxth r12, r11
91	add r4, r4, r2
92	adds r6, r6, r9
93	add r4, r4, #11
94	lsl r8, r8, r9
95	it cs
96	ldrhcs r10, [r7], #2
97	lsl r9, r5, r9
98	mov r5, #128
99	it cs
100	rev16cs r10, r10
101	add r5, r5, r9, lsl #7
102	T ittt cs
103	T lslcs r10, r10, r6
104	T orrcs r8, r8, r10
105	A orrcs r8, r8, r10, lsl r6
106	subcs r6, r6, #16
107	lsr r5, r5, #8
108	cmp r8, r5, lsl #16
109	movrel r10, zigzag_scan-1
110	itt ge
111	subge r8, r8, r5, lsl #16
112	subge r5, r9, r5
113	ldrb r10, [r10, r3]
114	it ge
115	rsbge r12, r12, #0
116	cmp r3, #16
117	strh r12, [r1, r10]
118	bge 6f
119	5:
120	ldrb r9, [lr, r5]
121	ldrb r0, [r4]
122	rac_get_prob r5, r6, r7, r8, r0, r9, r10
123	pkhtb r11, r11, r11, asr #16
124	bge 0b
125
126	6:
127	ldr r0, [sp]
128	ldr r9, [r0, #12]
129	cmp r7, r9
130	it hi
131	movhi r7, r9
132	stm r0, {r5-r7} @ high, bits, buf
133	str r8, [r0, #16] @ code_word
134
135	add sp, sp, #8
136	mov r0, r3
137	pop {r4-r11,pc}
138	2:
139	add r4, r3, r3, lsl #5
140	cmp r3, #16
141	add r4, r4, r2
142	pkhtb r11, r11, r11, asr #16
143	bne 0b
144	b 6b
145	3:
146	ldrb r0, [r4, #3]
147	rac_get_prob r5, r6, r7, r8, r0, r9, r10
148	ldrb r9, [lr, r5]
149	bge 1f
150
151	mov r12, #2
152	ldrb r0, [r4, #4]
153	rac_get_prob r5, r6, r7, r8, r0, r9, r10
154	it ge
155	addge r12, #1
156	ldrb r9, [lr, r5]
157	blt 4f
158	ldrb r0, [r4, #5]
159	rac_get_prob r5, r6, r7, r8, r0, r9, r10
160	it ge
161	addge r12, #1
162	ldrb r9, [lr, r5]
163	b 4f
164	1:
165	ldrb r0, [r4, #6]
166	rac_get_prob r5, r6, r7, r8, r0, r9, r10
167	ldrb r9, [lr, r5]
168	bge 3f
169
170	ldrb r0, [r4, #7]
171	rac_get_prob r5, r6, r7, r8, r0, r9, r10
172	ldrb r9, [lr, r5]
173	bge 2f
174
175	mov r12, #5
176	mov r0, #159
177	rac_get_prob r5, r6, r7, r8, r0, r9, r10
178	it ge
179	addge r12, r12, #1
180	ldrb r9, [lr, r5]
181	b 4f
182	2:
183	mov r12, #7
184	mov r0, #165
185	rac_get_prob r5, r6, r7, r8, r0, r9, r10
186	it ge
187	addge r12, r12, #2
188	ldrb r9, [lr, r5]
189	mov r0, #145
190	rac_get_prob r5, r6, r7, r8, r0, r9, r10
191	it ge
192	addge r12, r12, #1
193	ldrb r9, [lr, r5]
194	b 4f
195	3:
196	ldrb r0, [r4, #8]
197	rac_get_prob r5, r6, r7, r8, r0, r9, r10
198	it ge
199	addge r4, r4, #1
200	ldrb r9, [lr, r5]
201	ite ge
202	movge r12, #2
203	movlt r12, #0
204	ldrb r0, [r4, #9]
205	rac_get_prob r5, r6, r7, r8, r0, r9, r10
206	mov r9, #8
207	it ge
208	addge r12, r12, #1
209	movrelx r4, X(ff_vp8_dct_cat_prob), r1
210	lsl r9, r9, r12
211	ldr r4, [r4, r12, lsl #2]
212	add r12, r9, #3
213	mov r1, #0
214	ldrb r0, [r4], #1
215	1:
216	ldrb r9, [lr, r5]
217	lsl r1, r1, #1
218	rac_get_prob r5, r6, r7, r8, r0, r9, r10
219	ldrb r0, [r4], #1
220	it ge
221	addge r1, r1, #1
222	cmp r0, #0
223	bne 1b
224	ldrb r9, [lr, r5]
225	add r12, r12, r1
226	ldr r1, [sp, #4]
227	4:
228	add r4, r3, r3, lsl #5
229	add r4, r4, r2
230	add r4, r4, #22
231	rac_get_128 r5, r6, r7, r8, r9, r10
232	it ge
233	rsbge r12, r12, #0
234	smulbb r12, r12, r11
235	movrel r9, zigzag_scan-1
236	ldrb r9, [r9, r3]
237	cmp r3, #16
238	strh r12, [r1, r9]
239	bge 6b
240	b 5b
241	endfunc
242
243	const zigzag_scan
244	.byte 0, 2, 8, 16
245	.byte 10, 4, 6, 12
246	.byte 18, 24, 26, 20
247	.byte 14, 22, 28, 30
248	endconst