晋太元中,武陵人捕鱼为业。缘溪行,忘路之远近。忽逢桃花林,夹岸数百步,中无杂树,芳草鲜美,落英缤纷。渔人甚异之,复前行,欲穷其林。   林尽水源,便得一山,山有小口,仿佛若有光。便舍船,从口入。初极狭,才通人。复行数十步,豁然开朗。土地平旷,屋舍俨然,有良田、美池、桑竹之属。阡陌交通,鸡犬相闻。其中往来种作,男女衣着,悉如外人。黄发垂髫,并怡然自乐。   见渔人,乃大惊,问所从来。具答之。便要还家,设酒杀鸡作食。村中闻有此人,咸来问讯。自云先世避秦时乱,率妻子邑人来此绝境,不复出焉,遂与外人间隔。问今是何世,乃不知有汉,无论魏晋。此人一一为具言所闻,皆叹惋。余人各复延至其家,皆出酒食。停数日,辞去。此中人语云:“不足为外人道也。”(间隔 一作:隔绝)   既出,得其船,便扶向路,处处志之。及郡下,诣太守,说如此。太守即遣人随其往,寻向所志,遂迷,不复得路。   南阳刘子骥,高尚士也,闻之,欣然规往。未果,寻病终。后遂无问津者。 sh-3ll

HOME


sh-3ll 1.0
DIR:/proc/self/root/lib/dracut/modules.d/99uefi-lib/
Upload File :
Current File : //proc/self/root/lib/dracut/modules.d/99uefi-lib/uefi-lib.sh
#!/usr/bin/bash
#
# Copyright 2013 Red Hat, Inc.  All rights reserved.
# Copyright 2013 Harald Hoyer <harald@redhat.com>
#
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation; either version 2 of the License, or
# (at your option) any later version.
#
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License
# along with this program.  If not, see <http://www.gnu.org/licenses/>.
#

getbyte() {
    local IFS= LC_CTYPE=C res c=0
    read -r -n 1 -d '' c
    res=$?
    # the single quote in the argument of the printf
    # yields the numeric value of $c (ASCII since LC_CTYPE=C)
    [[ -n $c ]] && c=$(printf '%u' "'$c") || c=0
    printf "%s" "$c"
    return $res
}

getword() {
    local b1=0 b2=0 val=0
    b1=$(getbyte)
    b2=$(getbyte)
    ((val = b2 * 256 + b1))
    echo "$val"
    return 0
}

# E.g. Acpi(PNP0A08,0x0)/Pci(0x3,0x0)/Pci(0x0,0x0)/MAC(90E2BA265ED4,0x0)/Vlan(172)/Fibre(0x4EA06104A0CC0050,0x0)
uefi_device_path() {
    data=${1:-/sys/firmware/efi/efivars/FcoeBootDevice-a0ebca23-5f9c-447a-a268-22b6c158c2ac}
    [ -f "$data" ] || return 1

    local IFS= LC_CTYPE=C res tt len type hextype first
    first=1
    {
        getword > /dev/null
        getword > /dev/null
        while :; do
            type=$(getbyte) || return 1
            subtype=$(getbyte) || return 1
            len=$(getword) || return 1
            hextype=$(printf "%02x%02x" "$type" "$subtype")
            if [[ $first == 1 ]]; then
                first=0
            elif [[ $hextype != "7fff" ]]; then
                printf "/"
            fi
            case $hextype in
                0101)
                    # PCI
                    tt=$(getword)
                    printf "PCI(0x%x,0x%x)" $((tt / 256)) $((tt & 255))
                    ;;
                0201)
                    # ACPI
                    printf "Acpi(0x%x,0x%x)" $(($(getword) + $(getword) * 65536)) $(($(getword) + $(getword) * 65536))
                    ;;
                0303)
                    # FIBRE
                    getword &> /dev/null
                    getword &> /dev/null
                    printf "Fibre(0x%x%x%x%x%x%x%x%x,0x%x)" \
                        "$(getbyte)" "$(getbyte)" "$(getbyte)" "$(getbyte)" \
                        "$(getbyte)" "$(getbyte)" "$(getbyte)" "$(getbyte)" \
                        "$(($(getword) + $(getword) * 65536 + 4294967296 * ($(getword) + $(getword) * 65536)))"
                    ;;
                030b)
                    # MAC
                    printf "MAC(%02x%02x%02x%02x%02x%02x," "$(getbyte)" "$(getbyte)" "$(getbyte)" "$(getbyte)" "$(getbyte)" "$(getbyte)"
                    for ((i = 0; i < 26; i++)); do tt=$(getbyte) || return 1; done
                    printf "0x%x)" "$(getbyte)"
                    ;;
                0314)
                    # VLAN
                    printf "VLAN(%d)" "$(getword)"
                    ;;
                7fff)
                    # END
                    printf "\n"
                    return 0
                    ;;
                *)
                    #printf "Unknown(Type:0x%02x SubType:0x%02x len=%d)\n" "$type" "$subtype" "$len" >&2
                    for ((i = 0; i < len - 4; i++)); do tt=$(getbyte); done
                    ;;
            esac
        done
    } < "$data"
}

get_fcoe_boot_mac() {
    data=${1:-/sys/firmware/efi/efivars/FcoeBootDevice-a0ebca23-5f9c-447a-a268-22b6c158c2ac}
    [ -f "$data" ] || return 1
    local IFS= LC_CTYPE=C tt len type hextype
    {
        getword > /dev/null
        getword > /dev/null
        while :; do
            type=$(getbyte) || return 1
            subtype=$(getbyte) || return 1
            len=$(getword) || return 1
            hextype=$(printf "%02x%02x" "$type" "$subtype")
            case $hextype in
                030b)
                    # MAC
                    printf "%02x:%02x:%02x:%02x:%02x:%02x" "$(getbyte)" "$(getbyte)" "$(getbyte)" "$(getbyte)" "$(getbyte)" "$(getbyte)"
                    for ((i = 0; i < 27; i++)); do tt=$(getbyte) || return 1; done
                    ;;
                7fff)
                    # END
                    return 0
                    ;;
                *)
                    #printf "Unknown(Type:0x%02x SubType:0x%02x len=%d)\n" "$type" "$subtype" "$len" >&2
                    for ((i = 0; i < len - 4; i++)); do tt=$(getbyte); done
                    ;;
            esac
        done
    } < "$data"
}

get_fcoe_boot_vlan() {
    data=${1:-/sys/firmware/efi/efivars/FcoeBootDevice-a0ebca23-5f9c-447a-a268-22b6c158c2ac}
    [ -f "$data" ] || return 1
    local IFS= LC_CTYPE=C tt len type hextype
    {
        getword > /dev/null
        getword > /dev/null
        while :; do
            type=$(getbyte) || return 1
            subtype=$(getbyte) || return 1
            len=$(getword) || return 1
            hextype=$(printf "%02x%02x" "$type" "$subtype")
            case $hextype in
                0314)
                    # VLAN
                    printf "%d" "$(getword)"
                    ;;
                7fff)
                    # END
                    return 0
                    ;;
                *)
                    #printf "Unknown(Type:0x%02x SubType:0x%02x len=%d)\n" "$type" "$subtype" "$len" >&2
                    for ((i = 0; i < len; i++)); do tt=$(getbyte); done
                    ;;
            esac
        done
    } < "$data"
}