arch/all-hosted/hidd/x11/x11_init.c

   1 /*
   2     Copyright © 1995-2009, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     Desc: X11 hidd initialization code.
   6     Lang: English.
   7 */
   8
   9 #define __OOP_NOATTRBASES__
  10
  11 #include <stddef.h>
  12 #include <stdio.h>
  13 #include <stdlib.h>
  14 #include <string.h>
  15
  16 #include <exec/types.h>
  17
  18 #include <proto/exec.h>
  19 #include <proto/oop.h>
  20
  21 #include <utility/utility.h>
  22 #include <oop/oop.h>
  23 #include <hidd/graphics.h>
  24
  25 #include <aros/symbolsets.h>
  26
  27 #undef  SDEBUG
  28 #undef  DEBUG
  29 #define DEBUG 0
  30 #include <aros/debug.h>
  31
  32 #include LC_LIBDEFS_FILE
  33
  34 #include "x11.h"
  35 #include "fullscreen.h"
  36
  37 /****************************************************************************************/
  38
  39 #undef XSD
  40
  41 /****************************************************************************************/
  42
  43 static BOOL initclasses( struct x11_staticdata *xsd );
  44 static VOID freeclasses( struct x11_staticdata *xsd );
  45 struct Task *create_x11task( struct x11task_params *params);
  46 VOID x11task_entry(struct x11task_params *xtp);
  47
  48 /****************************************************************************************/
  49
  50 static OOP_AttrBase HiddPixFmtAttrBase;
  51
  52 static struct OOP_ABDescr abd[] =
  53 {
  54     { IID_Hidd_PixFmt   , &HiddPixFmtAttrBase   },
  55     { NULL              , NULL                  }
  56 };
  57
  58 /****************************************************************************************/
  59
  60 static BOOL initclasses(struct x11_staticdata *xsd)
  61 {
  62     /* Get some attrbases */
  63
  64     if (!OOP_ObtainAttrBases(abd))
  65         goto failure;
  66
  67     return TRUE;
  68
  69 failure:
  70     freeclasses(xsd);
  71
  72     return FALSE;
  73 }
  74
  75 /****************************************************************************************/
  76
  77 static VOID freeclasses(struct x11_staticdata *xsd)
  78 {
  79     OOP_ReleaseAttrBases(abd);
  80 }
  81
  82 /****************************************************************************************/
  83
  84 static int MyErrorHandler (Display * display, XErrorEvent * errevent)
  85 {
  86     char buffer[256];
  87
  88 #if USE_XSHM
  89     extern int xshm_major;
  90
  91     if ((xshm_major != 0) && (errevent->request_code == xshm_major) &&
  92         (errevent->minor_code == 4) && /* XShmGetImage */
  93         (errevent->error_code == BadMatch))
  94     {
  95         /* Ignore this error */
  96
  97         return 0;
  98     }
  99 #endif
 100
 101     XCALL(XGetErrorText, display, errevent->error_code, buffer, sizeof (buffer));
 102
 103     kprintf("XError %d (Major=%d, Minor=%d) task = %s\n%s\n",
 104             errevent->error_code,
 105             errevent->request_code,
 106             errevent->minor_code,
 107             FindTask(0)->tc_Node.ln_Name,
 108             buffer);
 109
 110     return 0;
 111 }
 112
 113 /****************************************************************************************/
 114
 115 static int MySysErrorHandler (Display * display)
 116 {
 117     perror ("X11-Error");
 118
 119     // *((ULONG *)0) = 0;
 120
 121     return 0;
 122 }
 123
 124 /****************************************************************************************/
 125
 126 static int X11_Init(LIBBASETYPEPTR LIBBASE)
 127 {
 128     struct x11_staticdata *xsd = &LIBBASE->xsd;
 129
 130     D(bug("Entering X11_Init\n"));
 131     if (LIBBASE->library.lib_OpenCnt) {
 132         D(bug("[X11GFX] Already initialized\n"));
 133         return TRUE;
 134     }
 135
 136     InitSemaphore( &xsd->sema );
 137     InitSemaphore( &xsd->x11sema );
 138
 139     /* Do not need to singlethead this
 140      * since no other tasks are using X currently
 141      */
 142
 143     xsd->display = XCALL(XOpenDisplay, NULL);
 144     D(bug("display(%x)\n", xsd->display));
 145     if (xsd->display)
 146     {
 147         struct x11task_params    xtp;
 148         struct Task             *x11task;
 149
 150         XCALL(XSetErrorHandler, MyErrorHandler);
 151         XCALL(XSetIOErrorHandler, MySysErrorHandler);
 152
 153         /*
 154          * XXX on my system, getenv() is declared:
 155          *
 156          * extern char *getenv (__const char *__name) __THROW __nonnull ((1)) * __wur;
 157          *
 158          * the attributes appear to change the calling convention, so a naive
 159          * prototype like char *getenv(char *) causes carshes as the returned
 160          * address is not a valid pointer.
 161          *
 162          * ideally this configration variable would be brought in via a
 163          * bootloader.resource, which hosted doesn't have yet
 164          */
 165         /*
 166         if (getenv, "AROS_X11_FULLSCREEN")
 167         {
 168             xsd->fullscreen = x11_fullscreen_supported(xsd->display);
 169         }
 170         */
 171
 172         xsd->delete_win_atom         = XCALL(XInternAtom, xsd->display, "WM_DELETE_WINDOW", FALSE);
 173         xsd->clipboard_atom          = XCALL(XInternAtom, xsd->display, "CLIPBOARD", FALSE);
 174         xsd->clipboard_property_atom = XCALL(XInternAtom, xsd->display, "AROS_HOSTCLIP", FALSE);
 175         xsd->clipboard_incr_atom     = XCALL(XInternAtom, xsd->display, "INCR", FALSE);
 176         xsd->clipboard_targets_atom  = XCALL(XInternAtom, xsd->display, "TARGETS", FALSE);
 177
 178         xtp.parent = FindTask(NULL);
 179         xtp.ok_signal   = SIGBREAKF_CTRL_E;
 180         xtp.fail_signal = SIGBREAKF_CTRL_F;
 181         xtp.kill_signal = SIGBREAKF_CTRL_C;
 182         xtp.xsd         = xsd;
 183
 184         if ((x11task = create_x11task(&xtp)))
 185         {
 186             if (initclasses(xsd))
 187             {
 188                 D(bug("X11_Init succeeded\n"));
 189                 return TRUE;
 190             }
 191
 192             Signal(x11task, xtp.kill_signal);
 193         }
 194
 195         XCALL(XCloseDisplay, xsd->display);
 196
 197     }
 198
 199     D(bug("X11_Init failed\n"));
 200
 201     return FALSE;
 202 }
 203
 204 /****************************************************************************************/
 205
 206 ADD2OPENLIB(X11_Init, 0);