Comment récupérer la version ODS de Firebird sous Lazarus et quelle est votre solution ?

Pour une mise à jour de mon application, avec une nouvelle version de FireBird de 2.5 à 3.0. Je cherche le moyen de récupérer la version ODS (On-Disk-Structure) de Firebird dans mon application. L’utilisateur déplacera sa base de données version 2.5 pour la nouvelle application et l’application contrôle la version ODS, afin d’utiliser une méthode pour modifier l’ODS et d’autres particularités de la base de données.
Pour les deux possibilités ci-dessous, il faut que la base soit connectée, j’ai donc le message d’erreur avant de pouvoir lire ODS.
• IBConnection1.ODSMajorVersion
• select MON$ODS_MAJOR from MON$DATABASE;
Je pourrais aussi utiliser ceci :
Mais je ne sais pas récupérer le retour de gStat.exe

Code:

---

1 2 3 4

ShellExecute (0,nil,PChar (ExtractFilepath(ParamStr(0))+'gStat.exe'), PChar('-h '+_DataSource), nil, SW_HIDE )

---

Demander à l’utilisateur de manipuler les fichiers de la base de données et d’utiliser ces procédures suivant ce lien pour modifier l’ODS me paraît difficile pour l’utilisateur.
https://github.com/jaclas/Firebird-O...o-12-converter
Merci de vos réponses.

Bonsoir,

Citation:

---

Envoyé par Patrick25300

Mais je ne sais pas récupérer le retour de gStat.exe

---

lecture puis suivre le 1^er lien de la section Exemple, et commencer doucement par faire des essais pour se familiariser avec le composant.

Bonjour,

Voilà une discussion qui aurait peut-être plus sa place sur le forum Firebird.
Une base FB2.5 n'est pas lisible sur une installation FB3 et réciproquement.
Pour passer une base de la version FB2.5 à la version FB3, il peut d'abord être nécessaire de corriger le code de certaines procédures stockées et triggers. En général ce ne sont que certaines "facilités" qui ne sont plus autorisées en FB3, donc peu de problèmes à ce niveau.
Mais le plus important, c'est qu'il faut effectuer un backup de la base avec FB2.5, qu'on devra restaurer avec FB3.
Si vous voulez que l'opération soit faite automatiquement par l'utilisateur sur son PC, il faut donc que les 2 versions de Firebird soient accessibles depuis le PC de cet utilisateur, chacune sur un port différent, ou une embarquée l'autre comme service. Si la connexion en FB3 n'est pas possible, c'est que la base est en FB2.5 donc effectuer son backup et le restaurer avec FB3
Je ne sais pas qui sont vos utilisateurs, mais pensez-vous possible de leur demander cette préparation? Si oui n'est-il pas plus simple de leur demander d'effectuer le backup de leur base avant de muter l'installation en FB3?
Dans un cas similaire c'est ce que j'ai fait, avec en option de secours, la possibilité d'installer une petite application de backup s'installant avec FB2.5 embedded.

André

Bonjour

Merci Jipété de m'informer de TProcess, j'ai vu les exemples, ça me paraît pas très compliqué, je vais creuser pour voir.

Merci alanglet, j'ai mis cette discussion sur Lazarus, car le problème est pour moi, plus du coté de Lazarus que de Firebird. Du coté de Firebird j'ai bien compris la différence entre les versions. Je diffuse mes applications en shareware, donc mes utilisateurs peut-être n'importent qui, c'est là la plus grande difficulté.
Vous avez raison, Je pense utiliser une petite application de backup et de mise à jour de la base de données dans le principe de ce lien https://github.com/jaclas/Firebird-O...o-12-converter

Donc deux installations de Firebird la 2.5 et la 3.0 et d'utiliser un nom différent de la base de données à chaque modification de celle-ci, un code pour l'ODS et un pour mes versions par exemple: "BaseToto_ODS110_V40.FDB", je n'avais pas eu ce problème jusqu'à maintenant, j'ai toujours utilisé la version firebird 2.5.
La base de données de Firebird 2.5 fonctionne très bien avec la version 3.0, bien sur en ayant utilisé "gStat.exe" pour le changement de l'ODS.
Je vous remercie vous deux de m'avoir guidé dans mes choix.
Bonne journée

