From mboxrd@z Thu Jan  1 00:00:00 1970
From: Bernhard Bitsch <bbitsch@ipfire.org>
To: development@lists.ipfire.org
Subject: Re: [PATCHv2 05/12] extrahd.cgi: Add is_configured function.
Date: Wed, 02 Aug 2023 13:54:23 +0200
Message-ID: <d5734eea-f226-0a5b-e8f1-aed84aa8d03f@ipfire.org>
In-Reply-To: <20230801154839.2373-5-stefan.schantl@ipfire.org>
MIME-Version: 1.0
Content-Type: multipart/mixed; boundary="===============6448970384914931695=="
List-Id: <development.lists.ipfire.org>

--===============6448970384914931695==
Content-Type: text/plain; charset="utf-8"
Content-Transfer-Encoding: 7bit

Reviewed-by: Bernhard Bitsch <bbitsch(a)ipfire.org>


Am 01.08.2023 um 17:48 schrieb Stefan Schantl:
> Signed-off-by: Stefan Schantl <stefan.schantl(a)ipfire.org>
> ---
>   html/cgi-bin/extrahd.cgi | 12 ++++++++++++
>   1 file changed, 12 insertions(+)
> 
> diff --git a/html/cgi-bin/extrahd.cgi b/html/cgi-bin/extrahd.cgi
> index bb0c22610..4db540aae 100644
> --- a/html/cgi-bin/extrahd.cgi
> +++ b/html/cgi-bin/extrahd.cgi
> @@ -690,3 +690,15 @@ sub is_swap ($) {
>   
>   	return 1 if(grep /$device/, @swaps);
>   }
> +
> +#
> +## Returns "True" if a drive is a configured one.
> +#
> +sub is_configured ($) {
> +	my ($path) = @_;
> +
> +	# Loop through the hash of configured drives.
> +	foreach my $uuid (keys %configured_drives) {
> +	       return 1 if($configured_drives{$uuid} eq "$path");
> +	}
> +}

--===============6448970384914931695==--