Discussion :

[Christophe Fantoni]

Bonjour à tous,

Je travaille sur le portage d'un encodeur MP3, Uzura (c'est japonais), codé en Fortran-90 en pure Pascal. Uzura est en faite une adaptation - pas très fidèle - de l'encodeur MP3 Shine, codé initialement en C. Par rapport à Shine, Uzura intégre quelques innovations qui m'interessent, notamment au niveau du modèle psychoacoustique utilisé...
Le Pascal et le Fortran étant très "proches" sur bien des aspects, j'ai trouvé un petit convertisseur DOS permettant de transformer du Fortran-77 en C/C++ ou en (Turbo) Pascal. Celui-ci fonctionne plutôt bien, bien qu'il soit très dur à trouver sur la toile...
Je recherche actuellement un convertisseur Fortran-90 vers Fortran-77 pour finir ma conversion. Les convertisseurs Fortran-77 vers Fortran-90 sont pourtant légions sur le Net, bien que je n'arrive pas à trouver l'inverse. Si vous aviez une idée (une piste à suivre), ça m'arrangereait bien...à moins que quelqu'un sache ou trouver directement un convertisseur Fortran-90 en Pascal...

Autre solution : l'encodeur MP3 Lame intégre une librairie codé en NASM (assembleur) qui pourrait faire un peu la même chose qu'avec Uzura, la version Fortran de l'encodeur Shine. (sans le petit plus : le modèle psycho-acoustique "original") Si vous aviez une idée pour intégrer l'appel de cette librairie directement en Pascal, ça serait également pas mal...

Dernier point : l'ensemble doit pouvoir tourner sous DOS 16 bits, et l'idée principal est surtout de pouvoir utiliser le modèle psycho acoustique "original" (j'insiste) utilisé par le portage fortran de l'encodeur Shine avec d'autres format de compression... disons, plus libre que le MP3. (à vrai dire, je travaille sur mon propre format de compression, ayant les mêmes caractéristiques que le MP3 et utilisant essentiellement des technologies/algorithmes libre de droit, afin d'éviter les problèmes liés au dépôt de brevet -- et pour cela, je ne peux pas utiliser l'Ogg Vorbis pour bien des raisons qui seraient ici trop longues à expliquer)

Merci d'avance pour vos réponses,

[M.Dlb]

Bon ben bonne chance !!
Je sais qu'on peut inclure du code assembleur venant de Tasm, mais je ne sais rien au sujet de Nasm ( même si ça doit être possible d'intégrer du code Nasm dans TP ). Par contre, il faut passer par les fichiers .obj, ou sinon faire un copier/coller du code directement dans TP...
a+

[Christophe Fantoni]

Bonjour,

Il est vrai que si la démarche avait été facile, je n'aurais rien posté ici... J'aurais pu me débrouiller seul. J'ai pourtant l'habitude d'inclure du code BASM (Assembleur inline) dans mes propres productions mais l'intégration de code assembleur en NASM... je ne l'ai jamais fait...

Il ne faut pas oublier qu'il s'agit ici de ma seconde solution et que je préférerais avant tout porter le code Fortran-90 directement en Pascal. Pour ceux que ça interesse, voici l'url du site japonais (c'est en anglais) traitant de l'encodeur UZURA :
http://members.tripod.co.jp/kitaurawa/index.html

Sur le site, il y a d'ailleurs quelques infos sur le modèle psycho-acoustique utilisé...

J'attends de vos nouvelles avec impatience,

Cordialement,

[M.Dlb]

Et pourquoi ne pas directement traduire à la main le fortran ??
Si tu dis que ça ressemble au pascal, ça doit pas être très compliqué
a+

[Christophe Fantoni]

Bonjour,

A vrai dire, je ne connais pas bien le Fortran-77/90. Ce que j'ai dit dans mon post précédent, c'est ce que j'ai pu lire dans la doc. du convertisseur ou ce que j'ai pu lire au sein même du code. Il y a en effet des similitudes, mais sans plus... d'ou l'aide recherchée...

Merci d'avance,

[M.Dlb]

Voilà en quelques clics de souris, j'ai trouvé un tutoriel chez jussieu :
http://ibm4.cicrp.jussieu.fr/phynum/cours/fortran/introProg_fortran.html

Il existe également un pseudo forum sur developpez.com : http://www.developpez.net/forums/viewforum.php?f=17

Je ne suis pas sûr que ça t'aidera, mais bonne chance !!
a+

[Christophe Fantoni]

