renew-fixed 0.1.1

//! Vectors over [`Fixed`].
//!
//! Two dimensions and three, as separate concrete types rather than one
//! generic over dimension. The physics contract makes the same choice for the
//! same reason: dimension-generic vocabularies produce signatures nobody can
//! read, and the cost of writing `dot` twice is smaller than the cost of every
//! caller reading a bound.

use core::ops::{Add, Mul, Neg, Sub};

use crate::Fixed;

/// How far to shift a direction left so normalising it keeps its precision.
///
/// Normalising is unchanged by scaling, and **shifting a fixed-point value left is
/// exact** — no rounding, no loss. So a short direction is scaled up before
/// its length is taken, which is the difference between a normal that is
/// unit to a thousandth of a percent and one that is forty per cent wrong.
///
/// The target is 2³⁸ for the largest component: big enough that squaring
/// keeps every significant bit, small enough that three squared components
/// summed stay inside what the type holds (3 × 2⁶⁰ < 2⁶²).
fn normalising_shift(largest: u64) -> u32 {
    // A value with `k` significant bits has `64 - k` leading zeros, so
    // shifting by `64 - k - 26` leaves it with 38. The 26 was 25 in the
    // first version, which targets 2^39 rather than 2^38 — and three
    // squared 2^39 components summed overflow an i64, so 3D normalisation
    // saturated and returned a normal a quarter of a per cent off unit.
    // Caught by a property test whose generator had just been widened to
    // reach short vectors; the arithmetic was one bit out and the comment
    // above was right all along.
    largest.leading_zeros().saturating_sub(26)
}

/// A two-dimensional vector.
///
/// # Contract
///
/// - **Every operation is deterministic**, because every operation is
///   [`Fixed`] arithmetic and nothing else.
/// - **Saturating throughout**, inheriting the scalar's behaviour: a component
///   that overflows clamps and is counted rather than wrapping.
/// - **`Eq` and `Hash`**, so a vector can be a map key or enter a state hash
///   directly — which is the thing a float vector cannot offer.
#[derive(Clone, Copy, Debug, Default, PartialEq, Eq, Hash)]
pub struct Vec2 {
    pub x: Fixed,
    pub y: Fixed,
}

/// A three-dimensional vector. See [`Vec2`] for the contract; it is the same.
#[derive(Clone, Copy, Debug, Default, PartialEq, Eq, Hash)]
pub struct Vec3 {
    pub x: Fixed,
    pub y: Fixed,
    pub z: Fixed,
}

impl Vec2 {
    /// The origin.
    pub const ZERO: Self = Self {
        x: Fixed::ZERO,
        y: Fixed::ZERO,
    };
    /// One unit along x.
    pub const X: Self = Self {
        x: Fixed::ONE,
        y: Fixed::ZERO,
    };
    /// One unit along y.
    pub const Y: Self = Self {
        x: Fixed::ZERO,
        y: Fixed::ONE,
    };

    /// From components.
    #[must_use]
    pub const fn new(x: Fixed, y: Fixed) -> Self {
        Self { x, y }
    }

    /// From whole numbers, which is how most call sites write a constant.
    #[must_use]
    pub const fn from_ints(x: i32, y: i32) -> Self {
        Self {
            x: Fixed::from_int(x),
            y: Fixed::from_int(y),
        }
    }

    /// The dot product.
    #[must_use]
    pub fn dot(self, other: Self) -> Fixed {
        self.x.saturating_mul(other.x) + self.y.saturating_mul(other.y)
    }

    /// The 2D cross product: a scalar, the z of the 3D cross of these vectors
    /// lifted into the plane. Positive when `other` is counter-clockwise of
    /// `self`, which is what a winding test reads.
    #[must_use]
    pub fn cross(self, other: Self) -> Fixed {
        self.x.saturating_mul(other.y) - self.y.saturating_mul(other.x)
    }

    /// The squared length.
    ///
    /// Preferred over [`Vec2::length`] wherever a comparison will do, and not
    /// only for speed: this is exact where the length is rounded, so two
    /// vectors that compare equal by squared length may compare unequal by
    /// length.
    #[must_use]
    pub fn length_squared(self) -> Fixed {
        self.dot(self)
    }

    /// The squared length at full width, which cannot overflow and cannot
    /// round.
    ///
    /// The form to compare with. [`Vec2::length_squared`] narrows to a
    /// `Fixed` and therefore has a floor: a vector whose components are all
    /// below 182 raw units squares to *zero* there, which is how a direction
    /// can appear to have no length at all. Nothing is lost here.
    #[must_use]
    pub fn length_squared_wide(self) -> crate::Wide {
        self.x.wide_mul(self.x) + self.y.wide_mul(self.y)
    }

    /// The length, floored to the representable value below the exact one.
    ///
    /// Computed through the full-width square, so it is exact for short
    /// vectors where narrowing first would have lost them entirely — a
    /// one-raw-unit vector has length one here and had length zero before.
    #[must_use]
    pub fn length(self) -> Fixed {
        self.length_squared_wide().sqrt()
    }

