allow ei/ik install any package(s) from Korinf

bin/epm

@@ -287,7 +287,7 @@ check_command()
     site|url)                 # HELPCMD: open package's site in a browser (use -p for open packages.altlinux.org site)
         epm_cmd=site
         ;;
-    ei|epminstall|epm-install|selfinstall) # HELPCMD: install or update eepm package from all in one script
+    ei|ik|epminstall|epm-install|selfinstall) # HELPCMD: install package(s) from Korinf (eepm by default)
         epm_cmd=epm_install
         ;;
     print)                    # HELPCMD: print various info, run epm print help for details

bin/epm-epm_install

@@ -20,11 +20,25 @@
 
 load_helper epm-install
 
-epm_epm_install(){
-    assure_exists wget
-    local etersoft_updates_site="http://updates.etersoft.ru/pub/Korinf/$($DISTRVENDOR -e)"
+__epm_korinf_install(){
+    local PACKAGE="$1"
+    local archprefix=""
+    [ "$($DISTRVENDOR -b)" = "64" ] && archprefix="x86_64/"
+    local etersoft_updates_site="http://updates.etersoft.ru/pub/Korinf/$archprefix$($DISTRVENDOR -e)"
     # FIXME: some way to get latest package
-    local download_link=$etersoft_updates_site/$(wget -qO- $etersoft_updates_site/ | grep -m1 -Eo "eepm[^\"]+\.$($DISTRVENDOR -p)" | tail -n1) #"
+    assure_exists wget
+    # TODO: use eget or file with last versions?
+    local download_link=$etersoft_updates_site/$(wget -qO- $etersoft_updates_site/ | grep -m1 -Eo "$PACKAGE[^\"]+\.$($DISTRVENDOR -p)" | tail -n1) #"
 
     pkg_names='' pkg_files='' pkg_urls="$download_link" epm_install
 }
+
+epm_epm_install(){
+    local i
+    local pkglist="$pkg_filenames"
+    # install epm by default
+    [ -n "$pkglist" ] || pkglist="eepm"
+    for i in $pkglist ; do
+        __epm_korinf_install $i
+    done
+}