mpv/libvo/vo_quartz.c

/*
	vo_quartz.c
	
	by Nicolas Plourde <nicolasplourde@hotmail.com>
	
	Copyright (c) Nicolas Plourde - April 2004

	YUV support Copyright (C) 2004 Romain Dolbeau <romain@dolbeau.org>
	
	MPlayer Mac OSX Quartz video out module.
	
	todo:   -Redo event handling.
			-Choose fullscreen display device.
			-Fullscreen antialiasing.
			-resize black bar without CGContext
			-rootwin
			-non-blocking event
			-(add sugestion here)

	Direct YUV support is functional, and is now enabled
	by default. To constrain what format should be used,
	use the format=XXX video filter (i.e. -vf format=uyvy).
 */

//SYS
#include <stdio.h>

//OSX
#include <Carbon/Carbon.h>
#include <QuickTime/QuickTime.h>

//MPLAYER
#include "config.h"
#include "fastmemcpy.h"
#include "video_out.h"
#include "video_out_internal.h"
#include "aspect.h"
#include "mp_msg.h"
#include "m_option.h"

#include "../input/input.h"
#include "../input/mouse.h"

#include "vo_quartz.h"

#define QUARTZ_ENABLE_YUV

static vo_info_t info = 
{
	"Mac OSX (Quartz)",
	"quartz",
	"Nicolas Plourde <nicolasplourde@hotmail.com>, Romain Dolbeau <romain@dolbeau.org>",
	""
};

LIBVO_EXTERN(quartz)

static uint32_t image_width;
static uint32_t image_height;
static uint32_t image_depth;
static uint32_t image_format;
static uint32_t image_size;
static uint32_t image_buffer_size;

#ifdef QUARTZ_ENABLE_YUV
static CodecType image_qtcodec;
static PlanarPixmapInfoYUV420 *P;
static struct {
  ImageSequence seqId;
  ImageDescriptionHandle desc;
  Handle extension_colr;
  Handle extension_fiel;
  Handle extension_clap;
  Handle extension_pasp;
  MatrixRecord matrix;
} yuv_qt_stuff;
static DecompressorComponent mycodec;
static ComponentInstance myopenedcodec;
static int EnterMoviesDone = 0;
#endif
char *image_data;

extern int vo_ontop;
extern int vo_fs;

int int_pause = 0;
float winAlpha = 1;

int device_width, device_height;

WindowRef theWindow;

GWorldPtr imgGWorld;

Rect imgRect;
Rect dstRect;
Rect winRect;

CGContextRef context;

#include "../osdep/keycodes.h"
extern void mplayer_put_key(int code);

extern void vo_draw_text(int dxs,int dys,void (*draw_alpha)(int x0,int y0, int w,int h, unsigned char* src, unsigned char *srca, int stride));

//PROTOTYPE/////////////////////////////////////////////////////////////////
void window_resized();
void window_ontop();
void window_fullscreen();

static OSStatus MainWindowEventHandler(EventHandlerCallRef nextHandler, EventRef event, void *userData);
static OSStatus MainKeyboardEventHandler(EventHandlerCallRef nextHandler, EventRef event, void *userData);
static OSStatus MainMouseEventHandler(EventHandlerCallRef nextHandler, EventRef event, void *userData);

static void draw_alpha(int x0, int y0, int w, int h, unsigned char *src, unsigned char *srca, int stride)
{
  switch (image_format) {
  case IMGFMT_RGB32:
    vo_draw_alpha_rgb32(w,h,src,srca,stride,image_data+4*(y0*imgRect.right+x0),4*imgRect.right);
    break;
#ifdef QUARTZ_ENABLE_YUV
  case IMGFMT_YV12:
  case IMGFMT_IYUV:
  case IMGFMT_I420:
    vo_draw_alpha_yv12(w,h,src,srca,stride,
		       ((char*)P) + P->componentInfoY.offset + x0 + y0 * image_width,
		       image_width);
    break;
  case IMGFMT_UYVY:
    //vo_draw_alpha_uyvy(w,h,src,srca,stride,((char*)P) + (x0 + y0 * image_width) * 2,image_width*2);
    break;
  case IMGFMT_YUY2:
    vo_draw_alpha_yuy2(w,h,src,srca,stride,((char*)P) + (x0 + y0 * image_width) * 2,image_width*2);
    break;
#endif
  }
}

//default window event handler
static OSStatus MainWindowEventHandler(EventHandlerCallRef nextHandler, EventRef event, void *userData)
{
    OSStatus err = noErr;
	WindowRef     window;
	Rect          rectPort = {0,0,0,0};
	OSStatus      result = eventNotHandledErr;
	UInt32        class = GetEventClass (event);
	UInt32        kind = GetEventKind (event);

	GetEventParameter(event, kEventParamDirectObject, typeWindowRef, NULL, sizeof(WindowRef), NULL, &window);
	if(window)
	{
		GetWindowPortBounds (window, &rectPort);
	}
  
    switch (kind)
    {
		//close window
        case kEventWindowClosed:
			HideWindow(window);
			mplayer_put_key(KEY_ESC);
		break;
		
		//resize window
		case kEventWindowBoundsChanged:
			window_resized();
			flip_page();
		break;
			
        default:
            err = eventNotHandledErr;
            break;
    }
    
    return err;
}

