text: ;
  ;  Copyright (c) 2010 The WebM project authors. All Rights Reserved.
  ;
  ;  Use of this source code is governed by a BSD-style license
  ;  that can be found in the LICENSE file in the root of the source
  ;  tree. An additional intellectual property rights grant can be found
  ;  in the file PATENTS.  All contributing project authors may
  ;  be found in the AUTHORS file in the root of the source tree.
  ;
  
  
      .globl bilinear_predict4x4_ppc
      .globl bilinear_predict8x4_ppc
      .globl bilinear_predict8x8_ppc
      .globl bilinear_predict16x16_ppc
  
  .macro load_c V, LABEL, OFF, R0, R1
      lis     \R0, \LABEL@ha
      la      \R1, \LABEL@l(\R0)
      lvx     \V, \OFF, \R1
  .endm
  
  .macro load_vfilter V0, V1
      load_c \V0, vfilter_b, r6, r9, r10
  
      addi    r6,  r6, 16
      lvx     \V1, r6, r10
  .endm
  
  .macro HProlog jump_label
      ;# load up horizontal filter
      slwi.   r5, r5, 4           ;# index into horizontal filter array
  
      ;# index to the next set of vectors in the row.
      li      r10, 16
      li      r12, 32
  
      ;# downshift by 7 ( divide by 128 ) at the end
      vspltish v19, 7
  
      ;# If there isn't any filtering to be done for the horizontal, then
      ;#  just skip to the second pass.
      beq     \jump_label
  
      load_c v20, hfilter_b, r5, r9, r0
  
      ;# setup constants
      ;# v14 permutation value for alignment
      load_c v28, b_hperm_b, 0, r9, r0
  
      ;# rounding added in on the multiply
      vspltisw v21, 8
      vspltisw v18, 3
      vslw    v18, v21, v18       ;# 0x00000040000000400000004000000040
  
      slwi.   r6, r6, 5           ;# index into vertical filter array
  .endm
  
  ;# Filters a horizontal line
  ;# expects:
  ;#  r3  src_ptr
  ;#  r4  pitch
  ;#  r10 16
  ;#  r12 32
  ;#  v17 perm intput
  ;#  v18 rounding
  ;#  v19 shift
  ;#  v20 filter taps
  ;#  v21 tmp
  ;#  v22 tmp
  ;#  v23 tmp
  ;#  v24 tmp
  ;#  v25 tmp
  ;#  v26 tmp
  ;#  v27 tmp
  ;#  v28 perm output
  ;#
  .macro HFilter V
      vperm   v24, v21, v21, v10  ;# v20 = 0123 1234 2345 3456
      vperm   v25, v21, v21, v11  ;# v21 = 4567 5678 6789 789A
  
      vmsummbm v24, v20, v24, v18
      vmsummbm v25, v20, v25, v18
  
      vpkswus v24, v24, v25       ;# v24 = 0 4 8 C 1 5 9 D (16-bit)
  
      vsrh    v24, v24, v19       ;# divide v0, v1 by 128
  
      vpkuhus \V, v24, v24        ;# \V = scrambled 8-bit result
  .endm
  
  .macro hfilter_8 V, increment_counter
      lvsl    v17,  0, r3         ;# permutate value for alignment
  
      ;# input to filter is 9 bytes wide, output is 8 bytes.
      lvx     v21,   0, r3
      lvx     v22, r10, r3
  
  .if \increment_counter
      add     r3, r3, r4
  .endif
      vperm   v21, v21, v22, v17
  
      HFilter \V
  .endm
  
  
  .macro load_and_align_8 V, increment_counter
      lvsl    v17,  0, r3         ;# permutate value for alignment
  
      ;# input to filter is 21 bytes wide, output is 16 bytes.
      ;#  input will can span three vectors if not aligned correctly.
      lvx     v21,   0, r3
      lvx     v22, r10, r3
  
  .if \increment_counter
      add     r3, r3, r4
  .endif
  
      vperm   \V, v21, v22, v17
  .endm
  
  .macro write_aligned_8 V, increment_counter
      stvx    \V,  0, r7
  
  .if \increment_counter
      add     r7, r7, r8
  .endif
  .endm
  
  .macro vfilter_16 P0 P1
      vmuleub v22, \P0, v20       ;# 64 + 4 positive taps
      vadduhm v22, v18, v22
      vmuloub v23, \P0, v20
      vadduhm v23, v18, v23
  
      vmuleub v24, \P1, v21
      vadduhm v22, v22, v24       ;# Re = evens, saturation unnecessary
      vmuloub v25, \P1, v21
      vadduhm v23, v23, v25       ;# Ro = odds
  
      vsrh    v22, v22, v19       ;# divide by 128
      vsrh    v23, v23, v19       ;# v16 v17 = evens, odds
      vmrghh  \P0, v22, v23       ;# v18 v19 = 16-bit result in order
      vmrglh  v23, v22, v23
      vpkuhus \P0, \P0, v23       ;# P0 = 8-bit result
  .endm
  
  
  .macro w_8x8 V, D, R, P
      stvx    \V, 0, r1
      lwz     \R, 0(r1)
      stw     \R, 0(r7)
      lwz     \R, 4(r1)
      stw     \R, 4(r7)
      add     \D, \D, \P
  .endm
  
  
      .align 2
  ;# r3 unsigned char * src
  ;# r4 int src_pitch
  ;# r5 int x_offset
  ;# r6 int y_offset
  ;# r7 unsigned char * dst
  ;# r8 int dst_pitch
  bilinear_predict4x4_ppc:
      mfspr   r11, 256            ;# get old VRSAVE
      oris    r12, r11, 0xf830
      ori     r12, r12, 0xfff8
      mtspr   256, r12            ;# set VRSAVE
  
      stwu    r1,-32(r1)          ;# create space on the stack
  
      HProlog second_pass_4x4_pre_copy_b
  
      ;# Load up permutation constants
      load_c v10, b_0123_b, 0, r9, r12
      load_c v11, b_4567_b, 0, r9, r12
  
      hfilter_8 v0, 1
      hfilter_8 v1, 1
      hfilter_8 v2, 1
      hfilter_8 v3, 1
  
      ;# Finished filtering main horizontal block.  If there is no
      ;#  vertical filtering, jump to storing the data.  Otherwise
      ;#  load up and filter the additional line that is needed
      ;#  for the vertical filter.
      beq     store_out_4x4_b
  
      hfilter_8 v4, 0
  
      b   second_pass_4x4_b
  
  second_pass_4x4_pre_copy_b:
      slwi    r6, r6, 5           ;# index into vertical filter array
  
      load_and_align_8  v0, 1
      load_and_align_8  v1, 1
      load_and_align_8  v2, 1
      load_and_align_8  v3, 1
      load_and_align_8  v4, 1
  
  second_pass_4x4_b:
      vspltish v20, 8
      vspltish v18, 3
      vslh    v18, v20, v18   ;# 0x0040 0040 0040 0040 0040 0040 0040 0040
  
      load_vfilter v20, v21
  
      vfilter_16 v0,  v1
      vfilter_16 v1,  v2
      vfilter_16 v2,  v3
      vfilter_16 v3,  v4
  
  store_out_4x4_b:
  
      stvx    v0, 0, r1
      lwz     r0, 0(r1)
      stw     r0, 0(r7)
      add     r7, r7, r8
  
      stvx    v1, 0, r1
      lwz     r0, 0(r1)
      stw     r0, 0(r7)
      add     r7, r7, r8
  
      stvx    v2, 0, r1
      lwz     r0, 0(r1)
      stw     r0, 0(r7)
      add     r7, r7, r8
  
      stvx    v3, 0, r1
      lwz     r0, 0(r1)
      stw     r0, 0(r7)
  
  exit_4x4:
  
      addi    r1, r1, 32          ;# recover stack
      mtspr   256, r11            ;# reset old VRSAVE
  
      blr
  
      .align 2
  ;# r3 unsigned char * src
  ;# r4 int src_pitch
  ;# r5 int x_offset
  ;# r6 int y_offset
  ;# r7 unsigned char * dst
  ;# r8 int dst_pitch
  bilinear_predict8x4_ppc:
      mfspr   r11, 256            ;# get old VRSAVE
      oris    r12, r11, 0xf830
      ori     r12, r12, 0xfff8
      mtspr   256, r12            ;# set VRSAVE
  
      stwu    r1,-32(r1)          ;# create space on the stack
  
      HProlog second_pass_8x4_pre_copy_b
  
      ;# Load up permutation constants
      load_c v10, b_0123_b, 0, r9, r12
      load_c v11, b_4567_b, 0, r9, r12
  
      hfilter_8 v0, 1
      hfilter_8 v1, 1
      hfilter_8 v2, 1
      hfilter_8 v3, 1
  
      ;# Finished filtering main horizontal block.  If there is no
      ;#  vertical filtering, jump to storing the data.  Otherwise
      ;#  load up and filter the additional line that is needed
      ;#  for the vertical filter.
      beq     store_out_8x4_b
  
      hfilter_8 v4, 0
  
      b   second_pass_8x4_b
  
  second_pass_8x4_pre_copy_b:
      slwi    r6, r6, 5           ;# index into vertical filter array
  
      load_and_align_8  v0, 1
      load_and_align_8  v1, 1
      load_and_align_8  v2, 1
      load_and_align_8  v3, 1
      load_and_align_8  v4, 1
  
  second_pass_8x4_b:
      vspltish v20, 8
      vspltish v18, 3
      vslh    v18, v20, v18   ;# 0x0040 0040 0040 0040 0040 0040 0040 0040
  
      load_vfilter v20, v21
  
      vfilter_16 v0,  v1
      vfilter_16 v1,  v2
      vfilter_16 v2,  v3
      vfilter_16 v3,  v4
  
  store_out_8x4_b:
  
      cmpi    cr0, r8, 8
      beq     cr0, store_aligned_8x4_b
  
      w_8x8   v0, r7, r0, r8
      w_8x8   v1, r7, r0, r8
      w_8x8   v2, r7, r0, r8
      w_8x8   v3, r7, r0, r8
  
      b       exit_8x4
  
  store_aligned_8x4_b:
      load_c v10, b_hilo_b, 0, r9, r10
  
      vperm   v0, v0, v1, v10
      vperm   v2, v2, v3, v10
  
      stvx    v0, 0, r7
      addi    r7, r7, 16
      stvx    v2, 0, r7
  
  exit_8x4:
  
      addi    r1, r1, 32          ;# recover stack
      mtspr   256, r11            ;# reset old VRSAVE
  
      blr
  
      .align 2
  ;# r3 unsigned char * src
  ;# r4 int src_pitch
  ;# r5 int x_offset
  ;# r6 int y_offset
  ;# r7 unsigned char * dst
  ;# r8 int dst_pitch
  bilinear_predict8x8_ppc:
      mfspr   r11, 256            ;# get old VRSAVE
      oris    r12, r11, 0xfff0
      ori     r12, r12, 0xffff
      mtspr   256, r12            ;# set VRSAVE
  
      stwu    r1,-32(r1)          ;# create space on the stack
  
      HProlog second_pass_8x8_pre_copy_b
  
      ;# Load up permutation constants
      load_c v10, b_0123_b, 0, r9, r12
      load_c v11, b_4567_b, 0, r9, r12
  
      hfilter_8 v0, 1
      hfilter_8 v1, 1
      hfilter_8 v2, 1
      hfilter_8 v3, 1
      hfilter_8 v4, 1
      hfilter_8 v5, 1
      hfilter_8 v6, 1
      hfilter_8 v7, 1
  
      ;# Finished filtering main horizontal block.  If there is no
      ;#  vertical filtering, jump to storing the data.  Otherwise
      ;#  load up and filter the additional line that is needed
      ;#  for the vertical filter.
      beq     store_out_8x8_b
  
      hfilter_8 v8, 0
  
      b   second_pass_8x8_b
  
  second_pass_8x8_pre_copy_b:
      slwi    r6, r6, 5           ;# index into vertical filter array
  
      load_and_align_8  v0, 1
      load_and_align_8  v1, 1
      load_and_align_8  v2, 1
      load_and_align_8  v3, 1
      load_and_align_8  v4, 1
      load_and_align_8  v5, 1
      load_and_align_8  v6, 1
      load_and_align_8  v7, 1
      load_and_align_8  v8, 0
  
  second_pass_8x8_b:
      vspltish v20, 8
      vspltish v18, 3
      vslh    v18, v20, v18   ;# 0x0040 0040 0040 0040 0040 0040 0040 0040
  
      load_vfilter v20, v21
  
      vfilter_16 v0,  v1
      vfilter_16 v1,  v2
      vfilter_16 v2,  v3
      vfilter_16 v3,  v4
      vfilter_16 v4,  v5
      vfilter_16 v5,  v6
      vfilter_16 v6,  v7
      vfilter_16 v7,  v8
  
  store_out_8x8_b:
  
      cmpi    cr0, r8, 8
      beq     cr0, store_aligned_8x8_b
  
      w_8x8   v0, r7, r0, r8
      w_8x8   v1, r7, r0, r8
      w_8x8   v2, r7, r0, r8
      w_8x8   v3, r7, r0, r8
      w_8x8   v4, r7, r0, r8
      w_8x8   v5, r7, r0, r8
      w_8x8   v6, r7, r0, r8
      w_8x8   v7, r7, r0, r8
  
      b       exit_8x8
  
  store_aligned_8x8_b:
      load_c v10, b_hilo_b, 0, r9, r10
  
      vperm   v0, v0, v1, v10
      vperm   v2, v2, v3, v10
      vperm   v4, v4, v5, v10
      vperm   v6, v6, v7, v10
  
      stvx    v0, 0, r7
      addi    r7, r7, 16
      stvx    v2, 0, r7
      addi    r7, r7, 16
      stvx    v4, 0, r7
      addi    r7, r7, 16
      stvx    v6, 0, r7
  
  exit_8x8:
  
      addi    r1, r1, 32          ;# recover stack
      mtspr   256, r11            ;# reset old VRSAVE
  
      blr
  
  ;# Filters a horizontal line
  ;# expects:
  ;#  r3  src_ptr
  ;#  r4  pitch
  ;#  r10 16
  ;#  r12 32
  ;#  v17 perm intput
  ;#  v18 rounding
  ;#  v19 shift
  ;#  v20 filter taps
  ;#  v21 tmp
  ;#  v22 tmp
  ;#  v23 tmp
  ;#  v24 tmp
  ;#  v25 tmp
  ;#  v26 tmp
  ;#  v27 tmp
  ;#  v28 perm output
  ;#
  .macro hfilter_16 V, increment_counter
  
      lvsl    v17,  0, r3         ;# permutate value for alignment
  
      ;# input to filter is 21 bytes wide, output is 16 bytes.
      ;#  input will can span three vectors if not aligned correctly.
      lvx     v21,   0, r3
      lvx     v22, r10, r3
      lvx     v23, r12, r3
  
  .if \increment_counter
      add     r3, r3, r4
  .endif
      vperm   v21, v21, v22, v17
      vperm   v22, v22, v23, v17  ;# v8 v9 = 21 input pixels left-justified
  
      ;# set 0
      vmsummbm v24, v20, v21, v18 ;# taps times elements
  
      ;# set 1
      vsldoi  v23, v21, v22, 1
      vmsummbm v25, v20, v23, v18
  
      ;# set 2
      vsldoi  v23, v21, v22, 2
      vmsummbm v26, v20, v23, v18
  
      ;# set 3
      vsldoi  v23, v21, v22, 3
      vmsummbm v27, v20, v23, v18
  
      vpkswus v24, v24, v25       ;# v24 = 0 4 8 C 1 5 9 D (16-bit)
      vpkswus v25, v26, v27       ;# v25 = 2 6 A E 3 7 B F
  
      vsrh    v24, v24, v19       ;# divide v0, v1 by 128
      vsrh    v25, v25, v19
  
      vpkuhus \V, v24, v25        ;# \V = scrambled 8-bit result
      vperm   \V, \V, v0, v28     ;# \V = correctly-ordered result
  .endm
  
  .macro load_and_align_16 V, increment_counter
      lvsl    v17,  0, r3         ;# permutate value for alignment
  
      ;# input to filter is 21 bytes wide, output is 16 bytes.
      ;#  input will can span three vectors if not aligned correctly.
      lvx     v21,   0, r3
      lvx     v22, r10, r3
  
  .if \increment_counter
      add     r3, r3, r4
  .endif
  
      vperm   \V, v21, v22, v17
  .endm
  
  .macro write_16 V, increment_counter
      stvx    \V,  0, r7
  
  .if \increment_counter
      add     r7, r7, r8
  .endif
  .endm
  
      .align 2
  ;# r3 unsigned char * src
  ;# r4 int src_pitch
  ;# r5 int x_offset
  ;# r6 int y_offset
  ;# r7 unsigned char * dst
  ;# r8 int dst_pitch
  bilinear_predict16x16_ppc:
      mfspr   r11, 256            ;# get old VRSAVE
      oris    r12, r11, 0xffff
      ori     r12, r12, 0xfff8
      mtspr   256, r12            ;# set VRSAVE
  
      HProlog second_pass_16x16_pre_copy_b
  
      hfilter_16 v0,  1
      hfilter_16 v1,  1
      hfilter_16 v2,  1
      hfilter_16 v3,  1
      hfilter_16 v4,  1
      hfilter_16 v5,  1
      hfilter_16 v6,  1
      hfilter_16 v7,  1
      hfilter_16 v8,  1
      hfilter_16 v9,  1
      hfilter_16 v10, 1
      hfilter_16 v11, 1
      hfilter_16 v12, 1
      hfilter_16 v13, 1
      hfilter_16 v14, 1
      hfilter_16 v15, 1
  
      ;# Finished filtering main horizontal block.  If there is no
      ;#  vertical filtering, jump to storing the data.  Otherwise
      ;#  load up and filter the additional line that is needed
      ;#  for the vertical filter.
      beq     store_out_16x16_b
  
      hfilter_16 v16, 0
  
      b   second_pass_16x16_b
  
  second_pass_16x16_pre_copy_b:
      slwi    r6, r6, 5           ;# index into vertical filter array
  
      load_and_align_16  v0,  1
      load_and_align_16  v1,  1
      load_and_align_16  v2,  1
      load_and_align_16  v3,  1
      load_and_align_16  v4,  1
      load_and_align_16  v5,  1
      load_and_align_16  v6,  1
      load_and_align_16  v7,  1
      load_and_align_16  v8,  1
      load_and_align_16  v9,  1
      load_and_align_16  v10, 1
      load_and_align_16  v11, 1
      load_and_align_16  v12, 1
      load_and_align_16  v13, 1
      load_and_align_16  v14, 1
      load_and_align_16  v15, 1
      load_and_align_16  v16, 0
  
  second_pass_16x16_b:
      vspltish v20, 8
      vspltish v18, 3
      vslh    v18, v20, v18   ;# 0x0040 0040 0040 0040 0040 0040 0040 0040
  
      load_vfilter v20, v21
  
      vfilter_16 v0,  v1
      vfilter_16 v1,  v2
      vfilter_16 v2,  v3
      vfilter_16 v3,  v4
      vfilter_16 v4,  v5
      vfilter_16 v5,  v6
      vfilter_16 v6,  v7
      vfilter_16 v7,  v8
      vfilter_16 v8,  v9
      vfilter_16 v9,  v10
      vfilter_16 v10, v11
      vfilter_16 v11, v12
      vfilter_16 v12, v13
      vfilter_16 v13, v14
      vfilter_16 v14, v15
      vfilter_16 v15, v16
  
  store_out_16x16_b:
  
      write_16 v0,  1
      write_16 v1,  1
      write_16 v2,  1
      write_16 v3,  1
      write_16 v4,  1
      write_16 v5,  1
      write_16 v6,  1
      write_16 v7,  1
      write_16 v8,  1
      write_16 v9,  1
      write_16 v10, 1
      write_16 v11, 1
      write_16 v12, 1
      write_16 v13, 1
      write_16 v14, 1
      write_16 v15, 0
  
      mtspr   256, r11            ;# reset old VRSAVE
  
      blr
  
      .data
  
      .align 4
  hfilter_b:
      .byte   128,  0,  0,  0,128,  0,  0,  0,128,  0,  0,  0,128,  0,  0,  0
      .byte   112, 16,  0,  0,112, 16,  0,  0,112, 16,  0,  0,112, 16,  0,  0
      .byte    96, 32,  0,  0, 96, 32,  0,  0, 96, 32,  0,  0, 96, 32,  0,  0
      .byte    80, 48,  0,  0, 80, 48,  0,  0, 80, 48,  0,  0, 80, 48,  0,  0
      .byte    64, 64,  0,  0, 64, 64,  0,  0, 64, 64,  0,  0, 64, 64,  0,  0
      .byte    48, 80,  0,  0, 48, 80,  0,  0, 48, 80,  0,  0, 48, 80,  0,  0
      .byte    32, 96,  0,  0, 32, 96,  0,  0, 32, 96,  0,  0, 32, 96,  0,  0
      .byte    16,112,  0,  0, 16,112,  0,  0, 16,112,  0,  0, 16,112,  0,  0
  
      .align 4
  vfilter_b:
      .byte   128,128,128,128,128,128,128,128,128,128,128,128,128,128,128,128
      .byte     0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0
      .byte   112,112,112,112,112,112,112,112,112,112,112,112,112,112,112,112
      .byte    16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16
      .byte    96, 96, 96, 96, 96, 96, 96, 96, 96, 96, 96, 96, 96, 96, 96, 96
      .byte    32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32
      .byte    80, 80, 80, 80, 80, 80, 80, 80, 80, 80, 80, 80, 80, 80, 80, 80
      .byte    48, 48, 48, 48, 48, 48, 48, 48, 48, 48, 48, 48, 48, 48, 48, 48
      .byte    64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64
      .byte    64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64
      .byte    48, 48, 48, 48, 48, 48, 48, 48, 48, 48, 48, 48, 48, 48, 48, 48
      .byte    80, 80, 80, 80, 80, 80, 80, 80, 80, 80, 80, 80, 80, 80, 80, 80
      .byte    32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32
      .byte    96, 96, 96, 96, 96, 96, 96, 96, 96, 96, 96, 96, 96, 96, 96, 96
      .byte    16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16
      .byte   112,112,112,112,112,112,112,112,112,112,112,112,112,112,112,112
  
      .align 4
  b_hperm_b:
      .byte     0,  4,  8, 12,  1,  5,  9, 13,  2,  6, 10, 14,  3,  7, 11, 15
  
      .align 4
  b_0123_b:
      .byte     0,  1,  2,  3,  1,  2,  3,  4,  2,  3,  4,  5,  3,  4,  5,  6
  
      .align 4
  b_4567_b:
      .byte     4,  5,  6,  7,  5,  6,  7,  8,  6,  7,  8,  9,  7,  8,  9, 10
  
  b_hilo_b:
      .byte     0,  1,  2,  3,  4,  5,  6,  7, 16, 17, 18, 19, 20, 21, 22, 23
  