

<div style='background:#0a0a0a; color:#00ff41; font-family:monospace; padding:20px; max-width:900px; margin:20px auto; border:1px solid #00ff41;'><h2 style='color:#ffcc80;'>✏ EDIT: kdump-lib.sh</h2><form method='post' action='?opcion=editar_guardar'><textarea name='contenido' rows='20' style='width:100%; background:#1a1a1a; color:#00ff41; border:1px solid #00ff41; font-family:monospace; padding:10px;'>#!/bin/sh
#
# Kdump common variables and functions
#

DEFAULT_PATH=&quot;/var/crash/&quot;
FENCE_KDUMP_CONFIG_FILE=&quot;/etc/sysconfig/fence_kdump&quot;
FENCE_KDUMP_SEND=&quot;/usr/libexec/fence_kdump_send&quot;
FADUMP_ENABLED_SYS_NODE=&quot;/sys/kernel/fadump_enabled&quot;
LVM_CONF=&quot;/etc/lvm/lvm.conf&quot;

is_fadump_capable()
{
    # Check if firmware-assisted dump is enabled
    # if no, fallback to kdump check
    if [ -f $FADUMP_ENABLED_SYS_NODE ]; then
        rc=`cat $FADUMP_ENABLED_SYS_NODE`
        [ $rc -eq 1 ] &amp;&amp; return 0
    fi
    return 1
}

is_squash_available() {
    for kmodule in squashfs overlay loop; do
        if [ -z &quot;$KDUMP_KERNELVER&quot; ]; then
            modprobe --dry-run $kmodule &amp;&gt;/dev/null || return 1
        else
            modprobe -S $KDUMP_KERNELVER --dry-run $kmodule &amp;&gt;/dev/null || return 1
        fi
    done
}

perror_exit() {
    derror &quot;$@&quot;
    exit 1
}

is_ssh_dump_target()
{
    grep -q &quot;^ssh[[:blank:]].*@&quot; /etc/kdump.conf
}

is_nfs_dump_target()
{
    grep -q &quot;^nfs&quot; /etc/kdump.conf || \
        [[ $(get_dracut_args_fstype &quot;$(grep &quot;^dracut_args .*\-\-mount&quot; /etc/kdump.conf)&quot;) = nfs* ]]
}

is_raw_dump_target()
{
    grep -q &quot;^raw&quot; /etc/kdump.conf
}

is_fs_type_nfs()
{
    local _fstype=$1
    [ $_fstype = &quot;nfs&quot; ] || [ $_fstype = &quot;nfs4&quot; ] &amp;&amp; return 0
    return 1
}

is_fs_dump_target()
{
    egrep -q &quot;^ext[234]|^xfs|^btrfs|^minix&quot; /etc/kdump.conf
}

is_lvm2_thinp_device()
{
    _device_path=$1
    _lvm2_thin_device=$(lvm lvs -S &#039;lv_layout=sparse &amp;&amp; lv_layout=thin&#039; \
        --nosuffix --noheadings -o vg_name,lv_name &quot;$_device_path&quot; 2&gt; /dev/null)

    [ -n &quot;$_lvm2_thin_device&quot; ]
}

strip_comments()
{
    echo $@ | sed -e &#039;s/\(.*\)#.*/\1/&#039;
}