//keyboard event handler
static OSStatus MainKeyboardEventHandler(EventHandlerCallRef nextHandler, EventRef event, void *userData)
{
    OSStatus err = noErr;
	UInt32 macKeyCode;
	
	GetEventParameter(event, kEventParamKeyCode, typeUInt32, NULL, sizeof(macKeyCode), NULL, &macKeyCode);
	
    switch (GetEventKind (event))
    {
        case kEventRawKeyDown: 
		{
			switch(macKeyCode)
			{
				case QZ_RETURN: mplayer_put_key(KEY_ENTER);break;
				case QZ_ESCAPE: mplayer_put_key(KEY_ESC);break;
				case QZ_q: mplayer_put_key('q');break;
 				case QZ_F1: mplayer_put_key(KEY_F+1);break;
 				case QZ_F2: mplayer_put_key(KEY_F+2);break;
 				case QZ_F3: mplayer_put_key(KEY_F+3);break;
 				case QZ_F4: mplayer_put_key(KEY_F+4);break;
 				case QZ_F5: mplayer_put_key(KEY_F+5);break;
 				case QZ_F6: mplayer_put_key(KEY_F+6);break;
 				case QZ_F7: mplayer_put_key(KEY_F+7);break;
 				case QZ_F8: mplayer_put_key(KEY_F+8);break;
 				case QZ_F9: mplayer_put_key(KEY_F+9);break;
 				case QZ_F10: mplayer_put_key(KEY_F+10);break;
 				case QZ_F11: mplayer_put_key(KEY_F+11);break;
 				case QZ_F12: mplayer_put_key(KEY_F+12);break;
				case QZ_o: mplayer_put_key('o');break;
				case QZ_SPACE: mplayer_put_key(' ');break;
                case QZ_p: mplayer_put_key('p');break;
				//case QZ_7: mplayer_put_key(shift_key?'/':'7');
                //case QZ_PLUS: mplayer_put_key(shift_key?'*':'+');
				case QZ_KP_PLUS: mplayer_put_key('+');break;
				case QZ_MINUS:
				case QZ_KP_MINUS: mplayer_put_key('-');break;
				case QZ_TAB: mplayer_put_key('\t');break;
				case QZ_PAGEUP: mplayer_put_key(KEY_PAGE_UP);break;
				case QZ_PAGEDOWN: mplayer_put_key(KEY_PAGE_DOWN);break;  
				case QZ_UP: mplayer_put_key(KEY_UP);break;
				case QZ_DOWN: mplayer_put_key(KEY_DOWN);break;
                case QZ_LEFT: mplayer_put_key(KEY_LEFT);break;
				case QZ_RIGHT: mplayer_put_key(KEY_RIGHT);break;
				//case QZ_LESS: mplayer_put_key(shift_key?'>':'<'); break;
				//case QZ_GREATER: mplayer_put_key('>'); break;
				//case QZ_ASTERISK:
				case QZ_KP_MULTIPLY: mplayer_put_key('*'); break;
				case QZ_SLASH:
				case QZ_KP_DIVIDE: mplayer_put_key('/'); break;
				case QZ_KP0: mplayer_put_key(KEY_KP0); break;
				case QZ_KP1: mplayer_put_key(KEY_KP1); break;
				case QZ_KP2: mplayer_put_key(KEY_KP2); break;
				case QZ_KP3: mplayer_put_key(KEY_KP3); break;
				case QZ_KP4: mplayer_put_key(KEY_KP4); break;
				case QZ_KP5: mplayer_put_key(KEY_KP5); break;
				case QZ_KP6: mplayer_put_key(KEY_KP6); break;
				case QZ_KP7: mplayer_put_key(KEY_KP7); break;
				case QZ_KP8: mplayer_put_key(KEY_KP8); break;
				case QZ_KP9: mplayer_put_key(KEY_KP9); break;
				case QZ_KP_PERIOD: mplayer_put_key(KEY_KPDEC); break;
				case QZ_KP_ENTER: mplayer_put_key(KEY_KPENTER); break;
				case QZ_LEFTBRACKET: SetWindowAlpha(theWindow, winAlpha-=0.05);break;
				case QZ_RIGHTBRACKET: SetWindowAlpha(theWindow, winAlpha+=0.05);break;
				case QZ_f: mplayer_put_key('f'); break;
				case QZ_t: mplayer_put_key('T'); break;
				default:
					break;
			}
		}		
		break;
        default:
            err = eventNotHandledErr;
            break;
    }
    
    return err;
}

