workbench/devs/AHI/AddAudioModes/AddAudioModes.c

   1 /*
   2      AddAudioModes - Manipulates AHI's audio mode database
   3      Copyright (C) 1996-2005 Martin Blom <martin@blom.org>
   4
   5      This program is free software; you can redistribute it and/or
   6      modify it under the terms of the GNU General Public License
   7      as published by the Free Software Foundation; either version 2
   8      of the License, or (at your option) any later version.
   9
  10      This program is distributed in the hope that it will be useful,
  11      but WITHOUT ANY WARRANTY; without even the implied warranty of
  12      MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  13      GNU General Public License for more details.
  14
  15      You should have received a copy of the GNU General Public License
  16      along with this program; if not, write to the Free Software
  17      Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
  18 */
  19
  20 #include <config.h>
  21
  22 #include <devices/ahi.h>
  23 #include <graphics/modeid.h>
  24 #include <graphics/gfxbase.h>
  25 #include <intuition/screens.h>
  26 #include <proto/ahi.h>
  27 #include <proto/dos.h>
  28 #include <proto/exec.h>
  29 #include <proto/graphics.h>
  30 #include <proto/intuition.h>
  31 #include <stdlib.h>
  32 #include <limits.h>
  33
  34 #include "version.h"
  35
  36 struct GfxBase       *GfxBase       = NULL;
  37 struct IntuitionBase *IntuitionBase = NULL;
  38 struct Library       *AHIBase       = NULL;
  39 struct MsgPort       *AHImp         = NULL;
  40 struct AHIRequest    *AHIio         = NULL;
  41 BYTE                  AHIDevice     = -1;
  42
  43 #ifdef __AMIGAOS4__
  44 struct AHIIFace      *IAHI          = NULL;
  45 #endif
  46
  47 static const char version[] = "$VER: AddAudioModes " VERS "\n\r";
  48
  49 #define AHIVERSION 4
  50
  51 #define TEMPLATE "FILES/M,QUIET/S,REFRESH/S,REMOVE/S,DBLSCAN/S"
  52
  53 struct {
  54   STRPTR *files;
  55   ULONG   quiet;
  56   ULONG   refresh;
  57   ULONG   remove;
  58   ULONG   dblscan;
  59 } args = {NULL, FALSE, FALSE, FALSE, FALSE};
  60
  61 #ifdef __MORPHOS__
  62 #define IS_MORPHOS 1
  63 #else
  64 #define IS_MORPHOS 0
  65 #endif
  66
  67 void
  68 cleanup( void )
  69 {
  70 #ifdef __AMIGAOS4__
  71   DropInterface((struct Interface*) IAHI);
  72 #endif
  73
  74   if( AHIDevice == 0 )
  75   {
  76     CloseDevice( (struct IORequest *) AHIio );
  77   }
  78
  79   DeleteIORequest( (struct IORequest *) AHIio);
  80   DeleteMsgPort( AHImp );
  81
  82   CloseLibrary( (struct Library*) IntuitionBase );
  83   CloseLibrary( (struct Library*) GfxBase );
  84 }
  85
  86
  87 void
  88 OpenAHI( void )
  89 {
  90   if( AHIDevice != 0 )
  91   {
  92     AHImp = CreateMsgPort();
  93
  94     if( AHImp != NULL )
  95     {
  96       AHIio = (struct AHIRequest *)
  97                   CreateIORequest( AHImp, sizeof( struct AHIRequest ) );
  98
  99       if( AHIio != NULL )
 100       {
 101         AHIio->ahir_Version = AHIVERSION;
 102
 103         AHIDevice = OpenDevice( AHINAME,
 104                                 AHI_NO_UNIT,
 105                                 (struct IORequest *) AHIio,
 106                                 AHIDF_NOMODESCAN );
 107       }
 108     }
 109
 110     if( AHIDevice != 0 )
 111     {
 112       Printf( "Unable to open %s version %ld\n", AHINAME, AHIVERSION );
 113       cleanup();
 114       exit( RETURN_FAIL );
 115     }
 116
 117     AHIBase = (struct Library *) AHIio->ahir_Std.io_Device;
 118
 119 #ifdef __AMIGAOS4__
 120     IAHI = (struct AHIIFace *) GetInterface(AHIBase, "main", 1, NULL);
 121 #endif
 122   }
 123 }
 124
 125 // Disable command line processing
 126 const long __nocommandline=1;
 127
 128 int
 129 main( void )
 130 {
 131   struct RDArgs *rdargs;
 132   int            rc = RETURN_OK;
 133
 134   GfxBase       = (struct GfxBase *) OpenLibrary( GRAPHICSNAME, 37 );
 135   IntuitionBase = (struct IntuitionBase *) OpenLibrary( "intuition.library", 37 );
 136
 137   if( GfxBase == NULL )
 138   {
 139     Printf( "Unable to open %s version %ld\n", GRAPHICSNAME, 37 );
 140     cleanup();
 141     return RETURN_FAIL;
 142   }
 143
 144   if( IntuitionBase == NULL )
 145   {
 146     Printf( "Unable to open %s version %ld\n", "intuition.library", 37 );
 147     cleanup();
 148     return RETURN_FAIL;
 149   }
 150
 151   rdargs = ReadArgs( TEMPLATE , (LONG *) &args, NULL );
 152
 153   if( rdargs != NULL )
 154   {
 155     /* Refresh database */
 156
 157     if( args.refresh && !args.remove )
 158     {
 159       ULONG id;
 160
 161       OpenAHI();
 162
 163       /* First, empty the database */
 164
 165       for( id = AHI_NextAudioID( AHI_INVALID_ID );
 166            id != (ULONG) AHI_INVALID_ID;
 167            id = AHI_NextAudioID( AHI_INVALID_ID ) )
 168       {
 169         AHI_RemoveAudioMode( id );
 170       }
 171
 172       /* Now add all modes */
 173
 174       if( !AHI_LoadModeFile( "DEVS:AudioModes" ) )
 175       {
 176         if( IS_MORPHOS )
 177         {
 178           ULONG res;
 179
 180           /* Be quiet here. - Piru */
 181           APTR *windowptr = &((struct Process *) FindTask(NULL))->pr_WindowPtr;
 182           APTR oldwindowptr = *windowptr;
 183           *windowptr = (APTR) -1;
 184           res = AHI_LoadModeFile( "MOSSYS:DEVS/AudioModes" );
 185           *windowptr = oldwindowptr;
 186
 187           if( !res )
 188           {
 189             if( !args.quiet )
 190             {
 191               PrintFault( IoErr(), "AudioModes" );
 192             }
 193
 194             rc = RETURN_ERROR;
 195           }
 196         }
 197         else
 198         {
 199           if ( !args.quiet )
 200           {
 201             PrintFault( IoErr(), "DEVS:AudioModes" );
 202           }
 203
 204           rc = RETURN_ERROR;
 205         }
 206       }
 207     }
 208
 209     /* Load mode files */
 210
 211     if( args.files != NULL && !args.remove )
 212     {
 213       int i = 0;
 214
 215       OpenAHI();
 216
 217       while( args.files[i] )
 218       {
 219         if( !AHI_LoadModeFile( args.files[i] ) && !args.quiet )
 220         {
 221           PrintFault( IoErr(), args.files[i] );
 222           rc = RETURN_ERROR;
 223         }
 224         i++;
 225       }
 226     }
 227
 228     /* Remove database */
 229
 230     if( args.remove )
 231     {
 232       if( args.files || args.refresh )
 233       {
 234         PutStr( "The REMOVE switch cannot be used together with FILES or REFRESH.\n" );
 235         rc = RETURN_FAIL;
 236       }
 237       else
 238       {
 239         ULONG id;
 240
 241         OpenAHI();
 242
 243         for( id = AHI_NextAudioID( AHI_INVALID_ID );
 244              id != (ULONG) AHI_INVALID_ID;
 245              id = AHI_NextAudioID( AHI_INVALID_ID ) )
 246         {
 247           AHI_RemoveAudioMode( id );
 248         }
 249       }
 250     }
 251
 252     /* Make display mode doublescan (allowing > 28 kHz sample rates) */
 253
 254     if( args.dblscan )
 255     {
 256       ULONG          id;
 257       ULONG          bestid = INVALID_ID;
 258       int            minper = INT_MAX;
 259       struct Screen *screen = NULL;
 260
 261       static const struct ColorSpec colorspecs[] =
 262       {
 263         { 0, 0, 0, 0 },
 264         { 1, 0, 0, 0 },
 265         {-1, 0, 0, 0 }
 266       };
 267
 268       union {
 269         struct MonitorInfo mon;
 270         struct DisplayInfo dis;
 271       } buffer;
 272
 273       for( id = NextDisplayInfo( INVALID_ID );
 274            id != (ULONG) INVALID_ID;
 275            id = NextDisplayInfo( id ) )
 276       {
 277         int period;
 278
 279         if( GetDisplayInfoData( NULL,
 280                                 (UBYTE*) &buffer.dis, sizeof(buffer.dis),
 281                                 DTAG_DISP, id ) )
 282         {
 283           if( !(buffer.dis.PropertyFlags & (DIPF_IS_ECS | DIPF_IS_AA ) ) )
 284           {
 285             continue;
 286           }
 287         }
 288
 289         if( GetDisplayInfoData( NULL,
 290                                 (UBYTE*) &buffer.mon, sizeof(buffer.mon),
 291                                 DTAG_MNTR, id ) )
 292         {
 293           period = buffer.mon.TotalColorClocks * buffer.mon.TotalRows
 294                    / ( 2 * ( buffer.mon.TotalRows - buffer.mon.MinRow + 1 ) );
 295
 296           if( period < minper )
 297           {
 298             minper = period;
 299             bestid = id;
 300           }
 301         }
 302
 303       }
 304
 305       if( bestid != (ULONG) INVALID_ID && minper < 100 )
 306       {
 307         screen = OpenScreenTags( NULL,
 308                                  SA_DisplayID,  bestid,
 309                                  SA_Colors,     &colorspecs,
 310                                  TAG_DONE );
 311       }
 312       else if( ( GfxBase->ChipRevBits0 & (GFXF_HR_DENISE | GFXF_AA_LISA ) ) != 0 )
 313       {
 314         /* No suitable screen mode found, let's bang the hardware...
 315            Using code from Sebastiano Vigna <vigna@eolo.usr.dsi.unimi.it>. */
 316
 317         struct Custom *custom = (struct Custom *) 0xdff000;
 318
 319         custom->bplcon0  = 0x8211;
 320         custom->ddfstrt  = 0x0018;
 321         custom->ddfstop  = 0x0058;
 322         custom->hbstrt   = 0x0009;
 323         custom->hsstop   = 0x0017;
 324         custom->hbstop   = 0x0021;
 325         custom->htotal   = 0x0071;
 326         custom->vbstrt   = 0x0000;
 327         custom->vsstrt   = 0x0003;
 328         custom->vsstop   = 0x0005;
 329         custom->vbstop   = 0x001D;
 330         custom->vtotal   = 0x020E;
 331         custom->beamcon0 = 0x0B88;
 332         custom->bplcon1  = 0x0000;
 333         custom->bplcon2  = 0x027F;
 334         custom->bplcon3  = 0x00A3;
 335         custom->bplcon4  = 0x0011;
 336       }
 337
 338       if( screen != NULL )
 339       {
 340         CloseScreen( screen );
 341       }
 342     }
 343
 344     FreeArgs( rdargs );
 345   }
 346
 347   cleanup();
 348   return rc;
 349 }
 350
 351 #if defined(__mc68000__) && defined(__libnix__)
 352 void __main(void) {}
 353 #endif