@ -704,10 +704,29 @@ ORDER BY
} } ) ;
} } ) ;
}
}
# Take 4 GiB off the available RAM for the host
# Check if the reserved RAM is overriden by the config
$ anvil - > data - > { anvil_resources } { $ anvil_uuid } { ram } { reserved } = ( 4 * ( 2 ** 30 ) ) ; # Reserve 4 GiB
my $ ram_reserved = $ anvil - > Convert - > human_readable_to_bytes ( {
base2 = > 1 ,
size = > $ anvil - > data - > { anvil_resources } { ram } { reserved } ,
} ) ;
if ( ( $ ram_reserved eq "!!error!!" ) or
( not $ ram_reserved ) or
( $ ram_reserved < ( 2 ** 30 ) ) or
( $ ram_reserved > $ anvil - > data - > { anvil_resources } { $ anvil_uuid } { ram } { hardware } ) )
{
# The reserved RAM is invalid, so reset it.
$ ram_reserved = 0 ;
}
$ anvil - > Log - > variables ( { source = > $ THIS_FILE , line = > __LINE__ , level = > $ debug , list = > {
"anvil_resources::ram::reserved" = > $ ram_reserved . " (" . $ anvil - > Convert - > bytes_to_human_readable ( { 'bytes' = > $ ram_reserved } ) . ")" ,
} } ) ;
# Take 4 GiB or what was provided by the config off the available RAM for the host
$ anvil - > data - > { anvil_resources } { $ anvil_uuid } { ram } { reserved } = $ ram_reserved ? $ ram_reserved : ( 4 * ( 2 ** 30 ) ) ; # Reserve 4 GiB by default or what's set in the config file.
$ anvil - > data - > { anvil_resources } { $ anvil_uuid } { ram } { available } -= $ anvil - > data - > { anvil_resources } { $ anvil_uuid } { ram } { reserved } ;
$ anvil - > data - > { anvil_resources } { $ anvil_uuid } { ram } { available } -= $ anvil - > data - > { anvil_resources } { $ anvil_uuid } { ram } { reserved } ;
$ anvil - > data - > { anvil_resources } { $ anvil_uuid } { ram } { available } -= $ anvil - > data - > { anvil_resources } { $ anvil_uuid } { ram } { allocated } ;
$ anvil - > data - > { anvil_resources } { $ anvil_uuid } { ram } { available } -= $ anvil - > data - > { anvil_resources } { $ anvil_uuid } { ram } { allocated } ;
$ anvil - > Log - > variables ( { source = > $ THIS_FILE , line = > __LINE__ , level = > $ debug , list = > {
$ anvil - > Log - > variables ( { source = > $ THIS_FILE , line = > __LINE__ , level = > $ debug , list = > {
"anvil_resources::${anvil_uuid}::ram::allocated" = > $ anvil - > data - > { anvil_resources } { $ anvil_uuid } { ram } { allocated } . " (" . $ anvil - > Convert - > bytes_to_human_readable ( { 'bytes' = > $ anvil - > data - > { anvil_resources } { $ anvil_uuid } { ram } { allocated } } ) . ")" ,
"anvil_resources::${anvil_uuid}::ram::allocated" = > $ anvil - > data - > { anvil_resources } { $ anvil_uuid } { ram } { allocated } . " (" . $ anvil - > Convert - > bytes_to_human_readable ( { 'bytes' = > $ anvil - > data - > { anvil_resources } { $ anvil_uuid } { ram } { allocated } } ) . ")" ,
"anvil_resources::${anvil_uuid}::ram::reserved" = > $ anvil - > data - > { anvil_resources } { $ anvil_uuid } { ram } { reserved } . " (" . $ anvil - > Convert - > bytes_to_human_readable ( { 'bytes' = > $ anvil - > data - > { anvil_resources } { $ anvil_uuid } { ram } { reserved } } ) . ")" ,
"anvil_resources::${anvil_uuid}::ram::reserved" = > $ anvil - > data - > { anvil_resources } { $ anvil_uuid } { ram } { reserved } . " (" . $ anvil - > Convert - > bytes_to_human_readable ( { 'bytes' = > $ anvil - > data - > { anvil_resources } { $ anvil_uuid } { ram } { reserved } } ) . ")" ,