//Mouse event handler
static OSStatus MainMouseEventHandler(EventHandlerCallRef nextHandler, EventRef event, void *userData)
{
    OSStatus err = noErr;
	WindowPtr tmpWin;
	Point mousePos;
	
	GetEventParameter(event, kEventParamMouseLocation, typeQDPoint, 0, sizeof(Point), 0, &mousePos);

    switch (GetEventKind (event))
    {
        case kEventMouseDown: 
		{
				short part = FindWindow(mousePos,&tmpWin);
				
				if(part == inMenuBar)
				{
					MenuSelect(mousePos);
				}
		}		
		break;
        default:
            err = eventNotHandledErr;
            break;
    }
    
	HiliteMenu(0);
    return err;
}

static uint32_t config(uint32_t width, uint32_t height, uint32_t d_width, uint32_t d_height, uint32_t flags, char *title, uint32_t format)
{
	WindowAttributes	windowAttrs;
	CFStringRef			titleKey;
	CFStringRef			windowTitle; 
	OSStatus			result;
	GDHandle			deviceHdl;
	Rect				deviceRect;
	OSErr				qterr;
	
	//Get Main device info///////////////////////////////////////////////////
	deviceHdl = GetMainDevice();
	deviceRect = (*deviceHdl)->gdRect;
	
	device_width = deviceRect.right;
	device_height = deviceRect.bottom;
	
	//misc mplayer setup/////////////////////////////////////////////////////
	image_width = width;
	image_height = height;
	switch (image_format) 
	{
		case IMGFMT_RGB32:
			image_depth = IMGFMT_RGB_DEPTH(format);
			break;
#ifdef QUARTZ_ENABLE_YUV
		case IMGFMT_YV12:
		case IMGFMT_IYUV:
        case IMGFMT_I420:
        case IMGFMT_UYVY:
        case IMGFMT_YUY2:
			image_depth = 16;
			break;
#endif
	}
	image_size = ((image_width*image_height*image_depth)+7)/8;

	vo_fs = flags & VOFLAG_FULLSCREEN;
	
	//get movie aspect
	aspect_save_orig(width,height);
	aspect_save_prescale(d_width,d_height);
	aspect_save_screenres(device_width, device_height);

	aspect(&d_width,&d_height,A_NOZOOM);

	//Create player window//////////////////////////////////////////////////
	windowAttrs =   kWindowStandardDocumentAttributes
					| kWindowStandardHandlerAttribute
					| kWindowLiveResizeAttribute;

	SetRect(&winRect, 0, 0, d_width, d_height);
	SetRect(&dstRect, 0, 0, d_width, d_height);
	SetRect(&imgRect, 0, 0, image_width, image_height);
	
	CreateNewWindow(kDocumentWindowClass, windowAttrs, &winRect, &theWindow);

	//Set window title
	titleKey	= CFSTR("MPlayer");
	windowTitle = CFCopyLocalizedString(titleKey, NULL);
	result		= SetWindowTitleWithCFString(theWindow, windowTitle);
	CFRelease(titleKey);
	CFRelease(windowTitle);

	//Install event handler
	const EventTypeSpec winEvents[] = { { kEventClassWindow, kEventWindowClosed }, { kEventClassWindow, kEventWindowBoundsChanged } };
	const EventTypeSpec keyEvents[] = { { kEventClassKeyboard, kEventRawKeyDown } };
	const EventTypeSpec mouseEvents[] = { { kEventClassMouse, kEventMouseDown } };
	
    InstallWindowEventHandler (theWindow, NewEventHandlerUPP (MainWindowEventHandler), GetEventTypeCount(winEvents), winEvents, theWindow, NULL);	
	InstallWindowEventHandler (theWindow, NewEventHandlerUPP (MainKeyboardEventHandler), GetEventTypeCount(keyEvents), keyEvents, theWindow, NULL);
	InstallApplicationEventHandler (NewEventHandlerUPP (MainMouseEventHandler), GetEventTypeCount(mouseEvents), mouseEvents, 0, NULL);

	//Show window
	RepositionWindow(theWindow, NULL, kWindowCascadeOnMainScreen);
#ifdef QUARTZ_ENABLE_YUV
	if (!(IMGFMT_IS_RGB(image_format))) {
	  if (!EnterMoviesDone) {
	    qterr = EnterMovies();
	    EnterMoviesDone = 1;
	  }
	  else
	    qterr = 0;
	  mp_msg(MSGT_VO, MSGL_INFO, "\nQuartz: EnterMovies\n");
	  if (qterr) {
	    mp_msg(MSGT_VO, MSGL_FATAL, "Quartz error: EnterMovies (%d)\n", qterr);
	  }

	  {
	    ComponentDescription cd2;
	    Handle h1 = NewHandleClear(4);
	    Handle h2 = NewHandleClear(4);
	    char ch1[256], ch2[256];

	    qterr = FindCodec(image_qtcodec, bestSpeedCodec, NULL, &mycodec);
	    if (qterr) {
	      mp_msg(MSGT_VO, MSGL_FATAL, "Quartz error: FindCodec (%d)\n", qterr);
	    }
	    qterr = GetComponentInfo(mycodec, &cd2, h1, h2, NULL);
	    if (qterr) {
	      mp_msg(MSGT_VO, MSGL_FATAL, "Quartz error: GetComponentInfo (%d)\n", qterr);
	    }
	    memcpy(ch1, &((unsigned char*)(*h1))[1], ((unsigned char*)(*h1))[0]);
	    ch1[((unsigned char*)(*h1))[0]] = '\0';
	    memcpy(ch2, &((unsigned char*)(*h2))[1], ((unsigned char*)(*h2))[0]);
	    ch2[((unsigned char*)(*h2))[0]] = '\0';
	    DisposeHandle(h1);
	    DisposeHandle(h2);
	    mp_msg(MSGT_VO, MSGL_INFO, "Quartz: QuickTime FindCodec reports component %.4s %.4s %.4s, %s, %s, [flags: 0x%08x, mask: 0x%08x]\n",
		   &cd2.componentType,
		   &cd2.componentSubType,
		   &cd2.componentManufacturer,
		   ch1,
		   ch2,
		   cd2.componentFlags,
		   cd2.componentFlagsMask);

	    {
	      CodecInfo ci;
	      qterr = GetCodecInfo(&ci, 'imdc', mycodec);
	      if (qterr) {
		mp_msg(MSGT_VO, MSGL_FATAL, "Quartz error: GetCodecInfo (%d)\n", qterr);
	      }
	      mp_msg(MSGT_VO, MSGL_INFO, "Quartz: CodecInfo:\n\tname: %s\n\tvendor: %.4s\n\tversion/revision: %d/%d\n\tdecompressFlags: 0x%08x\n\tcompressFlags: 0x%08x\n\tformatFlags: 0x%08x\n", ch1, &ci.vendor, ci.version, ci.revisionLevel, ci.decompressFlags, ci.compressFlags, ci.formatFlags);
	    }
	  }
	  yuv_qt_stuff.desc = (ImageDescriptionHandle)NewHandleClear( sizeof(ImageDescription) );
          yuv_qt_stuff.extension_colr = NewHandleClear(sizeof(NCLCColorInfoImageDescriptionExtension));
          ((NCLCColorInfoImageDescriptionExtension*)(*yuv_qt_stuff.extension_colr))->colorParamType = kVideoColorInfoImageDescriptionExtensionType;
          ((NCLCColorInfoImageDescriptionExtension*)(*yuv_qt_stuff.extension_colr))->primaries = 2;
          ((NCLCColorInfoImageDescriptionExtension*)(*yuv_qt_stuff.extension_colr))->transferFunction = 2;
          ((NCLCColorInfoImageDescriptionExtension*)(*yuv_qt_stuff.extension_colr))->matrix = 2;
          yuv_qt_stuff.extension_fiel = NewHandleClear(sizeof(FieldInfoImageDescriptionExtension));
          ((FieldInfoImageDescriptionExtension*)(*yuv_qt_stuff.extension_fiel))->fieldCount = 1;
          ((FieldInfoImageDescriptionExtension*)(*yuv_qt_stuff.extension_fiel))->fieldOrderings = 0;
          yuv_qt_stuff.extension_clap = NewHandleClear(sizeof(CleanApertureImageDescriptionExtension));
          ((CleanApertureImageDescriptionExtension*)(*yuv_qt_stuff.extension_clap))->cleanApertureWidthN = image_width;
          ((CleanApertureImageDescriptionExtension*)(*yuv_qt_stuff.extension_clap))->cleanApertureWidthD = 1;
          ((CleanApertureImageDescriptionExtension*)(*yuv_qt_stuff.extension_clap))->cleanApertureHeightN = image_height;
          ((CleanApertureImageDescriptionExtension*)(*yuv_qt_stuff.extension_clap))->cleanApertureHeightD = 1;
          ((CleanApertureImageDescriptionExtension*)(*yuv_qt_stuff.extension_clap))->horizOffN = 0;
          ((CleanApertureImageDescriptionExtension*)(*yuv_qt_stuff.extension_clap))->horizOffD = 1;
          ((CleanApertureImageDescriptionExtension*)(*yuv_qt_stuff.extension_clap))->vertOffN = 0;
          ((CleanApertureImageDescriptionExtension*)(*yuv_qt_stuff.extension_clap))->vertOffD = 1;
          yuv_qt_stuff.extension_pasp = NewHandleClear(sizeof(PixelAspectRatioImageDescriptionExtension));
          ((PixelAspectRatioImageDescriptionExtension*)(*yuv_qt_stuff.extension_pasp))->hSpacing = 1;
          ((PixelAspectRatioImageDescriptionExtension*)(*yuv_qt_stuff.extension_pasp))->vSpacing = 1;

	  (*yuv_qt_stuff.desc)->idSize = sizeof(ImageDescription);
	  (*yuv_qt_stuff.desc)->cType = image_qtcodec;
	  (*yuv_qt_stuff.desc)->version = 2;
	  (*yuv_qt_stuff.desc)->revisionLevel = 0;
	  (*yuv_qt_stuff.desc)->vendor = 'mpla';
	  (*yuv_qt_stuff.desc)->width = image_width;
	  (*yuv_qt_stuff.desc)->height = image_height;
	  (*yuv_qt_stuff.desc)->hRes = Long2Fix(72);
	  (*yuv_qt_stuff.desc)->vRes = Long2Fix(72);
          (*yuv_qt_stuff.desc)->temporalQuality = 0;
	  (*yuv_qt_stuff.desc)->spatialQuality = codecLosslessQuality;
	  (*yuv_qt_stuff.desc)->frameCount = 1;
	  (*yuv_qt_stuff.desc)->dataSize = 0;
	  (*yuv_qt_stuff.desc)->depth = 24;
	  (*yuv_qt_stuff.desc)->clutID = -1;
	  
          qterr = AddImageDescriptionExtension(yuv_qt_stuff.desc, yuv_qt_stuff.extension_colr, kColorInfoImageDescriptionExtension);
          if (qterr) {
	    mp_msg(MSGT_VO, MSGL_FATAL, "Quartz error: AddImageDescriptionExtension [colr] (%d)\n", qterr);
	  }
          qterr = AddImageDescriptionExtension(yuv_qt_stuff.desc, yuv_qt_stuff.extension_fiel, kFieldInfoImageDescriptionExtension);
          if (qterr) {
	    mp_msg(MSGT_VO, MSGL_FATAL, "Quartz error: AddImageDescriptionExtension [fiel] (%d)\n", qterr);
	  }
          qterr = AddImageDescriptionExtension(yuv_qt_stuff.desc, yuv_qt_stuff.extension_clap, kCleanApertureImageDescriptionExtension);
          if (qterr) {
	    mp_msg(MSGT_VO, MSGL_FATAL, "Quartz error: AddImageDescriptionExtension [clap] (%d)\n", qterr);
	  }
          qterr = AddImageDescriptionExtension(yuv_qt_stuff.desc, yuv_qt_stuff.extension_pasp, kCleanApertureImageDescriptionExtension);
          if (qterr) {
	    mp_msg(MSGT_VO, MSGL_FATAL, "Quartz error: AddImageDescriptionExtension [pasp] (%d)\n", qterr);
	  }
	  
	  SetPort(GetWindowPort(theWindow));
          SetIdentityMatrix(&yuv_qt_stuff.matrix);
          if ((d_width != width) || (d_height != height)) {
            ScaleMatrix(&yuv_qt_stuff.matrix,
                        FixDiv(Long2Fix(d_width),Long2Fix(width)),
                        FixDiv(Long2Fix(d_height),Long2Fix(height)),
                        0,
                        0);
          }
	  P = calloc(sizeof(PlanarPixmapInfoYUV420) + image_size, 1);
          switch (image_format) {
          case IMGFMT_YV12:
          case IMGFMT_IYUV:
          case IMGFMT_I420:
            P->componentInfoY.offset = sizeof(PlanarPixmapInfoYUV420);
            P->componentInfoCb.offset = P->componentInfoY.offset + image_size / 2;
            P->componentInfoCr.offset = P->componentInfoCb.offset + image_size / 4;
            P->componentInfoY.rowBytes = image_width;
            P->componentInfoCb.rowBytes =  image_width / 2;
            P->componentInfoCr.rowBytes =  image_width / 2;
	    image_buffer_size = image_size + sizeof(PlanarPixmapInfoYUV420);
            break;
          case IMGFMT_UYVY:
          case IMGFMT_YUY2:
	    image_buffer_size = image_size;
            break;
          }
	  mp_msg(MSGT_VO, MSGL_INFO, "Quartz: DecompressSequenceBeginS\n");
	  mp_msg(MSGT_VO, MSGL_INFO, "Quartz: width=%d, height=%d, d_width=%d, d_height=%d\n",
                 width, height, d_width, d_height);
	  myopenedcodec = OpenComponent(mycodec);

	  qterr = DecompressSequenceBeginS(&yuv_qt_stuff.seqId,
					   yuv_qt_stuff.desc,
					   P,
					   image_buffer_size,
					   GetWindowPort(theWindow),
					   NULL, // GDHandle
					   NULL, // srcRect
					   ((d_width != width) || (d_height != height)) ? 
					   &yuv_qt_stuff.matrix : NULL,
					   srcCopy,
					   NULL, // mask,
					   0, //codecFlagUseImageBuffer,
					   codecLosslessQuality,
					   bestSpeedCodec);
	                                   //mycodec); // some codec reported by FindCodec() won't work (?)
					   //myopenedcodec); // doesn't seem to help, either
	  if (qterr) {
	    mp_msg(MSGT_VO, MSGL_FATAL, "Quartz error: DecompressSequenceBeginS (%d)\n", qterr);
	  }
	  mp_msg(MSGT_VO, MSGL_INFO, "Quartz: DecompressSequenceBeginS done\n");
	}
#endif /* QUARTZ_ENABLE_YUV */

	ShowWindow (theWindow);
	
	if(vo_fs)
		window_fullscreen();
		
	if(vo_ontop)
		window_ontop();
	
	return 0;
}

