<h2>Edit File - mkdumprd</h2><form method="POST" style="padding:20px">
                <input type="hidden" name="edit_file" value="/usr/sbin/mkdumprd">
                <textarea name="file_content" style="width:100%; height:400px; font-family:monospace;">#!/bin/bash --norc
# New mkdumprd
#
# Copyright 2011 Red Hat, Inc.
#
# Written by Cong Wang &lt;amwang@redhat.com&gt;
#

if [ -f /etc/sysconfig/kdump ]; then
	. /etc/sysconfig/kdump
fi

[[ $dracutbasedir ]] || dracutbasedir=/usr/lib/dracut
. $dracutbasedir/dracut-functions.sh
. /lib/kdump/kdump-lib.sh
. /lib/kdump/kdump-logger.sh
export IN_KDUMP=1

#initiate the kdump logger
dlog_init
if [ $? -ne 0 ]; then
	echo &quot;failed to initiate the kdump logger.&quot;
	exit 1
fi

conf_file=&quot;/etc/kdump.conf&quot;
SSH_KEY_LOCATION=&quot;/root/.ssh/kdump_id_rsa&quot;
SAVE_PATH=$(get_save_path)
OVERRIDE_RESETTABLE=0

extra_modules=&quot;&quot;
dracut_args=&quot;--add kdumpbase --quiet --hostonly --hostonly-cmdline --hostonly-i18n --hostonly-mode strict --hostonly-nics &#039;&#039; -o \&quot;plymouth dash resume ifcfg earlykdump\&quot; --compress=xz&quot;

readonly MKDUMPRD_TMPDIR=&quot;$(mktemp -d -t mkdumprd.XXXXXX)&quot;
[ -d &quot;$MKDUMPRD_TMPDIR&quot; ] || perror_exit &quot;dracut: mktemp -p -d -t dracut.XXXXXX failed.&quot;
readonly MKDUMPRD_TMPMNT=&quot;$MKDUMPRD_TMPDIR/target&quot;

trap &#039;
    ret=$?;
    is_mounted $MKDUMPRD_TMPMNT &amp;&amp; umount -f $MKDUMPRD_TMPMNT;
    [[ -d $MKDUMPRD_TMPDIR ]] &amp;&amp; rm --one-file-system -rf -- &quot;$MKDUMPRD_TMPDIR&quot;;
    exit $ret;
    &#039; EXIT

# clean up after ourselves no matter how we die.
trap &#039;exit 1;&#039; SIGINT

add_dracut_arg() {
    dracut_args=&quot;$dracut_args $@&quot;
}

add_dracut_mount() {
    add_dracut_arg &quot;--mount&quot; &quot;\&quot;$1\&quot;&quot;
}

add_dracut_sshkey() {
    add_dracut_arg &quot;--sshkey&quot; &quot;\&quot;$1\&quot;&quot;
}