    /// The distance to another point.
    #[must_use]
    pub fn distance(self, other: Self) -> Fixed {
        (self - other).length()
    }

    /// A unit vector in the same direction, or `None` for the zero vector.
    ///
    /// Fallible rather than asserting, because the zero vector is a value a
    /// simulation legitimately produces — a body at rest, a contact between
    /// coincident points — and refusing it would put an assertion on a path
    /// that runs every frame.
    ///
    /// **The result is unit-length to within four parts in 65536**, which is
    /// asserted by a property test over every magnitude including the
    /// shortest. Callers wanting an exact equality should compare squared
    /// lengths against a tolerance rather than expecting [`Fixed::ONE`].
    ///
    /// The direction is scaled up before its length is taken, and that is
    /// not an optimisation. Shifting a fixed-point value left is exact, and
    /// without it a short direction is divided by a length that rounded to
    /// something far too coarse: before this, a direction of 41 raw units
    /// came back as a normal forty-one per cent too long, and anything whose
    /// components were all below 181 raw had no direction at all.
    #[must_use]
    pub fn normalize(self) -> Option<Self> {
        let largest = self
            .x
            .to_bits()
            .unsigned_abs()
            .max(self.y.to_bits().unsigned_abs());
        if largest == 0 {
            return None;
        }
        let shift = normalising_shift(largest);
        let scaled = Self::new(
            Fixed::from_bits(self.x.to_bits() << shift),
            Fixed::from_bits(self.y.to_bits() << shift),
        );
        // Non-zero after the check above, and rescaling is what makes that
        // true: the largest component carries 38 significant bits, so its
        // square alone exceeds 2^60 and the length cannot round to zero.
        // Before rescaling this needed a second zero check, and that check
        // was the bug — it turned a short direction into no direction.
        let length = scaled.length();
        Some(Self::new(
            scaled.x.saturating_div(length),
            scaled.y.saturating_div(length),
        ))
    }

    /// Linear interpolation, `t` clamped to `[0, 1]`.
    ///
    /// Written as `a + (b - a) * t` rather than `a*(1-t) + b*t`: the second is
    /// the numerically better form in floating point and the worse one here,
    /// because it rounds twice as often and neither form gains anything from
    /// exactness at the endpoints — this one is exact at both by construction.
    #[must_use]
    pub fn lerp(self, other: Self, t: Fixed) -> Self {
        let t = t.clamp(Fixed::ZERO, Fixed::ONE);
        self + (other - self) * t
    }

    /// The component of `self` along `direction`, which must be unit-length.
    ///
    /// The building block of move-and-slide: removing this from a
    /// displacement is what makes a body slide along a wall rather than stop
    /// at it.
    #[must_use]
    pub fn project_onto_unit(self, direction: Self) -> Self {
        direction * self.dot(direction)
    }

    /// `self` with its component along `normal` removed.
    ///
    /// `normal` must be unit-length. This is the slide operation itself, named
    /// so the physics implementation does not spell it out at each call site
    /// and get the sign wrong at one of them.
    #[must_use]
    pub fn slide_along(self, normal: Self) -> Self {
        self - self.project_onto_unit(normal)
    }

    /// Rotated counter-clockwise by `angle`.
    ///
    /// The standard rotation, in fixed point: `(x cos − y sin, x sin + y
    /// cos)`. Each component is two rounded products, so a rotated vector
    /// keeps its length to a few parts in 65536 rather than exactly — the
    /// tests state the bound.
    ///
    /// [`Vec2::perpendicular`] remains for the quarter turn, and is not the
    /// same thing: it is exact, where this rounds.
    #[must_use]
    pub fn rotate(self, angle: crate::Angle) -> Self {
        let (sin, cos) = angle.sin_cos();
        Self::new(
            self.x.saturating_mul(cos) - self.y.saturating_mul(sin),
            self.x.saturating_mul(sin) + self.y.saturating_mul(cos),
        )
    }

    /// Perpendicular, rotated a quarter turn counter-clockwise.
    ///
    /// Exact — a quarter turn is a swap and a negation, needing no
    /// trigonometry, which is why this is available when general rotation is
    /// not.
    #[must_use]
    pub fn perpendicular(self) -> Self {
        Self::new(-self.y, self.x)
    }
}

impl Vec3 {
    /// The origin.
    pub const ZERO: Self = Self {
        x: Fixed::ZERO,
        y: Fixed::ZERO,
        z: Fixed::ZERO,
    };

    /// From components.
    #[must_use]
    pub const fn new(x: Fixed, y: Fixed, z: Fixed) -> Self {
        Self { x, y, z }
    }

    /// From whole numbers.
    #[must_use]
    pub const fn from_ints(x: i32, y: i32, z: i32) -> Self {
        Self {
            x: Fixed::from_int(x),
            y: Fixed::from_int(y),
            z: Fixed::from_int(z),
        }
    }

