FFWILL > Delphi/Kylix :Déployer des application Kylix

FFWILL: SoftBB : Déploiement d'application Kylix

Kylix est la version linux de Delphi

la solution proposé est en partie inspirée du site efg à cette page en anglais

Vous êtes super content vous venez de créer l'application du siècle sous linux ou de faire un méga portage windows-linux grâce au super couple delphi kylix. Mais horreur!!! vous lancer votre application est elle vous retourne un

./application_du_siecle :relocation error: ./application_du_siecle : undefined symbol: initPAnsiStrings

Donc voici la solution: En effet sous Kylix le plus petit programme a directement besoin de ses librairies:
C’est comme les applications CLX sous delphi il faut toutes les deployer avec qtinf (au minimum).
Donc sous linux que faire ?

Signaler le chemin de ces librairies par un:

export LD_LIBRARY_PATH=~/kylix3/bin

(on défini comme chemin celui de Kylix)

Et donner les modules à charger (libqtintf et libqt sinon on charge libborqt)

export CLX_USE_LIBQT=1

Donc au final on peut créer un petit script pour lancer l'application:

#!/bin/bash
export LD_PATH=~/kylix3/bin
export CLX_USE_LIBQT=1
./application_du_siecle

Voila pour vous.
Mais si vous distribuer votre application le chemin ~/kylix3/bin n'existera surement pas chez l'utilisateur ( a moins qu'il programme sous kylix3 aussi)
Pour cela dans (la version open de kylix) vous pouvez redistribuer les fichiers avec des liens (pour permetre des mise à jour simplement)
bplbaseclx.so.6.9.0 <--- bplbaseclx.so.6.9
bplvisualclx.so.6.9.0 <--- bplvisualclx.so.6.9
libqt.so.2.3.0 <--- libqt.so.2
libqtintf-6.9.0-qt2.3.so <--- libqtintf-6.9-qt2.3.so
libborqt-6.9.0-qt2.3.so <--- libborqt-6.9-qt2.3.so
libborunwind.so.6.0 (LGPL) <--- libborunwind.so.6 <--- libborunwind.so
libborstl.so.1.0 <--- libborstl.so
libborcrtl.so.1.0 <--- libborcrtl.so.1
(pour de plus amples détailles aller voir le fichier DEPLOY dans kylix3)

Ces fichiers doivent être mis dans le répertoire:
/usr/local/kylix3/bin
Ensuite soit on garde le même system en modifiant le chemin soit si on a l’ accès root au système on ajoute le chemin au fichier /etc/ld.so.sonf
Que l'on recharge avec un

/sbin/ldconfig/

Au final on a un script pour lancer l'application qui est simplement:

#! /bin/bash
export CLX_USE_LIBQT=1
./application_du_siecle

Voila le script final pour installer une application Kylix qui regroupe tout ce qui à été dit avant:

#! /bin/bash

function UserInstall()
{
  echo "installation en tant qu' utlisateur"
  #creer script demarage
  echo "#!/bin/bash">start.sh
  echo "export LD_LIBRARY_PATH=\'./\'">>start.sh
  echo "export CLX_USE_LIBQT=1">>start.sh
  echo "./application" >> start.sh	
  
  echo 'Felicitation votre programme est installé'
}

function RootInstall()
{

  path=/usr/local/kylix3/bin
  echo 'instalation en tant que root'
  echo''
  
  if [ ! -d $path ]; then
     echo ">Crearte directory $path"
     mkdir -p $path
  fi
  
  #libqt
  if [ ! -e $path/libqt.so.2 ]; then
      echo '>copy and link libqt'
      cp ./libqt.so.2.3.0 $path
      ln -s $path/libqt.so.2.3.0 $path/libqt.so.2
  fi
  
  #libqtintf
  if [ ! -e $path/libqtintf-6.9-qt2.3.so ];then
      echo '>copy and link libqtinft'
      cp ./libqtintf-6.9.0-qt2.3.so $path
      ln -s $path/libqtintf-6.9.0-qt2.3.so $path/libqtintf-6.9-qt2.3.so
  fi  
  
  p=`grep "^$path$" /etc/ld.so.conf`
  if [ "$p" != $path ]; then 
      echo '>ajout du nouveau path dans ld.so.conf'
      echo "$path" >>/etc/ld.so.conf 
      /sbin/ldconfig
  fi    
  
  echo '>generation du script de démarage: start.sh'
  echo "#!/bin/bash">start.sh
  echo "export CLX_USE_LIBQT=1">>start.sh
  echo "./application" >> start.sh  
  
  
  echo 'Félicitation votre programme est installé'
}



# programme principal
clear
echo 
echo 
echo '                       instal'
echo
echo

# recherche de tpe d'utilisateur et lance l'insatall corecte
user=`whoami`;
startuser=$user;
boucle=1;
if [ $user != 'root' ]; 
then
  while [ $user != 'root' ] && [ $boucle -eq 1 ] ; 
  do
  	echo 'Voulez vous installer le programme en tant que root (conseiller) [y/n]?'
	read response
		case $response in
            n|N|no|No|NO )
 	        boucle=0;
 	        UserInstall;
 	        ;;
 	    ''|y|Y|yse|Yes|YES )
 	        boucle=0
 	        su root --preserve-environment -c "sh install.sh"
 	        ;;
 	    *)
 	        echo 'réponse incorecte'
	        ;;
        esac
  done;

else
    RootInstall;
fi;

Version Téléchargable