Magellan Linux

  • Back to homepage
    • /[magellan-source]/branches/mage-next/src/mage4.functions.sh.in

    Diff of /branches/mage-next/src/mage4.functions.sh.in

    Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

    trunk/mage/usr/lib/mage/mage4.functions.sh revision 2271 by niro, Fri Oct 25 07:28:23 2013 UTC branches/mage-next/src/mage4.functions.sh.in revision 2868 by niro, Thu Mar 19 15:29:17 2015 UTC
    # Line 2  Line 2 
    2  # Magellan Linux Installer Functions (mage.functions.sh)  # Magellan Linux Installer Functions (mage.functions.sh)
    3  # $Id$  # $Id$
    4    
     COLRED="\033[1;6m\033[31m"  
     COLGREEN="\033[1;6m\033[32m"  
     COLYELLOW="\033[1;6m\033[33m"  
     COLBLUE="\033[1;6m\033[34m"  
     COLMAGENTA="\033[1;6m\033[35m"  
     COLWHITE="\033[1;6m\033[37m"  
     COLGRAY="\033[0;6m\033[37m"  
     COLBOLD="\033[1m"  
     COLDEFAULT="\033[0m"  
       
     if [[ ${NOCOLORS} = true ]]  
     then  
      COLRED=""  
      COLGREEN=""  
      COLYELLOW=""  
      COLBLUE=""  
      COLMAGENTA=""  
      COLWHITE=""  
      COLGRAY=""  
      COLBOLD=""  
      COLDEFAULT=""  
     fi  
       
    5  mage_setup()  mage_setup()
    6  {  {
    7   [ ! -d ${MROOT}${INSTALLDB} ] && \   [ ! -d ${MROOT}${INSTALLDB} ] && \
    # Line 185  unpack_packages() Line 162  unpack_packages()
    162   if [ ${count_total} -gt 1 ]; then echo; fi   if [ ${count_total} -gt 1 ]; then echo; fi
    163  }  }
    164    
       
    165  # fix_mtime path/to/$mtime/reffile $pathto/file  # fix_mtime path/to/$mtime/reffile $pathto/file
    166  # creates a given reference file and fixes given file  # creates a given reference file and fixes given file
    167  # returns new mtime  # returns new mtime
    # Line 761  remove_database_entry() Line 737  remove_database_entry()
    737   [ ! -f ${magefile} ] && die "remove_database_entry() ${magefile} not exist."   [ ! -f ${magefile} ] && die "remove_database_entry() ${magefile} not exist."
    738    
    739   # remove virtuals only if no other exist   # remove virtuals only if no other exist
    740   if [[ $(count_installed_pkgs --pcat ${pcat} --pname ${pname}) -le 1 ]]   if [[ $(count_installed_pkgs --pcat=${pcat} --pname=${pname}) -le 1 ]]
    741   then   then
    742   # first unregister virtuals   # first unregister virtuals
    743   provide="$(get_value_from_magefile PROVIDE ${magefile})"   provide="$(get_value_from_magefile PROVIDE ${magefile})"
    # Line 790  count_installed_pkgs() Line 766  count_installed_pkgs()
    766   local i   local i
    767    
    768   # very basic getops   # very basic getops
    769   for i in $*   for i in $@
    770   do   do
    771   case $1 in   case ${i} in
    772   --pcat|-c) shift; pcat="$1" ;;   --pcat*) pcat="${i#*=}" ;;
    773   --pname|-n) shift; pname="$1" ;;   --pname*) pname="${i#*=}" ;;
    774   esac   esac
      shift  
    775   done   done
    776    
    777   # sanity checks; abort if not given   # sanity checks; abort if not given
    # Line 1384  convertmirrors() Line 1359  convertmirrors()
    1359    
    1360   # check known uri schemes   # check known uri schemes
    1361   case ${uri} in   case ${uri} in
    1362   http://*|https://*|ftp://*|ftps://*) mirrors="" ;;   http://*|https://*|ftp://*|ftps://*|file://*) mirrors="" ;;
    1363   mirror://*) mirrors="${MIRRORS}"; scheme="mirror://"; addon="/sources" ;;   mirror://*) mirrors="${MIRRORS}"; scheme="mirror://"; addon="/sources" ;;
    1364   package://*) mirrors="${MIRRORS}"; scheme="package://"; addon="/${PACKAGES_SERVER_PATH}" ;;   package://*) mirrors="${MIRRORS}"; scheme="package://"; addon="/${PACKAGES_SERVER_PATH}" ;;
    1365   gnu://*) mirrors="${GNU_MIRRORS}"; scheme="gnu://" ;;   gnu://*) mirrors="${GNU_MIRRORS}"; scheme="gnu://" ;;
    # Line 1451  mdownload() Line 1426  mdownload()
    1426   # get the name of the output file   # get the name of the output file
    1427   outputfile="${mirror##*/}"   outputfile="${mirror##*/}"
    1428    
    1429   wget ${wget_opts} --output-document="${outputdir}/${outputfile}" "${mirror}"   case ${mirror} in
    1430   retval="$?"   file://*)
    1431     cp -v "${mirror//file:\/\/}" "${outputdir}/${outputfile}"
    1432     retval="$?"
    1433     ;;
    1434     *)
    1435     wget ${wget_opts} --output-document="${outputdir}/${outputfile}" "${mirror}"
    1436     retval="$?"
    1437     ;;
    1438     esac
    1439    
    1440   if [[ ${retval} = 0 ]]   if [[ ${retval} = 0 ]]
    1441   then   then
    1442   break   break
    # Line 1472  fetch_packages() Line 1456  fetch_packages()
    1456   local list="$@"   local list="$@"
    1457   local pkgname   local pkgname
    1458   local pkgfile   local pkgfile
    1459     local pcat
    1460     local pname
    1461   local mirr   local mirr
    1462   local magefile   local magefile
    1463   local md5file   local md5file
    # Line 1479  fetch_packages() Line 1465  fetch_packages()
    1465   local count_current   local count_current
    1466   local count_total   local count_total
    1467   local wget_opts   local wget_opts
    1468     local fetching
    1469    
    1470   [ -z "${MIRRORS}" ] && die "You have no mirrors defined. Please edit your ${MAGERC}."   [ -z "${MIRRORS}" ] && die "You have no mirrors defined. Please edit your ${MAGERC}."
    1471    
    # Line 1497  fetch_packages() Line 1484  fetch_packages()
    1484   pkgfile="${pkgname}.${PKGSUFFIX}"   pkgfile="${pkgname}.${PKGSUFFIX}"
    1485   pkgtype="$(get_value_from_magefile PKGTYPE ${magefile})"   pkgtype="$(get_value_from_magefile PKGTYPE ${magefile})"
    1486    
    1487     pcat=$(magename2pcat ${magefile})
    1488     pname=$(magename2pname ${magefile})
    1489     md5file="${MAGEDIR}/${pcat}/${pname}/md5/${pkgname}.md5"
    1490    
    1491   (( count_current++ ))   (( count_current++ ))
    1492   xtitle "[ (${count_current}/${count_total}) Fetching ${pkgfile} ]"   xtitle "[ (${count_current}/${count_total}) Fetching ${pkgfile} ]"
    1493    
    # Line 1516  fetch_packages() Line 1507  fetch_packages()
    1507   continue   continue
    1508   fi   fi
    1509    
    1510   # abort if already exist   # check if FETCHING is required
    1511   if [ -f ${PKGDIR}/${pkgfile} ]   if [ ! -f "${md5file}" ]
    1512     then
    1513     fetching=true
    1514     else
    1515     if mchecksum --rundir "${PKGDIR}" --file "${md5file}" --method md5 &> /dev/null
    1516     then
    1517     # md5's ok, no fetching required
    1518     fetching=false
    1519     else
    1520     fetching=true
    1521     fi
    1522     fi
    1523    
    1524     if [[ ${fetching} = false ]]
    1525   then   then
    1526   echo -ne " ${COLBLUE}***${COLDEFAULT}"   echo -ne " ${COLBLUE}***${COLDEFAULT}"
    1527   echo " fetch complete (${count_current}/${count_total}): ${pkgfile} ... "   echo " fetch complete (${count_current}/${count_total}): ${pkgfile} ... "
    1528   continue   continue
    1529     else
    1530     echo -ne " ${COLBLUE}***${COLDEFAULT}"
    1531     echo -e " fetching (${count_current}/${count_total}): ${pkgfile} ... "
    1532     mdownload --uri "package://${pkgfile}" --dir "${PKGDIR}" || die "Could not download ${pkgfile}"
    1533   fi   fi
    1534    
    1535   echo -ne " ${COLBLUE}***${COLDEFAULT}"   # sanity check, not really needed but to be sure
      echo -e " fetching (${count_current}/${count_total}): ${pkgfile} ... "  
      mdownload --uri "package://${pkgfile}" --dir "${PKGDIR}" || die "Could not download ${pkgfile}"  
    1536   if [ ! -f ${PKGDIR}/${pkgfile} ]   if [ ! -f ${PKGDIR}/${pkgfile} ]
    1537   then   then
    1538   die "Package '${pkgfile}' after download not found in '${PKGDIR}'"   die "Package '${pkgfile}' after download not found in '${PKGDIR}'"
    # Line 1677  cleanpkg() Line 1683  cleanpkg()
    1683   fi   fi
    1684  }  }
    1685    
     xtitle()  
     {  
      if [[ ${TERM} = xterm ]]  
      then  
      echo -ne "\033]0;Mage: $1\007"  
      fi  
      return 0  
     }  
       
       
     xtitleclean()  
     {  
      if [[ ${TERM} = xterm ]]  
      then  
      echo -ne "\033]0;\007"  
      fi  
      return 0  
     }  
       
       
    1686  # unused?  # unused?
    1687  #  #
    1688  # # cuts full pathnames or versionized names down to basename  # # cuts full pathnames or versionized names down to basename
    # Line 1736  pname2pcat() Line 1722  pname2pcat()
    1722   echo "${categorie}"   echo "${categorie}"
    1723  }  }
    1724    
     # check_stable_package /path/to/foo.mage  
     # returns 0=stable 1=unstable  
     check_stable_package()  
     {  
      # first check if this magefile is not blacklisted  
      blacklisted "$1" || return 1  
       
      local STATE  
      STATE="$(get_value_from_magefile STATE "$1")"  
       
      # state testing  
      if [[ ${USE_TESTING} = true ]] || [[ ${MAGE_DISTRIBUTION} = testing ]]  
      then  
      case ${STATE} in  
      testing|stable) return 0 ;;  
      *) return 1 ;;  
      esac  
      fi  
       
      # state unstable  
      if [[ ${USE_UNSTABLE} = true ]] || [[ ${MAGE_DISTRIBUTION} = unstable ]]  
      then  
      case ${STATE} in  
      unstable|testing|stable) return 0 ;;  
      *) return 1 ;;  
      esac  
      fi  
       
      # no use_state given = stable  
      case ${STATE} in  
      stable) return 0 ;;  
      *) return 1 ;;  
      esac  
     }  
       
       
    1725  # get_highest_magefile ${PCAT} ${PNAME}  # get_highest_magefile ${PCAT} ${PNAME}
    1726  # fake at moment returns only stable pkgs (must set to be one)  # returns $HIGHEST_MAGEFILE
     # return $HIGHEST_MAGEFILE  
    1727  get_highest_magefile()  get_highest_magefile()
    1728  {  {
    1729   local HIGHEST_MAGEFILE   local pcat="$1"
    1730   local PCAT="$1"   local pname="$2"
      local PNAME="$2"  
      local magefile  
       
      # do not list the content of a directory, only the name (-d)  
      for magefile in $(ls --format=single-column -v -d ${MAGEDIR}/${PCAT}/${PNAME}/* 2> /dev/null)  
      do  
      [[ -z ${magefile} ]] && continue  
      # we exclude subdirs (for stuff like a md5sum dir)  
      [[ -d ${magefile} ]] && continue  
      if check_stable_package ${magefile}  
      then  
      HIGHEST_MAGEFILE=${magefile}  
      #for debug only  
      mqueryfeature "debug" && echo "HIGHEST_MAGEFILE=${HIGHEST_MAGEFILE}" >&2  
      fi  
      done  
    1731    
    1732   echo "${HIGHEST_MAGEFILE}"   ${MLIBDIR}/highest_magefile ${MAGEDIR}/${pcat}/${pname}
    1733   return 0   return 0
    1734  }  }
    1735    
       
    1736  ###################################################  ###################################################
    1737  # function is_config_protected                    #  # function is_config_protected                    #
    1738  #       is_config_protected /path/to/file         #  #       is_config_protected /path/to/file         #
    # Line 2234  sminclude() Line 2166  sminclude()
    2166   then   then
    2167   for i in $*   for i in $*
    2168   do   do
    2169   echo "--- Including ${SMAGESCRIPTSDIR}/include/${i}.sminc"   [[ ${SILENT} = 1 ]] || echo "--- Including ${SMAGESCRIPTSDIR}/include/${i}.sminc"
    2170   source ${SMAGESCRIPTSDIR}/include/${i}.sminc   source ${SMAGESCRIPTSDIR}/include/${i}.sminc
    2171   done   done
    2172   echo   [[ ${SILENT} = 1 ]] || echo
    2173   fi   fi
    2174  }  }
    2175    
    # Line 2264  is_newer_mage_version_available() Line 2196  is_newer_mage_version_available()
    2196   fi   fi
    2197  }  }
    2198    
       
    2199  # returns pname from pkgname  # returns pname from pkgname
    2200  # pkgname2pname $PKGNAME  # pkgname2pname $PKGNAME
    2201  pkgname2pname()  pkgname2pname()
    # Line 2541  get_value_from_magefile() Line 2472  get_value_from_magefile()
    2472   local SDEPEND   local SDEPEND
    2473   local PROVIDE   local PROVIDE
    2474   local PKGTYPE   local PKGTYPE
      local MAGE_TARGETS  
    2475   local SPLIT_PACKAGE_BASE   local SPLIT_PACKAGE_BASE
    2476   local preinstall   local preinstall
    2477   local postinstall   local postinstall
    # Line 2663  mage_install() Line 2593  mage_install()
    2593   echo B:${pbuild}   echo B:${pbuild}
    2594   fi   fi
    2595    
    2596   if [[ -n ${MAGE_TARGETS} ]]   if [[ -n ${SPLIT_PACKAGE_BASE} ]]
      then  
      # basic svn compat  
      if [[ -d ${SMAGESCRIPTSDIR}/.svn ]]  
      then  
      for i in ${SMAGESCRIPTSDIR}/*/${pname/${MAGE_TARGETS}/}/${pname/${MAGE_TARGETS}/}-${pver}-${pbuild}.smage2  
      do  
      smage2file="${i}"  
      done  
      else  
      smage2file=${SMAGESCRIPTSDIR}/${pname/${MAGE_TARGETS}/}/${pname/${MAGE_TARGETS}/}-${pver}-${pbuild}.smage2  
      fi  
       
      elif [[ -n ${SPLIT_PACKAGE_BASE} ]]  
    2597   then   then
    2598   # basic svn compat   # basic svn compat
    2599   if [[ -d ${SMAGESCRIPTSDIR}/.svn ]]   if [[ -d ${SMAGESCRIPTSDIR}/.svn ]]
    # Line 2763  mage_install() Line 2680  mage_install()
    2680   then   then
    2681   echo -ne "${COLBLUE} *** ${COLDEFAULT}"   echo -ne "${COLBLUE} *** ${COLDEFAULT}"
    2682   echo -n "rebuilding environment ... "   echo -n "rebuilding environment ... "
    2683   ${MLIBDIR}/env-rebuild.sh > /dev/null && \   ${MLIBDIR}/env-rebuild > /dev/null && \
    2684   echo "done." || echo "failure."   echo "done." || echo "failure."
    2685   unset MAGE_ENV_REBUILD   unset MAGE_ENV_REBUILD
    2686   fi   fi
    # Line 3028  mage_uninstall() Line 2945  mage_uninstall()
    2945   then   then
    2946   echo -ne "${COLBLUE} *** ${COLDEFAULT}"   echo -ne "${COLBLUE} *** ${COLDEFAULT}"
    2947   echo -n "rebuilding environment ... "   echo -n "rebuilding environment ... "
    2948   ${MLIBDIR}/env-rebuild.sh > /dev/null && \   ${MLIBDIR}/env-rebuild > /dev/null && \
    2949   echo "done." || echo "failure."   echo "done." || echo "failure."
    2950   unset MAGE_ENV_REBUILD   unset MAGE_ENV_REBUILD
    2951   fi   fi
    # Line 3046  mage_uninstall() Line 2963  mage_uninstall()
    2963   unset -f postremove   unset -f postremove
    2964  }  }
    2965    
    2966    # rerun_pkgfunctions [method] pkg1 pkg2 pkg3
    2967    rerun_pkgfunctions()
    2968    {
    2969     local method
    2970     local list
    2971     local pcat
    2972     local pname
    2973     local pver
    2974     local pbuild
    2975     local magefile
    2976     local i
    2977    
    2978     # very basic getops
    2979     case $1 in
    2980     --method) shift; method="$1" ;;
    2981     esac
    2982     shift
    2983     local list="$@"
    2984    
    2985     # sanity check
    2986     case ${method} in
    2987     preinstall|postinstall) ;;
    2988     preremove|postremove) ;;
    2989     *) die "rerun_pkgfunctions(): Unknown method '${method}'." ;;
    2990     esac
    2991    
    2992     if [[ -n ${MROOT} ]]
    2993     then
    2994     echo -ne ${COLRED}
    2995     echo "!! running in MROOT=${MROOT}"
    2996     echo -ne ${COLDEFAULT}
    2997     echo
    2998     fi
    2999    
    3000     for pkg in ${list}
    3001     do
    3002     pcat=$(dep2pcat ${pkg})
    3003     pname=$(magename2pname ${pkg})
    3004     pver=$(magename2pver ${pkg})
    3005     pbuild=$(magename2pbuild ${pkg})
    3006     magefile="${MROOT}${INSTALLDB}/${pcat}/${pname}-${pver}-${pbuild}/${pname}-${pver}-${pbuild}.mage"
    3007    
    3008     if [ -e ${magefile} ]
    3009     then
    3010     source ${magefile}
    3011     if [ -n "$(typeset -f ${method})" ]
    3012     then
    3013     echo -e " ${COLBLUE}***${COLDEFAULT} running ${method} for ${pkg} ... "
    3014     ${method}
    3015     else
    3016     echo "No ${method}() for pkg '${pkg}' defined. Doing nothing."
    3017     fi
    3018     unset -f preinstall postinstall preremove postremove
    3019     else
    3020     die "Magefile '${magefile}' does not exist."
    3021     fi
    3022     done
    3023    }
    3024    
    3025  show_etc_update_mesg()  show_etc_update_mesg()
    3026  {  {
    3027   [ ${MAGE_PROTECT_COUNTER} -eq 0 ] && return 0   [ ${MAGE_PROTECT_COUNTER} -eq 0 ] && return 0
    # Line 3385  known_mage_feature() Line 3361  known_mage_feature()
    3361   kernelsrcunpack|!kernelsrcunpack) retval=0 ;;   kernelsrcunpack|!kernelsrcunpack) retval=0 ;;
    3362   libtool|!libtool) retval=0 ;;   libtool|!libtool) retval=0 ;;
    3363   linuxsymlink|!linuxsymlink) retval=0 ;;   linuxsymlink|!linuxsymlink) retval=0 ;;
    3364     multilib|!multilib) reval=0 ;;
    3365   pkgbuild|!pkgbuild) retval=0 ;;   pkgbuild|!pkgbuild) retval=0 ;;
    3366   pkgdistrotag|!pkgdistrotag) retval=0 ;;   pkgdistrotag|!pkgdistrotag) retval=0 ;;
    3367     pkgmetadata|!pkgmetadata) retval=0 ;;
    3368   purge|!purge) retval=0 ;;   purge|!purge) retval=0 ;;
    3369   qalint|!qalint) retval=0 ;;   qalint|!qalint) retval=0 ;;
    3370   regentree|!regentree) retval=0 ;;   regentree|!regentree) retval=0 ;;
    # Line 3457  msetfeature() Line 3435  msetfeature()
    3435   MAGE_FEATURES_CURRENT=( ${MAGE_FEATURES_CURRENT[*]} "${feature}" )   MAGE_FEATURES_CURRENT=( ${MAGE_FEATURES_CURRENT[*]} "${feature}" )
    3436   fi   fi
    3437    
    3438   export MAGE_FEATURE_CURRENT   export MAGE_FEATURES_CURRENT
    3439   done   done
    3440  }  }
    3441    
    Legend:
    Removed from v.2271  
    changed lines
      Added in v.2868