Re-bonjour,

A la base, je n'avais pas l'intention d'apprendre le Fortran-90, mais je crois que je devoir passer par là si je veux comprendre comment fonctionne le modèle psychoacoustique (répondant au nom d' "Enoken") qui m'interesse. Le Pascal et le Fortran étant relativement proche, j'espère que ça ira vite... Pour moi, ça sera surement plus facile que de me mettre au C/C++...

Je vais également me mettre à chercher d'autres tutorials car celui proposé par Jussieu est assez "léger" (ce n'est qu'une introduction au Fortran)
Pendant que j'y suis, je chercher un compilateur libre de droit permettant de compiler du Fortran-90. Je sais qu'il existe sous Linux, mais je n'ai rien trouvé pour Windows, mis à part des versions commerciales proposé par Microsoft ou Compaq...

Cordialement,

[M.Dlb]

J'en ai trouvé quelques-uns ici : ftp://ftp.swcp.com/pub/walt/F
Je ne suis pas sûr qu'ils marchent tous...
a+

[Eric Sigoillot]

Que tu n'arrives pas à trouver un convertisseur Fortran-90 vers Fortran-77 ne m'étonne pas des masses.

Car voilà quelques "lacunes" du Fortran-77 :

Fortran does not have records, pointers, user-defined types, scalar types, subintervals, but it has COMPLEX and DOUBLE PRECISION

Fortran 77 does not have WHILE and REPEAT

A bad CASE in Fortran 77. Fortran 77 is not able to nest functions and subroutines and does not permit recursive calls

Ca limite sérieusement.

NASM propose de compiler en 16 bits. Donc, normalement, il ne devrait pas y avoir trop de problèmes. Tout ce qu'il te faut, c'est obtenir un fichier OBJ au format Intel. Et ça, je ne sais pas si NASM le permet. Car il doit effectuer un LINK tout seul, sans rien demander !

Mais il faut aussi que le code assembleur soit du code Dos 16 bits...

Mais généralement, il est difficile de trouver un convertisseur correct. Rares sont les langages qui ont la même "philosophie". Alors à défaut du convertisseur Fortran90->Pascal (sui sait), essaie de voir s'il existe un C->Pascal (...).

Mais la solution la plus sûre reste d'apprendre le langage, même si ce n'est pas forcément un plaisir.

A+

[M.Dlb]

Oula, Fortran 77 a rien du tout, oui !!!!! Pour information, la norme actuelle est le Fortran 95 qui a été adoptée en 1997 ( allez comprendre... )
a+

[Christophe Fantoni]

Bonsoir,

Et merci à tous pour vos réponses. Avant d'aller plus loin dans mes recherches, j'ai voulu compiler aujourd'hui ces sources pour voir de quoi cet encodeur MP3, codé en Fortan, était capable... et là, problème : en effet, les sources proposées par l'auteur du compresseur MP3 Uzura ne sont pas complètes. Je ne peux donc pas créer l'executable (rien n'est indiqué à ce sujet sur le site de l'auteur). A mon avis, soit l'auteur a oublié de mettre certaines sources dans l'archive, soit les sources sont dispo uniquement pour que les "programmeurs en herbe" puissent avoir une idée de la manière de créer un compresseur MP3 en Fortran.
J'ai essayé de contacter son auteur pour le prévenir et visiblement son adresse e-mail n'est plus valide. Bref, je me retrouve un peu dans une impasse. La journée avait pourtant bien commencé puisque je m'étais mis à étudier le Fortran-95 dont la syntaxe est très proche du Pascal. Quelques jours, voire quelques semaines, auraient été amplement suffisant pour que je porte moi-même ce compresseur MP3 directement en Pascal...
Pour l'instant, je cherche donc une solution... sans grand espoir de voir mon idée aboutir. J'ai bien une autre source en C/C++ qui pourrait me permettre d'avancer (un modèle pesychoacoustique similaire), mais le code n'est vraiment pas "propre", pour ne pas dire illisible. (dixit des "spécialistes") Et comme je ne suis pas vraiment un pro du C/C++... A ce rythme là, d'ici quelques mois je serais aussi bon en Pascal, qu'en Fortran, C/C++, Ada, etc... tout ça pour avoir voulu adapté un petit algorithme, d'un langage à un autre...

Salutations,

[M.Dlb]

Mais si le modèle psychoacoustique est inclu dans la source Fortran que tu possède, il suffit juste de la traduire, et pas besoin de tout recompiler...
a+