home *** CD-ROM | disk | FTP | other *** search
/ Club Amiga de Montreal - CAM / CAM_CD_1.iso / files / 074.lha / AssignDevice / AssignDev.c < prev    next >
Encoding:
C/C++ Source or Header  |  1986-11-20  |  4.9 KB  |  168 lines
  1. /****************************************************************************
  2. * 
  3. * A S S I G N D E V . C
  4. *
  5. *   Duplicate a device in place--Allowing multiple names to a device.
  6. *
  7. *   Phillip Lindsay (c) 1987 Commodore-Amiga, Inc.
  8. *   Unlimited use granted as long as copyright remains intact.
  9. ****************************************************************************/
  10.  
  11. #include <exec/types.h>
  12. #include <exec/nodes.h>
  13. #include <exec/lists.h>
  14. #include <exec/memory.h>
  15. #include <libraries/dos.h>
  16. #include <libraries/dosextens.h>
  17. #include <libraries/filehandler.h>
  18.  
  19.  
  20. #ifdef AZTEC_C
  21. #include <functions.h>
  22. #include <stdio.h>
  23. #else
  24. #include <lattice/stdio.h>
  25. #endif
  26.  
  27. extern  struct  DosLibrary      *DOSBase;
  28.  
  29.  
  30. /*
  31.  * external functions found in "misc.c"
  32.  */
  33. extern  BSTR    ctob();
  34. extern  char    *allocstr(),
  35.                 *btoc(),
  36.                 *strupper();
  37. extern  BOOL    ourdevnode();
  38. extern  BOOL    finddosnode();
  39. extern  VOID    freedev(),
  40.                 dupdev(),
  41.                 adddosnode(),
  42.                 trunc(),
  43.                 memfill(),
  44.                 memcpy();
  45.                 
  46.  
  47. main(argc,argv)
  48. int argc;
  49. char **argv;
  50. {
  51.     struct              RootNode    *rnode;     /* root node pointer        */
  52.     struct              DosInfo     *dinfo;     /* DOS info pointer         */
  53.     register    struct  DeviceNode  *dnode;     /* device entry pointer     */
  54.     register    struct  DeviceNode  *lastdnode; /* last device pointer      */
  55.     char                            *bname,     /* tmp. ptr to bstr         */
  56.                                     name[32],   /* tmp. for device name     */
  57.                                     *oldname,   /* existing device name     */
  58.                                     *newname;   /* new device name          */
  59.     LONG                            error = 1;  /* flag error - 1 initially */
  60.                                     
  61.  
  62.     if(argc == 3)       /* duplicate given device  */
  63.     {
  64.         newname = argv[1];
  65.         trunc(strupper(newname),':');
  66.         
  67.         if( finddosnode(newname) )
  68.         {
  69.             printf("Error: Device %s: already exists.\n",newname);
  70.             exit(0);
  71.         }
  72.         
  73.         oldname = argv[2];
  74.         trunc(strupper(oldname),':');
  75.  
  76.     }
  77.     else if(argc == 2)  /* try and remove specified device */
  78.     {
  79.         oldname = argv[1];
  80.         trunc(strupper(oldname),':');
  81.         newname = NULL;
  82.     }                                        
  83.     else                /* ??? give them usage info */ 
  84.     {
  85.         printf("Usage: %s [new device] [old device]\n",argv[0]);
  86.         printf("       %s [old device]\n",argv[0]);
  87.         exit(0);
  88.     }        
  89.     
  90.    
  91.     rnode   = (struct RootNode *)  DOSBase->dl_Root;        /* find root node */
  92.     dinfo   = (struct DosInfo  *)  BADDR(rnode->rn_Info);   /* now dos info   */
  93.  
  94. /*
  95.  * Here we search for the given device name and once found we will duplicate
  96.  * the entire device data structure.  Then we add a new device node with
  97.  * the supplied name to the device list. If no "newname" is specified the
  98.  * given device is removed from the device list and free memory for the device
  99.  * node and device name. (normally you only delete nodes you created...I do 
  100.  * take precautions to NOT delete existing system devices...I add a key to
  101.  * the end of the device name to flag the device node as being created by
  102.  * ASSIGNDEV. 
  103.  */
  104.     lastdnode = NULL;
  105.     
  106.     if(!newname) 
  107.         printf("Removing Device %s:\n",oldname);
  108.     else
  109.         printf("Duplicating Device %s: -> %s:\n",oldname,newname);
  110.         
  111.     Forbid();          /* protect ourselves */
  112.     
  113.     for(dnode = (struct DeviceNode *) BADDR(dinfo->di_DevInfo); ( dnode );
  114.       dnode = (struct DeviceNode *) BADDR(dnode->dn_Next))
  115.     {
  116.         if( dnode->dn_Type == DLT_DEVICE )  /* Are dealing with a device? */
  117.         {
  118.             bname = (char *) BADDR(dnode->dn_Name);
  119.             memcpy(bname, name, (ULONG)( bname[0] + 1 ) );
  120.             if( !( strcmp( oldname, strupper(btoc(name)) ) ) )
  121.             {
  122.                 error = FALSE;
  123.                 if( newname )
  124.                     dupdev(dnode,newname);
  125.                 else if( lastdnode )
  126.                 {
  127.                     if( ourdevnode(dnode) )
  128.                     {
  129.                         lastdnode->dn_Next = dnode->dn_Next;
  130.                         freedev(dnode);
  131.                     }
  132.                     else
  133.                         error = 2;
  134.                         
  135.                 }
  136.                 else  
  137.                 {
  138.                     if( ourdevnode(dnode) )
  139.                     {
  140.                         dinfo->di_DevInfo = dnode->dn_Next;
  141.                         freedev(dnode);
  142.                     }
  143.                     else
  144.                         error = 2;
  145.                 }
  146.                 
  147.                 break;
  148.             }   
  149.         }
  150.         
  151.         lastdnode = dnode;
  152.     }
  153.  
  154.     Permit(); 
  155.  
  156. if(error == 1) 
  157.     puts("Error: Device not found.");
  158. else if(error == 2)
  159.     puts("Error: Cannot remove device."); 
  160.      
  161. exit(0);
  162.  
  163. }
  164.  
  165. /* eof */
  166.  
  167.  
  168.