Derniers sujets
» Oric Kong en C preview (coup de main demandé)
Mar 18 Sep 2018 - 17:01 par Ladywasky

» Interview de Vincent Baillet
Lun 17 Sep 2018 - 20:31 par didierv

» SCUBA DIVE
Lun 17 Sep 2018 - 1:15 par Symoon

» CEO MAG 338
Dim 16 Sep 2018 - 1:25 par Ladywasky

» Tyrann 2.0 sur Androïd (et facebook,...)
Jeu 6 Sep 2018 - 20:53 par Sheld67

» [PROBLEME] Commande input et générateur aléatoire
Mar 4 Sep 2018 - 4:20 par Ladywasky

» OricSpin : Télécharger et jouer
Lun 3 Sep 2018 - 9:32 par Oric1-Atmos

» fonctions supplémentaires pour OSDK
Jeu 30 Aoû 2018 - 15:46 par Ladywasky

» OricJoy : un frontend pour oricutron, avec support joystick/gamepad
Jeu 30 Aoû 2018 - 0:32 par Ladywasky

» Conversion de oric kong en C
Mer 29 Aoû 2018 - 23:47 par Ladywasky

» **NEW** EDGE for ORIC !!!!
Mer 29 Aoû 2018 - 9:31 par Davros

» Ensemble de Mandelbrot en C et en 10 lignes
Mar 28 Aoû 2018 - 17:18 par TotoShampoin

» Espace de stockage dans le forum
Mar 28 Aoû 2018 - 6:53 par maximus

» LCC65, la Compil pour ORIC
Lun 27 Aoû 2018 - 15:39 par Ladywasky

» defence-force.org ne réponds plus !
Lun 27 Aoû 2018 - 2:36 par Ladywasky

Qui est en ligne ?
Il y a en tout 1 utilisateur en ligne :: 0 Enregistré, 0 Invisible et 1 Invité

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 152 membres enregistrés
L'utilisateur enregistré le plus récent est Legend of Myth

Nos membres ont posté un total de 7169 messages dans 537 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 : 222
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 : 838
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 : 51
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 : 838
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 : 222
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 : 14
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 : 838
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


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