    /// The dot product.
    #[must_use]
    pub fn dot(self, other: Self) -> Fixed {
        self.x.saturating_mul(other.x)
            + self.y.saturating_mul(other.y)
            + self.z.saturating_mul(other.z)
    }

    /// The cross product: a vector perpendicular to both.
    #[must_use]
    pub fn cross(self, other: Self) -> Self {
        Self::new(
            self.y.saturating_mul(other.z) - self.z.saturating_mul(other.y),
            self.z.saturating_mul(other.x) - self.x.saturating_mul(other.z),
            self.x.saturating_mul(other.y) - self.y.saturating_mul(other.x),
        )
    }

    /// The squared length. See [`Vec2::length_squared`] on why to prefer it.
    #[must_use]
    pub fn length_squared(self) -> Fixed {
        self.dot(self)
    }

    /// The squared length at full width. See [`Vec2::length_squared_wide`].
    #[must_use]
    pub fn length_squared_wide(self) -> crate::Wide {
        self.x.wide_mul(self.x) + self.y.wide_mul(self.y) + self.z.wide_mul(self.z)
    }

    /// The length, floored. Computed through the full-width square.
    #[must_use]
    pub fn length(self) -> Fixed {
        self.length_squared_wide().sqrt()
    }

    /// The distance to another point.
    #[must_use]
    pub fn distance(self, other: Self) -> Fixed {
        (self - other).length()
    }

    /// A unit vector in the same direction, or `None` for the zero vector.
    /// See [`Vec2::normalize`] on how close to unit the result is.
    #[must_use]
    pub fn normalize(self) -> Option<Self> {
        let largest = self
            .x
            .to_bits()
            .unsigned_abs()
            .max(self.y.to_bits().unsigned_abs())
            .max(self.z.to_bits().unsigned_abs());
        if largest == 0 {
            return None;
        }
        let shift = normalising_shift(largest);
        let scaled = Self::new(
            Fixed::from_bits(self.x.to_bits() << shift),
            Fixed::from_bits(self.y.to_bits() << shift),
            Fixed::from_bits(self.z.to_bits() << shift),
        );
        // Non-zero after the check above, and rescaling is what makes that
        // true: the largest component carries 38 significant bits, so its
        // square alone exceeds 2^60 and the length cannot round to zero.
        // Before rescaling this needed a second zero check, and that check
        // was the bug — it turned a short direction into no direction.
        let length = scaled.length();
        Some(Self::new(
            scaled.x.saturating_div(length),
            scaled.y.saturating_div(length),
            scaled.z.saturating_div(length),
        ))
    }

    /// Linear interpolation, `t` clamped to `[0, 1]`.
    #[must_use]
    pub fn lerp(self, other: Self, t: Fixed) -> Self {
        let t = t.clamp(Fixed::ZERO, Fixed::ONE);
        self + (other - self) * t
    }

    /// `self` with its component along a unit `normal` removed.
    #[must_use]
    pub fn slide_along(self, normal: Self) -> Self {
        self - normal * self.dot(normal)
    }
}

// The operators, rather than inherent `add`/`sub`/`neg`/`scale`. For a vector
// these read the way the maths does, and inherent methods by those names
// shadow the traits confusingly enough that the linter says so.

impl Add for Vec2 {
    type Output = Self;
    fn add(self, other: Self) -> Self {
        Self::new(self.x + other.x, self.y + other.y)
    }
}

impl Sub for Vec2 {
    type Output = Self;
    fn sub(self, other: Self) -> Self {
        Self::new(self.x - other.x, self.y - other.y)
    }
}

impl Neg for Vec2 {
    type Output = Self;
    fn neg(self) -> Self {
        Self::new(-self.x, -self.y)
    }
}

/// Scaled by a scalar. Saturating componentwise, like everything else here.
impl Mul<Fixed> for Vec2 {
    type Output = Self;
    fn mul(self, factor: Fixed) -> Self {
        Self::new(self.x.saturating_mul(factor), self.y.saturating_mul(factor))
    }
}

impl Add for Vec3 {
    type Output = Self;
    fn add(self, other: Self) -> Self {
        Self::new(self.x + other.x, self.y + other.y, self.z + other.z)
    }
}

impl Sub for Vec3 {
    type Output = Self;
    fn sub(self, other: Self) -> Self {
        Self::new(self.x - other.x, self.y - other.y, self.z - other.z)
    }
}

impl Neg for Vec3 {
    type Output = Self;
    fn neg(self) -> Self {
        Self::new(-self.x, -self.y, -self.z)
    }
}

impl Mul<Fixed> for Vec3 {
    type Output = Self;
    fn mul(self, factor: Fixed) -> Self {
        Self::new(
            self.x.saturating_mul(factor),
            self.y.saturating_mul(factor),
            self.z.saturating_mul(factor),
        )
    }
}