Derniers sujets
» Nettoyage de la base de jeux
Dim 11 Nov 2018 - 19:50 par Dbug

» Traitement de texte
Ven 9 Nov 2018 - 7:51 par Symoon

» Rodmän "SPECIAL MULTI FORMAT TRIPLE CASSETTE"
Jeu 8 Nov 2018 - 21:29 par Dbug

» Le Secret du Tombeau
Jeu 8 Nov 2018 - 19:31 par romu3

» Oric Explorer v2.0.... Bonne et mauvaise nouvelles
Mer 7 Nov 2018 - 23:07 par goyo

» Orix : tester sur oricutron
Mer 7 Nov 2018 - 11:29 par Jede

» le retour du Commodore 64
Lun 5 Nov 2018 - 6:40 par didierv

» rêve de jeu ...
Dim 4 Nov 2018 - 20:54 par goyo

» Grand concours de programmation
Dim 4 Nov 2018 - 8:29 par didierv

» Easter egg dans Honey Kong ?
Dim 4 Nov 2018 - 0:33 par iss

» Psycho III
Dim 4 Nov 2018 - 0:17 par Symoon

» Suppression du module UHF
Sam 3 Nov 2018 - 23:40 par drpsy

» CEO-MAG 341
Sam 3 Nov 2018 - 17:18 par Symoon

» Combien de jeux d'aventure sur oric ?
Jeu 1 Nov 2018 - 18:29 par Dom50

» BLAKE'S 7
Jeu 1 Nov 2018 - 16:05 par didierv

Qui est en ligne ?
Il y a en tout 3 utilisateurs en ligne :: 0 Enregistré, 0 Invisible et 3 Invités

Aucun

Le record du nombre d'utilisateurs en ligne est de 29 le Mer 25 Fév 2015 - 14:01
Connexion

Récupérer mon mot de passe

Statistiques
Nous avons 158 membres enregistrés
L'utilisateur enregistré le plus récent est Djoulz

Nos membres ont posté un total de 7483 messages dans 564 sujets
Portail ORIC




Oricutron: Pb gestion des fichiers .tap

Poster un nouveau sujet   Répondre au sujet

Aller en bas

Oricutron: Pb gestion des fichiers .tap

Message par assinie le Mar 14 Juil 2015 - 16:06

Bonjour,

En testant Tyrann3 avec oricutron, j'ai trouvé 2 bugs dans la gestion des fichiers .tap.
Les problèmes sont situés dans le fichier tape.c:

Premier big::
Dans la fonction tape_load_tap
Code:

  // TAP
  else if (memcmp(oric->tapebuf, "\x16\x16\x16", 3) == 0)
  {
    oric->rawtape = SDL_FALSE;

    // I give up trying to do anything clever.
    // Just allow an extra byte for broken tape images.
    oric->tapelen++;
  }
Ce code a probablement été ajouté pour prendre en compte les fichiers incorrects (ceux à qui il manque le dernier octet), mais dans la fonction tape_patches
Code:

        if( ( oric->cpu.read( &oric->cpu, oric->pch_fd_getname_addr ) != 0 ) &&
            ( oric->autoinsert ) )
        {
          // Only do this if there is no tape inserted, or we're at the
          // end of the current tape, or the filename ends in .TAP, .ORT or .WAV
          if( ( !oric->tapebuf ) ||
              ( oric->tapeoffs >= oric->tapelen ) ||
              ( ( i > 3 ) && ( strcasecmp( &oric->lasttapefile[i-4], ".tap" ) == 0 ) ) ||
              ( ( i > 3 ) && ( strcasecmp( &oric->lasttapefile[i-4], ".ort" ) == 0 ) ) ||
              ( ( i > 3 ) && ( strcasecmp( &oric->lasttapefile[i-4], ".wav" ) == 0 ) ) )
          {
            tape_autoinsert( oric );
            oric->cpu.write( &oric->cpu, oric->pch_fd_getname_addr, 0 );
          }
        }
      }
le test oric->tapeoffs >= oric->tapelen n'est jamais vrai et le  BASIC attend en vain le dernier octet dans le cas d'un fichier incorrect.
Un contournement possible est de remplacer le test par oric->tapeoffs >= oric-tapelen-1
Je n'e pense pas que cette modification entraine d'autres bugs (mais on ne sait jamais)

L'autre solution consiste à ajouter systématiquement l'extension .TAP dans toutes les instructions BASIC, ce qui déclenchera le test   ( i > 3 ) && ( strcasecmp( &oric->lasttapefile[i-4], ".tap" ) == 0 ) ) et force le chargement du fichier. C'est ce que j'avais indiqué pour Tyrann3.