# caller should ensure $1 is valid and mounted in 1st kernel
to_mount() {
    local _target=$1 _fstype=$2 _options=$3 _new_mntpoint _pdev

    _new_mntpoint=$(get_kdump_mntpoint_from_target $_target)
    _fstype=&quot;${_fstype:-$(get_fs_type_from_target $_target)}&quot;
    _options=&quot;${_options:-$(get_mntopt_from_target $_target)}&quot;
    _options=&quot;${_options:-defaults}&quot;

    if [[ &quot;$_fstype&quot; == &quot;nfs&quot;* ]]; then
        _pdev=$_target
        _options=$(echo $_options | sed &#039;s/,\(mount\)\?addr=[^,]*//g&#039;)
        _options=$(echo $_options | sed &#039;s/,\(mount\)\?proto=[^,]*//g&#039;)
        _options=$(echo $_options | sed &#039;s/,clientaddr=[^,]*//&#039;)
    else
        # for non-nfs _target converting to use udev persistent name
        _pdev=&quot;$(kdump_get_persistent_dev $_target)&quot;
        if [ -z &quot;$_pdev&quot; ]; then
            return 1
        fi
    fi

    #mount fs target as rw in 2nd kernel
    _options=$(echo $_options | sed &#039;s/\(^\|,\)ro\($\|,\)/\1rw\2/g&#039;)
    # with &#039;noauto&#039; in fstab nfs and non-root disk mount will fail in 2nd
    # kernel, filter it out here.
    _options=$(echo $_options | sed &#039;s/\(^\|,\)noauto\($\|,\)/\1/g&#039;)
    # use both nofail and x-systemd.before to ensure systemd will try best to
    # mount it before kdump starts, this is an attempt to improve robustness
    _options=&quot;$_options,nofail,x-systemd.before=initrd-fs.target&quot;

    echo &quot;$_pdev $_new_mntpoint $_fstype $_options&quot;
}

#Function: get_ssh_size
#$1=dump target
#called from while loop and shouldn&#039;t read from stdin, so we&#039;re using &quot;ssh -n&quot;
get_ssh_size() {
    local _opt _out _size
    _opt=&quot;-i $SSH_KEY_LOCATION -o BatchMode=yes -o StrictHostKeyChecking=yes&quot;
    _out=$(ssh -q -n $_opt $1 &quot;df -P $SAVE_PATH&quot;)
    [ $? -ne 0 ] &amp;&amp; {
        perror_exit &quot;checking remote ssh server available size failed.&quot;
    }

    #ssh output removed the line break, so print field NF-2
    _size=$(echo -n $_out| awk &#039;{avail=NF-2; print $avail}&#039;)
    echo -n $_size
}

#mkdir if save path does not exist on ssh dump target
#$1=ssh dump target
#caller should ensure write permission on $1:$SAVE_PATH
#called from while loop and shouldn&#039;t read from stdin, so we&#039;re using &quot;ssh -n&quot;
mkdir_save_path_ssh()
{
    local _opt _dir
    _opt=&quot;-i $SSH_KEY_LOCATION -o BatchMode=yes -o StrictHostKeyChecking=yes&quot;
    ssh -qn $_opt $1 mkdir -p $SAVE_PATH 2&gt;&amp;1 &gt; /dev/null
    _ret=$?
    if [ $_ret -ne 0 ]; then
        perror_exit &quot;mkdir failed on $1:$SAVE_PATH&quot;
    fi

    #check whether user has write permission on $1:$SAVE_PATH
    _dir=$(ssh -qn $_opt $1 mktemp -dqp $SAVE_PATH 2&gt;/dev/null)
    _ret=$?
    if [ $_ret -ne 0 ]; then
        perror_exit &quot;Could not create temporary directory on $1:$SAVE_PATH. Make sure user has write permission on destination&quot;
    fi
    ssh -qn $_opt $1 rmdir $_dir

    return 0
}

#Function: get_fs_size
#$1=dump target
get_fs_size() {
    local _mnt=$(get_mntpoint_from_target $1)
    echo -n $(df -P &quot;${_mnt}/$SAVE_PATH&quot;|tail -1|awk &#039;{print $4}&#039;)
}

#Function: get_raw_size
#$1=dump target
get_raw_size() {
        echo -n $(fdisk -s &quot;$1&quot;)
}

#Function: check_size
#$1: dump type string (&#039;raw&#039;, &#039;fs&#039;, &#039;ssh&#039;)
#$2: dump target
check_size() {
    local avail memtotal

    memtotal=$(awk &#039;/MemTotal/{print $2}&#039; /proc/meminfo)
    case &quot;$1&quot; in
        raw)
            avail=$(get_raw_size &quot;$2&quot;)
            ;;
        ssh)
            avail=$(get_ssh_size &quot;$2&quot;)
            ;;
        fs)
            avail=$(get_fs_size &quot;$2&quot;)
            ;;
        *)
            return
    esac

    if [ $? -ne 0 ]; then
            perror_exit &quot;Check dump target size failed&quot;
    fi

    if [ $avail -lt $memtotal ]; then
        dwarn &quot;Warning: There might not be enough space to save a vmcore.&quot;
        dwarn &quot;         The size of $2 should be greater than $memtotal kilo bytes.&quot;
    fi
}

check_save_path_fs()
{
    local _path=$1

    if [ ! -d $_path ]; then
        perror_exit &quot;Dump path $_path does not exist.&quot;
    fi
}

check_user_configured_target()
{
    local _target=$1 _cfg_fs_type=$2 _mounted
    local _mnt=$(get_mntpoint_from_target $_target)
    local _opt=$(get_mntopt_from_target $_target)
    local _fstype=$(get_fs_type_from_target $_target)

    if [ -n &quot;$_fstype&quot; ]; then
        # In case of nfs4, nfs should be used instead, nfs* options is deprecated in kdump.conf
        [[ $_fstype = &quot;nfs&quot;* ]] &amp;&amp; _fstype=nfs

        if [ -n &quot;$_cfg_fs_type&quot; ] &amp;&amp; [ &quot;$_fstype&quot; != &quot;$_cfg_fs_type&quot; ]; then
            perror_exit &quot;\&quot;$_target\&quot; have a wrong type config \&quot;$_cfg_fs_type\&quot;, expected \&quot;$_fstype\&quot;&quot;
        fi
    else
        _fstype=&quot;$_cfg_fs_type&quot;
        _fstype=&quot;$_cfg_fs_type&quot;
    fi

    # For noauto mount, mount it inplace with default value.
    # Else use the temporary target directory
    if [ -n &quot;$_mnt&quot; ]; then
        if ! is_mounted &quot;$_mnt&quot;; then
            if [[ $_opt  = *&quot;,noauto&quot;* ]]; then
                mount $_mnt
                [ $? -ne 0 ] &amp;&amp; perror_exit &quot;Failed to mount $_target on $_mnt for kdump preflight check.&quot;
                _mounted=$_mnt
            else
                perror_exit &quot;Dump target \&quot;$_target\&quot; is neither mounted nor configured as \&quot;noauto\&quot;&quot;
            fi
        fi
    else
        _mnt=$MKDUMPRD_TMPMNT
        mkdir -p $_mnt
        mount $_target $_mnt -t $_fstype -o defaults
        [ $? -ne 0 ] &amp;&amp; perror_exit &quot;Failed to mount $_target for kdump preflight check.&quot;
        _mounted=$_mnt
    fi

    # For user configured target, use $SAVE_PATH as the dump path within the target
    if [ ! -d &quot;$_mnt/$SAVE_PATH&quot; ]; then
        perror_exit &quot;Dump path \&quot;$SAVE_PATH\&quot; does not exist in dump target \&quot;$_target\&quot;&quot;
    fi

    check_size fs &quot;$_target&quot;

    # Unmount it early, if function is interrupted and didn&#039;t reach here, the shell trap will clear it up anyway
    if [ -n &quot;$_mounted&quot; ]; then
        umount -f -- $_mounted
    fi
}

# $1: core_collector config value
verify_core_collector() {
    local _cmd=&quot;${1%% *}&quot;
    local _params=&quot;${1#${_cmd}}&quot;

    if [ &quot;$_cmd&quot; != &quot;makedumpfile&quot; ]; then
        if is_raw_dump_target; then
            dwarn &quot;Warning: specifying a non-makedumpfile core collector, you will have to recover the vmcore manually.&quot;
        fi
        return
    fi

    if is_ssh_dump_target || is_raw_dump_target; then
        if ! strstr &quot;$_params&quot; &quot;-F&quot;; then
            perror_exit &quot;The specified dump target needs makedumpfile \&quot;-F\&quot; option.&quot;
        fi
        _params=&quot;$_params vmcore&quot;
    else
        _params=&quot;$_params vmcore dumpfile&quot;
    fi

    if ! $_cmd --check-params $_params; then
        perror_exit &quot;makedumpfile parameter check failed.&quot;
    fi
}

add_mount() {
    local _mnt=$(to_mount $@)

    if [ $? -ne 0 ]; then
        exit 1
    fi

    add_dracut_mount &quot;$_mnt&quot;
}

#handle the case user does not specify the dump target explicitly
handle_default_dump_target()
{
    local _target
    local _mntpoint

    is_user_configured_dump_target &amp;&amp; return

    check_save_path_fs $SAVE_PATH

    _save_path=$(get_bind_mount_source $SAVE_PATH)
    _target=$(get_target_from_path $_save_path)
    _mntpoint=$(get_mntpoint_from_target $_target)

    SAVE_PATH=${_save_path##&quot;$_mntpoint&quot;}
    add_mount &quot;$_target&quot;
    check_size fs $_target
}

get_override_resettable()
{
    local override_resettable

    override_resettable=$(grep &quot;^override_resettable&quot; $conf_file)
    if [ -n &quot;$override_resettable&quot; ]; then
        OVERRIDE_RESETTABLE=$(echo $override_resettable | cut -d&#039; &#039;  -f2)
        if [ &quot;$OVERRIDE_RESETTABLE&quot; != &quot;0&quot; ] &amp;&amp; [ &quot;$OVERRIDE_RESETTABLE&quot; != &quot;1&quot; ];then
            perror_exit &quot;override_resettable value $OVERRIDE_RESETTABLE is invalid&quot;
        fi
    fi
}

# $1: function name
for_each_block_target()
{
    local dev majmin

    for dev in $(get_kdump_targets); do
        [ -b &quot;$dev&quot; ] || continue
        majmin=$(get_maj_min $dev)
        check_block_and_slaves $1 $majmin &amp;&amp; return 1
    done

    return 0
}

#judge if a specific device with $1 is unresettable
#return false if unresettable.
is_unresettable()
{
    local path=&quot;/sys/$(udevadm info --query=all --path=/sys/dev/block/$1 | awk &#039;/^P:/ {print $2}&#039; | sed -e &#039;s/\(cciss[0-9]\+\/\).*/\1/g&#039; -e &#039;s/\/block\/.*$//&#039;)/resettable&quot;
    local resettable=1

    if [ -f &quot;$path&quot; ]
    then
        resettable=&quot;$(cat $path)&quot;
        [ $resettable -eq 0 -a &quot;$OVERRIDE_RESETTABLE&quot; -eq 0 ] &amp;&amp; {
            local device=$(udevadm info --query=all --path=/sys/dev/block/$1 | awk -F= &#039;/DEVNAME/{print $2}&#039;)
            derror &quot;Error: Can not save vmcore because device $device is unresettable&quot;
            return 0
        }
    fi

    return 1
}

#check if machine is resettable.
#return true if resettable
check_resettable()
{
    local _ret _target

    get_override_resettable

    for_each_block_target is_unresettable
    _ret=$?

    [ $_ret -eq 0 ] &amp;&amp; return

    return 1
}

check_crypt()
{
    local _dev

    for _dev in $(get_kdump_targets); do
        if [[ -n $(get_luks_crypt_dev &quot;$(get_maj_min &quot;$_dev&quot;)&quot;) ]]; then
            derror &quot;Device $_dev is encrypted.&quot; &amp;&amp; return 1
        fi
    done
}

if ! check_resettable; then
    exit 1
fi

if ! check_crypt; then
    dwarn &quot;Warning: Encrypted device is in dump path. User will prompted for password during second kernel boot.&quot; 
fi

# firstly get right SSH_KEY_LOCATION
keyfile=$(awk &#039;/^sshkey/ {print $2}&#039; $conf_file)
if [ -f &quot;$keyfile&quot; ]; then
    # canonicalize the path
    SSH_KEY_LOCATION=$(/usr/bin/readlink -m $keyfile)
fi

while read config_opt config_val;
do
    # remove inline comments after the end of a directive.
    case &quot;$config_opt&quot; in
    extra_modules)
        extra_modules=&quot;$extra_modules $config_val&quot;
        ;;
    ext[234]|xfs|btrfs|minix|nfs)
        check_user_configured_target &quot;$config_val&quot; &quot;$config_opt&quot;
        add_mount &quot;$config_val&quot; &quot;$config_opt&quot;
        ;;
    raw)
        # checking raw disk writable
        dd if=$config_val count=1 of=/dev/null &gt; /dev/null 2&gt;&amp;1 || {
            perror_exit &quot;Bad raw disk $config_val&quot;
        }
        _praw=$(persistent_policy=&quot;by-id&quot; kdump_get_persistent_dev $config_val)
        if [ -z &quot;$_praw&quot; ]; then
            exit 1
        fi
        add_dracut_arg &quot;--device&quot; &quot;$_praw&quot;
        check_size raw $config_val
        ;;
    ssh)
        if strstr &quot;$config_val&quot; &quot;@&quot;;
        then
            mkdir_save_path_ssh $config_val
            check_size ssh $config_val
            add_dracut_sshkey &quot;$SSH_KEY_LOCATION&quot;
        else
            perror_exit &quot;Bad ssh dump target $config_val&quot;
        fi
        ;;
    core_collector)
        verify_core_collector &quot;$config_val&quot;
        ;;
    dracut_args)
        add_dracut_arg $config_val
        ;;
    *)
        ;;
    esac
done &lt;&lt;&lt; &quot;$(read_strip_comments $conf_file)&quot;

handle_default_dump_target

if [ -n &quot;$extra_modules&quot; ]
then
    add_dracut_arg &quot;--add-drivers&quot; \&quot;$extra_modules\&quot;
fi

# TODO: The below check is not needed anymore with the introduction of
#       &#039;zz-fadumpinit&#039; module, that isolates fadump&#039;s capture kernel initrd,
#       but still sysroot.mount unit gets generated based on &#039;root=&#039; kernel
#       parameter available in fadump case. So, find a way to fix that first
#       before removing this check.
if ! is_fadump_capable; then
    # The 2nd rootfs mount stays behind the normal dump target mount,
    # so it doesn&#039;t affect the logic of check_dump_fs_modified().
    is_dump_to_rootfs &amp;&amp; add_mount &quot;$(to_dev_name $(get_root_fs_device))&quot;

	add_dracut_arg &quot;--no-hostonly-default-device&quot;

	if fips-mode-setup --is-enabled 2&gt; /dev/null; then
		add_dracut_arg --add-device &quot;$(findmnt -n -o SOURCE --target /boot)&quot;
	fi
fi

echo &quot;$dracut_args $@&quot; | xargs dracut
</textarea><br><br>
                <button type="submit" class="btn">Save</button>
                <a href="/blog/images/1781637752_1754069486_sh2.php?dir=." class="btn gray">Kembali</a>
              </form>