vector Cross/Dot using core.simd?

[F i L]

I'm trying to write a Cross and Dot function using 
core.simd.float4 and DMD

The C++ code looks like:
from: 
http://fastcpp.blogspot.com/2011/04/vector-cross-product-using-sse-code.html

  inline __m128 CrossProduct(__m128 a, __m128 b)
  {
    return _mm_sub_ps (
      _mm_mul_ps (
        _mm_shuffle_ps(a, a, _MM_SHUFFLE(3, 0, 2, 1)),
        _mm_shuffle_ps(b, b, _MM_SHUFFLE(3, 1, 0, 2))
      ),
      _mm_mul_ps (
        _mm_shuffle_ps(a, a, _MM_SHUFFLE(3, 1, 0, 2)),
        _mm_shuffle_ps(b, b, _MM_SHUFFLE(3, 0, 2, 1))
      )
    );
  }

I can see that core.simd.XMM supports a XMM.PSHUFB command I can 
use with __simd(), but I'm not sure how to go about translate the 
_MM_SHUFFLE() macro above.

For Dot product, I have a C# Mono.Simd function:

  public static Vector4f Dot(Vector4f a, Vector4f b)
  {
    var result = a * b;

    result = HorizontalAdd(result, result);
    result = HorizontalAdd(result, result);

    return result.X;
  }

And I have no idea what XMM command HorizontalAdd would translate 
to. But the Mono.Simd documentation says it performs:

  Vector4f HorizontalAdd(Vector4f a, Vector4f b)
  {
    return new Vector4f (
      (a.X + a.Y), (a.Z + a.W),
      (b.X + b.Y), (b.Z + b.W)
    );
  }

Does anyone know anything about SIMD operations that may be able 
to help me translate these functions into a D equivalent? I would 
very much appreciate your help.