Citation:

---

Envoyé par Patrick25300

Merci Jipété de m'informer de TProcess, j'ai vu les exemples, ça me paraît pas très compliqué, je vais creuser pour voir.

---

Ben oui, 8-)

Et moi qui ne connais rien aux bases de données et autre gStat.exe qui doit tourner sous Windows, comme je suis sous Linux, j'aimerais bien voir la sortie de cet outil dans la console, à l'occasion, que tu pourras poster ici par copier/coller, si ce n'est pas indiscret.
Merci,

Voici la sortie console de gStat.exe
Ci-dessous gStat lit une base de données qui n'est pas compatible avec sa version, c'est une base de données de Firebird 2.5 alors que gStat c'est la version de FireBird 3.0

Code:

---

1 2 3 4 5 6

d:\Bases\fb30>gStat.exe -h base.fdb Wrong ODS version, expected 12, encountered 11   d:\Bases\fb30>pause Appuyez sur une touche pour continuer...

---

Ci-dessous avec la même base de données mais avec l'ODS qui est de la version 3.0 de Firebird qui a été modifiées en faisant un gBack en utilisant la sauvegarde avec la version 2.5 de Firebird et une restauration avec la version 3.0 de Firebird qui du coup change l'ODS.

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34

d:\Bases\fb30>gStat.exe -h new.fdb   Database "D:\BASES\FB30\NEW.FDB" Gstat execution time Thu Feb 23 09:59:01 2023   Database header page information: Flags 0 Generation 39 System Change Number 0 Page size 16384 ODS version 12.0 Oldest transaction 29 Oldest active 30 Oldest snapshot 30 Next transaction 30 Sequence number 0 Next attachment ID 6 Implementation HW=Intel/i386 little-endian OS=Windows CC=MSVC Shadow count 0 Page buffers 0 Next header page 0 Database dialect 3 Creation date Feb 23, 2023 9:56:42 Attributes force write   Variable header data: Sweep interval: 20000 *END* Gstat completion time Thu Feb 23 09:59:01 2023     d:\Bases\fb30>pause Appuyez sur une touche pour continuer...

---

J'espère avoir répondu à ta question.

Citation:

---

Envoyé par Patrick25300

J'espère avoir répondu à ta question.

---

Oui, merci, parfait.


Mais je ne sais pas si ceci ne va pas poser de problème avec le TProcess :

Citation:

---

Envoyé par Patrick25300

Code:

---

1 2	d:\Bases\fb30>pause Appuyez sur une touche pour continuer...

---

---

Pour un test rapide, il suffira de commenter la ligne en question, et la sortie devrait pouvoir se retrouver dans une stringlist, qu'il suffira d'analyser ensuite.
Pour savoir si la stringlist est bien chargée, il suffira de la recopier dans un memo posé temporairement sur la fiche.

À toi de jouer, et à ton service en cas de pb avec TProcess.

Bonsoir,

Tiens, d'un coup l'idée lumineuse du soir :

Si j'étais toi, pour démarrer l'apprentissage avec TProcess et éviter de trafiquer dans le système de base de données, je me bricolerais un exécutable Windows à partir de Lazarus et dont le seul boulot serait d'afficher dans la console les lignes que tu nous as données recopiées dans un TMemo, une version ou l'autre, à charge pour ton programme principal basé sur TProcess d'appeler cet exécutable puis de récupérer les lignes et les afficher.

Quand tu en seras là, tu auras fait les 99 % du boulot, et sans risque pour tes BdD's.

C'est en gros une simulation de la vraie vie.

Je pense qu'il faut enlever "Pause", c'est juste pour voir l'affichage de l'écran. sans "pause" on ne peut pas lire le résultat.

Merci Jipété, effectivement avec TProcess et un mémo il serait possible de lire l'ODS.
Mais comme mon application, depuis 2014 utilise FireBird 2.5, le nom de la base de données à toujours été le même, j'ai plus qu'a changer le nom de la base afin que je sache la version de l'ODS et la version perso, comme l'exemple dans le message ci-dessus. En fait, c'est une idée basique qui est très simple mais très sûre :D:D; comme on dit, pourquoi faire compliqué, quand on peut faire simple.
Bonne soirée.