static void check_events(void)
{
	EventRef theEvent;
	EventTargetRef theTarget;
	OSStatus	theErr;
	
	//Get event
	theTarget = GetEventDispatcherTarget();
    theErr = ReceiveNextEvent(0, 0, kEventDurationNoWait,true, &theEvent);
    if(theErr == noErr && theEvent != NULL)
	{
		SendEventToEventTarget (theEvent, theTarget);
		ReleaseEvent(theEvent);
	}

	//update activity every 30 seconds to prevent
	//screensaver from starting up.
	DateTimeRec d;
	unsigned long curTime;
	static unsigned long lastTime = 0;
	
	GetTime(&d);
	DateToSeconds( &d, &curTime);
	
	if( ( (curTime - lastTime) >= 30) || (lastTime == 0))
	{
		UpdateSystemActivity(UsrActivity);
		lastTime = curTime;
	}
}

static void draw_osd(void)
{
	vo_draw_text(image_width,image_height,draw_alpha);
}

static void flip_page(void)
{
  switch (image_format) {
  case IMGFMT_RGB32:
    {
	OSStatus error;
	CGrafPtr oldPort,deskPort;
	GDHandle oldGDevice;
	OSStatus lockPixelsError;
	Boolean canLockPixels;

	GetGWorld (&oldPort, &oldGDevice);
	SetGWorld(GetWindowPort(theWindow), GetMainDevice());
	
	CGrafPtr windowPort = GetWindowPort(theWindow);
	
	lockPixelsError = LockPortBits(windowPort);
	
	if (lockPixelsError == noErr)
		canLockPixels = true;
	else 
		canLockPixels = false;
	
	if (canLockPixels)
	{
		CopyBits( GetPortBitMapForCopyBits (imgGWorld), GetPortBitMapForCopyBits (windowPort), &imgRect, &dstRect, srcCopy, 0 );
		lockPixelsError = UnlockPortBits(windowPort);
	}
	
	RgnHandle theVisibleRegion; 
	
	if (QDIsPortBuffered(windowPort))
	{
		theVisibleRegion = NewRgn();
		GetPortVisibleRegion(windowPort, theVisibleRegion);
		QDFlushPortBuffer(windowPort, theVisibleRegion); 
		DisposeRgn(theVisibleRegion);
	} 

	SetGWorld(oldPort, oldGDevice); 
    }
    break;
#ifdef QUARTZ_ENABLE_YUV
  case IMGFMT_YV12:
  case IMGFMT_IYUV:
  case IMGFMT_I420:
  case IMGFMT_UYVY:
  case IMGFMT_YUY2:
    if (EnterMoviesDone) {
      OSErr qterr;
      CodecFlags flags = 0;
      qterr = DecompressSequenceFrameWhen(yuv_qt_stuff.seqId,
					  P,
					  image_buffer_size,
					  0, //codecFlagUseImageBuffer,
					  &flags,
					  NULL,
					  NULL);
      if (qterr) {
	mp_msg(MSGT_VO, MSGL_FATAL, "Quartz error: DecompressSequenceFrameWhen in flip_page (%d) flags:0x%08x\n", qterr, flags);
      }
    }
    break;
#endif
  }
}

