workbench/devs/monitors/wrapper/wrapper.c

   1 /*
   2     Copyright  1995-2011, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     Desc: Backwards compatibility display driver loader.
   6     Lang: english
   7 */
   8
   9 #include <aros/debug.h>
  10 #include <dos/dosextens.h>
  11 #include <oop/oop.h>
  12 #include <workbench/startup.h>
  13 #include <workbench/workbench.h>
  14 #include <proto/dos.h>
  15 #include <proto/exec.h>
  16 #include <proto/graphics.h>
  17 #include <proto/oop.h>
  18 #include <proto/icon.h>
  19
  20 /************************************************************************/
  21
  22 struct MyArgs
  23 {
  24     STRPTR hidd;
  25     STRPTR lib;
  26 };
  27
  28 extern struct WBStartup *WBenchMsg;
  29
  30 int __nocommandline = 1;
  31
  32 int main(void)
  33 {
  34     BPTR olddir = BNULL;
  35     STRPTR myname;
  36     struct DiskObject *icon;
  37     struct RDArgs *rdargs = NULL;
  38     int res = RETURN_OK;
  39     struct MyArgs args = {NULL};
  40
  41     if (WBenchMsg) {
  42         olddir = CurrentDir(WBenchMsg->sm_ArgList[0].wa_Lock);
  43         myname = WBenchMsg->sm_ArgList[0].wa_Name;
  44     } else {
  45         struct Process *me = (struct Process *)FindTask(NULL);
  46
  47         if (me->pr_CLI) {
  48             struct CommandLineInterface *cli = BADDR(me->pr_CLI);
  49
  50             myname = AROS_BSTR_ADDR(cli->cli_CommandName);
  51         } else
  52             myname = me->pr_Task.tc_Node.ln_Name;
  53     }
  54     D(Printf("Command name: %s\n", myname));
  55
  56     icon = GetDiskObject(myname);
  57     D(Printf("Icon 0x%p\n", icon));
  58
  59     if (icon) {
  60         args.hidd = FindToolType(icon->do_ToolTypes, "CLASS");
  61         args.lib = FindToolType(icon->do_ToolTypes, "LIBRARY");
  62     }
  63
  64     if (!WBenchMsg) {
  65         rdargs = ReadArgs("CLASS=HIDD/A,LIBRARY=LIB", (IPTR *)&args, NULL);
  66         D(Printf("RDArgs 0x%p\n", rdargs));
  67     }
  68
  69     D(Printf("CLASS=%s, LIBRARY=%s\n", args.hidd ? args.hidd : "<none>",
  70              args.lib ? args.lib : "<none>"));
  71
  72     if (args.hidd)
  73     {
  74         OOP_Class *cl;
  75         struct Library *gfxlib = NULL;
  76
  77         cl = OOP_FindClass(args.hidd);
  78         if (!cl)
  79         {
  80             if (args.lib)
  81             {
  82                 gfxlib = OpenLibrary(args.lib, 0);
  83                 if (!gfxlib)
  84                     res = RETURN_ERROR;
  85             }
  86
  87             if (res == RETURN_OK)
  88             {
  89                 cl = OOP_FindClass(args.hidd);
  90                 if (cl)
  91                 {
  92                     if (AddDisplayDriverA(cl, NULL, NULL))
  93                     {
  94                         res = RETURN_FAIL;
  95                     }
  96                 }
  97                 else
  98                     res = RETURN_ERROR;
  99
 100                 if ((res != RETURN_OK) && gfxlib)
 101                     CloseLibrary(gfxlib);
 102             }
 103         }
 104     } else
 105         res = RETURN_ERROR;
 106
 107     if (rdargs)
 108         FreeArgs(rdargs);
 109     if (icon)
 110         FreeDiskObject(icon);
 111     if (olddir)
 112         CurrentDir(olddir);
 113
 114     return res;
 115 }