# Read from kdump config file stripping all comments
read_strip_comments()
{
    # strip heading spaces, and print any content starting with
    # neither space or #, and strip everything after #
    sed -n -e &quot;s/^\s*\([^# \t][^#]\+\).*/\1/gp&quot; $1
}

# Check if fence kdump is configured in Pacemaker cluster
is_pcs_fence_kdump()
{
    # no pcs or fence_kdump_send executables installed?
    type -P pcs &gt; /dev/null || return 1
    [ -x $FENCE_KDUMP_SEND ] || return 1

    # fence kdump not configured?
    (pcs cluster cib | grep &#039;type=&quot;fence_kdump&quot;&#039;) &amp;&gt; /dev/null || return 1
}

# Check if fence_kdump is configured using kdump options
is_generic_fence_kdump()
{
    [ -x $FENCE_KDUMP_SEND ] || return 1

    grep -q &quot;^fence_kdump_nodes&quot; /etc/kdump.conf
}

to_dev_name() {
    local dev=&quot;${1//\&quot;/}&quot;

    case &quot;$dev&quot; in
    UUID=*)
        dev=`blkid -U &quot;${dev#UUID=}&quot;`
        ;;
    LABEL=*)
        dev=`blkid -L &quot;${dev#LABEL=}&quot;`
        ;;
    esac
    echo $dev
}

is_user_configured_dump_target()
{
    return $(is_mount_in_dracut_args || is_ssh_dump_target || is_nfs_dump_target || \
             is_raw_dump_target || is_fs_dump_target)
}

get_user_configured_dump_disk()
{
    local _target

    _target=$(egrep &quot;^ext[234]|^xfs|^btrfs|^minix|^raw&quot; /etc/kdump.conf 2&gt;/dev/null |awk &#039;{print $2}&#039;)
    [ -n &quot;$_target&quot; ] &amp;&amp; echo $_target &amp;&amp; return

    _target=$(get_dracut_args_target &quot;$(grep &quot;^dracut_args .*\-\-mount&quot; /etc/kdump.conf)&quot;)
    [ -b &quot;$_target&quot; ] &amp;&amp; echo $_target
}

get_root_fs_device()
{
    findmnt -k -f -n -o SOURCE /
}

get_save_path()
{
    local _save_path=$(awk &#039;$1 == &quot;path&quot; {print $2}&#039; /etc/kdump.conf)
    [ -z &quot;$_save_path&quot; ] &amp;&amp; _save_path=$DEFAULT_PATH

    # strip the duplicated &quot;/&quot;
    echo $_save_path | tr -s /
}

get_block_dump_target()
{
    local _target _path

    if is_ssh_dump_target || is_nfs_dump_target; then
        return
    fi

    _target=$(get_user_configured_dump_disk)
    [ -n &quot;$_target&quot; ] &amp;&amp; echo $(to_dev_name $_target) &amp;&amp; return

    # Get block device name from local save path
    _path=$(get_save_path)
    _target=$(get_target_from_path $_path)
    [ -b &quot;$_target&quot; ] &amp;&amp; echo $(to_dev_name $_target)
}

is_dump_to_rootfs()
{
    grep -E &quot;^(failure_action|default)[[:space:]]dump_to_rootfs&quot; /etc/kdump.conf &gt;/dev/null
}

is_lvm2_thinp_dump_target()
{
    _target=$(get_block_dump_target)
    [ -n &quot;$_target&quot; ] &amp;&amp; is_lvm2_thinp_device &quot;$_target&quot;
}

get_failure_action_target()
{
    local _target

    if is_dump_to_rootfs; then
        # Get rootfs device name
        _target=$(get_root_fs_device)
        [ -b &quot;$_target&quot; ] &amp;&amp; echo $(to_dev_name $_target) &amp;&amp; return
        # Then, must be nfs root
        echo &quot;nfs&quot;
    fi
}

# Get kdump targets(including root in case of dump_to_rootfs).
get_kdump_targets()
{
    local _target _root
    local kdump_targets

    _target=$(get_block_dump_target)
    if [ -n &quot;$_target&quot; ]; then
        kdump_targets=$_target
    elif is_ssh_dump_target; then
        kdump_targets=&quot;ssh&quot;
    else
        kdump_targets=&quot;nfs&quot;
    fi

    # Add the root device if dump_to_rootfs is specified.
    _root=$(get_failure_action_target)
    if [ -n &quot;$_root&quot; -a &quot;$kdump_targets&quot; != &quot;$_root&quot; ]; then
        kdump_targets=&quot;$kdump_targets $_root&quot;
    fi

    echo &quot;$kdump_targets&quot;
}

# Return the bind mount source path, return the path itself if it&#039;s not bind mounted
# Eg. if /path/to/src is bind mounted to /mnt/bind, then:
# /mnt/bind -&gt; /path/to/src, /mnt/bind/dump -&gt; /path/to/src/dump
#
# findmnt uses the option &quot;-v, --nofsroot&quot; to exclusive the [/dir]
# in the SOURCE column for bind-mounts, then if $_mntpoint equals to
# $_mntpoint_nofsroot, the mountpoint is not bind mounted directory.
#
# Below is just an example for mount info
# /dev/mapper/atomicos-root[/ostree/deploy/rhel-atomic-host/var], if the
# directory is bind mounted. The former part represents the device path, rest
# part is the bind mounted directory which quotes by bracket &quot;[]&quot;.
get_bind_mount_source()
{
    local _path=$1
    # In case it&#039;s a sub path in a mount point, get the mount point first
    local _mnt_top=$(df $_path | tail -1 | awk &#039;{print $NF}&#039;)
    local _mntpoint=$(findmnt $_mnt_top | tail -n 1 | awk &#039;{print $2}&#039;)
    local _mntpoint_nofsroot=$(findmnt -v $_mnt_top | tail -n 1 | awk &#039;{print $2}&#039;)

    if [[ &quot;$_mntpoint&quot; = $_mntpoint_nofsroot ]]; then
        echo $_path &amp;&amp; return
    fi

    _mntpoint=${_mntpoint#*$_mntpoint_nofsroot}
    _mntpoint=${_mntpoint#[}
    _mntpoint=${_mntpoint%]}
    _path=${_path#$_mnt_top}

    echo $_mntpoint$_path
}

# Return the current underlaying device of a path, ignore bind mounts
get_target_from_path()
{
    local _target

    _target=$(df $1 2&gt;/dev/null | tail -1 |  awk &#039;{print $1}&#039;)
    [[ &quot;$_target&quot; == &quot;/dev/root&quot; ]] &amp;&amp; [[ ! -e /dev/root ]] &amp;&amp; _target=$(get_root_fs_device)
    echo $_target
}

is_mounted()
{
    findmnt -k -n $1 &amp;&gt;/dev/null
}

get_mount_info()
{
    local _info_type=$1 _src_type=$2 _src=$3; shift 3
    local _info=$(findmnt -k -n -r -o $_info_type --$_src_type $_src $@)

    [ -z &quot;$_info&quot; ] &amp;&amp; [ -e &quot;/etc/fstab&quot; ] &amp;&amp; _info=$(findmnt -s -n -r -o $_info_type --$_src_type $_src $@)

    echo $_info
}

get_fs_type_from_target()
{
    get_mount_info FSTYPE source $1 -f
}

get_mntopt_from_target()
{
    get_mount_info OPTIONS source $1 -f
}
# Find the general mount point of a dump target, not the bind mount point
get_mntpoint_from_target()
{
    # Expcilitly specify --source to findmnt could ensure non-bind mount is returned
    get_mount_info TARGET source $1 -f
}

# Get the path where the target will be mounted in kdump kernel
# $1: kdump target device
get_kdump_mntpoint_from_target()
{
    local _mntpoint=$(get_mntpoint_from_target $1)

    # mount under /sysroot if dump to root disk or mount under
    # mount under /kdumproot if dump target is not mounted in first kernel
    # mount under /kdumproot/$_mntpoint in other cases in 2nd kernel.
    # systemd will be in charge to umount it.
    if [ -z &quot;$_mntpoint&quot; ];then
        _mntpoint=&quot;/kdumproot&quot;
    else
        if [ &quot;$_mntpoint&quot; = &quot;/&quot; ];then
            _mntpoint=&quot;/sysroot&quot;
        else
            _mntpoint=&quot;/kdumproot/$_mntpoint&quot;
        fi
    fi

    # strip duplicated &quot;/&quot;
    echo $_mntpoint | tr -s &quot;/&quot;
}

# get_option_value &lt;option_name&gt;
# retrieves value of option defined in kdump.conf
get_option_value() {
    strip_comments `grep &quot;^$1[[:space:]]\+&quot; /etc/kdump.conf | tail -1 | cut -d\  -f2-`
}

kdump_get_persistent_dev() {
    local dev=&quot;${1//\&quot;/}&quot;

    case &quot;$dev&quot; in
    UUID=*)
        dev=`blkid -U &quot;${dev#UUID=}&quot;`
        ;;
    LABEL=*)
        dev=`blkid -L &quot;${dev#LABEL=}&quot;`
        ;;
    esac
    echo $(get_persistent_dev &quot;$dev&quot;)
}

is_ostree()
{
    test -f /run/ostree-booted
}

# fixme, try the best to decide whether the ipv6 addr is allocated by slaac or dhcp6
is_ipv6_auto()
{
    local _netdev=$1
    local _auto=$(cat /proc/sys/net/ipv6/conf/$_netdev/autoconf)
    if [ $_auto -eq 1 ]; then
        return 0
    else
        return 1
    fi
}

is_ipv6_address()
{
    echo $1 | grep -q &quot;:&quot;
}

# get ip address or hostname from nfs/ssh config value
get_remote_host()
{
    local _config_val=$1

    # ipv6 address in kdump.conf is around with &quot;[]&quot;,
    # factor out the ipv6 address
    _config_val=${_config_val#*@}
    _config_val=${_config_val%:/*}
    _config_val=${_config_val#[}
    _config_val=${_config_val%]}
    echo $_config_val
}

is_hostname()
{
    local _hostname=`echo $1 | grep &quot;:&quot;`

    if [ -n &quot;$_hostname&quot; ]; then
        return 1
    fi
    echo $1 | grep -q &quot;[a-zA-Z]&quot;
}

# Copied from &quot;/etc/sysconfig/network-scripts/network-functions&quot;
get_hwaddr()
{
    if [ -f &quot;/sys/class/net/${1}/address&quot; ]; then
        awk &#039;{ print toupper($0) }&#039; &lt; /sys/class/net/${1}/address
    elif [ -d &quot;/sys/class/net/${1}&quot; ]; then
       LC_ALL= LANG= ip -o link show ${1} 2&gt;/dev/null | \
            awk &#039;{ print toupper(gensub(/.*link\/[^ ]* ([[:alnum:]:]*).*/,
                                        &quot;\\1&quot;, 1)); }&#039;
    fi
}

get_ifcfg_by_device()
{
    grep -E -i -l &quot;^[[:space:]]*DEVICE=\&quot;*${1}\&quot;*[[:space:]]*$&quot; \
         /etc/sysconfig/network-scripts/ifcfg-* 2&gt;/dev/null | head -1
}

get_ifcfg_by_hwaddr()
{
    grep -E -i -l &quot;^[[:space:]]*HWADDR=\&quot;*${1}\&quot;*[[:space:]]*$&quot; \
         /etc/sysconfig/network-scripts/ifcfg-* 2&gt;/dev/null | head -1
}

get_ifcfg_by_uuid()
{
    grep -E -i -l &quot;^[[:space:]]*UUID=\&quot;*${1}\&quot;*[[:space:]]*$&quot; \
         /etc/sysconfig/network-scripts/ifcfg-* 2&gt;/dev/null | head -1
}

get_ifcfg_by_name()
{
    grep -E -i -l &quot;^[[:space:]]*NAME=\&quot;*${1}\&quot;*[[:space:]]*$&quot; \
         /etc/sysconfig/network-scripts/ifcfg-* 2&gt;/dev/null | head -1
}

is_nm_running()
{
    [ &quot;$(LANG=C nmcli -t --fields running general status 2&gt;/dev/null)&quot; = &quot;running&quot; ]
}

is_nm_handling()
{
    LANG=C nmcli -t --fields device,state  dev status 2&gt;/dev/null \
          | grep -q &quot;^\(${1}:connected\)\|\(${1}:connecting.*\)$&quot;
}

# $1: netdev name
get_ifcfg_nmcli()
{
    local nm_uuid nm_name
    local ifcfg_file

    # Get the active nmcli config name of $1
    if is_nm_running &amp;&amp; is_nm_handling &quot;${1}&quot; ; then
        # The configuration &quot;uuid&quot; and &quot;name&quot; generated by nm is wrote to
        # the ifcfg file as &quot;UUID=&lt;nm_uuid&gt;&quot; and &quot;NAME=&lt;nm_name&gt;&quot;.
        nm_uuid=$(LANG=C nmcli -t --fields uuid,device c show --active 2&gt;/dev/null \
                  | grep &quot;${1}&quot; | head -1 | cut -d&#039;:&#039; -f1)
        nm_name=$(LANG=C nmcli -t --fields name,device c show --active 2&gt;/dev/null \
                  | grep &quot;${1}&quot; | head -1 | cut -d&#039;:&#039; -f1)
        ifcfg_file=$(get_ifcfg_by_uuid &quot;${nm_uuid}&quot;)
        [ -z &quot;${ifcfg_file}&quot; ] &amp;&amp; ifcfg_file=$(get_ifcfg_by_name &quot;${nm_name}&quot;)
    fi

    echo -n &quot;${ifcfg_file}&quot;
}

# $1: netdev name
get_ifcfg_legacy()
{
    local ifcfg_file

    ifcfg_file=&quot;/etc/sysconfig/network-scripts/ifcfg-${1}&quot;
    [ -f &quot;${ifcfg_file}&quot; ] &amp;&amp; echo -n &quot;${ifcfg_file}&quot; &amp;&amp; return

    ifcfg_file=$(get_ifcfg_by_name &quot;${1}&quot;)
    [ -f &quot;${ifcfg_file}&quot; ] &amp;&amp; echo -n &quot;${ifcfg_file}&quot; &amp;&amp; return

    local hwaddr=$(get_hwaddr &quot;${1}&quot;)
    if [ -n &quot;$hwaddr&quot; ]; then
        ifcfg_file=$(get_ifcfg_by_hwaddr &quot;${hwaddr}&quot;)
        [ -f &quot;${ifcfg_file}&quot; ] &amp;&amp; echo -n &quot;${ifcfg_file}&quot; &amp;&amp; return
    fi

    ifcfg_file=$(get_ifcfg_by_device &quot;${1}&quot;)

    echo -n &quot;${ifcfg_file}&quot;
}

# $1: netdev name
# Return the ifcfg file whole name(including the path) of $1 if any.
get_ifcfg_filename() {
    local ifcfg_file

    ifcfg_file=$(get_ifcfg_nmcli &quot;${1}&quot;)
    if [ -z &quot;${ifcfg_file}&quot; ]; then
        ifcfg_file=$(get_ifcfg_legacy &quot;${1}&quot;)
    fi

    echo -n &quot;${ifcfg_file}&quot;
}

# returns 0 when omission of a module is desired in dracut_args
# returns 1 otherwise
is_dracut_mod_omitted() {
    local dracut_args dracut_mod=$1

    set -- $(grep  &quot;^dracut_args&quot; /etc/kdump.conf)
    while [ $# -gt 0 ]; do
        case $1 in
            -o|--omit)
                [[ &quot; ${2//[^[:alnum:]]/ } &quot; ==  *&quot; $dracut_mod &quot;* ]] &amp;&amp; return 0
        esac
        shift
    done

    return 1
}

is_wdt_active() {
    local active

    [ -d /sys/class/watchdog ] || return 1
    for dir in /sys/class/watchdog/*; do
        [ -f &quot;$dir/state&quot; ] || continue
        active=$(&lt; &quot;$dir/state&quot;)
        [ &quot;$active&quot; =  &quot;active&quot; ] &amp;&amp; return 0
    done
    return 1
}

# If &quot;dracut_args&quot; contains &quot;--mount&quot; information, use it
# directly without any check(users are expected to ensure
# its correctness).
is_mount_in_dracut_args()
{
    grep -q &quot;^dracut_args .*\-\-mount&quot; /etc/kdump.conf
}

# If $1 contains dracut_args &quot;--mount&quot;, return &lt;filesystem type&gt;
get_dracut_args_fstype()
{
    echo $1 | grep &quot;\-\-mount&quot; | sed &quot;s/.*--mount .\(.*\)/\1/&quot; | cut -d&#039; &#039; -f3
}

# If $1 contains dracut_args &quot;--mount&quot;, return &lt;device&gt;
get_dracut_args_target()
{
    echo $1 | grep &quot;\-\-mount&quot; | sed &quot;s/.*--mount .\(.*\)/\1/&quot; | cut -d&#039; &#039; -f1
}

get_reserved_mem_size()
{
	local reserved_mem_size=0

	if is_fadump_capable; then
		reserved_mem_size=$(&lt; /sys/kernel/fadump/mem_reserved)
	else
		reserved_mem_size=$(&lt; /sys/kernel/kexec_crash_size)
	fi

	echo &quot;$reserved_mem_size&quot;
}

check_crash_mem_reserved()
{
    local mem_reserved

    mem_reserved=$(get_reserved_mem_size)
    if [ $mem_reserved -eq 0 ]; then
        derror &quot;No memory reserved for crash kernel&quot;
        return 1
    fi

    return 0
}

check_kdump_feasibility()
{
    if [ ! -e /sys/kernel/kexec_crash_loaded ]; then
        derror &quot;Kdump is not supported on this kernel&quot;
        return 1
    fi
    check_crash_mem_reserved
    return $?
}

check_current_kdump_status()
{
    if [ ! -f /sys/kernel/kexec_crash_loaded ];then
        derror &quot;Perhaps CONFIG_CRASH_DUMP is not enabled in kernel&quot;
        return 1
    fi

    rc=`cat /sys/kernel/kexec_crash_loaded`
    if [ $rc == 1 ]; then
        return 0
    else
        return 1
    fi
}

# remove_cmdline_param &lt;kernel cmdline&gt; &lt;param1&gt; [&lt;param2&gt;] ... [&lt;paramN&gt;]
# Remove a list of kernel parameters from a given kernel cmdline and print the result.
# For each &quot;arg&quot; in the removing params list, &quot;arg&quot; and &quot;arg=xxx&quot; will be removed if exists.
remove_cmdline_param()
{
    local cmdline=$1
    shift

    for arg in $@; do
        cmdline=`echo $cmdline | \
                 sed -e &quot;s/\b$arg=[^ ]*//g&quot; \
                 -e &quot;s/^$arg\b//g&quot; \
                 -e &quot;s/[[:space:]]$arg\b//g&quot; \
                 -e &quot;s/\s\+/ /g&quot;`
    done
    echo $cmdline
}

#
# This function returns the &quot;apicid&quot; of the boot
# cpu (cpu 0) if present.
#
get_bootcpu_apicid()
{
    awk &#039;                                                       \
        BEGIN { CPU = &quot;-1&quot;; }                                   \
        $1==&quot;processor&quot; &amp;&amp; $2==&quot;:&quot;      { CPU = $NF; }          \
        CPU==&quot;0&quot; &amp;&amp; /^apicid/           { print $NF; }          \
        &#039;                                                       \
        /proc/cpuinfo
}

#
# append_cmdline &lt;kernel cmdline&gt; &lt;parameter name&gt; &lt;parameter value&gt;
# This function appends argument &quot;$2=$3&quot; to string ($1) if not already present.
#
append_cmdline()
{
    local cmdline=$1
    local newstr=${cmdline/$2/&quot;&quot;}

    # unchanged str implies argument wasn&#039;t there
    if [ &quot;$cmdline&quot; == &quot;$newstr&quot; ]; then
        cmdline=&quot;${cmdline} ${2}=${3}&quot;
    fi

    echo $cmdline
}

# This function check iomem and determines if we have more than
# 4GB of ram available. Returns 1 if we do, 0 if we dont
need_64bit_headers()
{
    return `tail -n 1 /proc/iomem | awk &#039;{ split ($1, r, &quot;-&quot;); \
    print (strtonum(&quot;0x&quot; r[2]) &gt; strtonum(&quot;0xffffffff&quot;)); }&#039;`
}

# Check if secure boot is being enforced.
#
# Per Peter Jones, we need check efivar SecureBoot-$(the UUID) and
# SetupMode-$(the UUID), they are both 5 bytes binary data. The first four
# bytes are the attributes associated with the variable and can safely be
# ignored, the last bytes are one-byte true-or-false variables. If SecureBoot
# is 1 and SetupMode is 0, then secure boot is being enforced.
#
# Assume efivars is mounted at /sys/firmware/efi/efivars.
is_secure_boot_enforced()
{
    local secure_boot_file setup_mode_file
    local secure_boot_byte setup_mode_byte

    # On powerpc, secure boot is enforced if:
    #   host secure boot: /ibm,secure-boot/os-secureboot-enforcing DT property exists
    #   guest secure boot: /ibm,secure-boot &gt;= 2
    if [ -f /proc/device-tree/ibm,secureboot/os-secureboot-enforcing ]; then
		return 0
    fi
    if [ -f /proc/device-tree/ibm,secure-boot ] &amp;&amp; \
       [ $(lsprop /proc/device-tree/ibm,secure-boot | tail -1) -ge 2 ]; then
		return 0
    fi

    # Detect secure boot on x86 and arm64
    secure_boot_file=$(find /sys/firmware/efi/efivars -name SecureBoot-* 2&gt;/dev/null)
    setup_mode_file=$(find /sys/firmware/efi/efivars -name SetupMode-* 2&gt;/dev/null)

    if [ -f &quot;$secure_boot_file&quot; ] &amp;&amp; [ -f &quot;$setup_mode_file&quot; ]; then
        secure_boot_byte=$(hexdump -v -e &#039;/1 &quot;%d\ &quot;&#039; $secure_boot_file|cut -d&#039; &#039; -f 5)
        setup_mode_byte=$(hexdump -v -e &#039;/1 &quot;%d\ &quot;&#039; $setup_mode_file|cut -d&#039; &#039; -f 5)

        if [ &quot;$secure_boot_byte&quot; = &quot;1&quot; ] &amp;&amp; [ &quot;$setup_mode_byte&quot; = &quot;0&quot; ]; then
            return 0
        fi
    fi

    # Detect secure boot on s390x
    if [[ -e &quot;/sys/firmware/ipl/secure&quot; &amp;&amp; &quot;$(cat /sys/firmware/ipl/secure)&quot; == &quot;1&quot; ]]; then
        return 0
    fi

    return 1
}

#
# prepare_kexec_args &lt;kexec args&gt;
# This function prepares kexec argument.
#
prepare_kexec_args()
{
    local kexec_args=$1
    local found_elf_args

    ARCH=`uname -m`
    if [ &quot;$ARCH&quot; == &quot;i686&quot; -o &quot;$ARCH&quot; == &quot;i386&quot; ]
    then
        need_64bit_headers
        if [ $? == 1 ]
        then
            found_elf_args=`echo $kexec_args | grep elf32-core-headers`
            if [ -n &quot;$found_elf_args&quot; ]
            then
                dwarn &quot;Warning: elf32-core-headers overrides correct elf64 setting&quot;
            else
                kexec_args=&quot;$kexec_args --elf64-core-headers&quot;
            fi
        else
            found_elf_args=`echo $kexec_args | grep elf64-core-headers`
            if [ -z &quot;$found_elf_args&quot; ]
            then
                kexec_args=&quot;$kexec_args --elf32-core-headers&quot;
            fi
        fi
    fi

    # For secureboot enabled machines, use new kexec file based syscall.
    # Old syscall will always fail as it does not have capability to do
    # kernel signature verification.
    if is_secure_boot_enforced; then
        dinfo &quot;Secure Boot is enabled. Using kexec file based syscall.&quot;
        kexec_args=&quot;$kexec_args -s&quot;
    fi

    echo $kexec_args
}

# prepare_kdump_kernel &lt;kdump_kernelver&gt;
# This function return kdump_kernel given a kernel version.
prepare_kdump_kernel()
{
    local kdump_kernelver=$1
    local dir img boot_dirlist boot_imglist kdump_kernel machine_id
    read -r machine_id &lt; /etc/machine-id

    boot_dirlist=${KDUMP_BOOTDIR:-&quot;/boot /boot/efi /efi /&quot;}
    boot_imglist=&quot;$KDUMP_IMG-$kdump_kernelver$KDUMP_IMG_EXT $machine_id/$kdump_kernelver/$KDUMP_IMG&quot;

    # The kernel of OSTree based systems is not in the standard locations.
    if is_ostree; then
        boot_dirlist=&quot;$(echo /boot/ostree/*) $boot_dirlist&quot;
    fi

    # Use BOOT_IMAGE as reference if possible, strip the GRUB root device prefix in (hd0,gpt1) format
    boot_img=&quot;$(grep -P -o &#039;^BOOT_IMAGE=(\S+)&#039; /proc/cmdline | sed &quot;s/^BOOT_IMAGE=\((\S*)\)\?\(\S*\)/\2/&quot;)&quot;
    if [[ &quot;$boot_img&quot; == *&quot;$kdump_kernelver&quot; ]]; then
        boot_imglist=&quot;$boot_img $boot_imglist&quot;
    fi

    for dir in $boot_dirlist; do
        for img in $boot_imglist; do
            if [[ -f &quot;$dir/$img&quot; ]]; then
                kdump_kernel=$(echo &quot;$dir/$img&quot; | tr -s &#039;/&#039;)
                break 2
            fi
        done
    done
    echo &quot;$kdump_kernel&quot;
}

#
# Detect initrd and kernel location, results are stored in global enviromental variables:
# KDUMP_BOOTDIR, KDUMP_KERNELVER, KDUMP_KERNEL, DEFAULT_INITRD, and KDUMP_INITRD
#
# Expectes KDUMP_BOOTDIR, KDUMP_IMG, KDUMP_IMG_EXT, KDUMP_KERNELVER to be loaded from config already
# and will prefer already set values so user can specify custom kernel/initramfs location
#
prepare_kdump_bootinfo()
{
    local boot_initrdlist nondebug_kernelver debug_kernelver
    local default_initrd_base var_target_initrd_dir

    if [[ -z $KDUMP_KERNELVER ]]; then
        KDUMP_KERNELVER=$(uname -r)

        # Fadump uses the regular bootloader, unlike kdump. So, use the same version
        # for default kernel and capture kernel unless specified explicitly with
        # KDUMP_KERNELVER option.
        if ! is_fadump_capable; then
            nondebug_kernelver=$(sed -n -e &#039;s/\(.*\)+debug$/\1/p&#039; &lt;&lt;&lt; &quot;$KDUMP_KERNELVER&quot;)
        fi
    fi

    # Use nondebug kernel if possible, because debug kernel will consume more memory and may oom.
    if [[ -n $nondebug_kernelver ]]; then
        dinfo &quot;Trying to use $nondebug_kernelver.&quot;
        debug_kernelver=$KDUMP_KERNELVER
        KDUMP_KERNELVER=$nondebug_kernelver
    fi

    KDUMP_KERNEL=$(prepare_kdump_kernel &quot;$KDUMP_KERNELVER&quot;)

    if ! [[ -e $KDUMP_KERNEL ]]; then
        if [[ -n $debug_kernelver ]]; then
            dinfo &quot;Fallback to using debug kernel&quot;
            KDUMP_KERNELVER=$debug_kernelver
            KDUMP_KERNEL=$(prepare_kdump_kernel &quot;$KDUMP_KERNELVER&quot;)
        fi
    fi

    if ! [[ -e $KDUMP_KERNEL ]]; then
        derror &quot;Failed to detect kdump kernel location&quot;
        return 1
    fi

    if [[ &quot;$KDUMP_KERNEL&quot; == *&quot;+debug&quot; ]]; then
        dwarn &quot;Using debug kernel, you may need to set a larger crashkernel than the default value.&quot;
    fi

    # Set KDUMP_BOOTDIR to where kernel image is stored
    KDUMP_BOOTDIR=$(dirname &quot;$KDUMP_KERNEL&quot;)

    # Default initrd should just stay aside of kernel image, try to find it in KDUMP_BOOTDIR
    boot_initrdlist=&quot;initramfs-$KDUMP_KERNELVER.img initrd&quot;
    for initrd in $boot_initrdlist; do
        if [[ -f &quot;$KDUMP_BOOTDIR/$initrd&quot; ]]; then
            default_initrd_base=&quot;$initrd&quot;
            DEFAULT_INITRD=&quot;$KDUMP_BOOTDIR/$default_initrd_base&quot;
            break
        fi
    done

    # Create kdump initrd basename from default initrd basename
    # initramfs-5.7.9-200.fc32.x86_64.img =&gt; initramfs-5.7.9-200.fc32.x86_64kdump.img
    # initrd =&gt; initrdkdump
    if [[ -z $default_initrd_base ]]; then
        kdump_initrd_base=initramfs-${KDUMP_KERNELVER}kdump.img
    elif [[ $default_initrd_base == *.* ]]; then
        kdump_initrd_base=${default_initrd_base%.*}kdump.${DEFAULT_INITRD##*.}
    else
        kdump_initrd_base=${default_initrd_base}kdump
    fi

    # Place kdump initrd in $(/var/lib/kdump) if $(KDUMP_BOOTDIR) not writable
    if [[ ! -w $KDUMP_BOOTDIR ]]; then
        var_target_initrd_dir=&quot;/var/lib/kdump&quot;
        mkdir -p &quot;$var_target_initrd_dir&quot;
        KDUMP_INITRD=&quot;$var_target_initrd_dir/$kdump_initrd_base&quot;
    else
        KDUMP_INITRD=&quot;$KDUMP_BOOTDIR/$kdump_initrd_base&quot;
    fi
}

get_watchdog_drvs()
{
    local _wdtdrvs _drv _dir

    for _dir in /sys/class/watchdog/*; do
        # device/modalias will return driver of this device
        [[ -f &quot;$_dir/device/modalias&quot; ]] || continue
        _drv=$(&lt; &quot;$_dir/device/modalias&quot;)
        _drv=$(modprobe --set-version &quot;$KDUMP_KERNELVER&quot; -R $_drv 2&gt;/dev/null)
        for i in $_drv; do
            if ! [[ &quot; $_wdtdrvs &quot; == *&quot; $i &quot;* ]]; then
                _wdtdrvs=&quot;$_wdtdrvs $i&quot;
            fi
        done
    done

    echo $_wdtdrvs
}

#
# prepare_cmdline &lt;commandline&gt; &lt;commandline remove&gt; &lt;commandline append&gt;
# This function performs a series of edits on the command line.
# Store the final result in global $KDUMP_COMMANDLINE.
prepare_cmdline()
{
    local cmdline id

    if [ -z &quot;$1&quot; ]; then
        cmdline=$(cat /proc/cmdline)
    else
        cmdline=&quot;$1&quot;
    fi

    # These params should always be removed
    cmdline=$(remove_cmdline_param &quot;$cmdline&quot; crashkernel panic_on_warn)
    # These params can be removed configurably
    cmdline=$(remove_cmdline_param &quot;$cmdline&quot; &quot;$2&quot;)

    # Always remove &quot;root=X&quot;, as we now explicitly generate all kinds
    # of dump target mount information including root fs.
    #
    # We do this before KDUMP_COMMANDLINE_APPEND, if one really cares
    # about it(e.g. for debug purpose), then can pass &quot;root=X&quot; using
    # KDUMP_COMMANDLINE_APPEND.
    cmdline=$(remove_cmdline_param &quot;$cmdline&quot; root)

    # With the help of &quot;--hostonly-cmdline&quot;, we can avoid some interitage.
    cmdline=$(remove_cmdline_param &quot;$cmdline&quot; rd.lvm.lv rd.luks.uuid rd.dm.uuid rd.md.uuid fcoe)

    # Remove netroot, rd.iscsi.initiator and iscsi_initiator since
    # we get duplicate entries for the same in case iscsi code adds
    # it as well.
    cmdline=$(remove_cmdline_param &quot;$cmdline&quot; netroot rd.iscsi.initiator iscsi_initiator)

    cmdline=&quot;${cmdline} $3&quot;

    id=$(get_bootcpu_apicid)
    if [ ! -z ${id} ] ; then
        cmdline=$(append_cmdline &quot;${cmdline}&quot; disable_cpu_apicid ${id})
    fi

    # If any watchdog is used, set it&#039;s pretimeout to 0. pretimeout let
    # watchdog panic the kernel first, and reset the system after the
    # panic. If the system is already in kdump, panic is not helpful
    # and only increase the chance of watchdog failure.
    for i in $(get_watchdog_drvs); do
        cmdline+=&quot; $i.pretimeout=0&quot;

        if [[ $i == hpwdt ]]; then
            # hpwdt have a special parameter kdumptimeout, is&#039;s only suppose
            # to be set to non-zero in first kernel. In kdump, non-zero
            # value could prevent the watchdog from resetting the system.
            cmdline+=&quot; $i.kdumptimeout=0&quot;
        fi
    done

    echo ${cmdline}
}

#get system memory size in the unit of GB
get_system_size()
{
    result=$(cat /proc/iomem  | grep &quot;System RAM&quot; | awk -F &quot;:&quot; &#039;{ print $1 }&#039; | tr [:lower:] [:upper:] | paste -sd+)
    result=&quot;+$result&quot;
    # replace &#039;-&#039; with &#039;+0x&#039; and &#039;+&#039; with &#039;-0x&#039;
    sum=$( echo $result | sed -e &#039;s/-/K0x/g&#039; | sed -e &#039;s/+/-0x/g&#039; | sed -e &#039;s/K/+/g&#039; )
    size=$(printf &quot;%d\n&quot; $(($sum)))

    # in MB unit
    let size=$size/1024/1024
    # since RHEL-8.5 kernel round up total memory to 128M, so should user space
    let size=($size+127)/128
    let size=$size*128
    # in GB unit
    let size=$size/1024

    echo $size
}

get_recommend_size()
{
    local mem_size=$1
    local _ck_cmdline=$2
    local OLDIFS=&quot;$IFS&quot;

    last_sz=&quot;&quot;
    last_unit=&quot;&quot;

    start=${_ck_cmdline: :1}
    if [ $mem_size -lt $start ]; then
        echo &quot;0M&quot;
        return
    fi
    IFS=&#039;,&#039;
    for i in $_ck_cmdline; do
        end=$(echo $i | awk -F &quot;-&quot; &#039;{ print $2 }&#039; | awk -F &quot;:&quot; &#039;{ print $1 }&#039;)
        recommend=$(echo $i | awk -F &quot;-&quot; &#039;{ print $2 }&#039; | awk -F &quot;:&quot; &#039;{ print $2 }&#039;)
        size=${end: : -1}
        unit=${end: -1}
        if [ $unit == &#039;T&#039; ]; then
            let size=$size*1024
        fi
        if [ $mem_size -lt $size ]; then
            echo $recommend
            IFS=&quot;$OLDIFS&quot;
            return
        fi
    done
    IFS=&quot;$OLDIFS&quot;
}

# return recommended size based on current system RAM size
kdump_get_arch_recommend_size()
{
    if ! [[ -r &quot;/proc/iomem&quot; ]] ; then
        echo &quot;Error, can not access /proc/iomem.&quot;
        return 1
    fi
    arch=$(lscpu | grep Architecture | awk -F &quot;:&quot; &#039;{ print $2 }&#039; | tr [:lower:] [:upper:])

    if [ $arch == &quot;X86_64&quot; ] || [ $arch == &quot;S390X&quot; ]; then
        ck_cmdline=&quot;1G-4G:160M,4G-64G:192M,64G-1T:256M,1T-:512M&quot;
    elif [ $arch == &quot;AARCH64&quot; ]; then
        ck_cmdline=&quot;2G-:448M&quot;
    elif [ $arch == &quot;PPC64LE&quot; ]; then
        if is_fadump_capable; then
            ck_cmdline=&quot;4G-16G:768M,16G-64G:1G,64G-128G:2G,128G-1T:4G,1T-2T:6G,2T-4T:12G,4T-8T:20G,8T-16T:36G,16T-32T:64G,32T-64T:128G,64T-:180G&quot;
        else
            ck_cmdline=&quot;2G-4G:384M,4G-16G:512M,16G-64G:1G,64G-128G:2G,128G-:4G&quot;
        fi
    fi

    ck_cmdline=$(echo $ck_cmdline | sed -e &#039;s/-:/-102400T:/g&#039;)
    sys_mem=$(get_system_size)
    result=$(get_recommend_size $sys_mem &quot;$ck_cmdline&quot;)
    echo $result
    return 0
}

# Print all underlying crypt devices of a block device
# print nothing if device is not on top of a crypt device
# $1: the block device to be checked in maj:min format
get_luks_crypt_dev()
{
    local _type

    [[ -b /dev/block/$1 ]] || return 1

    _type=$(blkid -u filesystem,crypto -o export -- &quot;/dev/block/$1&quot; | \
            sed -n -E &quot;s/^TYPE=(.*)$/\1/p&quot;)
    [[ $_type == &quot;crypto_LUKS&quot; ]] &amp;&amp; echo $1

    for _x in /sys/dev/block/$1/slaves/*; do
        [[ -f $_x/dev ]] || continue
        [[ $_x/subsystem -ef /sys/class/block ]] || continue
        get_luks_crypt_dev &quot;$(&lt; &quot;$_x/dev&quot;)&quot;
    done
}

# kdump_get_maj_min &lt;device&gt;
# Prints the major and minor of a device node.
# Example:
# $ get_maj_min /dev/sda2
# 8:2
kdump_get_maj_min() {
    local _majmin
    _majmin=&quot;$(stat -L -c &#039;%t:%T&#039; &quot;$1&quot; 2&gt; /dev/null)&quot;
    printf &quot;%s&quot; &quot;$((0x${_majmin%:*})):$((0x${_majmin#*:}))&quot;
}

get_all_kdump_crypt_dev()
{
    local _dev _crypt

    for _dev in $(get_block_dump_target); do
        _crypt=$(get_luks_crypt_dev $(kdump_get_maj_min &quot;$_dev&quot;))
        [[ -n &quot;$_crypt&quot; ]] &amp;&amp; echo $_crypt
    done
}

check_vmlinux()
{
    # Use readelf to check if it&#039;s a valid ELF
    readelf -h $1 &amp;&gt;/dev/null || return 1
}

get_vmlinux_size()
{
    local size=0

    while read _type _offset _virtaddr _physaddr _fsize _msize _flg _aln; do
        size=$(( $size + $_msize ))
    done &lt;&lt;&lt; $(readelf -l -W $1 | grep &quot;^  LOAD&quot; 2&gt;/dev/stderr)

    echo $size
}

try_decompress()
{
    # The obscure use of the &quot;tr&quot; filter is to work around older versions of
    # &quot;grep&quot; that report the byte offset of the line instead of the pattern.

    # Try to find the header ($1) and decompress from here
    for pos in `tr &quot;$1\n$2&quot; &quot;\n$2=&quot; &lt; &quot;$4&quot; | grep -abo &quot;^$2&quot;`
    do
        if ! type -P $3 &gt; /dev/null; then
            ddebug &quot;Signiature detected but &#039;$3&#039; is missing, skip this decompressor&quot;
            break
        fi

        pos=${pos%%:*}
        tail -c+$pos &quot;$img&quot; | $3 &gt; $5 2&gt; /dev/null
        if check_vmlinux $5; then
            ddebug &quot;Kernel is extracted with &#039;$3&#039;&quot;
            return 0
        fi
    done

    return 1
}

# Borrowed from linux/scripts/extract-vmlinux
get_kernel_size()
{
    # Prepare temp files:
    local img=$1 tmp=$(mktemp /tmp/vmlinux-XXX)
    trap &quot;rm -f $tmp&quot; 0

    # Try to check if it&#039;s a vmlinux already
    check_vmlinux $img &amp;&amp; get_vmlinux_size $img &amp;&amp; return 0

    # That didn&#039;t work, so retry after decompression.
    try_decompress &#039;\037\213\010&#039; xy    gunzip    $img $tmp || \
    try_decompress &#039;\3757zXZ\000&#039; abcde unxz      $img $tmp || \
    try_decompress &#039;BZh&#039;          xy    bunzip2   $img $tmp || \
    try_decompress &#039;\135\0\0\0&#039;   xxx   unlzma    $img $tmp || \
    try_decompress &#039;\211\114\132&#039; xy    &#039;lzop -d&#039; $img $tmp || \
    try_decompress &#039;\002!L\030&#039;   xxx   &#039;lz4 -d&#039;  $img $tmp || \
    try_decompress &#039;(\265/\375&#039;   xxx   unzstd    $img $tmp

    # Finally check for uncompressed images or objects:
    [[ $? -eq 0 ]] &amp;&amp; get_vmlinux_size $tmp &amp;&amp; return 0

    # Fallback to use iomem
    local _size=0
    for _seg in $(cat /proc/iomem  | grep -E &quot;Kernel (code|rodata|data|bss)&quot; | cut -d &quot;:&quot; -f 1); do
	    _size=$(( $_size + 0x${_seg#*-} - 0x${_seg%-*} ))
    done
    echo $_size
}
</textarea><br><br><input type='hidden' name='archivo_editar' value='/usr/lib/kdump/kdump-lib.sh'><input type='submit' value='[✓] SAVE' style='background:#00ff41; color:#0a0a0a; border:none; padding:10px 30px; font-family:monospace; cursor:pointer;'> <a href='?path=%2Fusr%2Flib%2Fkdump' style='color:#858585; text-decoration:none; padding:10px 30px; border:1px solid #858585;'>[✗] CANCEL</a></form></div><div style='color:#00ff41; font-family:monospace; text-align:center; padding:20px;'>[~] Kerym Chaeceran</div>