Second bug:
Pour le reproduire:

  1. Mettre deux fichiers dans le répertoire tapes, par exemple PROG1.TAP et PROG2.TAP.
  2. Lancer oricutron
  3. CLOAD "PROG1"
  4. CLOAD "PROG2"

-> Le second fichier n'est jamais chargé.

Le bug est dans la fonction  tape_autoinsert():
Code:

void tape_autoinsert( struct machine *oric )
{
  char *odir;
  int i;

  if( strncmp( (char *)&oric->mem[oric->pch_fd_getname_addr], oric->lasttapefile, 16 ) == 0 )
    oric->mem[oric->pch_fd_getname_addr] = 0;

  // Try and load the tape image
  strcpy( tapefile, oric->lasttapefile );
  i = (int)strlen(tapefile);

  odir = getcwd( NULL, 0 );
  chdir( tapepath );
  tape_load_tap( oric, tapefile );    // <--- Ligne 1088
  if( !oric->tapebuf )
  {
    // Try appending .tap
    strcpy( &tapefile[i], ".tap" );
    tape_load_tap( oric, tapefile );
  }
  if( !oric->tapebuf )
  {
    // Try appending .ort
    strcpy( &tapefile[i], ".ort" );
    tape_load_tap( oric, tapefile );
  }
  
  if( oric->tapebuf )
  {
    // We already inserted this one. Don't re-insert it when we get to the end. */
    oric->lasttapefile[0] = 0;
  }
    
  chdir( odir );
  free( odir );
}

Je pense que c'est parce que tape_autoinsert, en ligne 1088, essaye d'abord de charger un fichier "PROG2" , via la fonction tape_load_tap(), fichier qui n'existe pas.
Le problème est que  oric->tapebuf n'est pas vide (il contient PROG1.TAP) de ce fait les tests suivants ne sont pas satisfaits et on n'essaye pas de charger un fichier avec les extensions .tap ou .ort.

On peut corriger ça en modifiant la fonction tape_patches au mêm niveau que pour le bug précédent, en ajoutant
Code:
if ( oric->tapeoffs >= oric->tapelen -1) tape_eject( oric );
juste avant
Code:
tape_autoinsert( oric );
ou alors, on peut modifier la fonction tape_autoinsert pour qu'elle teste le code de retour de tape_load_tap.
Ce qui donne:
Code:

void tape_autoinsert( struct machine *oric )
{
  char *odir;
  int i;
  SDL_bool tape_found;

  if( strncmp( (char *)&oric->mem[oric->pch_fd_getname_addr], oric->lasttapefile, 16 ) == 0 )
    oric->mem[oric->pch_fd_getname_addr] = 0;

  // Try and load the tape image
  strcpy( tapefile, oric->lasttapefile );
  i = (int)strlen(tapefile);

  odir = getcwd( NULL, 0 );
  chdir( tapepath );
  tape_found = tape_load_tap( oric, tapefile );
  if( !tape_found )
  {
    // Try appending .tap
    strcpy( &tapefile[i], ".tap" );
    tape_found = tape_load_tap( oric, tapefile );
  }
  if( !tape_found )
  {
    // Try appending .ort
    strcpy( &tapefile[i], ".ort" );
    tape_load_tap( oric, tapefile );
  }
  
  if( oric->tapebuf )
  {
    // We already inserted this one. Don't re-insert it when we get to the end. */
    oric->lasttapefile[0] = 0;
  }
    
  chdir( odir );
  free( odir );
}
Je ne sais pas si le dernier test  if( oric->tapebuf ) doit être modifier ou non (ça marche sans le changer).

Le patch complet (pour une révision r644 ou supérieure):
Code:

