#include <CoreGraphics/CoreGraphics.h>
#include "X.h"
#include "Xproto.h"
#include "os.h"
#include "servermd.h"
#include "inputstr.h"
#include "scrnintstr.h"
#include "mibstore.h" // mi backing store implementation
#include "mipointer.h" // mi software cursor
#include "micmap.h" // mi colormap code
#include "fb.h" // fb framebuffer code
#include "site.h"
#include "globals.h"
#include "xf86Version.h"
#include "dix.h"
#include "dri-surface.h"
#define _APPLEDRI_SERVER_
#include "appledristr.h"
#include <sys/types.h>
#include <sys/time.h>
#include <sys/syslimits.h>
#include <stdio.h>
#include <fcntl.h>
#include <unistd.h>
#include <dirent.h>
#define NO_CFPLUGIN
#include <IOKit/IOKitLib.h>
#include <IOKit/hidsystem/IOHIDLib.h>
#include <IOKit/hidsystem/ev_keymap.h>
#include "darwin.h"
#include "quartz.h"
#include "rootless-common.h"
#include "pseudoramiX.h"
#include "X11Application.h"
#define SCROLLWHEELUPFAKE 4
#define SCROLLWHEELDOWNFAKE 5
int darwinScreensFound = 0;
int darwinScreenIndex = 0;
int darwinFakeButtons = 1;
Bool darwinSwapAltMeta = FALSE;
int darwinMainScreenX = 0;
int darwinMainScreenY = 0;
char *darwinKeymapFile;
Bool darwinSyncKeymap = TRUE;
static int darwinFakeMouse2Mask = Mod1Mask;
static int darwinFakeMouse3Mask = Mod2Mask;
static DeviceIntPtr darwinPointer;
static DeviceIntPtr darwinKeyboard;
static CARD8 keysDown[DOWN_LENGTH];
static int lockMods;
#define SetBit(ptr,bit) \
do {((BYTE *) ptr)[(bit) >> 3] |= (1 << ((bit) & 7));} while (0)
#define ClearBit(ptr,bit) \
do {((BYTE *) ptr)[(bit) >> 3] &= ~(1 << ((bit) & 7));} while (0)
static PixmapFormatRec formats[] = {
{ 1, 1, BITMAP_SCANLINE_PAD },
{ 4, 8, BITMAP_SCANLINE_PAD },
{ 8, 8, BITMAP_SCANLINE_PAD },
{ 15, 16, BITMAP_SCANLINE_PAD },
{ 16, 16, BITMAP_SCANLINE_PAD },
{ 24, 32, BITMAP_SCANLINE_PAD },
{ 32, 32, BITMAP_SCANLINE_PAD }
};
const int NUMFORMATS = sizeof(formats)/sizeof(formats[0]);
#ifndef OSNAME
#define OSNAME " Mac OS X"
#endif
#ifndef OSVENDOR
#define OSVENDOR " Apple"
#endif
#ifndef PRE_RELEASE
#define PRE_RELEASE XF86_VERSION_SNAP
#endif
extern void AppleDRIExtensionInit(void);
extern void AppleWMExtensionInit(void);
static void
DarwinPrintBanner (void)
{
ErrorF("\nXFree86 Version %d.%d.%d", XF86_VERSION_MAJOR, XF86_VERSION_MINOR,
XF86_VERSION_PATCH);
#if XF86_VERSION_SNAP > 0
ErrorF(".%d", XF86_VERSION_SNAP);
#endif
#if XF86_VERSION_SNAP >= 900
ErrorF(" (%d.%d.0 RC %d)", XF86_VERSION_MAJOR, XF86_VERSION_MINOR + 1,
XF86_VERSION_SNAP - 900);
#endif
#ifdef XF86_CUSTOM_VERSION
ErrorF(" (%s)", XF86_CUSTOM_VERSION);
#endif
ErrorF(" / X Window System\n");
ErrorF("(protocol Version %d, revision %d, vendor release %d)\n",
X_PROTOCOL, X_PROTOCOL_REVISION, VENDOR_RELEASE );
}
static Bool
DarwinSaveScreen (ScreenPtr pScreen, int on)
{
return TRUE;
}
static Bool
DarwinAddScreen (int index, ScreenPtr pScreen, int argc, char **argv)
{
int i, dpi;
static int foundIndex = 0;
Bool ret;
VisualPtr visual;
DarwinFramebufferPtr dfb;
if (index == 0)
foundIndex = 0;
dfb = xalloc (sizeof (DarwinFramebufferRec));
SCREEN_PRIV(pScreen) = dfb;
ret = QuartzAddScreen (foundIndex, pScreen);
foundIndex++;
if (!ret)
return FALSE;
miClearVisualTypes();
if (dfb->componentCount != 1)
{
if (!miSetVisualTypes (dfb->colorBitsPerPixel, TrueColorMask,
dfb->bitsPerComponent, TrueColor))
return FALSE;
#ifdef ENABLE_PSEUDOCOLOR
if (!miSetVisualTypes (8, PseudoColorMask, 8, PseudoColor))
return FALSE;
#endif
}
else
{
if (!miSetVisualTypes (8, PseudoColorMask, 8, PseudoColor))
return FALSE;
}
miSetPixmapDepths();
if (monitorResolution)
dpi = monitorResolution;
else
dpi = 75;
if (!fbScreenInit (pScreen, dfb->framebuffer, dfb->width,
dfb->height, dpi, dpi,
dfb->pitch/(dfb->bitsPerPixel/8), dfb->bitsPerPixel))
{
return FALSE;
}
if (dfb->bitsPerPixel > 8)
{
int bitsPerRGB = dfb->bitsPerComponent;
for (i = 0, visual = pScreen->visuals;
i < pScreen->numVisuals; i++, visual++)
{
if (visual->class == TrueColor) {
visual->offsetRed = bitsPerRGB * 2;
visual->offsetGreen = bitsPerRGB;
visual->offsetBlue = 0;
visual->redMask = ((1<<bitsPerRGB)-1) << visual->offsetRed;
visual->greenMask = ((1<<bitsPerRGB)-1) << visual->offsetGreen;
visual->blueMask = ((1<<bitsPerRGB)-1) << visual->offsetBlue;
}
}
}
#ifdef RENDER
if (! fbPictureInit (pScreen, 0, 0))
return FALSE;
#endif
#ifdef MITSHM
ShmRegisterFbFuncs (pScreen);
#endif
pScreen->SaveScreen = DarwinSaveScreen;
if (!QuartzSetupScreen (index, pScreen))
return FALSE;
if (!miCreateDefColormap (pScreen))
return FALSE;
dixScreenOrigins[index].x = dfb->x;
dixScreenOrigins[index].y = dfb->y;
ErrorF("Screen %d added: %dx%d @ (%d,%d)\n",
index, dfb->width, dfb->height, dfb->x, dfb->y);
return TRUE;
}
static const char *libraryPathList[] = {
"",
"/Network",
"/System",
NULL
};
char *
DarwinFindLibraryFile (const char *file, const char *pathext)
{
char *home;
char *fullPath;
int i = 0;
if (!access(file, F_OK)) {
fullPath = xalloc(strlen(file)+1);
strcpy(fullPath, file);
return fullPath;
}
fullPath = xalloc(PATH_MAX);
home = getenv("HOME");
if (home) {
snprintf(fullPath, PATH_MAX, "%s/Library/%s/%s", home, pathext, file);
if (!access(fullPath, F_OK))
return fullPath;
}
while (libraryPathList[i]) {
snprintf(fullPath, PATH_MAX, "%s/Library/%s/%s", libraryPathList[i++],
pathext, file);
if (!access(fullPath, F_OK))
return fullPath;
}
xfree(fullPath);
return NULL;
}
static inline void
DarwinPressKeycode (xEvent *xe, int pressed, int keycode)
{
if (pressed == KeyRelease && !BitIsOn (keysDown, keycode + MIN_KEYCODE))
{
return;
}
if (pressed == KeyPress)
SetBit (keysDown, keycode + MIN_KEYCODE);
else
ClearBit (keysDown, keycode + MIN_KEYCODE);
xe->u.u.type = pressed;
xe->u.u.detail = keycode + MIN_KEYCODE;
(darwinKeyboard->public.processInputProc) (xe, darwinKeyboard, 1);
}
static void
DarwinUpdateModifiers (xEvent xe, unsigned int flags)
{
static const struct {int mask; int nxkey;} pairs[] = {
{ShiftMask, NX_MODIFIERKEY_SHIFT},
#if !USING_XKB
{LockMask, NX_MODIFIERKEY_ALPHALOCK},
#endif
{ControlMask, NX_MODIFIERKEY_CONTROL},
{Mod1Mask, NX_MODIFIERKEY_ALTERNATE},
{Mod2Mask, NX_MODIFIERKEY_COMMAND},
{Mod3Mask, NX_MODIFIERKEY_SECONDARYFN}
};
int i, keycode;
for (i = 0; i < (int) (sizeof (pairs) / sizeof (pairs[0])); i++)
{
keycode = DarwinModifierNXKeyToNXKeycode (pairs[i].nxkey, 0);
if (keycode == 0)
continue;
if ((flags & pairs[i].mask)
&& !BitIsOn (keysDown, keycode + MIN_KEYCODE))
{
DarwinPressKeycode (&xe, KeyPress, keycode);
}
else if (!(flags & pairs[i].mask)
&& BitIsOn (keysDown, keycode + MIN_KEYCODE))
{
DarwinPressKeycode (&xe, KeyRelease, keycode);
}
}
#if USING_XKB
if ((flags ^ lockMods) & LockMask)
{
keycode = DarwinModifierNXKeyToNXKeycode (NX_MODIFIERKEY_ALPHALOCK, 0);
if (keycode != 0)
{
DarwinPressKeycode (&xe, KeyPress, keycode);
DarwinPressKeycode (&xe, KeyRelease, keycode);
lockMods ^= LockMask;
}
}
#endif
}
static void
DarwinReleaseKeys (void)
{
KeyClassPtr keyc = darwinKeyboard->key;
xEvent xe;
int i, x, y;
memset (&xe, 0, sizeof (xe));
xe.u.keyButtonPointer.time = GetTimeInMillis ();
xe.u.keyButtonPointer.state = darwinKeyboard->key->state;
GetSpritePosition (&x, &y);
xe.u.keyButtonPointer.rootX = x;
xe.u.keyButtonPointer.rootY = y;
for (i = 0; i < DOWN_LENGTH * 8; i++)
{
if (!keyc->modifierMap[i] && BitIsOn (keysDown, i))
DarwinPressKeycode (&xe, KeyRelease, i - MIN_KEYCODE);
}
}
static int
parseModifierString (const char *str)
{
if (strcasecmp (str, "shift") == 0)
return ShiftMask;
else if (strcasecmp (str, "control") == 0)
return ControlMask;
else if (strcasecmp (str, "option") == 0)
return Mod1Mask;
else if (strcasecmp (str, "command") == 0)
return Mod2Mask;
else if (strcasecmp (str, "fn") == 0)
return Mod3Mask;
else
return 0;
}
static int
DarwinParseModifierList (const char *constmodifiers)
{
int result, mask;
char *modifiers, *modifier, *p;
if (constmodifiers == NULL
|| strlen (constmodifiers) == 0
|| strcasecmp (constmodifiers, "none") == 0)
{
return 0;
}
modifiers = strdup (constmodifiers);
p = modifiers;
result = 0;
while (p != NULL)
{
modifier = strsep (&p, " ,+&|/");
mask = parseModifierString (modifier);
if (mask != 0)
result |= mask;
else
ErrorF ("fakebuttons: Unknown modifier \"%s\"\n", modifier);
}
free (modifiers);
return result;
}
void
DarwinSetFakeButtons (const char *mod2, const char *mod3)
{
if (mod2 != NULL)
darwinFakeMouse2Mask = DarwinParseModifierList (mod2);
if (mod3 != NULL)
darwinFakeMouse3Mask = DarwinParseModifierList (mod3);
}
void
ProcessInputEvents (void)
{
static int here_before = 0;
static unsigned int current_flags = 0;
static int fake_button;
static unsigned int fake_button_mask, fake_button_modifier;
xEvent xe;
if (!here_before)
{
X11ApplicationServerReady ();
here_before = TRUE;
}
while (DarwinDequeueEvent (&xe))
{
unsigned int real_state;
real_state = xe.u.keyButtonPointer.state;
xe.u.keyButtonPointer.state |= fake_button_modifier;
if (darwinFakeButtons)
{
switch (xe.u.u.type)
{
case ButtonPress:
if (xe.u.u.detail != 1)
break;
if ((xe.u.keyButtonPointer.state & darwinFakeMouse2Mask)
== darwinFakeMouse2Mask)
{
fake_button = 2;
fake_button_modifier = Button2Mask;
fake_button_mask = darwinFakeMouse2Mask;
xe.u.u.detail = 2;
}
else if ((xe.u.keyButtonPointer.state & darwinFakeMouse3Mask)
== darwinFakeMouse3Mask)
{
fake_button = 3;
fake_button_modifier = Button3Mask;
fake_button_mask = darwinFakeMouse3Mask;
xe.u.u.detail = 3;
}
break;
case ButtonRelease:
if (fake_button != 0 && xe.u.u.detail == 1)
xe.u.u.detail = fake_button;
break;
}
}
xe.u.keyButtonPointer.state &= ~fake_button_mask;
switch (xe.u.u.type)
{
case 0:
case KeyPress:
if (current_flags == 0
&& darwinSyncKeymap && darwinKeymapFile == NULL)
{
static unsigned int last_seed;
unsigned int this_seed;
this_seed = DarwinSystemKeymapSeed ();
if (this_seed != last_seed)
{
last_seed = this_seed;
DarwinKeyboardReload (darwinKeyboard);
}
}
case KeyRelease:
case ButtonPress:
case ButtonRelease:
case MotionNotify:
xe.u.keyButtonPointer.time = GetTimeInMillis ();
if (xe.u.keyButtonPointer.state != 0xffff
&& current_flags != xe.u.keyButtonPointer.state)
{
current_flags = xe.u.keyButtonPointer.state;
DarwinUpdateModifiers (xe, current_flags);
}
}
switch (xe.u.u.type)
{
case 0:
break;
case MotionNotify:
if (!quartzServerVisible)
{
xp_window_id wid;
wid = 0;
xp_find_window (xe.u.keyButtonPointer.rootX,
xe.u.keyButtonPointer.rootY, 0, &wid);
if (wid == 0)
break;
}
xe.u.keyButtonPointer.rootX -= darwinMainScreenX -
dixScreenOrigins[miPointerCurrentScreen()->myNum].x;
xe.u.keyButtonPointer.rootY -= darwinMainScreenY -
dixScreenOrigins[miPointerCurrentScreen()->myNum].y;
miPointerAbsoluteCursor (xe.u.keyButtonPointer.rootX,
xe.u.keyButtonPointer.rootY,
xe.u.keyButtonPointer.time);
break;
case ButtonPress:
case ButtonRelease:
darwinPointer->public.processInputProc (&xe, darwinPointer, 1);
break;
case KeyPress:
case KeyRelease:
DarwinPressKeycode (&xe, xe.u.u.type, xe.u.u.detail);
break;
case ClientMessage:
currentTime.milliseconds = GetTimeInMillis ();
switch (xe.u.clientMessage.u.l.type)
{
case kXdarwinQuit:
GiveUp (0);
break;
case kXquartzDeactivate:
DarwinReleaseKeys ();
default:
if (xe.u.clientMessage.u.l.type >= kXquartzFirstEvent
&& xe.u.clientMessage.u.l.type <= kXquartzLastEvent)
{
QuartzClientMessage (&xe);
}
else
{
ErrorF ("Unknown application defined event: %d.\n",
xe.u.clientMessage.u.l.longs0);
}
break;
}
break;
default:
ErrorF("Unknown event caught: %d\n", xe.u.u.type);
break;
}
if (fake_button != 0 && xe.u.u.type == ButtonRelease)
{
current_flags |= (real_state & fake_button_mask);
DarwinUpdateModifiers (xe, current_flags);
fake_button = 0;
fake_button_modifier = 0;
fake_button_mask = 0;
}
}
miPointerUpdate ();
}
void
DarwinEnqueuePointerEvent (xEvent *xe)
{
darwinPointer->public.processInputProc (xe, darwinPointer, 1);
}
void
InitInput (int argc, char **argv)
{
DarwinInputInit ();
darwinPointer = AddInputDevice(DarwinMouseProc, TRUE);
RegisterPointerDevice( darwinPointer );
darwinKeyboard = AddInputDevice(DarwinKeybdProc, TRUE);
RegisterKeyboardDevice( darwinKeyboard );
}
void
DarwinAdjustScreenOrigins (ScreenInfo *pScreenInfo)
{
int i, left, top;
left = dixScreenOrigins[0].x;
top = dixScreenOrigins[0].y;
for (i = 1; i < pScreenInfo->numScreens; i++) {
if (dixScreenOrigins[i].x < left ||
(dixScreenOrigins[i].x == left &&
dixScreenOrigins[i].y < top))
{
left = dixScreenOrigins[i].x;
top = dixScreenOrigins[i].y;
}
}
darwinMainScreenX = left;
darwinMainScreenY = top;
if (darwinMainScreenX != 0 || darwinMainScreenY != 0) {
for (i = 0; i < pScreenInfo->numScreens; i++) {
dixScreenOrigins[i].x -= darwinMainScreenX;
dixScreenOrigins[i].y -= darwinMainScreenY;
ErrorF("Screen %d placed at X11 coordinate (%d,%d).\n",
i, dixScreenOrigins[i].x, dixScreenOrigins[i].y);
}
}
}
void
InitOutput (ScreenInfo *pScreenInfo, int argc, char **argv)
{
int i;
static unsigned long generation = 0;
pScreenInfo->imageByteOrder = IMAGE_BYTE_ORDER;
pScreenInfo->bitmapScanlineUnit = BITMAP_SCANLINE_UNIT;
pScreenInfo->bitmapScanlinePad = BITMAP_SCANLINE_PAD;
pScreenInfo->bitmapBitOrder = BITMAP_BIT_ORDER;
pScreenInfo->numPixmapFormats = NUMFORMATS;
for (i = 0; i < NUMFORMATS; i++)
pScreenInfo->formats[i] = formats[i];
if (generation != serverGeneration) {
darwinScreenIndex = AllocateScreenPrivateIndex();
generation = serverGeneration;
}
QuartzInitOutput(argc, argv);
for (i = 0; i < darwinScreensFound; i++)
AddScreen( DarwinAddScreen, argc, argv );
DarwinAdjustScreenOrigins (pScreenInfo);
PseudoramiXExtensionInit (argc, argv);
AppleDRIExtensionInit ();
AppleWMExtensionInit ();
DRIExtensionInit ();
}
void
OsVendorFatalError (void)
{
ErrorF( " OsVendorFatalError\n" );
}
void
OsVendorInit (void)
{
if (serverGeneration == 1)
DarwinPrintBanner();
}
int
ddxProcessArgument (int argc, char *argv[], int i)
{
int numDone;
if ((numDone = QuartzProcessArgument( argc, argv, i )))
return numDone;
if ( !strcmp( argv[i], "-fakebuttons" ) ) {
darwinFakeButtons = TRUE;
ErrorF( "Faking a three button mouse\n" );
return 1;
}
if ( !strcmp( argv[i], "-nofakebuttons" ) ) {
darwinFakeButtons = FALSE;
ErrorF( "Not faking a three button mouse\n" );
return 1;
}
if (!strcmp( argv[i], "-fakemouse2" ) ) {
if ( i == argc-1 ) {
FatalError( "-fakemouse2 must be followed by a modifer list\n" );
}
darwinFakeMouse2Mask = DarwinParseModifierList(argv[i+1]);
return 2;
}
if (!strcmp( argv[i], "-fakemouse3" ) ) {
if ( i == argc-1 ) {
FatalError( "-fakemouse3 must be followed by a modifer list\n" );
}
darwinFakeMouse3Mask = DarwinParseModifierList(argv[i+1]);
return 2;
}
if ( !strcmp( argv[i], "-keymap" ) ) {
if ( i == argc-1 ) {
FatalError( "-keymap must be followed by a filename\n" );
}
darwinKeymapFile = argv[i+1];
return 2;
}
if ( !strcmp( argv[i], "-nokeymap" ) ) {
darwinKeymapFile = NULL;
return 1;
}
if ( !strcmp( argv[i], "+synckeymap" ) ) {
darwinSyncKeymap = TRUE;
return 1;
}
if ( !strcmp( argv[i], "-synckeymap" ) ) {
darwinSyncKeymap = FALSE;
return 1;
}
if (strcmp (argv[i], "-swapAltMeta") == 0) {
darwinSwapAltMeta = TRUE;
return 1;
}
if (!strcmp( argv[i], "-showconfig" ) || !strcmp( argv[i], "-version" )) {
DarwinPrintBanner();
exit(0);
}
if ( !strcmp( argv[i], "-iokit" ) ) {
return 1;
}
return 0;
}
void
ddxUseMsg (void)
{
ErrorF("\n");
ErrorF("\n");
ErrorF("Device Dependent Usage:\n");
ErrorF("\n");
ErrorF("-depth <depth> use <depth> bits per pixel. Options: 8, 15, 24\b\n");
ErrorF("-fakebuttons fake a 3 button mouse with Command and Option\n");
ErrorF("-nofakebuttons\n");
ErrorF("-fakemouse2 <keys> fake middle mouse button with modifier keys\n");
ErrorF("-fakemouse3 <keys> fake right mouse button with modifier keys\n");
ErrorF(" e.g.: -fakemouse2 \"option,shift\"\n");
ErrorF("-keymap <file> read the keymap from <file>\n");
ErrorF("-nokeymap\n");
ErrorF("+synckeymap synchronize X keymap with system keymap\n");
ErrorF("-synckeymap only set X keymap on server startup\n");
ErrorF("-swapAltMeta swap meaning of Alt and Meta modifiers\n");
ErrorF("-version show server version.\n");
ErrorF("\n");
}
void
ddxGiveUp (void)
{
ErrorF( "Quitting XDarwin...\n" );
QuartzGiveUp();
}
void
AbortDDX (void)
{
ErrorF( " AbortDDX\n" );
ddxGiveUp();
}
extern void GlxExtensionInit();
extern void GlxWrapInitVisuals(void *procPtr);
void DarwinGlxExtensionInit (void) { GlxExtensionInit (); }
void DarwinGlxWrapInitVisuals (void *ptr) { GlxWrapInitVisuals (ptr); }
#ifdef DPMSExtension
Bool
DPMSSupported (void)
{
return FALSE;
}
void
DPMSSet (int level)
{
}
int
DPMSGet (int *level)
{
return -1;
}
#endif
#ifdef DDXTIME
CARD32
GetTimeInMillis (void)
{
extern void Microseconds ();
UnsignedWide usec;
Microseconds (&usec);
return (usec.hi << 22) | (usec.lo >> 10);
}
#endif