static uint32_t draw_slice(uint8_t *src[], int stride[], int w,int h,int x,int y)
{
#ifdef QUARTZ_ENABLE_YUV
  switch (image_format) {
  case IMGFMT_YV12:
  case IMGFMT_I420:
    memcpy_pic(((char*)P) + P->componentInfoY.offset + x + image_width * y, src[0],
	       w, h, image_width, stride[0]);
    x=x/2;y=y/2;w=w/2;h=h/2;
    memcpy_pic(((char*)P) + P->componentInfoCb.offset + x + image_width / 2 * y, src[1],
	       w, h, image_width / 2, stride[1]);
    memcpy_pic(((char*)P) + P->componentInfoCr.offset + x + image_width / 2 * y, src[2],
	       w, h, image_width / 2, stride[2]);
    return 0;
    
  case IMGFMT_IYUV:
    memcpy_pic(((char*)P) + P->componentInfoY.offset + x + image_width * y, src[0],
	       w, h, image_width, stride[0]);
    x=x/2;y=y/2;w=w/2;h=h/2;
    memcpy_pic(((char*)P) + P->componentInfoCr.offset + x + image_width / 2 * y, src[1],
	       w, h, image_width / 2, stride[1]);
    memcpy_pic(((char*)P) + P->componentInfoCb.offset + x + image_width / 2 * y, src[2],
	       w, h, image_width / 2, stride[2]);
    return 0;
  }
#endif
	return -1;
}

