+distro-name() {
+ local x
+ if [[ -f /etc/fedora-release ]]; then
+ echo fedora
+ elif [[ -e /etc/os-release ]]; then
+ sed -rn 's/^ID=(.*)/\1/p' /etc/os-release
+ elif type -p lsb_release &>/dev/null; then
+ # well, this is more standard, but it's 2 ms vs 200 ms
+ x=$(lsb_release -si); echo ${x,,}
+ else
+ echo "unknown distro"
+ return 1
+ fi
+}
+
+distro-name-compat() {
+ local x
+ x=$(distro-name)
+ case $x in
+ trisquel)
+ echo ubuntu
+ ;;
+ *)
+ printf "%s\n" "$x"
+ ;;
+ esac
+}
+
+distro-name-ver() {
+ printf "%s\n" "$(distro-name)$(debian-archive)"
+}
+
+distro-num() {
+ local os_id ver_id
+ os_id=$(awk -F = '$1 == "ID" { print $2 }' /etc/os-release)
+ ver_id=$(awk -F = '$1 == "VERSION_ID" { print $2 }' /etc/os-release | sed 's/"//g')
+ # of VERSION_ID.x, the x matters in ubuntu but not trisquel
+ if [[ $os_id == ubuntu ]]; then
+ printf "%s\n" "$ver_id"
+ else
+ printf "%s\n" "$ver_id" | sed 's/\..*//'
+ fi
+}
+
+debian-archive() {
+ isdeb || return 0
+ local archive expression pri name highpri shortest
+ local policy="${1:-$(apt-cache policy)}" || return $?
+ # a = archive
+ # n = codename
+ # o = origin
+ # c = component (licensing component)
+ # l = label (Debian{,-Security,-Updates})
+ local d
+ d=$(distro-name)
+ # goto b for archive lines we are interested in, a for lines we arent
+ # print priority + archive name. priority is in
+ # the previous line from the archive line.
+ # case insensitive, because $d is lower and we are matching with first char upper
+ read -rd '' expression <<EOF ||:
+/o=$d/I!b a;/l=$d/I!b a;/c=main/!b a b b;
+: a;s/^ *([-0-9]+).*/\1/;h;b;
+: b;s/^.*a=([^,]+).*/ \1/;H;x;s/\n//;p
+EOF
+ while read -r pri name; do
+ # in ubuntu, we get archives like flidas, flidas-updates, all the same pri,
+ # so just pick the shortest one.
+ if [[ ! $highpri ]]; then
+ highpri=$pri;
+ shortest=$name
+ continue
+ fi
+ if [[ $pri != "$highpri" ]]; then
+ break
+ fi
+ if (( ${#shortest} > ${#name} )); then
+ shortest=$name
+ fi
+ done < <(echo "$policy" | sed -rn "$expression" | sort -rn || [[ $? == 141 ]])
+ echo "$shortest"
+}
+
+# formatted for use in pfile() in package-manager-abstractions
+positive-origins() {
+ isdeb || return 0
+ local archive expression pri name highpri shortest policy
+ # In theory we might want a policy subset, we could alter this to pass
+ # it in.
+ policy="(apt-cache policy)"
+ # a = archive
+ # n = codename
+ # o = origin
+ # c = component (licensing component)
+ # l = label (Debian{,-Security,-Updates})
+ read -rd '' expression <<EOF ||:
+/^ *([-0-9]+).*/{s/^ *([-0-9]+).*/\1/;h}
+/^.*o=([^,]+).*/{s/^.*o=([^,]+).*/ \1/;H;x;s/\n//;p}
+EOF
+ origins=
+ while read -r pri name; do
+ if (( pri > 0 )); then
+ if [[ ! $origins ]]; then
+ origins=$name
+ else
+ origins+=,$name
+ fi