workbench/c/ISApnp.c

   1 /* $Id: main.c,v 1.13 2001/05/08 23:14:24 lcs Exp $ */
   2
   3 /*
   4      ISA-PnP -- A Plug And Play ISA software layer for AmigaOS.
   5      Copyright (C) 2001 Martin Blom <martin@blom.org>
   6      Copyright (C) 2009 The AROS Development Team
   7
   8      This library is free software; you can redistribute it and/or
   9      modify it under the terms of the GNU Library General Public
  10      License as published by the Free Software Foundation; either
  11      version 2 of the License, or (at your option) any later version.
  12
  13      This library is distributed in the hope that it will be useful,
  14      but WITHOUT ANY WARRANTY; without even the implied warranty of
  15      MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  16      Library General Public License for more details.
  17
  18      You should have received a copy of the GNU Library General Public
  19      License along with this library; if not, write to the
  20      Free Software Foundation, Inc., 59 Temple Place - Suite 330, Cambridge,
  21      MA 02139, USA.
  22 */
  23
  24 #include <aros/asmcall.h>
  25 #include <dos/dos.h>
  26
  27 #include <proto/exec.h>
  28 #include <proto/dos.h>
  29
  30 #include <resources/isapnp.h>
  31 #include "../../rom/isapnp/isapnp_private.h"
  32
  33 #include "../../rom/isapnp/pnp_structs.h"
  34
  35 #define TEMPLATE "SHOWCONFIG/S,SHOWOPTIONS/S" /*,REMOVE/S"*/
  36
  37 /******************************************************************************
  38 ** Globals ********************************************************************
  39 ******************************************************************************/
  40
  41 struct DosLibrary*     DOSBase       = NULL;
  42 struct ExecBase*       SysBase       = NULL;
  43
  44 static void
  45 ShowCards( BOOL               show_options,
  46            struct ISAPNPBase* res );
  47
  48 static BOOL
  49 OpenLibs( void );
  50
  51 static void
  52 CloseLibs( void );
  53
  54 int
  55 ResourceEntry( void );
  56
  57 /******************************************************************************
  58 ** Startup trampoline *********************************************************
  59 ******************************************************************************/
  60
  61 AROS_UFH3(__startup static int, Start,
  62           AROS_UFHA(char *, argstr, A0),
  63           AROS_UFHA(ULONG, argsize, D0),
  64           AROS_UFHA(struct ExecBase *, sBase, A6))
  65 {
  66     AROS_USERFUNC_INIT
  67
  68     SysBase = sBase;
  69     return ResourceEntry();
  70
  71     AROS_USERFUNC_EXIT
  72 }
  73
  74 /******************************************************************************
  75 ** Resource entry *************************************************************
  76 ******************************************************************************/
  77
  78 int
  79 ResourceEntry( void )
  80 {
  81   struct ISAPNPBase* ISAPNPBase;
  82   struct RDArgs*     rdargs;
  83   int                rc = -1;
  84
  85   struct
  86   {
  87     ULONG   m_ShowConfig;
  88     ULONG   m_ShowOptions;
  89 /*  ULONG   m_Remove;*/
  90   } args = { FALSE, FALSE/*, FALSE*/ };
  91
  92   if( ! OpenLibs() )
  93   {
  94     CloseLibs();
  95     return RETURN_FAIL;
  96   }
  97
  98   ISAPNPBase = (struct ISAPNPBase* ) OpenResource( ISAPNPNAME );
  99
 100   if( ISAPNPBase == NULL )
 101   {
 102     Printf( ISAPNPNAME " not found.\n" );
 103     CloseLibs();
 104     return RETURN_FAIL;
 105   }
 106
 107   rdargs = ReadArgs( TEMPLATE, (LONG *) &args, NULL );
 108
 109   if( rdargs != NULL )
 110   {
 111     if( ! args.m_ShowConfig && args.m_ShowOptions )
 112     {
 113       Printf( "SHOWOPTIONS can only be used together with SHOWCONFIG\n" );
 114       rc = RETURN_ERROR;
 115     }
 116     else
 117     {
 118       if( args.m_ShowConfig )
 119       {
 120         ShowCards( args.m_ShowOptions, ISAPNPBase );
 121         rc = RETURN_OK;
 122       }
 123
 124 /*    if( args.m_Remove )
 125       {
 126         // Dangerous! Only for debugging
 127
 128         FreeISAPNPBase( ISAPNPBase );
 129
 130         ISAPNPBase->m_ConfigDev->cd_Flags  |= CDF_CONFIGME;
 131         ISAPNPBase->m_ConfigDev->cd_Driver  = NULL;
 132         RemResource( ISAPNPBase );
 133
 134         rc = RETURN_OK;
 135       }*/
 136     }
 137
 138     FreeArgs( rdargs );
 139   }
 140
 141   if( rc == -1 )
 142   {
 143     Printf( "Usage: ISA-PnP [ SHOWCONFIG [ SHOWOPTIONS ] ] [ REMOVE ]\n" );
 144     rc = RETURN_ERROR;
 145   }
 146
 147
 148   CloseLibs();
 149
 150   return rc;
 151 }
 152
 153
 154 /******************************************************************************
 155 ** Prints information about all cards on a serial port terminal ***************
 156 ******************************************************************************/
 157
 158 static void
 159 ShowResource( struct ISAPNP_Resource* resource,
 160               struct ISAPNPBase*      res )
 161 {
 162   switch( resource->isapnpr_Type )
 163   {
 164     case ISAPNP_NT_IRQ_RESOURCE:
 165     {
 166       struct ISAPNP_IRQResource* r = (struct ISAPNP_IRQResource*) resource;
 167       int                        b;
 168
 169       Printf( "IRQ" );
 170
 171       for( b = 0; b < 16; ++b )
 172       {
 173         if( r->isapnpirqr_IRQMask & ( 1 << b ) )
 174         {
 175           Printf( " %ld", b );
 176         }
 177       }
 178
 179       Printf( ", type" );
 180
 181       if( r->isapnpirqr_IRQType & ISAPNP_IRQRESOURCE_ITF_HIGH_EDGE )
 182       {
 183         Printf( " +E" );
 184       }
 185
 186       if( r->isapnpirqr_IRQType & ISAPNP_IRQRESOURCE_ITF_LOW_EDGE )
 187       {
 188         Printf( " -E" );
 189       }
 190
 191       if( r->isapnpirqr_IRQType & ISAPNP_IRQRESOURCE_ITF_HIGH_LEVEL )
 192       {
 193         Printf( " +L" );
 194       }
 195
 196       if( r->isapnpirqr_IRQType & ISAPNP_IRQRESOURCE_ITF_LOW_LEVEL )
 197       {
 198         Printf( " -L" );
 199       }
 200
 201       Printf( "\n" );
 202       break;
 203     }
 204
 205     case ISAPNP_NT_DMA_RESOURCE:
 206     {
 207       struct ISAPNP_DMAResource* r = (struct ISAPNP_DMAResource*) resource;
 208       int                        b;
 209
 210       Printf( "DMA" );
 211
 212       for( b = 0; b < 8; ++b )
 213       {
 214         if( r->isapnpdmar_ChannelMask & ( 1 << b ) )
 215         {
 216           Printf( " %ld", b );
 217         }
 218       }
 219
 220       Printf( ", " );
 221       switch( r->isapnpdmar_Flags & ISAPNP_DMARESOURCE_F_TRANSFER_MASK )
 222       {
 223         case ISAPNP_DMARESOURCE_F_TRANSFER_8BIT:
 224           Printf( "8" );
 225           break;
 226
 227         case ISAPNP_DMARESOURCE_F_TRANSFER_BOTH:
 228           Printf( "8 and 16" );
 229           break;
 230
 231         case ISAPNP_DMARESOURCE_F_TRANSFER_16BIT:
 232           Printf( "16" );
 233           break;
 234
 235       }
 236       Printf( " bit transfer, " );
 237
 238       switch( r->isapnpdmar_Flags & ISAPNP_DMARESOURCE_F_SPEED_MASK )
 239       {
 240         case ISAPNP_DMARESOURCE_F_SPEED_COMPATIBLE:
 241           Printf( "compatible" );
 242           break;
 243
 244         case ISAPNP_DMARESOURCE_F_SPEED_TYPE_A:
 245           Printf( "type A" );
 246           break;
 247
 248         case ISAPNP_DMARESOURCE_F_SPEED_TYPE_B:
 249           Printf( "type B" );
 250           break;
 251
 252         case ISAPNP_DMARESOURCE_F_SPEED_TYPE_F:
 253           Printf( "type F" );
 254           break;
 255       }
 256
 257       Printf( " speed." );
 258
 259       if( r->isapnpdmar_Flags & ISAPNP_DMARESOURCE_FF_BUS_MASTER )
 260       {
 261         Printf( " [Bus master]" );
 262       }
 263
 264       if( r->isapnpdmar_Flags & ISAPNP_DMARESOURCE_FF_BYTE_MODE )
 265       {
 266         Printf( " [Byte mode]" );
 267       }
 268
 269       if( r->isapnpdmar_Flags & ISAPNP_DMARESOURCE_FF_WORD_MODE )
 270       {
 271         Printf( " [Word mode]" );
 272       }
 273
 274       Printf( "\n" );
 275
 276       break;
 277     }
 278
 279
 280     case ISAPNP_NT_IO_RESOURCE:
 281     {
 282       struct ISAPNP_IOResource* r = (struct ISAPNP_IOResource*) resource;
 283
 284       if( r->isapnpior_MinBase == r->isapnpior_MaxBase )
 285       {
 286         Printf( "IO at 0x%04lx, length 0x%02lx.",
 287                  r->isapnpior_MinBase, r->isapnpior_Length );
 288       }
 289       else
 290       {
 291         Printf( "IO between 0x%04lx and 0x%04lx, length 0x%02lx, %ld byte aligned.",
 292                  r->isapnpior_MinBase, r->isapnpior_MaxBase, r->isapnpior_Length, r->isapnpior_Alignment );
 293       }
 294
 295       if( ( r->isapnpior_Flags & ISAPNP_IORESOURCE_FF_FULL_DECODE ) == 0 )
 296       {
 297         Printf( " [10 bit decode only]" );
 298       }
 299
 300       Printf( "\n" );
 301       break;
 302     }
 303
 304
 305     case ISAPNP_NT_MEMORY_RESOURCE:
 306       Printf( "Memory\n" );
 307       break;
 308
 309     default:
 310       Printf( "Unknown resource!" );
 311       break;
 312   }
 313 }
 314
 315 static void
 316 ShowResourceGroup( struct ISAPNP_ResourceGroup* resource_group,
 317                    struct ISAPNPBase* res )
 318 {
 319   struct ISAPNP_Resource*      r;
 320   struct ISAPNP_ResourceGroup* rg;
 321
 322   for( r = (struct ISAPNP_Resource*) resource_group->isapnprg_Resources.mlh_Head;
 323        r->isapnpr_MinNode.mln_Succ != NULL;
 324        r = (struct ISAPNP_Resource*) r->isapnpr_MinNode.mln_Succ )
 325   {
 326     Printf( "      " );
 327     ShowResource( r, res );
 328   }
 329
 330   if( resource_group->isapnprg_ResourceGroups.mlh_Head->mln_Succ != NULL )
 331   {
 332     Printf( "    One of\n" );
 333
 334     for( rg = (struct ISAPNP_ResourceGroup*) resource_group->isapnprg_ResourceGroups.mlh_Head;
 335          rg->isapnprg_MinNode.mln_Succ != NULL;
 336          rg = (struct ISAPNP_ResourceGroup*) rg->isapnprg_MinNode.mln_Succ )
 337     {
 338       Printf( "    {\n" );
 339       ShowResourceGroup( rg, res );
 340       Printf( "    }\n" );
 341     }
 342   }
 343 }
 344
 345
 346 static void
 347 ShowCards( BOOL               show_options,
 348            struct ISAPNPBase* res )
 349 {
 350   struct ISAPNP_Card* card;
 351
 352   for( card = (struct ISAPNP_Card*) res->m_Cards.lh_Head;
 353        card->isapnpc_Node.ln_Succ != NULL;
 354        card = (struct ISAPNP_Card*) card->isapnpc_Node.ln_Succ )
 355   {
 356     struct ISAPNP_Device* dev;
 357
 358     Printf( "Card %ld: %s%03lx%lx/%ld ('%s')\n",
 359              card->isapnpc_CSN,
 360              (ULONG) card->isapnpc_ID.isapnpid_Vendor,
 361              card->isapnpc_ID.isapnpid_ProductID,
 362              card->isapnpc_ID.isapnpid_Revision,
 363              card->isapnpc_SerialNumber,
 364              card->isapnpc_Node.ln_Name != NULL ? (ULONG) card->isapnpc_Node.ln_Name
 365                                                 : (ULONG) "" );
 366
 367     Printf( "  PnP version: %ld.%ld\n",
 368             card->isapnpc_MajorPnPVersion,
 369             card->isapnpc_MinorPnPVersion );
 370
 371     Printf( "  Vendor specific version number: %ld.%ld\n",
 372             card->isapnpc_VendorPnPVersion >> 4,
 373             card->isapnpc_VendorPnPVersion & 0x0f );
 374
 375     for( dev = (struct ISAPNP_Device*) card->isapnpc_Devices.lh_Head;
 376          dev->isapnpd_Node.ln_Succ != NULL;
 377          dev = (struct ISAPNP_Device*) dev->isapnpd_Node.ln_Succ )
 378     {
 379       struct ISAPNP_Identifier* id;
 380       struct ISAPNP_Resource*   r;
 381
 382       Printf( "  Logical device %ld: ",
 383                dev->isapnpd_DeviceNumber );
 384
 385       for( id = (struct ISAPNP_Identifier*) dev->isapnpd_IDs.mlh_Head;
 386            id->isapnpid_MinNode.mln_Succ != NULL;
 387            id = (struct ISAPNP_Identifier*) id->isapnpid_MinNode.mln_Succ )
 388       {
 389         Printf( "%s%03lx%lx ",
 390                 (ULONG) id->isapnpid_Vendor,
 391                 id->isapnpid_ProductID,
 392                 id->isapnpid_Revision );
 393       }
 394
 395       if( dev->isapnpd_Node.ln_Name != NULL )
 396       {
 397         Printf( "('%s')", (ULONG) dev->isapnpd_Node.ln_Name );
 398       }
 399
 400       Printf( "\n" );
 401
 402       if( dev->isapnpd_SupportedCommands & ISAPNP_DEVICE_SCF_BOOTABLE )
 403       {
 404         Printf( "    Device is capable of participating in the boot process.\n" );
 405       }
 406
 407       if( dev->isapnpd_SupportedCommands & ISAPNP_DEVICE_SCF_RANGE_CHECK )
 408       {
 409         Printf( "    Device supports IO range checking.\n" );
 410       }
 411
 412       Printf( "    Allocated resources:\n" );
 413
 414       if( dev->isapnpd_Resources.mlh_Head->mln_Succ != NULL )
 415       {
 416         for( r = (struct ISAPNP_Resource*) dev->isapnpd_Resources.mlh_Head;
 417              r->isapnpr_MinNode.mln_Succ != NULL;
 418              r = (struct ISAPNP_Resource*) r->isapnpr_MinNode.mln_Succ )
 419         {
 420           Printf( "      " );
 421           ShowResource( r, res );
 422         }
 423       }
 424       else
 425       {
 426         Printf( "      None.\n" );
 427       }
 428
 429       if( show_options )
 430       {
 431         Printf( "    Requested resources:\n" );
 432         ShowResourceGroup( dev->isapnpd_Options, res );
 433       }
 434     }
 435   }
 436 }
 437
 438 /******************************************************************************
 439 ** OpenLibs *******************************************************************
 440 ******************************************************************************/
 441
 442 BOOL
 443 OpenLibs( void )
 444 {
 445   /* DOS Library */
 446
 447   DOSBase = (struct DosLibrary*) OpenLibrary( "dos.library", 37 );
 448
 449   if( DOSBase == NULL )
 450   {
 451     return FALSE;
 452   }
 453
 454   return TRUE;
 455 }
 456
 457
 458 /******************************************************************************
 459 ** CloseLibs *******************************************************************
 460 ******************************************************************************/
 461
 462 void
 463 CloseLibs( void )
 464 {
 465   CloseLibrary( (struct Library*) DOSBase );
 466
 467   DOSBase       = NULL;
 468 }
 469