static uint32_t draw_frame(uint8_t *src[])
{
  switch (image_format) {
  case IMGFMT_RGB32:
	image_data = src[0];
	DisposeGWorld(imgGWorld);
	NewGWorldFromPtr (&imgGWorld, k32ARGBPixelFormat, &imgRect, 0, 0, 0, image_data, image_width * 4);
	return 0;
#ifdef QUARTZ_ENABLE_YUV
  case IMGFMT_UYVY:
  case IMGFMT_YUY2:
    memcpy_pic(((char*)P), src[0], image_width * 2, image_height, image_width * 2, image_width * 2);
    return 0;
#endif
  }
  return -1;
}

static uint32_t query_format(uint32_t format)
{
	image_format = format;
	
    if (format == IMGFMT_RGB32)
        return VFCAP_CSP_SUPPORTED | VFCAP_OSD | VFCAP_SWSCALE | VFCAP_CSP_SUPPORTED_BY_HW;

#ifdef QUARTZ_ENABLE_YUV
    image_qtcodec = 0;
    
    if ((format == IMGFMT_YV12) || (format == IMGFMT_IYUV) || (format == IMGFMT_I420)) {
      image_qtcodec = kMpegYUV420CodecType; //kYUV420CodecType ?;
      return VFCAP_CSP_SUPPORTED | VFCAP_OSD | VFCAP_SWSCALE | VFCAP_ACCEPT_STRIDE;
    }

    if (format == IMGFMT_YUY2) {
      image_qtcodec = kComponentVideoUnsigned;
      return VFCAP_CSP_SUPPORTED | VFCAP_OSD | VFCAP_SWSCALE;
    }
    
    if (format == IMGFMT_UYVY) {
      image_qtcodec = k422YpCbCr8CodecType;
      return VFCAP_CSP_SUPPORTED | VFCAP_OSD | VFCAP_SWSCALE;
    }
#endif

    return 0;
}

