feat(lint): add UnsafeTypecast lint

crates/lint/src/sol/med/mod.rs

@@ -3,4 +3,10 @@ use crate::sol::{EarlyLintPass, LateLintPass, SolLint};
 mod div_mul;
 use div_mul::DIVIDE_BEFORE_MULTIPLY;
 
-register_lints!((DivideBeforeMultiply, early, (DIVIDE_BEFORE_MULTIPLY)));
+mod unsafe_typecast;
+use unsafe_typecast::UNSAFE_TYPECAST;
+
+register_lints!(
+    (DivideBeforeMultiply, early, (DIVIDE_BEFORE_MULTIPLY)),
+    (UnsafeTypecast, late, (UNSAFE_TYPECAST))
+);

crates/lint/src/sol/med/unsafe_typecast.rs

@@ -0,0 +1,174 @@
+use super::UnsafeTypecast;
+use crate::{
+    linter::{LateLintPass, LintContext, Snippet},
+    sol::{Severity, SolLint},
+};
+use solar_ast::{LitKind, StrKind};
+use solar_sema::hir::{self, ElementaryType, ExprKind, ItemId, Res, TypeKind};
+
+declare_forge_lint!(
+    UNSAFE_TYPECAST,
+    Severity::Med,
+    "unsafe-typecast",
+    "typecasts that can truncate values should be checked"
+);
+
+impl<'hir> LateLintPass<'hir> for UnsafeTypecast {
+    fn check_expr(
+        &mut self,
+        ctx: &LintContext<'_>,
+        hir: &'hir hir::Hir<'hir>,
+        expr: &'hir hir::Expr<'hir>,
+    ) {
+        // Check for type cast expressions: Type(value)
+        if let ExprKind::Call(call, args, _) = &expr.kind
+            && let ExprKind::Type(hir::Type { kind: TypeKind::Elementary(ty), .. }) = &call.kind
+            && args.len() == 1
+            && let Some(call_arg) = args.exprs().next()
+            && is_unsafe_typecast_hir(hir, call_arg, ty)
+        {
+            ctx.emit_with_fix(
+                &UNSAFE_TYPECAST,
+                expr.span,
+                Snippet::Block {
+                    desc: Some("Consider disabling this lint if you're certain the cast is safe:"),
+                    code: format!(
+                        "// casting to '{abi_ty}' is safe because [explain why]\n// forge-lint: disable-next-line(unsafe-typecast)",
+                        abi_ty = ty.to_abi_str()
+                    )
+                }
+            );
+        }
+    }
+}
+
+/// Determines if a typecast is potentially unsafe (could lose data or precision).
+fn is_unsafe_typecast_hir(
+    hir: &hir::Hir<'_>,
+    source_expr: &hir::Expr<'_>,
+    target_type: &hir::ElementaryType,
+) -> bool {
+    let mut source_types = Vec::<ElementaryType>::new();
+    infer_source_types(Some(&mut source_types), hir, source_expr);
+
+    if source_types.is_empty() {
+        return false;
+    };
+
+    source_types.iter().any(|source_ty| is_unsafe_elementary_typecast(source_ty, target_type))
+}
+
+/// Infers the elementary source type(s) of an expression.
+///
+/// This function traverses an expression tree to find the original "source" types.
+/// For cast chains, it returns the ultimate source type, not intermediate cast results.
+/// For binary operations, it collects types from both sides into the `output` vector.
+///
+/// # Returns
+/// An `Option<ElementaryType>` containing the inferred type of the expression if it can be
+/// resolved to a single source (like variables, literals, or unary expressions).
+/// Returns `None` for expressions complex expressions (like binary operations).
+fn infer_source_types(
+    mut output: Option<&mut Vec<ElementaryType>>,
+    hir: &hir::Hir<'_>,
+    expr: &hir::Expr<'_>,
+) -> Option<ElementaryType> {
+    let mut track = |ty: ElementaryType| -> Option<ElementaryType> {
+        if let Some(output) = output.as_mut() {
+            output.push(ty);
+        }
+        Some(ty)
+    };
+
+    match &expr.kind {
+        // A type cast call: `Type(val)`
+        ExprKind::Call(call_expr, args, ..) => {
+            // Check if the called expression is a type, which indicates a cast.
+            if let ExprKind::Type(hir::Type { kind: TypeKind::Elementary(..), .. }) =
+                &call_expr.kind
+                && let Some(inner) = args.exprs().next()
+            {
+                // Recurse to find the original (inner-most) source type.
+                return infer_source_types(output, hir, inner);
+            }
+            None
+        }
+
+        // Identifiers (variables)
+        ExprKind::Ident(resolutions) => {
+            if let Some(Res::Item(ItemId::Variable(var_id))) = resolutions.first() {
+                let variable = hir.variable(*var_id);
+                if let TypeKind::Elementary(elem_type) = &variable.ty.kind {
+                    return track(*elem_type);
+                }
+            }
+            None
+        }
+
+        // Handle literal values
+        ExprKind::Lit(hir::Lit { kind, .. }) => match kind {
+            LitKind::Str(StrKind::Hex, ..) => track(ElementaryType::Bytes),
+            LitKind::Str(..) => track(ElementaryType::String),
+            LitKind::Address(_) => track(ElementaryType::Address(false)),
+            LitKind::Bool(_) => track(ElementaryType::Bool),
+            // Unnecessary to check numbers as assigning literal values that cannot fit into a type
+            // throws a compiler error. Reference: <https://solang.readthedocs.io/en/latest/language/types.html>
+            _ => None,
+        },
+
+        // Unary operations: Recurse to find the source type of the inner expression.
+        ExprKind::Unary(_, inner_expr) => infer_source_types(output, hir, inner_expr),
+
+        // Binary operations
+        ExprKind::Binary(lhs, _, rhs) => {
+            if let Some(mut output) = output {
+                // Recurse on both sides to find and collect all source types.
+                infer_source_types(Some(&mut output), hir, lhs);
+                infer_source_types(Some(&mut output), hir, rhs);
+            }
+            None
+        }
+
+        // Complex expressions are not evaluated
+        _ => None,
+    }
+}
+
+/// Checks if a type cast from source_type to target_type is unsafe.
+fn is_unsafe_elementary_typecast(
+    source_type: &ElementaryType,
+    target_type: &ElementaryType,
+) -> bool {
+    match (source_type, target_type) {
+        // Numeric downcasts (smaller target size)
+        (ElementaryType::UInt(source_size), ElementaryType::UInt(target_size))
+        | (ElementaryType::Int(source_size), ElementaryType::Int(target_size)) => {
+            source_size.bits() > target_size.bits()
+        }
+
+        // Signed to unsigned conversion (potential loss of sign)
+        (ElementaryType::Int(_), ElementaryType::UInt(_)) => true,
+
+        // Unsigned to signed conversion with same or smaller size
+        (ElementaryType::UInt(source_size), ElementaryType::Int(target_size)) => {
+            source_size.bits() >= target_size.bits()
+        }
+
+        // Fixed bytes to smaller fixed bytes
+        (ElementaryType::FixedBytes(source_size), ElementaryType::FixedBytes(target_size)) => {
+            source_size.bytes() > target_size.bytes()
+        }
+
+        // Dynamic bytes to fixed bytes (potential truncation)
+        (ElementaryType::Bytes, ElementaryType::FixedBytes(_))
+        | (ElementaryType::String, ElementaryType::FixedBytes(_)) => true,
+
+        // Address to smaller uint (truncation) - address is 160 bits
+        (ElementaryType::Address(_), ElementaryType::UInt(target_size)) => target_size.bits() < 160,
+
+        // Address to int (sign issues)
+        (ElementaryType::Address(_), ElementaryType::Int(_)) => true,
+
+        _ => false,
+    }
+}