--- /dev/null
+; libFLAC - Free Lossless Audio Codec library\r
+; Copyright (C) 2004 Josh Coalson\r
+;\r
+; Redistribution and use in source and binary forms, with or without\r
+; modification, are permitted provided that the following conditions\r
+; are met:\r
+;\r
+; - Redistributions of source code must retain the above copyright\r
+; notice, this list of conditions and the following disclaimer.\r
+;\r
+; - Redistributions in binary form must reproduce the above copyright\r
+; notice, this list of conditions and the following disclaimer in the\r
+; documentation and/or other materials provided with the distribution.\r
+;\r
+; - Neither the name of the Xiph.org Foundation nor the names of its\r
+; contributors may be used to endorse or promote products derived from\r
+; this software without specific prior written permission.\r
+;\r
+; THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS\r
+; ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT\r
+; LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR\r
+; A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR\r
+; CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,\r
+; EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,\r
+; PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR\r
+; PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF\r
+; LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING\r
+; NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS\r
+; SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.\r
+\r
+.text\r
+ .align 2\r
+.globl _FLAC__lpc_restore_signal_asm_ppc_altivec_16\r
+.globl _FLAC__lpc_restore_signal_asm_ppc_altivec_16_order8\r
+\r
+_FLAC__lpc_restore_signal_asm_ppc_altivec_16:\r
+; r3: residual[]\r
+; r4: data_len\r
+; r5: qlp_coeff[]\r
+; r6: order\r
+; r7: lp_quantization\r
+; r8: data[]\r
+\r
+; see src/libFLAC/lpc.c:FLAC__lpc_restore_signal()\r
+; these is a PowerPC/Altivec assembly version which requires bps<=16 (or actual\r
+; bps<=15 for mid-side coding, since that uses an extra bit)\r
+\r
+; these should be fast; the inner loop is unrolled (it takes no more than\r
+; 3*(order%4) instructions, all of which are arithmetic), and all of the\r
+; coefficients and all relevant history stay in registers, so the outer loop\r
+; has only one load from memory (the residual)\r
+\r
+; I haven't yet run this through simg4, so there may be some avoidable stalls,\r
+; and there may be a somewhat more clever way to do the outer loop\r
+\r
+; the branch mechanism may prevent dynamic loading; I still need to examine\r
+; this issue, and there may be a more elegant method\r
+\r
+ stmw r31,-4(r1)\r
+\r
+ addi r9,r1,-28\r
+ li r31,0xf\r
+ andc r9,r9,r31 ; for quadword-aligned stack data\r
+\r
+ slwi r6,r6,2 ; adjust for word size\r
+ slwi r4,r4,2\r
+ add r4,r4,r8 ; r4 = data+data_len\r
+\r
+ mfspr r0,256 ; cache old vrsave\r
+ addis r31,0,hi16(0xfffffc00)\r
+ ori r31,r31,lo16(0xfffffc00)\r
+ mtspr 256,r31 ; declare VRs in vrsave\r
+\r
+ cmplw cr0,r8,r4 ; i<data_len\r
+ bc 4,0,L1400\r
+\r
+ ; load coefficients into v0-v7 and initial history into v8-v15\r
+ li r31,0xf\r
+ and r31,r8,r31 ; r31: data%4\r
+ li r11,16\r
+ subf r31,r31,r11 ; r31: 4-(data%4)\r
+ slwi r31,r31,3 ; convert to bits for vsro\r
+ li r10,-4\r
+ stw r31,-4(r9)\r
+ lvewx v0,r10,r9\r
+ vspltisb v18,-1\r
+ vsro v18,v18,v0 ; v18: mask vector\r
+\r
+ li r31,0x8\r
+ lvsl v0,0,r31\r
+ vsldoi v0,v0,v0,12\r
+ li r31,0xc\r
+ lvsl v1,0,r31\r
+ vspltisb v2,0\r
+ vspltisb v3,-1\r
+ vmrglw v2,v2,v3\r
+ vsel v0,v1,v0,v2 ; v0: reversal permutation vector\r
+\r
+ add r10,r5,r6\r
+ lvsl v17,0,r5 ; v17: coefficient alignment permutation vector\r
+ vperm v17,v17,v17,v0 ; v17: reversal coefficient alignment permutation vector\r
+\r
+ mr r11,r8\r
+ lvsl v16,0,r11 ; v16: history alignment permutation vector\r
+\r
+ lvx v0,0,r5\r
+ addi r5,r5,16\r
+ lvx v1,0,r5\r
+ vperm v0,v0,v1,v17\r
+ lvx v8,0,r11\r
+ addi r11,r11,-16\r
+ lvx v9,0,r11\r
+ vperm v8,v9,v8,v16\r
+ cmplw cr0,r5,r10\r
+ bc 12,0,L1101\r
+ vand v0,v0,v18\r
+ addis r31,0,hi16(L1307)\r
+ ori r31,r31,lo16(L1307)\r
+ b L1199\r
+\r
+L1101:\r
+ addi r5,r5,16\r
+ lvx v2,0,r5\r
+ vperm v1,v1,v2,v17\r
+ addi r11,r11,-16\r
+ lvx v10,0,r11\r
+ vperm v9,v10,v9,v16\r
+ cmplw cr0,r5,r10\r
+ bc 12,0,L1102\r
+ vand v1,v1,v18\r
+ addis r31,0,hi16(L1306)\r
+ ori r31,r31,lo16(L1306)\r
+ b L1199\r
+\r
+L1102:\r
+ addi r5,r5,16\r
+ lvx v3,0,r5\r
+ vperm v2,v2,v3,v17\r
+ addi r11,r11,-16\r
+ lvx v11,0,r11\r
+ vperm v10,v11,v10,v16\r
+ cmplw cr0,r5,r10\r
+ bc 12,0,L1103\r
+ vand v2,v2,v18\r
+ addis r31,0,hi16(L1305)\r
+ ori r31,r31,lo16(L1305)\r
+ b L1199\r
+\r
+L1103:\r
+ addi r5,r5,16\r
+ lvx v4,0,r5\r
+ vperm v3,v3,v4,v17\r
+ addi r11,r11,-16\r
+ lvx v12,0,r11\r
+ vperm v11,v12,v11,v16\r
+ cmplw cr0,r5,r10\r
+ bc 12,0,L1104\r
+ vand v3,v3,v18\r
+ addis r31,0,hi16(L1304)\r
+ ori r31,r31,lo16(L1304)\r
+ b L1199\r
+\r
+L1104:\r
+ addi r5,r5,16\r
+ lvx v5,0,r5\r
+ vperm v4,v4,v5,v17\r
+ addi r11,r11,-16\r
+ lvx v13,0,r11\r
+ vperm v12,v13,v12,v16\r
+ cmplw cr0,r5,r10\r
+ bc 12,0,L1105\r
+ vand v4,v4,v18\r
+ addis r31,0,hi16(L1303)\r
+ ori r31,r31,lo16(L1303)\r
+ b L1199\r
+\r
+L1105:\r
+ addi r5,r5,16\r
+ lvx v6,0,r5\r
+ vperm v5,v5,v6,v17\r
+ addi r11,r11,-16\r
+ lvx v14,0,r11\r
+ vperm v13,v14,v13,v16\r
+ cmplw cr0,r5,r10\r
+ bc 12,0,L1106\r
+ vand v5,v5,v18\r
+ addis r31,0,hi16(L1302)\r
+ ori r31,r31,lo16(L1302)\r
+ b L1199\r
+\r
+L1106:\r
+ addi r5,r5,16\r
+ lvx v7,0,r5\r
+ vperm v6,v6,v7,v17\r
+ addi r11,r11,-16\r
+ lvx v15,0,r11\r
+ vperm v14,v15,v14,v16\r
+ cmplw cr0,r5,r10\r
+ bc 12,0,L1107\r
+ vand v6,v6,v18\r
+ addis r31,0,hi16(L1301)\r
+ ori r31,r31,lo16(L1301)\r
+ b L1199\r
+\r
+L1107:\r
+ addi r5,r5,16\r
+ lvx v19,0,r5\r
+ vperm v7,v7,v19,v17\r
+ addi r11,r11,-16\r
+ lvx v19,0,r11\r
+ vperm v15,v19,v15,v16\r
+ vand v7,v7,v18\r
+ addis r31,0,hi16(L1300)\r
+ ori r31,r31,lo16(L1300)\r
+\r
+L1199:\r
+ mtctr r31\r
+\r
+ ; set up invariant vectors\r
+ vspltish v16,0 ; v16: zero vector\r
+\r
+ li r10,-12\r
+ lvsr v17,r10,r8 ; v17: result shift vector\r
+ lvsl v18,r10,r3 ; v18: residual shift back vector\r
+\r
+ li r10,-4\r
+ stw r7,-4(r9)\r
+ lvewx v19,r10,r9 ; v19: lp_quantization vector\r
+\r
+L1200:\r
+ vmulosh v20,v0,v8 ; v20: sum vector\r
+ bcctr 20,0\r
+\r
+L1300:\r
+ vmulosh v21,v7,v15\r
+ vsldoi v15,v15,v14,4 ; increment history\r
+ vaddsws v20,v20,v21\r
+\r
+L1301:\r
+ vmulosh v21,v6,v14\r
+ vsldoi v14,v14,v13,4\r
+ vaddsws v20,v20,v21\r
+\r
+L1302:\r
+ vmulosh v21,v5,v13\r
+ vsldoi v13,v13,v12,4\r
+ vaddsws v20,v20,v21\r
+\r
+L1303:\r
+ vmulosh v21,v4,v12\r
+ vsldoi v12,v12,v11,4\r
+ vaddsws v20,v20,v21\r
+\r
+L1304:\r
+ vmulosh v21,v3,v11\r
+ vsldoi v11,v11,v10,4\r
+ vaddsws v20,v20,v21\r
+\r
+L1305:\r
+ vmulosh v21,v2,v10\r
+ vsldoi v10,v10,v9,4\r
+ vaddsws v20,v20,v21\r
+\r
+L1306:\r
+ vmulosh v21,v1,v9\r
+ vsldoi v9,v9,v8,4\r
+ vaddsws v20,v20,v21\r
+\r
+L1307:\r
+ vsumsws v20,v20,v16 ; v20[3]: sum\r
+ vsraw v20,v20,v19 ; v20[3]: sum >> lp_quantization\r
+\r
+ lvewx v21,0,r3 ; v21[n]: *residual\r
+ vperm v21,v21,v21,v18 ; v21[3]: *residual\r
+ vaddsws v20,v21,v20 ; v20[3]: *residual + (sum >> lp_quantization)\r
+ vsldoi v18,v18,v18,4 ; increment shift vector\r
+\r
+ vperm v21,v20,v20,v17 ; v21[n]: shift for storage\r
+ vsldoi v17,v17,v17,12 ; increment shift vector\r
+ stvewx v21,0,r8\r
+\r
+ vsldoi v20,v20,v20,12\r
+ vsldoi v8,v8,v20,4 ; insert value onto history\r
+\r
+ addi r3,r3,4\r
+ addi r8,r8,4\r
+ cmplw cr0,r8,r4 ; i<data_len\r
+ bc 12,0,L1200\r
+\r
+L1400:\r
+ mtspr 256,r0 ; restore old vrsave\r
+ lmw r31,-4(r1)\r
+ blr\r
+\r
+_FLAC__lpc_restore_signal_asm_ppc_altivec_16_order8:\r
+; r3: residual[]\r
+; r4: data_len\r
+; r5: qlp_coeff[]\r
+; r6: order\r
+; r7: lp_quantization\r
+; r8: data[]\r
+\r
+; see _FLAC__lpc_restore_signal_asm_ppc_altivec_16() above\r
+; this version assumes order<=8; it uses fewer vector registers, which should\r
+; save time in context switches, and has less code, which may improve\r
+; instruction caching\r
+\r
+ stmw r31,-4(r1)\r
+\r
+ addi r9,r1,-28\r
+ li r31,0xf\r
+ andc r9,r9,r31 ; for quadword-aligned stack data\r
+\r
+ slwi r6,r6,2 ; adjust for word size\r
+ slwi r4,r4,2\r
+ add r4,r4,r8 ; r4 = data+data_len\r
+\r
+ mfspr r0,256 ; cache old vrsave\r
+ addis r31,0,hi16(0xffc00000)\r
+ ori r31,r31,lo16(0xffc00000)\r
+ mtspr 256,r31 ; declare VRs in vrsave\r
+\r
+ cmplw cr0,r8,r4 ; i<data_len\r
+ bc 4,0,L2400\r
+\r
+ ; load coefficients into v0-v1 and initial history into v2-v3\r
+ li r31,0xf\r
+ and r31,r8,r31 ; r31: data%4\r
+ li r11,16\r
+ subf r31,r31,r11 ; r31: 4-(data%4)\r
+ slwi r31,r31,3 ; convert to bits for vsro\r
+ li r10,-4\r
+ stw r31,-4(r9)\r
+ lvewx v0,r10,r9\r
+ vspltisb v6,-1\r
+ vsro v6,v6,v0 ; v6: mask vector\r
+\r
+ li r31,0x8\r
+ lvsl v0,0,r31\r
+ vsldoi v0,v0,v0,12\r
+ li r31,0xc\r
+ lvsl v1,0,r31\r
+ vspltisb v2,0\r
+ vspltisb v3,-1\r
+ vmrglw v2,v2,v3\r
+ vsel v0,v1,v0,v2 ; v0: reversal permutation vector\r
+\r
+ add r10,r5,r6\r
+ lvsl v5,0,r5 ; v5: coefficient alignment permutation vector\r
+ vperm v5,v5,v5,v0 ; v5: reversal coefficient alignment permutation vector\r
+\r
+ mr r11,r8\r
+ lvsl v4,0,r11 ; v4: history alignment permutation vector\r
+\r
+ lvx v0,0,r5\r
+ addi r5,r5,16\r
+ lvx v1,0,r5\r
+ vperm v0,v0,v1,v5\r
+ lvx v2,0,r11\r
+ addi r11,r11,-16\r
+ lvx v3,0,r11\r
+ vperm v2,v3,v2,v4\r
+ cmplw cr0,r5,r10\r
+ bc 12,0,L2101\r
+ vand v0,v0,v6\r
+ addis r31,0,hi16(L2301)\r
+ ori r31,r31,lo16(L2301)\r
+ b L2199\r
+\r
+L2101:\r
+ addi r5,r5,16\r
+ lvx v7,0,r5\r
+ vperm v1,v1,v7,v5\r
+ addi r11,r11,-16\r
+ lvx v7,0,r11\r
+ vperm v3,v7,v3,v4\r
+ vand v1,v1,v6\r
+ addis r31,0,hi16(L2300)\r
+ ori r31,r31,lo16(L2300)\r
+\r
+L2199:\r
+ mtctr r31\r
+\r
+ ; set up invariant vectors\r
+ vspltish v4,0 ; v4: zero vector\r
+\r
+ li r10,-12\r
+ lvsr v5,r10,r8 ; v5: result shift vector\r
+ lvsl v6,r10,r3 ; v6: residual shift back vector\r
+\r
+ li r10,-4\r
+ stw r7,-4(r9)\r
+ lvewx v7,r10,r9 ; v7: lp_quantization vector\r
+\r
+L2200:\r
+ vmulosh v8,v0,v2 ; v8: sum vector\r
+ bcctr 20,0\r
+\r
+L2300:\r
+ vmulosh v9,v1,v3\r
+ vsldoi v3,v3,v2,4\r
+ vaddsws v8,v8,v9\r
+\r
+L2301:\r
+ vsumsws v8,v8,v4 ; v8[3]: sum\r
+ vsraw v8,v8,v7 ; v8[3]: sum >> lp_quantization\r
+\r
+ lvewx v9,0,r3 ; v9[n]: *residual\r
+ vperm v9,v9,v9,v6 ; v9[3]: *residual\r
+ vaddsws v8,v9,v8 ; v8[3]: *residual + (sum >> lp_quantization)\r
+ vsldoi v6,v6,v6,4 ; increment shift vector\r
+\r
+ vperm v9,v8,v8,v5 ; v9[n]: shift for storage\r
+ vsldoi v5,v5,v5,12 ; increment shift vector\r
+ stvewx v9,0,r8\r
+\r
+ vsldoi v8,v8,v8,12\r
+ vsldoi v2,v2,v8,4 ; insert value onto history\r
+\r
+ addi r3,r3,4\r
+ addi r8,r8,4\r
+ cmplw cr0,r8,r4 ; i<data_len\r
+ bc 12,0,L2200\r
+\r
+L2400:\r
+ mtspr 256,r0 ; restore old vrsave\r
+ lmw r31,-4(r1)\r
+ blr\r