--- tape.c 2014-11-16 22:53:00.000000000 +0100
+++ tape.c.new 2015-07-14 15:07:14.104774319 +0200
@@ -1075,6 +1075,7 @@
 {
   char *odir;
   int i;
+  SDL_bool tape_found;
 
   if( strncmp( (char *)&oric->mem[oric->pch_fd_getname_addr], oric->lasttapefile, 16 ) == 0 )
     oric->mem[oric->pch_fd_getname_addr] = 0;
@@ -1085,14 +1086,14 @@
 
   odir = getcwd( NULL, 0 );
   chdir( tapepath );
-  tape_load_tap( oric, tapefile );
-  if( !oric->tapebuf )
+  tape_found = tape_load_tap( oric, tapefile );
+  if( !tape_found )
   {
     // Try appending .tap
     strcpy( &tapefile[i], ".tap" );
     tape_load_tap( oric, tapefile );
   }
-  if( !oric->tapebuf )
+  if( !tape_found )
   {
     // Try appending .ort
     strcpy( &tapefile[i], ".ort" );
@@ -1161,7 +1162,7 @@
           // Only do this if there is no tape inserted, or we're at the
           // end of the current tape, or the filename ends in .TAP, .ORT or .WAV
           if( ( !oric->tapebuf ) ||
-              ( oric->tapeoffs >= oric->tapelen ) ||
+              ( oric->tapeoffs >= oric->tapelen -1 ) ||
               ( ( i > 3 ) && ( strcasecmp( &oric->lasttapefile[i-4], ".tap" ) == 0 ) ) ||
               ( ( i > 3 ) && ( strcasecmp( &oric->lasttapefile[i-4], ".ort" ) == 0 ) ) ||
               ( ( i > 3 ) && ( strcasecmp( &oric->lasttapefile[i-4], ".wav" ) == 0 ) ) )

Remarques:

  • J'ai fait ces tests avec la dernière version du SVN (r663).
  • Concernant le permier bug, il semble que la gestion des fichiers incorrects était différente jusqu'à la r638, je n'ai pas vérifier cette révision.
avatar
assinie

Messages : 225
Date d'inscription : 09/02/2014

Revenir en haut Aller en bas

Re: Oricutron: Pb gestion des fichiers .tap

Message par Hialmar le Mar 14 Juil 2015 - 19:04

Merci pour les patchs.

Je vais les appliquer dès que possible.

Edit : Sauf si ISS me bat comme d'habitude Wink


Dernière édition par Hialmar le Mar 14 Juil 2015 - 21:46, édité 1 fois

_________________
Hialmar
Membre du CEO et de Silicium.
avatar
Hialmar
Admin

Messages : 843
Date d'inscription : 03/03/2014
Age : 48
Localisation : Toulouse

Revenir en haut Aller en bas

Re: Oricutron: Pb gestion des fichiers .tap

Message par iss le Mar 14 Juil 2015 - 21:09

Not this time Hialmar Smile. Today is soldering day for me...
avatar
iss

Messages : 57
Date d'inscription : 30/10/2014

Revenir en haut Aller en bas

Re: Oricutron: Pb gestion des fichiers .tap

Message par Hialmar le Mer 22 Juil 2015 - 20:21

J'ai mis les modifs sur le SVN.

Ça marche beaucoup mieux pour Tyrann 3 mais j'ai encore eu un bug tout à l'heure. Il se produit quand on fuit un combat.
Il faut que je cherche d'où ça vient.

Il y a aussi encore des tap qui ne marchent pas avec Oricutron mais qui marchent avec Euphoric comme le Hobbit trouvé sur oric.org.

_________________
Hialmar
Membre du CEO et de Silicium.
avatar
Hialmar
Admin

Messages : 843
Date d'inscription : 03/03/2014
Age : 48
Localisation : Toulouse

Revenir en haut Aller en bas

Re: Oricutron: Pb gestion des fichiers .tap

Message par assinie le Mer 22 Juil 2015 - 21:47

A quel moment tu as un problème de chargement avec le Hobbit?
Je viens de le charger et il démarre correctement.
avatar
assinie

Messages : 225
Date d'inscription : 09/02/2014

Revenir en haut Aller en bas

Re: Oricutron: Pb gestion des fichiers .tap

Message par soft-bug le Mer 22 Juil 2015 - 21:55

Pour faire fonctionner The Hobbit sur Oricutron, sélectionner Oric 1 et non pas Oric Atmos.
avatar
soft-bug
Ministre des Finances

Messages : 15
Date d'inscription : 19/01/2014
Localisation : Colombes (92)

Revenir en haut Aller en bas

Re: Oricutron: Pb gestion des fichiers .tap

Message par Hialmar le Mer 22 Juil 2015 - 22:08

Ah merci je vais essayer.

_________________
Hialmar
Membre du CEO et de Silicium.
avatar
Hialmar
Admin

Messages : 843
Date d'inscription : 03/03/2014
Age : 48
Localisation : Toulouse

Revenir en haut Aller en bas

Re: Oricutron: Pb gestion des fichiers .tap

Message par Contenu sponsorisé


Contenu sponsorisé


Revenir en haut Aller en bas

Revenir en haut

- Sujets similaires

Poster un nouveau sujet   Répondre au sujet
 
Permission de ce forum:
Vous pouvez répondre aux sujets dans ce forum