From c0de6337daef2092f105d51f93292338aaea2c2e Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Vin=C3=ADcius=20Ferr=C3=A3o?=
 <2031761+viniciusferrao@users.noreply.github.com>
Date: Tue, 11 Aug 2026 20:11:01 -0300
Subject: [PATCH] test(server): check Digest::SHA dependencies

---
 .../unit/xcat_server_digest_sha_dependency.t  | 40 +++++++++++++++++++
 1 file changed, 40 insertions(+)
 create mode 100644 xCAT-test/unit/xcat_server_digest_sha_dependency.t

diff --git a/xCAT-test/unit/xcat_server_digest_sha_dependency.t b/xCAT-test/unit/xcat_server_digest_sha_dependency.t
new file mode 100644
index 000000000..8077fcaf7
--- /dev/null
+++ b/xCAT-test/unit/xcat_server_digest_sha_dependency.t
@@ -0,0 +1,40 @@
+#!/usr/bin/env perl
+use strict;
+use warnings;
+
+use File::Spec;
+use FindBin;
+use Test::More;
+
+my $repo_root = File::Spec->rel2abs(
+    File::Spec->catdir( $FindBin::Bin, '..', '..' )
+);
+
+sub read_file {
+    my ($filename) = @_;
+    open( my $fh, '<', $filename )
+      or die "Unable to read $filename: $!";
+    my $content = do { local $/; <$fh> };
+    close($fh);
+    return $content;
+}
+
+my $rpm_spec = read_file(
+    File::Spec->catfile( $repo_root, 'xCAT-server', 'xCAT-server.spec' )
+);
+like(
+    $rpm_spec,
+    qr/^Requires:.*\bperl\(Digest::SHA\)(?:\s|$)/m,
+    'the RPM package requires Digest::SHA',
+);
+
+my $debian_control = read_file(
+    File::Spec->catfile( $repo_root, 'xCAT-server', 'debian', 'control' )
+);
+like(
+    $debian_control,
+    qr/^Depends:.*\blibdigest-sha-perl\b/m,
+    'the Debian package requires Digest::SHA',
+);
+
+done_testing();