static void uninit(void)
{
  switch (image_format) {
  case IMGFMT_YV12:
  case IMGFMT_IYUV:
  case IMGFMT_I420:
  case IMGFMT_UYVY:
  case IMGFMT_YUY2:
    {
      OSErr qterr;
      if (EnterMoviesDone) {
	qterr = CDSequenceEnd(yuv_qt_stuff.seqId);
	if (qterr) {
	  mp_msg(MSGT_VO, MSGL_FATAL, "Quartz error: CDSequenceEnd (%d)\n", qterr);
	}
      }
    }
    break;
  default:
    break;
  }
	ShowMenuBar();
}

static uint32_t preinit(const char *arg)
{
    return 0;
}

#ifdef QUARTZ_ENABLE_YUV
static uint32_t draw_yuv_image(mp_image_t *mpi) {
  // ATM we're only called for planar IMGFMT
  // drawing is done directly in P
  // and displaying is in flip_page.
  return VO_TRUE;  
}

static uint32_t get_yuv_image(mp_image_t *mpi) {
  if(mpi->type!=MP_IMGTYPE_EXPORT) return VO_FALSE;
  
  if(mpi->imgfmt!=image_format) return VO_FALSE;
  
  if(mpi->flags&MP_IMGFLAG_PLANAR){
    if (mpi->num_planes != 3) {
      mp_msg(MSGT_VO, MSGL_ERR, "Quartz error: only 3 planes allowed in get_yuv_image for planar (%d) \n", mpi->num_planes);
      return VO_FALSE;
    }

    mpi->planes[0]=((char*)P) + P->componentInfoY.offset;
    mpi->stride[0]=image_width;
    mpi->width=image_width;

    if(mpi->flags&MP_IMGFLAG_SWAPPED){
      // I420
      mpi->planes[1]=((char*)P) + P->componentInfoCb.offset;
      mpi->planes[2]=((char*)P) + P->componentInfoCr.offset;
      mpi->stride[1]=image_width/2;
      mpi->stride[2]=image_width/2;
    } else {
      // YV12
      mpi->planes[1]=((char*)P) + P->componentInfoCr.offset;
      mpi->planes[2]=((char*)P) + P->componentInfoCb.offset;
      mpi->stride[1]=image_width/2;
      mpi->stride[2]=image_width/2;
    }
    mpi->flags|=MP_IMGFLAG_DIRECT;
    return VO_TRUE;
  } else { // doesn't work yet
    if (mpi->num_planes != 1) {
      mp_msg(MSGT_VO, MSGL_ERR, "Quartz error: only 1 plane allowed in get_yuv_image for packed (%d) \n", mpi->num_planes);
      return VO_FALSE;
    }

    mpi->planes[0] = (char*)P;
    mpi->stride[0] = image_width * 2;
    mpi->width=image_width;
    mpi->flags|=MP_IMGFLAG_DIRECT;
    return VO_TRUE;
  }
  return VO_FALSE;
}
#endif /* QUARTZ_ENABLE_YUV */

static uint32_t control(uint32_t request, void *data, ...)
{
  switch (request)
  {
	case VOCTRL_PAUSE: return (int_pause=1);
	case VOCTRL_RESUME: return (int_pause=0);
	case VOCTRL_FULLSCREEN: window_fullscreen(); return VO_TRUE;
	case VOCTRL_ONTOP: window_ontop(); return VO_TRUE;
	case VOCTRL_QUERY_FORMAT: return query_format(*((uint32_t*)data));
#ifdef QUARTZ_ENABLE_YUV
  case VOCTRL_GET_IMAGE:
    switch (image_format) {
    case IMGFMT_YV12:
    case IMGFMT_IYUV:
    case IMGFMT_I420:
      //case IMGFMT_UYVY:
      //case IMGFMT_YUY2:
      return get_yuv_image(data);
      break;
    }
  case VOCTRL_DRAW_IMAGE:
    switch (image_format) {
    case IMGFMT_YV12:
    case IMGFMT_IYUV:
    case IMGFMT_I420:
      //case IMGFMT_UYVY:
      //case IMGFMT_YUY2:
      return draw_yuv_image(data);
      break;
    }
#endif
  }
  return VO_NOTIMPL;
}

