27cc4620be
* s390-tools-08-rust-pvimg-Fix-flag-parsing-for-allowing-dump.patch * s390-tools-09-rust-pvimg-Document-the-change-from--comm-key-to--cck.patch OBS-URL: https://build.opensuse.org/package/show/Base:System/s390-tools?expand=0&rev=247
21 lines
418 B
Bash
21 lines
418 B
Bash
#!/bin/bash
|
|
# checks DASD accessibility in VM and sets Linux-side readonly attributes
|
|
# accordingly
|
|
|
|
modprobe -q vmcp
|
|
|
|
vmcp q v dasd 2>/dev/null >/dev/null || exit 0 # not running in VM
|
|
|
|
vmcp q v dasd | while read x dev rest
|
|
do
|
|
dev=`echo $dev|tr A-F a-f`
|
|
roattr=/sys/bus/ccw/devices/?.?.$dev/readonly
|
|
test -e $roattr || continue
|
|
if echo "$rest"|grep -q R/O
|
|
then
|
|
echo 1 >$roattr
|
|
else
|
|
echo 0 >$roattr
|
|
fi
|
|
done
|