diff options
Diffstat (limited to 'ggml')
| -rw-r--r-- | ggml/src/iqk/iqk_mul_mat.cpp | 145 | 
1 files changed, 144 insertions, 1 deletions
diff --git a/ggml/src/iqk/iqk_mul_mat.cpp b/ggml/src/iqk/iqk_mul_mat.cpp index 82a55af4..7543d895 100644 --- a/ggml/src/iqk/iqk_mul_mat.cpp +++ b/ggml/src/iqk/iqk_mul_mat.cpp @@ -5774,6 +5774,7 @@ struct QF16Base {      }  };  template <int nrc> struct QF16 final : public QF16Base { +    using Base = QF16Base;      constexpr static int nrc_y = nrc;      QF16(const DataInfo& info) {          for (int iy = 0; iy < nrc_y; ++iy) y[iy] = (const __fp16 *)info.src1_row(iy); @@ -5787,6 +5788,103 @@ template <int nrc> struct QF16 final : public QF16Base {      const __fp16 * y[nrc_y];  }; +struct QBF16Base { +    constexpr static int k_step = 4; +    using Data = float32x4_t; +    using Acc  = float32x4_t; +    static inline Data load(const uint16_t * x) { return vreinterpretq_f32_u32(vshlq_n_u32(vmovl_u16(vld1_u16(x)), 16)); } +    static inline Data load4(const uint16_t * x) { return load(x); } +    static inline Acc acc(Acc prev, const Data& y, const Data& x) { +        return vfmaq_f32(prev, y, x); +    } +    static inline Acc acc_first(const Data& y, const Data& x) { +        return vmulq_f32(y, x); +    } +    static inline float hsum(Acc acc) { return vaddvq_f32(acc); } +}; +template <int nrc> struct QBF16 final : public QBF16Base { +    using Base = QBF16Base; +    constexpr static int nrc_y = nrc; +    QBF16(const DataInfo& info) { +        for (int iy = 0; iy < nrc_y; ++iy) y[iy] = (const uint16_t *)info.src1_row(iy); +    } +    QBF16(const char * cx, size_t bx) { +        for (int iy = 0; iy < nrc_y; ++iy) y[iy] = (const uint16_t *)(cx + iy*bx); +    } +    IQK_ALWAYS_INLINE Data load1(int iy, int i) const { return load(y[iy] + k_step*i); } +    IQK_ALWAYS_INLINE Data load_tail(int iy, int i) const { return load(y[iy] + 4*i); } +    const uint16_t * y[nrc_y]; +}; + +struct QF32Base { +    constexpr static int k_step = 4; +    using Data = float32x4_t; +    using Acc  = float32x4_t; +    static inline Data load(const float * x) { return vld1q_f32(x); } +    static inline Data load4(const float * x) { return load(x); } +    static inline Acc acc(Acc prev, const Data& y, const Data& x) { return vfmaq_f32(prev, y, x); } +    static inline Acc acc_first(const Data& y, const Data& x) { return vmulq_f32(y, x); } +    static inline float hsum(Acc acc) { return vaddvq_f32(acc); } +}; +template <int nrc> struct QF32 final : public QF32Base { +    using Base = QF32Base; +    constexpr static int nrc_y = nrc; +    QF32(const DataInfo& info) { +        for (int iy = 0; iy < nrc_y; ++iy) y[iy] = (const float *)info.src1_row(iy); +    } +    QF32(const char * cx, size_t bx) { +        for (int iy = 0; iy < nrc_y; ++iy) y[iy] = (const float *)(cx + iy*bx); +    } +    IQK_ALWAYS_INLINE Data load1(int iy, int i) const { return load(y[iy] + k_step*i); } +    IQK_ALWAYS_INLINE Data load_tail(int iy, int i) const { return load(y[iy] + 4*i); } +    const float * y[nrc_y]; +}; + +template <typename Qy, typename Qx, bool is_multiple_of_k_step> +IQK_NOINLINE void mul_mat_Qx_Qy_NxN(int n, const char * cx, size_t bx, int ix0, const DataInfo& info) { +    GGML_ASSERT(Qx::Base::k_step == Qy::Base::k_step); +    int nb = n/Qx::Base::k_step; +    Qy y(info); +    Qx x(cx + ix0*bx, bx); +    typename Qx::Base::Data xv[Qx::nrc_y]; +    typename Qx::Base::Acc  acc[Qx::nrc_y*Qy::nrc_y]; +    auto yv = y.load1(0, 0); +    for (int ix = 0; ix < Qx::nrc_y; ++ix) { +        xv[ix] = x.load1(ix, 0); +        acc[ix] = Qx::Base::acc_first(yv, xv[ix]); +    } +    for (int iy = 1; iy < Qy::nrc_y; ++iy) { +        yv = y.load1(iy, 0); +        for (int ix = 0; ix < Qx::nrc_y; ++ix) acc[Qx::nrc_y*iy + ix] = Qx::Base::acc_first(yv, xv[ix]); +    } +    for (int i = 1; i < nb; ++i) { +        yv = y.load1(0, i); +        for (int ix = 0; ix < Qx::nrc_y; ++ix) { +            xv[ix] = x.load1(ix, i); +            acc[ix] = Qx::Base::acc(acc[ix], yv, xv[ix]); +        } +        for (int iy = 1; iy < Qy::nrc_y; ++iy) { +            yv = y.load1(iy, i); +            for (int ix = 0; ix < Qx::nrc_y; ++ix) acc[Qx::nrc_y*iy + ix] = Qx::Base::acc(acc[Qx::nrc_y*iy + ix], yv, xv[ix]); +        } +    } +    if constexpr (Qx::Base::k_step > 4 && !is_multiple_of_k_step) { +        int nb4 = n/4; +        for (int i = (Qx::Base::k_step/4)*nb; i < nb4; ++i) { +            yv = y.load_tail(0, i); +            for (int ix = 0; ix < Qx::nrc_y; ++ix) { +                xv[ix] = x.load_tail(ix, i); +                acc[ix] = Qx::Base::acc(acc[ix], yv, xv[ix]); +            } +            for (int iy = 1; iy < Qy::nrc_y; ++iy) { +                yv = y.load_tail(iy, i); +                for (int ix = 0; ix < Qx::nrc_y; ++ix) acc[Qx::nrc_y*iy + ix] = Qx::Base::acc(acc[Qx::nrc_y*iy + ix], yv, xv[ix]); +            } +        } +    } +    for (int iy = 0; iy < Qy::nrc_y; ++iy) for (int ix = 0; ix < Qx::nrc_y; ++ix) info.store(ix0+ix, iy, Qx::Base::hsum(acc[Qx::nrc_y*iy+ix])); +} +  template <int nrc_y, int nrc_x, bool is_multiple_of_k_step>  IQK_NOINLINE void mul_mat_f16_f16_NxN(int n, const char * cx, size_t bx, int ix0, const DataInfo& info) {      assert(n%QF16Base::k_step == 0); @@ -5832,6 +5930,40 @@ IQK_NOINLINE void mul_mat_f16_f16_NxN(int n, const char * cx, size_t bx, int ix0      for (int iy = 0; iy < nrc_y; ++iy) for (int ix = 0; ix < nrc_x; ++ix) info.store(ix0+ix, iy, QF16Base::hsum(acc[nrc_x*iy+ix]));  } +template <typename Qy, template<int> typename Qx> +void mul_mat_Qx_Qy_T(int n, const void * vx, size_t bx, const DataInfo& info, int nrc_x) { +    GGML_ASSERT(n%4 == 0); +    constexpr int k_nx = 5; +    const char * cx = (const char *)vx; +    if (n%Qx<k_nx>::Base::k_step == 0) { +        for (int ix = 0; ix < nrc_x/k_nx; ++ix) { +            mul_mat_Qx_Qy_NxN<Qy, Qx<k_nx>, true>(n, cx, bx, ix*k_nx, info); +        } +        int last_x = k_nx*(nrc_x/k_nx); +        if (last_x == nrc_x) return; +        int nx = nrc_x - last_x; +        switch (nx) { +            case 1: mul_mat_Qx_Qy_NxN<Qy, Qx<1>, true>(n, cx, bx, last_x, info); break; +            case 2: mul_mat_Qx_Qy_NxN<Qy, Qx<2>, true>(n, cx, bx, last_x, info); break; +            case 3: mul_mat_Qx_Qy_NxN<Qy, Qx<3>, true>(n, cx, bx, last_x, info); break; +            case 4: mul_mat_Qx_Qy_NxN<Qy, Qx<4>, true>(n, cx, bx, last_x, info); break; +        } +    } else { +        for (int ix = 0; ix < nrc_x/k_nx; ++ix) { +            mul_mat_Qx_Qy_NxN<Qy, Qx<k_nx>, false>(n, cx, bx, ix*k_nx, info); +        } +        int last_x = k_nx*(nrc_x/k_nx); +        if (last_x == nrc_x) return; +        int nx = nrc_x - last_x; +        switch (nx) { +            case 1: mul_mat_Qx_Qy_NxN<Qy, Qx<1>, false>(n, cx, bx, last_x, info); break; +            case 2: mul_mat_Qx_Qy_NxN<Qy, Qx<2>, false>(n, cx, bx, last_x, info); break; +            case 3: mul_mat_Qx_Qy_NxN<Qy, Qx<3>, false>(n, cx, bx, last_x, info); break; +            case 4: mul_mat_Qx_Qy_NxN<Qy, Qx<4>, false>(n, cx, bx, last_x, info); break; +        } +    } +} +  template <int nrc_y>  void mul_mat_f16_f16_T(int n, const void * vx, size_t bx, const DataInfo& info, int nrc_x) {      GGML_ASSERT(n%4 == 0); @@ -5913,7 +6045,7 @@ IQK_NOINLINE void mul_mat_f16_f16_Nx1(int n, const char * cx, size_t bx, int ix0      }  } -// At least on my M2-Max the version below, which dows the multiplication row-by-row, is faster. +// At least on my M2-Max the version below, which does the multiplication row-by-row, is faster.  // But let's keep this version commented out for now.  //void mul_mat_f16_f16_1(int n, const void * vx, size_t bx, const DataInfo& info, int nrc_x) {  //    GGML_ASSERT(n%4 == 0); @@ -6231,6 +6363,17 @@ bool MulMat::prepare(int typeA, int typeB, int ne00, MulMat& m, int /*Ny*/) {          return true;      } +    if (typeA == GGML_TYPE_BF16 && typeB == GGML_TYPE_F32) { +        if (ne00%4) return false; +        for (auto& f : m.funcs) f = nullptr; +        m.funcs[0] = mul_mat_Qx_Qy_T<QF32<1>, QBF16>; +        m.funcs[1] = mul_mat_Qx_Qy_T<QF32<2>, QBF16>; +        m.funcs[2] = mul_mat_Qx_Qy_T<QF32<3>, QBF16>; +        m.funcs[3] = mul_mat_Qx_Qy_T<QF32<4>, QBF16>; +        m.funcs[4] = mul_mat_Qx_Qy_T<QF32<5>, QBF16>; +        return true; +    } +      auto expected_Btype = GGML_TYPE_Q8_K;      switch (typeA) {  | 