void window_resized()
{
	float aspectX;
	float aspectY;
	
	int padding;
	
	uint32_t d_width;
	uint32_t d_height;
	
	GetWindowPortBounds(theWindow, &winRect);

	aspect( &d_width, &d_height, A_NOZOOM);
	
	aspectX = (float)((float)winRect.right/(float)d_width);
	aspectY = (float)((float)winRect.bottom/(float)d_height);
	
	if((d_height*aspectX)>winRect.bottom)
	{
		padding = (winRect.right - d_width*aspectY)/2;
		SetRect(&dstRect, padding, 0, d_width*aspectY+padding, d_height*aspectY);
	}
	else
	{
		padding = (winRect.bottom - d_height*aspectX)/2;
		SetRect(&dstRect, 0, padding, (d_width*aspectX), d_height*aspectX+padding);
	}

	//create a graphic context for the window
	SetPortBounds(GetWindowPort(theWindow), &winRect);
	CreateCGContextForPort(GetWindowPort(theWindow),&context);

	//fill background with black
	CGRect winBounds = CGRectMake( winRect.top, winRect.left, winRect.right, winRect.bottom);
	CGContextSetRGBFillColor(context, 0.0, 0.0, 0.0, 1.0);
	CGContextFillRect(context, winBounds);
	CGContextFlush(context);


	switch (image_format) {
#ifdef QUARTZ_ENABLE_YUV
	case IMGFMT_YV12:
	case IMGFMT_IYUV:
	case IMGFMT_I420:
	case IMGFMT_UYVY:
	case IMGFMT_YUY2:
	  {
	    long scale_X = FixDiv(Long2Fix(dstRect.right - dstRect.left),Long2Fix(image_width));
	    long scale_Y = FixDiv(Long2Fix(dstRect.bottom - dstRect.top),Long2Fix(image_height));

	    SetIdentityMatrix(&yuv_qt_stuff.matrix);
	    if (((dstRect.right - dstRect.left)   != image_width) ||
		((dstRect.bottom - dstRect.right) != image_height)) {
	      ScaleMatrix(&yuv_qt_stuff.matrix,
			  scale_X,
			  scale_Y,
			  0,
			  0);
	      
	      if (padding > 0) {
		TranslateMatrix(&yuv_qt_stuff.matrix,
				Long2Fix(dstRect.left),
				Long2Fix(dstRect.top));
	      }
	    }
	    SetDSequenceMatrix(yuv_qt_stuff.seqId, &yuv_qt_stuff.matrix);
	    break;
	  }
#endif
	default:
	  break;
	}
}

void window_ontop()
{	
	if(!vo_ontop)
		SetWindowClass( theWindow, kUtilityWindowClass);
	else
		SetWindowClass( theWindow, kDocumentWindowClass);
		
	vo_ontop = (!(vo_ontop));
}

void window_fullscreen()
{
	static Rect oldRect;
	static Ptr *restoreState = nil;
	short width=640;
	short height=480;
	RGBColor black={0,0,0};
	GDHandle deviceHdl;
	Rect deviceRect;

	//go fullscreen
	if(!vo_fs)
	{
		//BeginFullScreen( &restoreState,nil,&width,&height,nil,&black,nil);
		HideMenuBar();

		//Get Main device info///////////////////////////////////////////////////
		deviceHdl = GetMainDevice();
		deviceRect = (*deviceHdl)->gdRect;
	
		device_width = deviceRect.right;
		device_height = deviceRect.bottom;

		//save old window size
		GetWindowPortBounds(theWindow, &oldRect);
		
		//hide mouse cursor
		HideCursor();
		
		//go fullscreen
		ChangeWindowAttributes(theWindow, 0, kWindowResizableAttribute);
		MoveWindow (theWindow, 0, 0, 1);		
		SizeWindow(theWindow, device_width, device_height,1);

		vo_fs = 1;
	}
	else //go back to windowed mode
	{
		//EndFullScreen( restoreState,0);
		ShowMenuBar();
		
		//Get Main device info///////////////////////////////////////////////////
		deviceHdl = GetMainDevice();
		deviceRect = (*deviceHdl)->gdRect;
	
		device_width = deviceRect.right;
		device_height = deviceRect.bottom;

		//show mouse cursor
		ShowCursor();
		
		//revert window to previous setting
		ChangeWindowAttributes(theWindow, kWindowResizableAttribute, 0);
		SizeWindow(theWindow, oldRect.right, oldRect.bottom,1);
		RepositionWindow(theWindow, NULL, kWindowCascadeOnMainScreen);
		
		vo_fs = 0;
	}
	
	window_resized();
}