workbench/c/LoadResource/main.c

   1 /*
   2     Copyright © 2004-2013, The AROS Development Team. All rights reserved.
   3     This file is part of the LoadResource program, which is distributed under
   4     the terms of version 2 of the GNU General Public License.
   5
   6     FIXME:
   7     + Implement LOCK and UNLOCK options. Argument template should then be
   8       changed to "NAME/M,LOCK/S,UNLOCK/S"; if the user doesn't provide NAME,
   9       then all currently locked resources shall be listed.
  10     + Implement support for loading devices, fonts and catalogs.
  11 */
  12
  13 #include <exec/io.h>
  14 #include <proto/exec.h>
  15 #include <proto/dos.h>
  16
  17 #include <string.h>
  18
  19 #include "locale.h"
  20
  21 enum
  22 {
  23     ARG_NAME,
  24     ARG_COUNT
  25 };
  26
  27 #define TEMPLATE     "NAME/M/A"
  28 #define ERROR_HEADER "LoadResource"
  29
  30 BOOL process(CONST_STRPTR name);
  31 BOOL dev_process(CONST_STRPTR name);
  32
  33 int main(void)
  34 {
  35     int            rc              = RETURN_OK;
  36     struct RDArgs *rdargs          = NULL;
  37     IPTR           args[ARG_COUNT] = { 0 };
  38
  39     if ((rdargs = ReadArgs(TEMPLATE, args, NULL)) != NULL)
  40     {
  41         if (args[ARG_NAME] != 0)
  42         {
  43             CONST_STRPTR  *names = (CONST_STRPTR *) args[ARG_NAME],
  44                            name  = NULL;
  45
  46             while ((name = *names++) != NULL)
  47             {
  48                 BOOL res;
  49                 int len = strlen(name);
  50
  51                 if ((len > 7) && (!strcmp(&name[len-7], ".device")))
  52                     res = dev_process(name);
  53                 else
  54                     res = process(name);
  55
  56                 if (!res)
  57                 {
  58                     rc = RETURN_WARN;
  59                 }
  60             }
  61         }
  62         else
  63         {
  64             // FIXME: List currently locked resources.
  65         }
  66
  67         FreeArgs(rdargs);
  68     }
  69     else
  70     {
  71         PrintFault(IoErr(), ERROR_HEADER);
  72         rc = RETURN_FAIL;
  73     }
  74
  75     return rc;
  76 }
  77
  78 BOOL process(CONST_STRPTR name)
  79 {
  80     struct Library *lb = OpenLibrary(name, 0L);
  81
  82     if (lb != NULL)
  83     {
  84         CloseLibrary(lb);
  85         return TRUE;
  86     }
  87     else
  88     {
  89         PutStr(ERROR_HEADER": ");
  90         Printf(_(MSG_ERROR_OPEN_LIBRARY), name);
  91         PutStr("\n");
  92         return FALSE;
  93     }
  94 }
  95
  96 BOOL dev_process(CONST_STRPTR name)
  97 {
  98     struct IORequest req;
  99
 100     memset(&req, 0, sizeof(req));
 101     req.io_Message.mn_Length = sizeof(req);
 102
 103     if (!OpenDevice(name, 0, &req, 0))
 104     {
 105         CloseDevice(&req);
 106         return TRUE;
 107     }
 108
 109     /* There can different errors, but if the device was loaded, it's OK */
 110     if (FindName(&SysBase->DeviceList, name))
 111         return TRUE;
 112
 113     PutStr(ERROR_HEADER": ");
 114     Printf(_(MSG_ERROR_OPEN_DEVICE), name);
 115     PutStr("\n");
 116
 117     return FALSE;
 118 }