?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
demux: ts: only seek on pcr for current program
[vlc.git] / modules / video_output / kva.c
blobdbd2a737ed3268544240c6b9e25b5c337ea70193
1 /*****************************************************************************
2 * kva.c: KVA video output plugin for vlc
3 *****************************************************************************
4 * Copyright (C) 2010, 2011, 2012 VLC authors and VideoLAN
5 *
6 * Authors: KO Myung-Hun <komh@chollian.net>
7 *
8 * This program is free software; you can redistribute it and/or modify it
9 * under the terms of the GNU Lesser General Public License as published by
10 * the Free Software Foundation; either version 2.1 of the License, or
11 * (at your option) any later version.
12 *
13 * This program is distributed in the hope that it will be useful,
14 * but WITHOUT ANY WARRANTY; without even the implied warranty of
15 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 * GNU Lesser General Public License for more details.
17 *
18 * You should have received a copy of the GNU Lesser General Public License
19 * along with this program; if not, write to the Free Software Foundation,
20 * Inc., 51 Franklin Street, Fifth Floor, Boston MA 02110-1301, USA.
21 *****************************************************************************/
22
23 /*****************************************************************************
24 * Preamble
25 *****************************************************************************/
26 #ifdef HAVE_CONFIG_H
27 # include "config.h"
28 #endif
29
30 #include <vlc_common.h>
31 #include <vlc_plugin.h>
32 #include <vlc_vout_display.h>
33 #include <vlc_picture_pool.h>
34
35 #include <ctype.h>
36 #include <float.h>
37 #include <assert.h>
38
39 #include <fourcc.h>
40
41 #include <kva.h>
42
43 /*****************************************************************************
44 * Module descriptor
45 *****************************************************************************/
46 static int Open ( vlc_object_t * );
47 static void Close( vlc_object_t * );
48
49 #define KVA_FIXT23_TEXT N_( \
50 "Enable a workaround for T23" )
51 #define KVA_FIXT23_LONGTEXT N_( \
52 "Enable this option if the diagonal stripes are displayed " \
53 "when the window size is equal to or smaller than the movie size." )
54 #define KVA_VIDEO_MODE_TEXT N_( \
55 "Video mode" )
56 #define KVA_VIDEO_MODE_LONGTEXT N_( \
57 "Select a proper video mode to be used by KVA." )
58
59 static const char *const ppsz_kva_video_mode[] = {
60 "auto", "snap", "wo", "vman", "dive" };
61 static const char *const ppsz_kva_video_mode_text[] = {
62 N_("Auto"), N_("SNAP"), N_("WarpOverlay!"), N_("VMAN"), N_("DIVE") };
63
64 vlc_module_begin ()
65 set_shortname( "KVA" )
66 set_category( CAT_VIDEO )
67 set_subcategory( SUBCAT_VIDEO_VOUT )
68 add_string( "kva-video-mode", ppsz_kva_video_mode[0], KVA_VIDEO_MODE_TEXT,
69 KVA_VIDEO_MODE_LONGTEXT, false )
70 change_string_list( ppsz_kva_video_mode, ppsz_kva_video_mode_text )
71 add_bool( "kva-fixt23", false, KVA_FIXT23_TEXT, KVA_FIXT23_LONGTEXT, true )
72 set_description( N_("K Video Acceleration video output") )
73 set_capability( "vout display", 100 )
74 add_shortcut( "kva" )
75 set_callbacks( Open, Close )
76 vlc_module_end ()
77
78 /*****************************************************************************
79 * vout_display_sys_t: video output method descriptor
80 *****************************************************************************
81 * This structure is part of the video output thread descriptor.
82 * It describes the module specific properties of an output thread.
83 *****************************************************************************/
84 struct vout_display_sys_t
85 {
86 TID tid;
87 HEV ack_event;
88 int i_result;
89 HAB hab;
90 HMQ hmq;
91 HWND frame;
92 HWND client;
93 KVASETUP kvas;
94 KVACAPS kvac;
95 LONG i_screen_width;
96 LONG i_screen_height;
97 bool b_fixt23;
98 PFNWP p_old_frame;
99 RECTL client_rect;
100 vout_window_t *parent_window;
101 HWND parent;
102 RECTL parent_rect;
103 picture_pool_t *pool;
104 unsigned button_pressed;
105 bool is_mouse_hidden;
106 bool is_on_top;
107 };
108
109 struct picture_sys_t
110 {
111 int i_chroma_shift;
112 };
113
114 /*****************************************************************************
115 * Local prototypes
116 *****************************************************************************/
117 static picture_pool_t *Pool (vout_display_t *, unsigned);
118 static void Display(vout_display_t *, picture_t *, subpicture_t * );
119 static int Control(vout_display_t *, int, va_list);
120 static void Manage (vout_display_t *);
121
122 static int OpenDisplay ( vout_display_t *, video_format_t * );
123 static void CloseDisplay( vout_display_t * );
124
125 static int KVALock( picture_t * );
126 static void KVAUnlock( picture_t * );
127
128 static void MorphToPM ( void );
129 static int ConvertKey ( USHORT );
130 static MRESULT EXPENTRY MyFrameWndProc( HWND, ULONG, MPARAM, MPARAM );
131 static MRESULT EXPENTRY WndProc ( HWND, ULONG, MPARAM, MPARAM );
132
133 #define WC_VLC_KVA "WC_VLC_KVA"
134
135 #define COLOR_KEY 0x0F0F0F
136
137 #define WM_VLC_MANAGE ( WM_USER + 1 )
138 #define WM_VLC_FULLSCREEN_CHANGE ( WM_USER + 2 )
139 #define WM_VLC_SIZE_CHANGE ( WM_USER + 3 )
140
141 static const char *psz_video_mode[ 4 ] = {"DIVE", "WarpOverlay!", "SNAP",
142 "VMAN"};
143
144 static void PMThread( void *arg )
145 {
146 vout_display_t *vd = ( vout_display_t * )arg;
147 vout_display_sys_t * sys = vd->sys;
148 ULONG i_frame_flags;
149 QMSG qm;
150 char *psz_mode;
151 ULONG i_kva_mode;
152
153 /* */
154 video_format_t fmt;
155 video_format_ApplyRotation(&fmt, &vd->fmt);
156
157 /* */
158 vout_display_info_t info = vd->info;
159 info.is_slow = false;
160 info.has_double_click = true;
161 info.needs_hide_mouse = true;
162 info.has_pictures_invalid = false;
163
164 MorphToPM();
165
166 sys->hab = WinInitialize( 0 );
167 sys->hmq = WinCreateMsgQueue( sys->hab, 0);
168
169 WinRegisterClass( sys->hab,
170 WC_VLC_KVA,
171 WndProc,
172 CS_SIZEREDRAW | CS_MOVENOTIFY,
173 sizeof( PVOID ));
174
175 sys->b_fixt23 = var_CreateGetBool( vd, "kva-fixt23");
176
177 if( !sys->b_fixt23 )
178 /* If an external window was specified, we'll draw in it. */
179 sys->parent_window =
180 vout_display_NewWindow( vd, VOUT_WINDOW_TYPE_HWND );
181
182 if( sys->parent_window )
183 {
184 sys->parent = ( HWND )sys->parent_window->handle.hwnd;
185
186 ULONG i_style = WinQueryWindowULong( sys->parent, QWL_STYLE );
187 WinSetWindowULong( sys->parent, QWL_STYLE,
188 i_style | WS_CLIPCHILDREN );
189
190 i_frame_flags = FCF_TITLEBAR;
191 }
192 else
193 {
194 sys->parent = HWND_DESKTOP;
195
196 i_frame_flags = FCF_SYSMENU | FCF_TITLEBAR | FCF_MINMAX |
197 FCF_SIZEBORDER | FCF_TASKLIST;
198 }
199
200 sys->frame =
201 WinCreateStdWindow( sys->parent, /* parent window handle */
202 WS_VISIBLE, /* frame window style */
203 &i_frame_flags, /* window style */
204 WC_VLC_KVA, /* class name */
205 "", /* window title */
206 0L, /* default client style */
207 NULLHANDLE, /* resource in exe file */
208 1, /* frame window id */
209 &sys->client ); /* client window handle */
210
211 if( sys->frame == NULLHANDLE )
212 {
213 msg_Err( vd, "cannot create a frame window");
214
215 goto exit_frame;
216 }
217
218 WinSetWindowPtr( sys->client, 0, vd );
219
220 if( !sys->parent_window )
221 {
222 WinSetWindowPtr( sys->frame, 0, vd );
223 sys->p_old_frame = WinSubclassWindow( sys->frame, MyFrameWndProc );
224 }
225
226 psz_mode = var_CreateGetString( vd, "kva-video-mode" );
227
228 i_kva_mode = KVAM_AUTO;
229 if( strcmp( psz_mode, "snap" ) == 0 )
230 i_kva_mode = KVAM_SNAP;
231 else if( strcmp( psz_mode, "wo" ) == 0 )
232 i_kva_mode = KVAM_WO;
233 else if( strcmp( psz_mode, "vman" ) == 0 )
234 i_kva_mode = KVAM_VMAN;
235 else if( strcmp( psz_mode, "dive" ) == 0 )
236 i_kva_mode = KVAM_DIVE;
237
238 free( psz_mode );
239
240 if( kvaInit( i_kva_mode, sys->client, COLOR_KEY ))
241 {
242 msg_Err( vd, "cannot initialize KVA");
243
244 goto exit_kva_init;
245 }
246
247 kvaCaps( &sys->kvac );
248
249 msg_Dbg( vd, "selected video mode = %s",
250 psz_video_mode[ sys->kvac.ulMode - 1 ]);
251
252 if( OpenDisplay( vd, &fmt ) )
253 {
254 msg_Err( vd, "cannot open display");
255
256 goto exit_open_display;
257 }
258
259 if( vd->cfg->is_fullscreen && !sys->parent_window )
260 WinPostMsg( sys->client, WM_VLC_FULLSCREEN_CHANGE,
261 MPFROMLONG( true ), 0 );
262
263 kvaDisableScreenSaver();
264
265 /* Setup vout_display now that everything is fine */
266 vd->fmt = fmt;
267 vd->info = info;
268
269 vd->pool = Pool;
270 vd->prepare = NULL;
271 vd->display = Display;
272 vd->control = Control;
273 vd->manage = Manage;
274
275 /* Prevent SIG_FPE */
276 _control87(MCW_EM, MCW_EM);
277
278 sys->i_result = VLC_SUCCESS;
279 DosPostEventSem( sys->ack_event );
280
281 if( !sys->parent_window )
282 WinSetVisibleRegionNotify( sys->frame, TRUE );
283
284 while( WinGetMsg( sys->hab, &qm, NULLHANDLE, 0, 0 ))
285 WinDispatchMsg( sys->hab, &qm );
286
287 if( !sys->parent_window )
288 WinSetVisibleRegionNotify( sys->frame, FALSE );
289
290 kvaEnableScreenSaver();
291
292 CloseDisplay( vd );
293
294 /* fall through */
295
296 exit_open_display :
297 kvaDone();
298
299 exit_kva_init :
300 if( !sys->parent_window )
301 WinSubclassWindow( sys->frame, sys->p_old_frame );
302
303 WinDestroyWindow( sys->frame );
304
305 exit_frame :
306 vout_display_DeleteWindow( vd, sys->parent_window );
307
308 if( sys->is_mouse_hidden )
309 WinShowPointer( HWND_DESKTOP, TRUE );
310
311 WinDestroyMsgQueue( sys->hmq );
312 WinTerminate( sys->hab );
313
314 sys->i_result = VLC_EGENERIC;
315 DosPostEventSem( sys->ack_event );
316 }
317
318 /**
319 * This function initializes KVA vout method.
320 */
321 static int Open ( vlc_object_t *object )
322 {
323 vout_display_t *vd = (vout_display_t *)object;
324 vout_display_sys_t *sys;
325
326 vd->sys = sys = calloc( 1, sizeof( *sys ));
327 if( !sys )
328 return VLC_ENOMEM;
329
330 DosCreateEventSem( NULL, &sys->ack_event, 0, FALSE );
331
332 sys->tid = _beginthread( PMThread, NULL, 1024 * 1024, vd );
333 DosWaitEventSem( sys->ack_event, SEM_INDEFINITE_WAIT );
334
335 if( sys->i_result != VLC_SUCCESS )
336 {
337 DosCloseEventSem( sys->ack_event );
338
339 free( sys );
340
341 return VLC_EGENERIC;
342 }
343
344 return VLC_SUCCESS;
345 }
346
347 /*****************************************************************************
348 * Close: destroy KVA video thread output method
349 *****************************************************************************
350 * Terminate an output method created by Open
351 *****************************************************************************/
352 static void Close ( vlc_object_t *object )
353 {
354 vout_display_t * vd = (vout_display_t *)object;
355 vout_display_sys_t * sys = vd->sys;
356
357 WinPostQueueMsg( sys->hmq, WM_QUIT, 0, 0 );
358
359 DosWaitThread( &sys->tid, DCWW_WAIT );
360
361 if( sys->pool )
362 picture_pool_Release( sys->pool );
363
364 DosCloseEventSem( sys->ack_event );
365
366 free( sys );
367 }
368
369 /**
370 * Return a pool of direct buffers
371 */
372 static picture_pool_t *Pool(vout_display_t *vd, unsigned count)
373 {
374 vout_display_sys_t *sys = vd->sys;
375 VLC_UNUSED(count);
376
377 return sys->pool;
378 }
379
380 /*****************************************************************************
381 * Display: displays previously rendered output
382 *****************************************************************************
383 * This function sends the currently rendered image to the display.
384 *****************************************************************************/
385 static void Display( vout_display_t *vd, picture_t *picture,
386 subpicture_t *subpicture )
387 {
388 VLC_UNUSED( vd );
389 VLC_UNUSED( subpicture );
390
391 picture_Release( picture );
392 }
393
394 /*****************************************************************************
395 * Manage: handle Sys events
396 *****************************************************************************
397 * This function should be called regularly by video output thread. It returns
398 * a non null value if an error occurred.
399 *****************************************************************************/
400 static void Manage( vout_display_t *vd )
401 {
402 vout_display_sys_t * sys = vd->sys;
403
404 /* Let a window procedure manage instead because if resizing a frame window
405 * here, WM_SIZE is not sent to its child window.
406 * Maybe, is this due to the different threads ? */
407 WinPostMsg( sys->client, WM_VLC_MANAGE, 0, 0 );
408 }
409
410 /*****************************************************************************
411 * Control: control facility for the vout
412 *****************************************************************************/
413 static int Control( vout_display_t *vd, int query, va_list args )
414 {
415 vout_display_sys_t *sys = vd->sys;
416
417 switch (query)
418 {
419 case VOUT_DISPLAY_HIDE_MOUSE:
420 {
421 POINTL ptl;
422
423 WinQueryPointerPos( HWND_DESKTOP, &ptl );
424 if( !sys->is_mouse_hidden &&
425 WinWindowFromPoint( HWND_DESKTOP, &ptl, TRUE ) == sys->client )
426 {
427 WinShowPointer( HWND_DESKTOP, FALSE );
428 sys->is_mouse_hidden = true;
429 }
430
431 return VLC_SUCCESS;
432 }
433
434 case VOUT_DISPLAY_CHANGE_FULLSCREEN:
435 {
436 bool fs = va_arg(args, int);
437
438 WinPostMsg( sys->client, WM_VLC_FULLSCREEN_CHANGE, MPFROMLONG(fs), 0 );
439 return VLC_SUCCESS;
440 }
441
442 case VOUT_DISPLAY_CHANGE_WINDOW_STATE:
443 {
444 const unsigned state = va_arg( args, unsigned );
445 const bool is_on_top = (state & VOUT_WINDOW_STATE_ABOVE) != 0;
446
447 if( is_on_top )
448 WinSetWindowPos( sys->frame, HWND_TOP, 0, 0, 0, 0, SWP_ZORDER );
449
450 sys->is_on_top = is_on_top;
451
452 return VLC_SUCCESS;
453 }
454
455 case VOUT_DISPLAY_CHANGE_DISPLAY_SIZE:
456 case VOUT_DISPLAY_CHANGE_ZOOM:
457 {
458 const vout_display_cfg_t *cfg = va_arg(args, const vout_display_cfg_t *);
459
460 WinPostMsg( sys->client, WM_VLC_SIZE_CHANGE,
461 MPFROMLONG( cfg->display.width ),
462 MPFROMLONG( cfg->display.height ));
463 return VLC_SUCCESS;
464 }
465
466 case VOUT_DISPLAY_CHANGE_SOURCE_ASPECT:
467 case VOUT_DISPLAY_CHANGE_SOURCE_CROP:
468 {
469 if( query == VOUT_DISPLAY_CHANGE_SOURCE_ASPECT )
470 {
471 vout_display_place_t place;
472 vout_display_PlacePicture(&place, &vd->source, vd->cfg, false);
473
474 sys->kvas.ulAspectWidth = place.width;
475 sys->kvas.ulAspectHeight = place.height;
476 }
477 else
478 {
479 video_format_t src_rot;
480 video_format_ApplyRotation(&src_rot, &vd->source);
481
482 sys->kvas.rclSrcRect.xLeft = src_rot.i_x_offset;
483 sys->kvas.rclSrcRect.yTop = src_rot.i_y_offset;
484 sys->kvas.rclSrcRect.xRight = src_rot.i_x_offset +
485 src_rot.i_visible_width;
486 sys->kvas.rclSrcRect.yBottom = src_rot.i_y_offset +
487 src_rot.i_visible_height;
488 }
489
490 kvaSetup( &sys->kvas );
491
492 return VLC_SUCCESS;
493 }
494
495 case VOUT_DISPLAY_RESET_PICTURES:
496 case VOUT_DISPLAY_CHANGE_DISPLAY_FILLED:
497 /* TODO */
498 break;
499 }
500
501 msg_Err(vd, "Unsupported query(=%d) in vout display KVA", query);
502 return VLC_EGENERIC;
503 }
504
505 /* following functions are local */
506
507 /*****************************************************************************
508 * OpenDisplay: open and initialize KVA device
509 *****************************************************************************
510 * Open and initialize display according to preferences specified in the vout
511 * thread fields.
512 *****************************************************************************/
513 static int OpenDisplay( vout_display_t *vd, video_format_t *fmt )
514 {
515 vout_display_sys_t * sys = vd->sys;
516 const vlc_fourcc_t *fallback;
517 bool b_hw_accel = 0;
518 FOURCC i_kva_fourcc;
519 int i_chroma_shift;
520 char sz_title[ 256 ];
521 RECTL rcl;
522 int w, h;
523
524 msg_Dbg( vd, "render chroma = %4.4s", ( const char * )&fmt->i_chroma );
525
526 for( int pass = 0; pass < 2 && !b_hw_accel; pass++ )
527 {
528 fallback = ( pass == 0 ) ? vlc_fourcc_GetYUVFallback( fmt->i_chroma ) :
529 vlc_fourcc_GetRGBFallback( fmt->i_chroma );
530
531 for( int i = 0; fallback[ i ]; i++ )
532 {
533 switch( fallback[ i ])
534 {
535 case VLC_CODEC_YV12:
536 b_hw_accel = sys->kvac.ulInputFormatFlags & KVAF_YV12;
537 i_kva_fourcc = FOURCC_YV12;
538 i_chroma_shift = 1;
539 break;
540
541 case VLC_CODEC_YUYV:
542 b_hw_accel = sys->kvac.ulInputFormatFlags & KVAF_YUY2;
543 i_kva_fourcc = FOURCC_Y422;
544 i_chroma_shift = 0;
545 break;
546
547 case VLC_CODEC_YV9:
548 b_hw_accel = sys->kvac.ulInputFormatFlags & KVAF_YVU9;
549 i_kva_fourcc = FOURCC_YVU9;
550 i_chroma_shift = 2;
551 break;
552
553 case VLC_CODEC_RGB32:
554 b_hw_accel = sys->kvac.ulInputFormatFlags & KVAF_BGR32;
555 i_kva_fourcc = FOURCC_BGR4;
556 i_chroma_shift = 0;
557 break;
558
559 case VLC_CODEC_RGB24:
560 b_hw_accel = sys->kvac.ulInputFormatFlags & KVAF_BGR24;
561 i_kva_fourcc = FOURCC_BGR3;
562 i_chroma_shift = 0;
563 break;
564
565 case VLC_CODEC_RGB16:
566 b_hw_accel = sys->kvac.ulInputFormatFlags & KVAF_BGR16;
567 i_kva_fourcc = FOURCC_R565;
568 i_chroma_shift = 0;
569 break;
570
571 case VLC_CODEC_RGB15:
572 b_hw_accel = sys->kvac.ulInputFormatFlags & KVAF_BGR15;
573 i_kva_fourcc = FOURCC_R555;
574 i_chroma_shift = 0;
575 break;
576 }
577
578 if( b_hw_accel )
579 {
580 fmt->i_chroma = fallback[ i ];
581 break;
582 }
583 }
584 }
585
586 if( !b_hw_accel )
587 {
588 msg_Err( vd, "Ooops. There is no fourcc supported by KVA at all.");
589
590 return VLC_EGENERIC;
591 }
592
593 /* Set the RGB masks */
594 fmt->i_rmask = sys->kvac.ulRMask;
595 fmt->i_gmask = sys->kvac.ulGMask;
596 fmt->i_bmask = sys->kvac.ulBMask;
597
598 msg_Dbg( vd, "output chroma = %4.4s", ( const char * )&fmt->i_chroma );
599 msg_Dbg( vd, "KVA chroma = %4.4s", ( const char * )&i_kva_fourcc );
600
601 w = fmt->i_width;
602 h = fmt->i_height;
603
604 sys->kvas.ulLength = sizeof( KVASETUP );
605 sys->kvas.szlSrcSize.cx = w;
606 sys->kvas.szlSrcSize.cy = h;
607 sys->kvas.rclSrcRect.xLeft = fmt->i_x_offset;
608 sys->kvas.rclSrcRect.yTop = fmt->i_y_offset;
609 sys->kvas.rclSrcRect.xRight = fmt->i_x_offset + fmt->i_visible_width;
610 sys->kvas.rclSrcRect.yBottom = fmt->i_y_offset + fmt->i_visible_height;
611 sys->kvas.ulRatio = KVAR_FORCEANY;
612 sys->kvas.ulAspectWidth = w;
613 sys->kvas.ulAspectHeight = h;
614 sys->kvas.fccSrcColor = i_kva_fourcc;
615 sys->kvas.fDither = TRUE;
616
617 if( kvaSetup( &sys->kvas ))
618 {
619 msg_Err( vd, "cannot set up KVA");
620
621 return VLC_EGENERIC;
622 }
623
624 /* Create the associated picture */
625 picture_sys_t *picsys = malloc( sizeof( *picsys ) );
626 if( picsys == NULL )
627 return VLC_ENOMEM;
628 picsys->i_chroma_shift = i_chroma_shift;
629
630 picture_resource_t resource = { .p_sys = picsys };
631 picture_t *picture = picture_NewFromResource( fmt, &resource );
632 if( !picture )
633 {
634 free( picsys );
635 return VLC_ENOMEM;
636 }
637
638 /* Wrap it into a picture pool */
639 picture_pool_configuration_t pool_cfg;
640 memset( &pool_cfg, 0, sizeof( pool_cfg ));
641 pool_cfg.picture_count = 1;
642 pool_cfg.picture = &picture;
643 pool_cfg.lock = KVALock;
644 pool_cfg.unlock = KVAUnlock;
645
646 sys->pool = picture_pool_NewExtended( &pool_cfg );
647 if( !sys->pool )
648 {
649 picture_Release( picture );
650 return VLC_ENOMEM;
651 }
652
653 if (vd->cfg->display.title)
654 snprintf( sz_title, sizeof( sz_title ), "%s", vd->cfg->display.title );
655 else
656 snprintf( sz_title, sizeof( sz_title ),
657 "%s (%4.4s to %4.4s - %s mode KVA output)",
658 VOUT_TITLE,
659 ( char * )&vd->fmt.i_chroma,
660 ( char * )&sys->kvas.fccSrcColor,
661 psz_video_mode[ sys->kvac.ulMode - 1 ]);
662 WinSetWindowText( sys->frame, sz_title );
663
664 sys->i_screen_width = WinQuerySysValue( HWND_DESKTOP, SV_CXSCREEN );
665 sys->i_screen_height = WinQuerySysValue( HWND_DESKTOP, SV_CYSCREEN );
666
667 if( sys->parent_window )
668 WinQueryWindowRect( sys->parent, &sys->client_rect );
669 else
670 {
671 sys->client_rect.xLeft = ( sys->i_screen_width - w ) / 2;
672 sys->client_rect.yBottom = ( sys->i_screen_height - h ) / 2 ;
673 sys->client_rect.xRight = sys->client_rect.xLeft + w;
674 sys->client_rect.yTop = sys->client_rect.yBottom + h;
675 }
676
677 rcl = sys->client_rect;
678
679 WinCalcFrameRect( sys->frame, &rcl, FALSE);
680
681 WinSetWindowPos( sys->frame, HWND_TOP,
682 rcl.xLeft, rcl.yBottom,
683 rcl.xRight - rcl.xLeft, rcl.yTop - rcl.yBottom,
684 SWP_MOVE | SWP_SIZE | SWP_ZORDER | SWP_SHOW |
685 SWP_ACTIVATE );
686
687 return VLC_SUCCESS;
688 }
689
690 /*****************************************************************************
691 * CloseDisplay: close and reset KVA device
692 *****************************************************************************
693 * This function returns all resources allocated by OpenDisplay and restore
694 * the original state of the device.
695 *****************************************************************************/
696 static void CloseDisplay( vout_display_t *vd )
697 {
698 VLC_UNUSED( vd );
699 }
700
701 static int KVALock( picture_t *picture )
702 {
703 picture_sys_t *picsys = picture->p_sys;
704 PVOID kva_buffer;
705 ULONG kva_bpl;
706
707 if( kvaLockBuffer( &kva_buffer, &kva_bpl ))
708 return VLC_EGENERIC;
709
710 /* Packed or Y plane */
711 picture->p->p_pixels = ( uint8_t * )kva_buffer;
712 picture->p->i_pitch = kva_bpl;
713 picture->p->i_lines = picture->format.i_height;
714
715 /* Other planes */
716 for( int n = 1; n < picture->i_planes; n++ )
717 {
718 const plane_t *o = &picture->p[n-1];
719 plane_t *p = &picture->p[n];
720
721 p->p_pixels = o->p_pixels + o->i_lines * o->i_pitch;
722 p->i_pitch = kva_bpl >> picsys->i_chroma_shift;
723 p->i_lines = picture->format.i_height >> picsys->i_chroma_shift;
724 }
725
726 return VLC_SUCCESS;
727 }
728
729 static void KVAUnlock( picture_t *picture )
730 {
731 VLC_UNUSED( picture );
732
733 kvaUnlockBuffer();
734 }
735
736 static void MorphToPM( void )
737 {
738 PPIB pib;
739
740 DosGetInfoBlocks(NULL, &pib);
741
742 /* Change flag from VIO to PM */
743 if (pib->pib_ultype == 2)
744 pib->pib_ultype = 3;
745 }
746
747 /*****************************************************************************
748 * Key events handling
749 *****************************************************************************/
750 static const struct
751 {
752 USHORT i_pmkey;
753 int i_vlckey;
754 } pmkeys_to_vlckeys[] =
755 {
756 { VK_LEFT, KEY_LEFT },
757 { VK_RIGHT, KEY_RIGHT },
758 { VK_UP, KEY_UP },
759 { VK_DOWN, KEY_DOWN },
760 { VK_SPACE, ' ' },
761 { VK_NEWLINE, KEY_ENTER },
762 { VK_ENTER, KEY_ENTER },
763 { VK_F1, KEY_F1 },
764 { VK_F2, KEY_F2 },
765 { VK_F3, KEY_F3 },
766 { VK_F4, KEY_F4 },
767 { VK_F5, KEY_F5 },
768 { VK_F6, KEY_F6 },
769 { VK_F7, KEY_F7 },
770 { VK_F8, KEY_F8 },
771 { VK_F9, KEY_F9 },
772 { VK_F10, KEY_F10 },
773 { VK_F11, KEY_F11 },
774 { VK_F12, KEY_F12 },
775 { VK_HOME, KEY_HOME },
776 { VK_END, KEY_END },
777 { VK_INSERT, KEY_INSERT },
778 { VK_DELETE, KEY_DELETE },
779 /*
780 Not supported
781 {, KEY_MENU },
782 */
783 { VK_ESC, KEY_ESC },
784 { VK_PAGEUP, KEY_PAGEUP },
785 { VK_PAGEDOWN, KEY_PAGEDOWN },
786 { VK_TAB, KEY_TAB },
787 { VK_BACKSPACE, KEY_BACKSPACE },
788 /*
789 Not supported
790 {, KEY_MOUSEWHEELUP },
791 {, KEY_MOUSEWHEELDOWN },
792 {, KEY_MOUSEWHEELLEFT },
793 {, KEY_MOUSEWHEELRIGHT },
794
795 {, KEY_BROWSER_BACK },
796 {, KEY_BROWSER_FORWARD },
797 {, KEY_BROWSER_REFRESH },
798 {, KEY_BROWSER_STOP },
799 {, KEY_BROWSER_SEARCH },
800 {, KEY_BROWSER_FAVORITES },
801 {, KEY_BROWSER_HOME },
802 {, KEY_VOLUME_MUTE },
803 {, KEY_VOLUME_DOWN },
804 {, KEY_VOLUME_UP },
805 {, KEY_MEDIA_NEXT_TRACK },
806 {, KEY_MEDIA_PREV_TRACK },
807 {, KEY_MEDIA_STOP },
808 {, KEY_MEDIA_PLAY_PAUSE },
809 */
810
811 { 0, 0 }
812 };
813
814 static int ConvertKey( USHORT i_pmkey )
815 {
816 int i;
817 for( i = 0; pmkeys_to_vlckeys[ i ].i_pmkey != 0; i++ )
818 {
819 if( pmkeys_to_vlckeys[ i ].i_pmkey == i_pmkey )
820 return pmkeys_to_vlckeys[ i ].i_vlckey;
821 }
822 return 0;
823 }
824
825 static MRESULT EXPENTRY MyFrameWndProc( HWND hwnd, ULONG msg, MPARAM mp1,
826 MPARAM mp2 )
827 {
828 vout_display_t *vd = WinQueryWindowPtr( hwnd, 0 );
829 vout_display_sys_t *sys = vd->sys;
830
831 switch( msg )
832 {
833 case WM_QUERYTRACKINFO :
834 {
835 MRESULT mr;
836
837 mr = sys->p_old_frame( hwnd, msg, mp1, mp2 );
838 if( !sys->b_fixt23 )
839 return mr;
840
841 PTRACKINFO pti = ( PTRACKINFO )mp2;
842 RECTL rcl;
843
844 pti->rclBoundary.xLeft = 0;
845 pti->rclBoundary.yBottom = 0;
846 pti->rclBoundary.xRight = sys->i_screen_width;
847 pti->rclBoundary.yTop = sys->i_screen_height;
848
849 WinCalcFrameRect( hwnd, &pti->rclBoundary, FALSE );
850
851 pti->ptlMaxTrackSize.x = pti->rclBoundary.xRight -
852 pti->rclBoundary.xLeft;
853 pti->ptlMaxTrackSize.y = pti->rclBoundary.yTop -
854 pti->rclBoundary.yBottom;
855
856 rcl.xLeft = 0;
857 rcl.yBottom = 0;
858 rcl.xRight = sys->kvas.szlSrcSize.cx + 1;
859 rcl.yTop = sys->kvas.szlSrcSize.cy + 1;
860
861 WinCalcFrameRect( hwnd, &rcl, FALSE );
862
863 pti->ptlMinTrackSize.x = rcl.xRight - rcl.xLeft;
864 pti->ptlMinTrackSize.y = rcl.yTop - rcl.yBottom;
865
866 return MRFROMLONG( TRUE );
867 }
868
869 case WM_ADJUSTWINDOWPOS :
870 {
871 if( !sys->b_fixt23 )
872 break;
873
874 PSWP pswp = ( PSWP )mp1;
875
876 if( pswp->fl & SWP_SIZE )
877 {
878 RECTL rcl;
879
880 rcl.xLeft = pswp->x;
881 rcl.yBottom = pswp->y;
882 rcl.xRight = rcl.xLeft + pswp->cx;
883 rcl.yTop = rcl.yBottom + pswp->cy;
884
885 WinCalcFrameRect( hwnd, &rcl, TRUE );
886
887 if( rcl.xRight - rcl.xLeft <= sys->kvas.szlSrcSize.cx )
888 rcl.xRight = rcl.xLeft + ( sys->kvas.szlSrcSize.cx + 1 );
889
890 if( rcl.yTop - rcl.yBottom <= sys->kvas.szlSrcSize.cy )
891 rcl.yTop = rcl.yBottom + ( sys->kvas.szlSrcSize.cy + 1 );
892
893 if( rcl.xRight - rcl.xLeft > sys->i_screen_width )
894 {
895 rcl.xLeft = 0;
896 rcl.xRight = sys->i_screen_width;
897 }
898
899 if( rcl.yTop - rcl.yBottom > sys->i_screen_height )
900 {
901 rcl.yBottom = 0;
902 rcl.yTop = sys->i_screen_height;
903 }
904
905 WinCalcFrameRect( hwnd, &rcl, FALSE );
906
907 if( pswp->x != rcl.xLeft || pswp->y != rcl.yBottom )
908 pswp->fl |= SWP_MOVE;
909
910 pswp->x = rcl.xLeft;
911 pswp->y = rcl.yBottom;
912
913 pswp->cx = rcl.xRight - rcl.xLeft;
914 pswp->cy = rcl.yTop - rcl.yBottom;
915 }
916
917 break;
918 }
919
920 //case WM_VRNDISABLED :
921 case WM_VRNENABLED :
922 if( !vd->cfg->is_fullscreen && sys->is_on_top )
923 WinSetWindowPos( hwnd, HWND_TOP, 0, 0, 0, 0, SWP_ZORDER );
924 break;
925 }
926
927 return sys->p_old_frame( hwnd, msg, mp1, mp2 );
928 }
929
930 static void MousePressed( vout_display_t *vd, HWND hwnd, unsigned button )
931 {
932 if( WinQueryFocus( HWND_DESKTOP ) != hwnd )
933 WinSetFocus( HWND_DESKTOP, hwnd );
934
935 if( !vd->sys->button_pressed )
936 WinSetCapture( HWND_DESKTOP, hwnd );
937
938 vd->sys->button_pressed |= 1 << button;
939
940 vout_display_SendEventMousePressed( vd, button );
941 }
942
943 static void MouseReleased( vout_display_t *vd, unsigned button )
944 {
945 vd->sys->button_pressed &= ~(1 << button);
946 if( !vd->sys->button_pressed )
947 WinSetCapture( HWND_DESKTOP, NULLHANDLE );
948
949 vout_display_SendEventMouseReleased( vd, button );
950 }
951
952 #define WM_MOUSELEAVE 0x41F
953
954 static MRESULT EXPENTRY WndProc( HWND hwnd, ULONG msg, MPARAM mp1, MPARAM mp2 )
955 {
956 vout_display_t * vd = WinQueryWindowPtr( hwnd, 0 );
957 MRESULT result = ( MRESULT )TRUE;
958
959 if ( !vd )
960 return WinDefWindowProc( hwnd, msg, mp1, mp2 );
961
962 vout_display_sys_t * sys = vd->sys;
963 RECTL rcl;
964 SWP swp;
965
966 if ( sys->is_mouse_hidden &&
967 ((msg >= WM_MOUSEFIRST && msg <= WM_MOUSELAST) ||
968 (msg >= WM_EXTMOUSEFIRST && msg <= WM_EXTMOUSELAST) ||
969 msg == WM_MOUSELEAVE))
970 {
971 WinShowPointer(HWND_DESKTOP, TRUE);
972 sys->is_mouse_hidden = false;
973 }
974
975 switch( msg )
976 {
977 /* the user wants to close the window */
978 case WM_CLOSE:
979 vout_display_SendEventClose(vd);
980 result = 0;
981 break;
982
983 case WM_MOUSEMOVE :
984 {
985 SHORT i_mouse_x = SHORT1FROMMP( mp1 );
986 SHORT i_mouse_y = SHORT2FROMMP( mp1 );
987 RECTL movie_rect;
988 int i_movie_width, i_movie_height;
989 int i_src_width, i_src_height;
990
991 /* Get a current movie area */
992 kvaAdjustDstRect( &sys->kvas.rclSrcRect, &movie_rect );
993 i_movie_width = movie_rect.xRight - movie_rect.xLeft;
994 i_movie_height = movie_rect.yTop - movie_rect.yBottom;
995
996 i_src_width = sys->kvas.rclSrcRect.xRight -
997 sys->kvas.rclSrcRect.xLeft;
998 i_src_height = sys->kvas.rclSrcRect.yBottom -
999 sys->kvas.rclSrcRect.yTop;
1000
1001 int x = ( i_mouse_x - movie_rect.xLeft ) *
1002 i_src_width / i_movie_width +
1003 sys->kvas.rclSrcRect.xLeft;
1004 int y = ( i_mouse_y - movie_rect.yBottom ) *
1005 i_src_height / i_movie_height;
1006
1007 /* Invert Y coordinate and add y offset */
1008 y = ( i_src_height - y ) + sys->kvas.rclSrcRect.yTop;;
1009
1010 vout_display_SendEventMouseMoved(vd, x, y);
1011
1012 result = WinDefWindowProc( hwnd, msg, mp1,mp2 );
1013 break;
1014 }
1015
1016 case WM_BUTTON1DOWN :
1017 MousePressed( vd, hwnd, MOUSE_BUTTON_LEFT );
1018 break;
1019
1020 case WM_BUTTON2DOWN :
1021 MousePressed( vd, hwnd, MOUSE_BUTTON_RIGHT );
1022 break;
1023
1024 case WM_BUTTON3DOWN :
1025 MousePressed( vd, hwnd, MOUSE_BUTTON_CENTER );
1026 break;
1027
1028 case WM_BUTTON1UP :
1029 MouseReleased( vd, MOUSE_BUTTON_LEFT );
1030 break;
1031
1032 case WM_BUTTON2UP :
1033 MouseReleased( vd, MOUSE_BUTTON_RIGHT );
1034 break;
1035
1036 case WM_BUTTON3UP :
1037 MouseReleased( vd, MOUSE_BUTTON_CENTER );
1038 break;
1039
1040 case WM_BUTTON1DBLCLK :
1041 vout_display_SendEventMouseDoubleClick(vd);
1042 break;
1043
1044 case WM_TRANSLATEACCEL :
1045 /* We have no accelerator table at all */
1046 result = ( MRESULT )FALSE;
1047 break;
1048
1049 case WM_CHAR :
1050 {
1051 USHORT i_flags = SHORT1FROMMP( mp1 );
1052 USHORT i_ch = SHORT1FROMMP( mp2 );
1053 USHORT i_vk = SHORT2FROMMP( mp2 );
1054 int i_key = 0;
1055
1056 /* If embedded window, let the parent process keys */
1057 if( sys->parent_window )
1058 {
1059 WinPostMsg( sys->parent, msg, mp1, mp2 );
1060 break;
1061 }
1062
1063 if( !( i_flags & KC_KEYUP ))
1064 {
1065 if( i_flags & KC_VIRTUALKEY )
1066 /* convert the key if possible */
1067 i_key = ConvertKey( i_vk );
1068 else if(( i_flags & KC_CHAR ) && !HIBYTE( i_ch ))
1069 i_key = tolower( i_ch );
1070
1071 if( i_key )
1072 {
1073 if( i_flags & KC_SHIFT )
1074 i_key |= KEY_MODIFIER_SHIFT;
1075
1076 if( i_flags & KC_CTRL )
1077 i_key |= KEY_MODIFIER_CTRL;
1078
1079 if( i_flags & KC_ALT )
1080 i_key |= KEY_MODIFIER_ALT;
1081
1082 vout_display_SendEventKey(vd, i_key);
1083 }
1084 }
1085 break;
1086 }
1087
1088 /* Process Manage() call */
1089 case WM_VLC_MANAGE :
1090 break;
1091
1092 /* Fullscreen change */
1093 case WM_VLC_FULLSCREEN_CHANGE :
1094 if( LONGFROMMP( mp1 ))
1095 {
1096 WinQueryWindowPos( sys->frame, &swp );
1097 sys->client_rect.xLeft = swp.x;
1098 sys->client_rect.yBottom = swp.y;
1099 sys->client_rect.xRight = sys->client_rect.xLeft + swp.cx;
1100 sys->client_rect.yTop = sys->client_rect.yBottom + swp.cy;
1101 WinCalcFrameRect( sys->frame, &sys->client_rect, TRUE );
1102
1103 rcl.xLeft = 0;
1104 rcl.yBottom = 0;
1105 rcl.xRight = sys->i_screen_width;
1106 rcl.yTop = sys->i_screen_height;
1107 }
1108 else
1109 rcl = sys->client_rect;
1110
1111 WinCalcFrameRect( sys->frame, &rcl, FALSE );
1112
1113 WinSetWindowPos( sys->frame, HWND_TOP,
1114 rcl.xLeft, rcl.yBottom,
1115 rcl.xRight - rcl.xLeft, rcl.yTop - rcl.yBottom,
1116 SWP_MOVE | SWP_SIZE | SWP_ZORDER | SWP_SHOW |
1117 SWP_ACTIVATE );
1118 break;
1119
1120 /* Size change */
1121 case WM_VLC_SIZE_CHANGE :
1122 rcl.xLeft = 0;
1123 rcl.yBottom = 0;
1124 rcl.xRight = LONGFROMMP( mp1 );
1125 rcl.yTop = LONGFROMMP( mp2 );
1126 WinCalcFrameRect( sys->frame, &rcl, FALSE );
1127
1128 WinSetWindowPos( sys->frame, NULLHANDLE,
1129 0, 0,
1130 rcl.xRight - rcl.xLeft, rcl.yTop - rcl.yBottom,
1131 SWP_SIZE );
1132
1133 WinQueryWindowPos( sys->frame, &swp );
1134 sys->client_rect.xLeft = swp.x;
1135 sys->client_rect.yBottom = swp.y;
1136 sys->client_rect.xRight = sys->client_rect.xLeft + swp.cx;
1137 sys->client_rect.yTop = sys->client_rect.yBottom + swp.cy;
1138 WinCalcFrameRect( sys->frame, &sys->client_rect, TRUE );
1139 break;
1140
1141 default :
1142 return WinDefWindowProc( hwnd, msg, mp1, mp2 );
1143 }
1144
1145 /* If embedded window, we need to change our window size according to a
1146 * parent window size */
1147 if( sys->parent_window )
1148 {
1149 WinQueryWindowRect( sys->parent, &rcl );
1150
1151 if( rcl.xLeft != sys->parent_rect.xLeft ||
1152 rcl.yBottom != sys->parent_rect.yBottom ||
1153 rcl.xRight != sys->parent_rect.xRight ||
1154 rcl.yTop != sys->parent_rect.yTop)
1155 {
1156 sys->parent_rect = rcl;
1157
1158 WinCalcFrameRect( sys->frame, &rcl, FALSE );
1159
1160 WinSetWindowPos( sys->frame, NULLHANDLE,
1161 rcl.xLeft, rcl.yBottom,
1162 rcl.xRight - rcl.xLeft, rcl.yTop - rcl.yBottom,
1163 SWP_SIZE | SWP_MOVE );
1164 }
1165 }
1166
1167 return result;
1168 }
VLC Development tree mirror