git.oblomov.eu Git - wine/blob - dlls/quartz/pin.c

   1 /*
   2  * Generic Implementation of IPin Interface
   3  *
   4  * Copyright 2003 Robert Shearman
   5  *
   6  * This library is free software; you can redistribute it and/or
   7  * modify it under the terms of the GNU Lesser General Public
   8  * License as published by the Free Software Foundation; either
   9  * version 2.1 of the License, or (at your option) any later version.
  10  *
  11  * This library is distributed in the hope that it will be useful,
  12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  14  * Lesser General Public License for more details.
  15  *
  16  * You should have received a copy of the GNU Lesser General Public
  17  * License along with this library; if not, write to the Free Software
  18  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  19  */
  20
  21 #include "quartz_private.h"
  22 #include "pin.h"
  23
  24 #include "wine/debug.h"
  25 #include "wine/unicode.h"
  26 #include "uuids.h"
  27 #include "vfwmsgs.h"
  28 #include <assert.h>
  29
  30 WINE_DEFAULT_DEBUG_CHANNEL(quartz);
  31
  32 static const IPinVtbl InputPin_Vtbl;
  33 static const IPinVtbl OutputPin_Vtbl;
  34 static const IMemInputPinVtbl MemInputPin_Vtbl;
  35 static const IPinVtbl PullPin_Vtbl;
  36
  37 #define ALIGNDOWN(value,boundary) ((value)/(boundary)*(boundary))
  38 #define ALIGNUP(value,boundary) (ALIGNDOWN((value)+(boundary)-1, (boundary)))
  39
  40 typedef HRESULT (*SendPinFunc)( IPin *to, LPVOID arg );
  41
  42 /** Helper function, there are a lot of places where the error code is inherited
  43  * The following rules apply:
  44  *
  45  * Return the first received error code (E_NOTIMPL is ignored)
  46  * If no errors occur: return the first received non-error-code that isn't S_OK
  47  */
  48 HRESULT updatehres( HRESULT original, HRESULT new )
  49 {
  50     if (FAILED( original ) || new == E_NOTIMPL)
  51         return original;
  52
  53     if (FAILED( new ) || original == S_OK)
  54         return new;
  55
  56     return original;
  57 }
  58
  59 /** Sends a message from a pin further to other, similar pins
  60  * fnMiddle is called on each pin found further on the stream.
  61  * fnEnd (can be NULL) is called when the message can't be sent any further (this is a renderer or source)
  62  *
  63  * If the pin given is an input pin, the message will be sent downstream to other input pins
  64  * If the pin given is an output pin, the message will be sent upstream to other output pins
  65  */
  66 static HRESULT SendFurther( IPin *from, SendPinFunc fnMiddle, LPVOID arg, SendPinFunc fnEnd )
  67 {
  68     PIN_INFO pin_info;
  69     ULONG amount = 0;
  70     HRESULT hr = S_OK;
  71     HRESULT hr_return = S_OK;
  72     IEnumPins *enumpins = NULL;
  73     BOOL foundend = TRUE;
  74     PIN_DIRECTION from_dir;
  75
  76     IPin_QueryDirection( from, &from_dir );
  77
  78     hr = IPin_QueryInternalConnections( from, NULL, &amount );
  79     if (hr != E_NOTIMPL && amount)
  80         FIXME("Use QueryInternalConnections!\n");
  81      hr = S_OK;
  82
  83     pin_info.pFilter = NULL;
  84     hr = IPin_QueryPinInfo( from, &pin_info );
  85     if (FAILED(hr))
  86         goto out;
  87
  88     hr = IBaseFilter_EnumPins( pin_info.pFilter, &enumpins );
  89     if (FAILED(hr))
  90         goto out;
  91
  92     hr = IEnumPins_Reset( enumpins );
  93     while (hr == S_OK) {
  94         IPin *pin = NULL;
  95         hr = IEnumPins_Next( enumpins, 1, &pin, NULL );
  96         if (hr == VFW_E_ENUM_OUT_OF_SYNC)
  97         {
  98             hr = IEnumPins_Reset( enumpins );
  99             continue;
 100         }
 101         if (pin)
 102         {
 103             PIN_DIRECTION dir;
 104
 105             IPin_QueryDirection( pin, &dir );
 106             if (dir != from_dir)
 107             {
 108                 IPin *connected = NULL;
 109
 110                 foundend = FALSE;
 111                 IPin_ConnectedTo( pin, &connected );
 112                 if (connected)
 113                 {
 114                     HRESULT hr_local;
 115
 116                     hr_local = fnMiddle( connected, arg );
 117                     hr_return = updatehres( hr_return, hr_local );
 118                     IPin_Release(connected);
 119                 }
 120             }
 121             IPin_Release( pin );
 122         }
 123     }
 124
 125     if (!foundend)
 126         hr = hr_return;
 127     else if (fnEnd) {
 128         HRESULT hr_local;
 129
 130         hr_local = fnEnd( from, arg );
 131         hr_return = updatehres( hr_return, hr_local );
 132     }
 133
 134 out:
 135     if (pin_info.pFilter)
 136         IBaseFilter_Release( pin_info.pFilter );
 137     return hr;
 138 }
 139
 140 static inline InputPin *impl_from_IMemInputPin( IMemInputPin *iface )
 141 {
 142     return (InputPin *)((char*)iface - FIELD_OFFSET(InputPin, lpVtblMemInput));
 143 }
 144
 145
 146 static void Copy_PinInfo(PIN_INFO * pDest, const PIN_INFO * pSrc)
 147 {
 148     /* Tempting to just do a memcpy, but the name field is
 149        128 characters long! We will probably never exceed 10
 150        most of the time, so we are better off copying
 151        each field manually */
 152     strcpyW(pDest->achName, pSrc->achName);
 153     pDest->dir = pSrc->dir;
 154     pDest->pFilter = pSrc->pFilter;
 155 }
 156
 157 /* Function called as a helper to IPin_Connect */
 158 /* specific AM_MEDIA_TYPE - it cannot be NULL */
 159 /* NOTE: not part of standard interface */
 160 static HRESULT OutputPin_ConnectSpecific(IPin * iface, IPin * pReceivePin, const AM_MEDIA_TYPE * pmt)
 161 {
 162     OutputPin *This = (OutputPin *)iface;
 163     HRESULT hr;
 164     IMemAllocator * pMemAlloc = NULL;
 165     ALLOCATOR_PROPERTIES actual; /* FIXME: should we put the actual props back in to This? */
 166
 167     TRACE("(%p, %p)\n", pReceivePin, pmt);
 168     dump_AM_MEDIA_TYPE(pmt);
 169
 170     /* FIXME: call queryacceptproc */
 171
 172     This->pin.pConnectedTo = pReceivePin;
 173     IPin_AddRef(pReceivePin);
 174     CopyMediaType(&This->pin.mtCurrent, pmt);
 175
 176     hr = IPin_ReceiveConnection(pReceivePin, iface, pmt);
 177
 178     /* get the IMemInputPin interface we will use to deliver samples to the
 179      * connected pin */
 180     if (SUCCEEDED(hr))
 181     {
 182         This->pMemInputPin = NULL;
 183         hr = IPin_QueryInterface(pReceivePin, &IID_IMemInputPin, (LPVOID)&This->pMemInputPin);
 184
 185         if (SUCCEEDED(hr) && !This->custom_allocator)
 186         {
 187             hr = IMemInputPin_GetAllocator(This->pMemInputPin, &pMemAlloc);
 188
 189             if (hr == VFW_E_NO_ALLOCATOR)
 190             {
 191                 /* Input pin provides no allocator, use standard memory allocator */
 192                 hr = CoCreateInstance(&CLSID_MemoryAllocator, NULL, CLSCTX_INPROC_SERVER, &IID_IMemAllocator, (LPVOID*)&pMemAlloc);
 193
 194                 if (SUCCEEDED(hr))
 195                 {
 196                     hr = IMemInputPin_NotifyAllocator(This->pMemInputPin, pMemAlloc, This->readonly);
 197                 }
 198             }
 199
 200             if (SUCCEEDED(hr))
 201                 hr = IMemAllocator_SetProperties(pMemAlloc, &This->allocProps, &actual);
 202
 203             if (pMemAlloc)
 204                 IMemAllocator_Release(pMemAlloc);
 205         }
 206         else if (SUCCEEDED(hr))
 207         {
 208             if (This->alloc)
 209             {
 210                 hr = IMemInputPin_NotifyAllocator(This->pMemInputPin, This->alloc, This->readonly);
 211             }
 212             else
 213                 hr = VFW_E_NO_ALLOCATOR;
 214         }
 215
 216         /* break connection if we couldn't get the allocator */
 217         if (FAILED(hr))
 218         {
 219             if (This->pMemInputPin)
 220                 IMemInputPin_Release(This->pMemInputPin);
 221             This->pMemInputPin = NULL;
 222
 223             IPin_Disconnect(pReceivePin);
 224         }
 225     }
 226
 227     if (FAILED(hr))
 228     {
 229         IPin_Release(This->pin.pConnectedTo);
 230         This->pin.pConnectedTo = NULL;
 231         FreeMediaType(&This->pin.mtCurrent);
 232     }
 233
 234     TRACE(" -- %x\n", hr);
 235     return hr;
 236 }
 237
 238 static HRESULT InputPin_Init(const IPinVtbl *InputPin_Vtbl, const PIN_INFO * pPinInfo, SAMPLEPROC_PUSH pSampleProc, LPVOID pUserData,
 239                              QUERYACCEPTPROC pQueryAccept, CLEANUPPROC pCleanUp, LPCRITICAL_SECTION pCritSec, InputPin * pPinImpl)
 240 {
 241     TRACE("\n");
 242
 243     /* Common attributes */
 244     pPinImpl->pin.refCount = 1;
 245     pPinImpl->pin.pConnectedTo = NULL;
 246     pPinImpl->pin.fnQueryAccept = pQueryAccept;
 247     pPinImpl->pin.pUserData = pUserData;
 248     pPinImpl->pin.pCritSec = pCritSec;
 249     Copy_PinInfo(&pPinImpl->pin.pinInfo, pPinInfo);
 250     ZeroMemory(&pPinImpl->pin.mtCurrent, sizeof(AM_MEDIA_TYPE));
 251
 252     /* Input pin attributes */
 253     pPinImpl->fnSampleProc = pSampleProc;
 254     pPinImpl->fnCleanProc = pCleanUp;
 255     pPinImpl->pAllocator = NULL;
 256     pPinImpl->tStart = 0;
 257     pPinImpl->tStop = 0;
 258     pPinImpl->dRate = 1.0;
 259     pPinImpl->pin.lpVtbl = InputPin_Vtbl;
 260     pPinImpl->lpVtblMemInput = &MemInputPin_Vtbl;
 261     pPinImpl->flushing = pPinImpl->end_of_stream = 0;
 262
 263     return S_OK;
 264 }
 265
 266 static HRESULT OutputPin_Init(const IPinVtbl *OutputPin_Vtbl, const PIN_INFO * pPinInfo, const ALLOCATOR_PROPERTIES * props, LPVOID pUserData,
 267                               QUERYACCEPTPROC pQueryAccept, LPCRITICAL_SECTION pCritSec, OutputPin * pPinImpl)
 268 {
 269     TRACE("\n");
 270
 271     /* Common attributes */
 272     pPinImpl->pin.lpVtbl = OutputPin_Vtbl;
 273     pPinImpl->pin.refCount = 1;
 274     pPinImpl->pin.pConnectedTo = NULL;
 275     pPinImpl->pin.fnQueryAccept = pQueryAccept;
 276     pPinImpl->pin.pUserData = pUserData;
 277     pPinImpl->pin.pCritSec = pCritSec;
 278     Copy_PinInfo(&pPinImpl->pin.pinInfo, pPinInfo);
 279     ZeroMemory(&pPinImpl->pin.mtCurrent, sizeof(AM_MEDIA_TYPE));
 280
 281     /* Output pin attributes */
 282     pPinImpl->pMemInputPin = NULL;
 283     pPinImpl->pConnectSpecific = OutputPin_ConnectSpecific;
 284     /* If custom_allocator is set, you will need to specify an allocator
 285      * in the alloc member of the struct before an output pin can connect
 286      */
 287     pPinImpl->custom_allocator = 0;
 288     pPinImpl->alloc = NULL;
 289     pPinImpl->readonly = FALSE;
 290     if (props)
 291     {
 292         pPinImpl->allocProps = *props;
 293         if (pPinImpl->allocProps.cbAlign == 0)
 294             pPinImpl->allocProps.cbAlign = 1;
 295     }
 296     else
 297         ZeroMemory(&pPinImpl->allocProps, sizeof(pPinImpl->allocProps));
 298
 299     return S_OK;
 300 }
 301
 302 HRESULT InputPin_Construct(const IPinVtbl *InputPin_Vtbl, const PIN_INFO * pPinInfo, SAMPLEPROC_PUSH pSampleProc, LPVOID pUserData, QUERYACCEPTPROC pQueryAccept, CLEANUPPROC pCleanUp, LPCRITICAL_SECTION pCritSec, IPin ** ppPin)
 303 {
 304     InputPin * pPinImpl;
 305
 306     *ppPin = NULL;
 307
 308     if (pPinInfo->dir != PINDIR_INPUT)
 309     {
 310         ERR("Pin direction(%x) != PINDIR_INPUT\n", pPinInfo->dir);
 311         return E_INVALIDARG;
 312     }
 313
 314     pPinImpl = CoTaskMemAlloc(sizeof(*pPinImpl));
 315
 316     if (!pPinImpl)
 317         return E_OUTOFMEMORY;
 318
 319     if (SUCCEEDED(InputPin_Init(InputPin_Vtbl, pPinInfo, pSampleProc, pUserData, pQueryAccept, pCleanUp, pCritSec, pPinImpl)))
 320     {
 321         *ppPin = (IPin *)pPinImpl;
 322         return S_OK;
 323     }
 324
 325     CoTaskMemFree(pPinImpl);
 326     return E_FAIL;
 327 }
 328
 329 HRESULT OutputPin_Construct(const IPinVtbl *OutputPin_Vtbl, long outputpin_size, const PIN_INFO * pPinInfo, ALLOCATOR_PROPERTIES *props, LPVOID pUserData, QUERYACCEPTPROC pQueryAccept, LPCRITICAL_SECTION pCritSec, IPin ** ppPin)
 330 {
 331     OutputPin * pPinImpl;
 332
 333     *ppPin = NULL;
 334
 335     if (pPinInfo->dir != PINDIR_OUTPUT)
 336     {
 337         ERR("Pin direction(%x) != PINDIR_OUTPUT\n", pPinInfo->dir);
 338         return E_INVALIDARG;
 339     }
 340
 341     assert(outputpin_size >= sizeof(OutputPin));
 342
 343     pPinImpl = CoTaskMemAlloc(outputpin_size);
 344
 345     if (!pPinImpl)
 346         return E_OUTOFMEMORY;
 347
 348     if (SUCCEEDED(OutputPin_Init(OutputPin_Vtbl, pPinInfo, props, pUserData, pQueryAccept, pCritSec, pPinImpl)))
 349     {
 350         *ppPin = (IPin *)(&pPinImpl->pin.lpVtbl);
 351         return S_OK;
 352     }
 353
 354     CoTaskMemFree(pPinImpl);
 355     return E_FAIL;
 356 }
 357
 358 /*** Common pin functions ***/
 359
 360 ULONG WINAPI IPinImpl_AddRef(IPin * iface)
 361 {
 362     IPinImpl *This = (IPinImpl *)iface;
 363     ULONG refCount = InterlockedIncrement(&This->refCount);
 364
 365     TRACE("(%p)->() AddRef from %d\n", iface, refCount - 1);
 366
 367     return refCount;
 368 }
 369
 370 HRESULT WINAPI IPinImpl_Disconnect(IPin * iface)
 371 {
 372     HRESULT hr;
 373     IPinImpl *This = (IPinImpl *)iface;
 374
 375     TRACE("()\n");
 376
 377     EnterCriticalSection(This->pCritSec);
 378     {
 379         if (This->pConnectedTo)
 380         {
 381             IPin_Release(This->pConnectedTo);
 382             This->pConnectedTo = NULL;
 383             hr = S_OK;
 384         }
 385         else
 386             hr = S_FALSE;
 387     }
 388     LeaveCriticalSection(This->pCritSec);
 389
 390     return hr;
 391 }
 392
 393 HRESULT WINAPI IPinImpl_ConnectedTo(IPin * iface, IPin ** ppPin)
 394 {
 395     HRESULT hr;
 396     IPinImpl *This = (IPinImpl *)iface;
 397
 398     TRACE("(%p)\n", ppPin);
 399
 400     EnterCriticalSection(This->pCritSec);
 401     {
 402         if (This->pConnectedTo)
 403         {
 404             *ppPin = This->pConnectedTo;
 405             IPin_AddRef(*ppPin);
 406             hr = S_OK;
 407         }
 408         else
 409             hr = VFW_E_NOT_CONNECTED;
 410     }
 411     LeaveCriticalSection(This->pCritSec);
 412
 413     return hr;
 414 }
 415
 416 HRESULT WINAPI IPinImpl_ConnectionMediaType(IPin * iface, AM_MEDIA_TYPE * pmt)
 417 {
 418     HRESULT hr;
 419     IPinImpl *This = (IPinImpl *)iface;
 420
 421     TRACE("(%p/%p)->(%p)\n", This, iface, pmt);
 422
 423     EnterCriticalSection(This->pCritSec);
 424     {
 425         if (This->pConnectedTo)
 426         {
 427             CopyMediaType(pmt, &This->mtCurrent);
 428             hr = S_OK;
 429         }
 430         else
 431         {
 432             ZeroMemory(pmt, sizeof(*pmt));
 433             hr = VFW_E_NOT_CONNECTED;
 434         }
 435     }
 436     LeaveCriticalSection(This->pCritSec);
 437
 438     return hr;
 439 }
 440
 441 HRESULT WINAPI IPinImpl_QueryPinInfo(IPin * iface, PIN_INFO * pInfo)
 442 {
 443     IPinImpl *This = (IPinImpl *)iface;
 444
 445     TRACE("(%p/%p)->(%p)\n", This, iface, pInfo);
 446
 447     Copy_PinInfo(pInfo, &This->pinInfo);
 448     IBaseFilter_AddRef(pInfo->pFilter);
 449
 450     return S_OK;
 451 }
 452
 453 HRESULT WINAPI IPinImpl_QueryDirection(IPin * iface, PIN_DIRECTION * pPinDir)
 454 {
 455     IPinImpl *This = (IPinImpl *)iface;
 456
 457     TRACE("(%p/%p)->(%p)\n", This, iface, pPinDir);
 458
 459     *pPinDir = This->pinInfo.dir;
 460
 461     return S_OK;
 462 }
 463
 464 HRESULT WINAPI IPinImpl_QueryId(IPin * iface, LPWSTR * Id)
 465 {
 466     IPinImpl *This = (IPinImpl *)iface;
 467
 468     TRACE("(%p/%p)->(%p)\n", This, iface, Id);
 469
 470     *Id = CoTaskMemAlloc((strlenW(This->pinInfo.achName) + 1) * sizeof(WCHAR));
 471     if (!*Id)
 472         return E_OUTOFMEMORY;
 473
 474     strcpyW(*Id, This->pinInfo.achName);
 475
 476     return S_OK;
 477 }
 478
 479 HRESULT WINAPI IPinImpl_QueryAccept(IPin * iface, const AM_MEDIA_TYPE * pmt)
 480 {
 481     IPinImpl *This = (IPinImpl *)iface;
 482
 483     TRACE("(%p/%p)->(%p)\n", This, iface, pmt);
 484
 485     return (This->fnQueryAccept(This->pUserData, pmt) == S_OK ? S_OK : S_FALSE);
 486 }
 487
 488 HRESULT WINAPI IPinImpl_EnumMediaTypes(IPin * iface, IEnumMediaTypes ** ppEnum)
 489 {
 490     IPinImpl *This = (IPinImpl *)iface;
 491     ENUMMEDIADETAILS emd;
 492
 493     TRACE("(%p/%p)->(%p)\n", This, iface, ppEnum);
 494
 495     /* override this method to allow enumeration of your types */
 496     emd.cMediaTypes = 0;
 497     emd.pMediaTypes = NULL;
 498
 499     return IEnumMediaTypesImpl_Construct(&emd, ppEnum);
 500 }
 501
 502 HRESULT WINAPI IPinImpl_QueryInternalConnections(IPin * iface, IPin ** apPin, ULONG * cPin)
 503 {
 504     IPinImpl *This = (IPinImpl *)iface;
 505
 506     TRACE("(%p/%p)->(%p, %p)\n", This, iface, apPin, cPin);
 507
 508     return E_NOTIMPL; /* to tell caller that all input pins connected to all output pins */
 509 }
 510
 511 /*** IPin implementation for an input pin ***/
 512
 513 HRESULT WINAPI InputPin_QueryInterface(IPin * iface, REFIID riid, LPVOID * ppv)
 514 {
 515     InputPin *This = (InputPin *)iface;
 516
 517     TRACE("(%p)->(%s, %p)\n", iface, qzdebugstr_guid(riid), ppv);
 518
 519     *ppv = NULL;
 520
 521     if (IsEqualIID(riid, &IID_IUnknown))
 522         *ppv = (LPVOID)iface;
 523     else if (IsEqualIID(riid, &IID_IPin))
 524         *ppv = (LPVOID)iface;
 525     else if (IsEqualIID(riid, &IID_IMemInputPin))
 526         *ppv = (LPVOID)&This->lpVtblMemInput;
 527     else if (IsEqualIID(riid, &IID_IMediaSeeking))
 528     {
 529         return IBaseFilter_QueryInterface(This->pin.pinInfo.pFilter, &IID_IMediaSeeking, ppv);
 530     }
 531
 532     if (*ppv)
 533     {
 534         IUnknown_AddRef((IUnknown *)(*ppv));
 535         return S_OK;
 536     }
 537
 538     FIXME("No interface for %s!\n", qzdebugstr_guid(riid));
 539
 540     return E_NOINTERFACE;
 541 }
 542
 543 ULONG WINAPI InputPin_Release(IPin * iface)
 544 {
 545     InputPin *This = (InputPin *)iface;
 546     ULONG refCount = InterlockedDecrement(&This->pin.refCount);
 547
 548     TRACE("(%p)->() Release from %d\n", iface, refCount + 1);
 549
 550     if (!refCount)
 551     {
 552         FreeMediaType(&This->pin.mtCurrent);
 553         if (This->pAllocator)
 554             IMemAllocator_Release(This->pAllocator);
 555         CoTaskMemFree(This);
 556         return 0;
 557     }
 558     else
 559         return refCount;
 560 }
 561
 562 HRESULT WINAPI InputPin_Connect(IPin * iface, IPin * pConnector, const AM_MEDIA_TYPE * pmt)
 563 {
 564     ERR("Outgoing connection on an input pin! (%p, %p)\n", pConnector, pmt);
 565
 566     return E_UNEXPECTED;
 567 }
 568
 569
 570 HRESULT WINAPI InputPin_ReceiveConnection(IPin * iface, IPin * pReceivePin, const AM_MEDIA_TYPE * pmt)
 571 {
 572     InputPin *This = (InputPin *)iface;
 573     PIN_DIRECTION pindirReceive;
 574     HRESULT hr = S_OK;
 575
 576     TRACE("(%p, %p)\n", pReceivePin, pmt);
 577     dump_AM_MEDIA_TYPE(pmt);
 578
 579     EnterCriticalSection(This->pin.pCritSec);
 580     {
 581         if (This->pin.pConnectedTo)
 582             hr = VFW_E_ALREADY_CONNECTED;
 583
 584         if (SUCCEEDED(hr) && This->pin.fnQueryAccept(This->pin.pUserData, pmt) != S_OK)
 585             hr = VFW_E_TYPE_NOT_ACCEPTED; /* FIXME: shouldn't we just map common errors onto
 586                                            * VFW_E_TYPE_NOT_ACCEPTED and pass the value on otherwise? */
 587
 588         if (SUCCEEDED(hr))
 589         {
 590             IPin_QueryDirection(pReceivePin, &pindirReceive);
 591
 592             if (pindirReceive != PINDIR_OUTPUT)
 593             {
 594                 ERR("Can't connect from non-output pin\n");
 595                 hr = VFW_E_INVALID_DIRECTION;
 596             }
 597         }
 598
 599         if (SUCCEEDED(hr))
 600         {
 601             CopyMediaType(&This->pin.mtCurrent, pmt);
 602             This->pin.pConnectedTo = pReceivePin;
 603             IPin_AddRef(pReceivePin);
 604         }
 605     }
 606     LeaveCriticalSection(This->pin.pCritSec);
 607
 608     return hr;
 609 }
 610
 611 static HRESULT deliver_endofstream(IPin* pin, LPVOID unused)
 612 {
 613     return IPin_EndOfStream( pin );
 614 }
 615
 616 HRESULT WINAPI InputPin_EndOfStream(IPin * iface)
 617 {
 618     InputPin *This = (InputPin *)iface;
 619     TRACE("(%p)\n", This);
 620
 621     This->end_of_stream = 1;
 622
 623     return SendFurther( iface, deliver_endofstream, NULL, NULL );
 624 }
 625
 626 static HRESULT deliver_beginflush(IPin* pin, LPVOID unused)
 627 {
 628     return IPin_BeginFlush( pin );
 629 }
 630
 631 HRESULT WINAPI InputPin_BeginFlush(IPin * iface)
 632 {
 633     InputPin *This = (InputPin *)iface;
 634     HRESULT hr;
 635     TRACE("() semi-stub\n");
 636
 637     EnterCriticalSection(This->pin.pCritSec);
 638     This->flushing = 1;
 639
 640     if (This->fnCleanProc)
 641         This->fnCleanProc(This->pin.pUserData);
 642
 643     hr = SendFurther( iface, deliver_beginflush, NULL, NULL );
 644     LeaveCriticalSection(This->pin.pCritSec);
 645
 646     return hr;
 647 }
 648
 649 static HRESULT deliver_endflush(IPin* pin, LPVOID unused)
 650 {
 651     return IPin_EndFlush( pin );
 652 }
 653
 654 HRESULT WINAPI InputPin_EndFlush(IPin * iface)
 655 {
 656     InputPin *This = (InputPin *)iface;
 657     HRESULT hr;
 658     TRACE("(%p)\n", This);
 659
 660     EnterCriticalSection(This->pin.pCritSec);
 661     This->flushing = 0;
 662
 663     hr = SendFurther( iface, deliver_endflush, NULL, NULL );
 664     LeaveCriticalSection(This->pin.pCritSec);
 665
 666     return hr;
 667 }
 668
 669 typedef struct newsegmentargs
 670 {
 671     REFERENCE_TIME tStart, tStop;
 672     double rate;
 673 } newsegmentargs;
 674
 675 static HRESULT deliver_newsegment(IPin *pin, LPVOID data)
 676 {
 677     newsegmentargs *args = data;
 678     return IPin_NewSegment(pin, args->tStart, args->tStop, args->rate);
 679 }
 680
 681 HRESULT WINAPI InputPin_NewSegment(IPin * iface, REFERENCE_TIME tStart, REFERENCE_TIME tStop, double dRate)
 682 {
 683     InputPin *This = (InputPin *)iface;
 684     newsegmentargs args;
 685
 686     TRACE("(%x%08x, %x%08x, %e)\n", (ULONG)(tStart >> 32), (ULONG)tStart, (ULONG)(tStop >> 32), (ULONG)tStop, dRate);
 687
 688     args.tStart = This->tStart = tStart;
 689     args.tStop = This->tStop = tStop;
 690     args.rate = This->dRate = dRate;
 691
 692     return SendFurther( iface, deliver_newsegment, &args, NULL );
 693 }
 694
 695 static const IPinVtbl InputPin_Vtbl =
 696 {
 697     InputPin_QueryInterface,
 698     IPinImpl_AddRef,
 699     InputPin_Release,
 700     InputPin_Connect,
 701     InputPin_ReceiveConnection,
 702     IPinImpl_Disconnect,
 703     IPinImpl_ConnectedTo,
 704     IPinImpl_ConnectionMediaType,
 705     IPinImpl_QueryPinInfo,
 706     IPinImpl_QueryDirection,
 707     IPinImpl_QueryId,
 708     IPinImpl_QueryAccept,
 709     IPinImpl_EnumMediaTypes,
 710     IPinImpl_QueryInternalConnections,
 711     InputPin_EndOfStream,
 712     InputPin_BeginFlush,
 713     InputPin_EndFlush,
 714     InputPin_NewSegment
 715 };
 716
 717 /*** IMemInputPin implementation ***/
 718
 719 HRESULT WINAPI MemInputPin_QueryInterface(IMemInputPin * iface, REFIID riid, LPVOID * ppv)
 720 {
 721     InputPin *This = impl_from_IMemInputPin(iface);
 722
 723     return IPin_QueryInterface((IPin *)&This->pin, riid, ppv);
 724 }
 725
 726 ULONG WINAPI MemInputPin_AddRef(IMemInputPin * iface)
 727 {
 728     InputPin *This = impl_from_IMemInputPin(iface);
 729
 730     return IPin_AddRef((IPin *)&This->pin);
 731 }
 732
 733 ULONG WINAPI MemInputPin_Release(IMemInputPin * iface)
 734 {
 735     InputPin *This = impl_from_IMemInputPin(iface);
 736
 737     return IPin_Release((IPin *)&This->pin);
 738 }
 739
 740 HRESULT WINAPI MemInputPin_GetAllocator(IMemInputPin * iface, IMemAllocator ** ppAllocator)
 741 {
 742     InputPin *This = impl_from_IMemInputPin(iface);
 743
 744     TRACE("(%p/%p)->(%p)\n", This, iface, ppAllocator);
 745
 746     *ppAllocator = This->pAllocator;
 747     if (*ppAllocator)
 748         IMemAllocator_AddRef(*ppAllocator);
 749
 750     return *ppAllocator ? S_OK : VFW_E_NO_ALLOCATOR;
 751 }
 752
 753 HRESULT WINAPI MemInputPin_NotifyAllocator(IMemInputPin * iface, IMemAllocator * pAllocator, BOOL bReadOnly)
 754 {
 755     InputPin *This = impl_from_IMemInputPin(iface);
 756
 757     TRACE("(%p/%p)->(%p, %d)\n", This, iface, pAllocator, bReadOnly);
 758
 759     if (bReadOnly)
 760         FIXME("Read only flag not handled yet!\n");
 761
 762     if (This->pAllocator)
 763         IMemAllocator_Release(This->pAllocator);
 764     This->pAllocator = pAllocator;
 765     if (This->pAllocator)
 766         IMemAllocator_AddRef(This->pAllocator);
 767
 768     return S_OK;
 769 }
 770
 771 HRESULT WINAPI MemInputPin_GetAllocatorRequirements(IMemInputPin * iface, ALLOCATOR_PROPERTIES * pProps)
 772 {
 773     InputPin *This = impl_from_IMemInputPin(iface);
 774
 775     TRACE("(%p/%p)->(%p)\n", This, iface, pProps);
 776
 777     /* override this method if you have any specific requirements */
 778
 779     return E_NOTIMPL;
 780 }
 781
 782 HRESULT WINAPI MemInputPin_Receive(IMemInputPin * iface, IMediaSample * pSample)
 783 {
 784     InputPin *This = impl_from_IMemInputPin(iface);
 785     HRESULT hr;
 786
 787     /* this trace commented out for performance reasons */
 788     /*TRACE("(%p/%p)->(%p)\n", This, iface, pSample);*/
 789
 790     EnterCriticalSection(This->pin.pCritSec);
 791     if (!This->end_of_stream && !This->flushing)
 792         hr = This->fnSampleProc(This->pin.pUserData, pSample);
 793     else
 794         hr = S_FALSE;
 795     LeaveCriticalSection(This->pin.pCritSec);
 796     return hr;
 797 }
 798
 799 HRESULT WINAPI MemInputPin_ReceiveMultiple(IMemInputPin * iface, IMediaSample ** pSamples, long nSamples, long *nSamplesProcessed)
 800 {
 801     HRESULT hr = S_OK;
 802     InputPin *This = impl_from_IMemInputPin(iface);
 803
 804     TRACE("(%p/%p)->(%p, %ld, %p)\n", This, iface, pSamples, nSamples, nSamplesProcessed);
 805
 806     for (*nSamplesProcessed = 0; *nSamplesProcessed < nSamples; (*nSamplesProcessed)++)
 807     {
 808         hr = IMemInputPin_Receive(iface, pSamples[*nSamplesProcessed]);
 809         if (hr != S_OK)
 810             break;
 811     }
 812
 813     return hr;
 814 }
 815
 816 HRESULT WINAPI MemInputPin_ReceiveCanBlock(IMemInputPin * iface)
 817 {
 818     InputPin *This = impl_from_IMemInputPin(iface);
 819
 820     FIXME("(%p/%p)->()\n", This, iface);
 821
 822     /* FIXME: we should check whether any output pins will block */
 823
 824     return S_OK;
 825 }
 826
 827 static const IMemInputPinVtbl MemInputPin_Vtbl =
 828 {
 829     MemInputPin_QueryInterface,
 830     MemInputPin_AddRef,
 831     MemInputPin_Release,
 832     MemInputPin_GetAllocator,
 833     MemInputPin_NotifyAllocator,
 834     MemInputPin_GetAllocatorRequirements,
 835     MemInputPin_Receive,
 836     MemInputPin_ReceiveMultiple,
 837     MemInputPin_ReceiveCanBlock
 838 };
 839
 840 HRESULT WINAPI OutputPin_QueryInterface(IPin * iface, REFIID riid, LPVOID * ppv)
 841 {
 842     OutputPin *This = (OutputPin *)iface;
 843
 844     TRACE("(%p/%p)->(%s, %p)\n", This, iface, qzdebugstr_guid(riid), ppv);
 845
 846     *ppv = NULL;
 847
 848     if (IsEqualIID(riid, &IID_IUnknown))
 849         *ppv = (LPVOID)iface;
 850     else if (IsEqualIID(riid, &IID_IPin))
 851         *ppv = (LPVOID)iface;
 852     else if (IsEqualIID(riid, &IID_IMediaSeeking))
 853     {
 854         return IBaseFilter_QueryInterface(This->pin.pinInfo.pFilter, &IID_IMediaSeeking, ppv);
 855     }
 856
 857     if (*ppv)
 858     {
 859         IUnknown_AddRef((IUnknown *)(*ppv));
 860         return S_OK;
 861     }
 862
 863     FIXME("No interface for %s!\n", qzdebugstr_guid(riid));
 864
 865     return E_NOINTERFACE;
 866 }
 867
 868 ULONG WINAPI OutputPin_Release(IPin * iface)
 869 {
 870     OutputPin *This = (OutputPin *)iface;
 871     ULONG refCount = InterlockedDecrement(&This->pin.refCount);
 872
 873     TRACE("(%p)->() Release from %d\n", iface, refCount + 1);
 874
 875     if (!refCount)
 876     {
 877         FreeMediaType(&This->pin.mtCurrent);
 878         CoTaskMemFree(This);
 879         return 0;
 880     }
 881     return refCount;
 882 }
 883
 884 HRESULT WINAPI OutputPin_Connect(IPin * iface, IPin * pReceivePin, const AM_MEDIA_TYPE * pmt)
 885 {
 886     HRESULT hr;
 887     OutputPin *This = (OutputPin *)iface;
 888
 889     TRACE("(%p/%p)->(%p, %p)\n", This, iface, pReceivePin, pmt);
 890     dump_AM_MEDIA_TYPE(pmt);
 891
 892     /* If we try to connect to ourself, we will definitely deadlock.
 893      * There are other cases where we could deadlock too, but this
 894      * catches the obvious case */
 895     assert(pReceivePin != iface);
 896
 897     EnterCriticalSection(This->pin.pCritSec);
 898     {
 899         /* if we have been a specific type to connect with, then we can either connect
 900          * with that or fail. We cannot choose different AM_MEDIA_TYPE */
 901         if (pmt && !IsEqualGUID(&pmt->majortype, &GUID_NULL) && !IsEqualGUID(&pmt->subtype, &GUID_NULL))
 902             hr = This->pConnectSpecific(iface, pReceivePin, pmt);
 903         else
 904         {
 905             /* negotiate media type */
 906
 907             IEnumMediaTypes * pEnumCandidates;
 908             AM_MEDIA_TYPE * pmtCandidate; /* Candidate media type */
 909
 910             if (SUCCEEDED(hr = IPin_EnumMediaTypes(iface, &pEnumCandidates)))
 911             {
 912                 hr = VFW_E_NO_ACCEPTABLE_TYPES; /* Assume the worst, but set to S_OK if connected successfully */
 913
 914                 /* try this filter's media types first */
 915                 while (S_OK == IEnumMediaTypes_Next(pEnumCandidates, 1, &pmtCandidate, NULL))
 916                 {
 917                     if (( !pmt || CompareMediaTypes(pmt, pmtCandidate, TRUE) ) &&
 918                         (This->pConnectSpecific(iface, pReceivePin, pmtCandidate) == S_OK))
 919                     {
 920                         hr = S_OK;
 921                         CoTaskMemFree(pmtCandidate);
 922                         break;
 923                     }
 924                     CoTaskMemFree(pmtCandidate);
 925                 }
 926                 IEnumMediaTypes_Release(pEnumCandidates);
 927             }
 928
 929             /* then try receiver filter's media types */
 930             if (hr != S_OK && SUCCEEDED(hr = IPin_EnumMediaTypes(pReceivePin, &pEnumCandidates))) /* if we haven't already connected successfully */
 931             {
 932                 hr = VFW_E_NO_ACCEPTABLE_TYPES; /* Assume the worst, but set to S_OK if connected successfully */
 933
 934                 while (S_OK == IEnumMediaTypes_Next(pEnumCandidates, 1, &pmtCandidate, NULL))
 935                 {
 936                     if (( !pmt || CompareMediaTypes(pmt, pmtCandidate, TRUE) ) &&
 937                         (This->pConnectSpecific(iface, pReceivePin, pmtCandidate) == S_OK))
 938                     {
 939                         hr = S_OK;
 940                         CoTaskMemFree(pmtCandidate);
 941                         break;
 942                     }
 943                     CoTaskMemFree(pmtCandidate);
 944                 } /* while */
 945                 IEnumMediaTypes_Release(pEnumCandidates);
 946             } /* if not found */
 947         } /* if negotiate media type */
 948     } /* if succeeded */
 949     LeaveCriticalSection(This->pin.pCritSec);
 950
 951     TRACE(" -- %x\n", hr);
 952     return hr;
 953 }
 954
 955 HRESULT WINAPI OutputPin_ReceiveConnection(IPin * iface, IPin * pReceivePin, const AM_MEDIA_TYPE * pmt)
 956 {
 957     ERR("Incoming connection on an output pin! (%p, %p)\n", pReceivePin, pmt);
 958
 959     return E_UNEXPECTED;
 960 }
 961
 962 HRESULT WINAPI OutputPin_Disconnect(IPin * iface)
 963 {
 964     HRESULT hr;
 965     OutputPin *This = (OutputPin *)iface;
 966
 967     TRACE("()\n");
 968
 969     EnterCriticalSection(This->pin.pCritSec);
 970     {
 971         if (This->pMemInputPin)
 972         {
 973             IMemInputPin_Release(This->pMemInputPin);
 974             This->pMemInputPin = NULL;
 975         }
 976         if (This->pin.pConnectedTo)
 977         {
 978             IPin_Release(This->pin.pConnectedTo);
 979             This->pin.pConnectedTo = NULL;
 980             hr = S_OK;
 981         }
 982         else
 983             hr = S_FALSE;
 984     }
 985     LeaveCriticalSection(This->pin.pCritSec);
 986
 987     return hr;
 988 }
 989
 990 HRESULT WINAPI OutputPin_EndOfStream(IPin * iface)
 991 {
 992     TRACE("()\n");
 993
 994     /* not supposed to do anything in an output pin */
 995
 996     return E_UNEXPECTED;
 997 }
 998
 999 HRESULT WINAPI OutputPin_BeginFlush(IPin * iface)
1000 {
1001     TRACE("(%p)->()\n", iface);
1002
1003     /* not supposed to do anything in an output pin */
1004
1005     return E_UNEXPECTED;
1006 }
1007
1008 HRESULT WINAPI OutputPin_EndFlush(IPin * iface)
1009 {
1010     TRACE("(%p)->()\n", iface);
1011
1012     /* not supposed to do anything in an output pin */
1013
1014     return E_UNEXPECTED;
1015 }
1016
1017 HRESULT WINAPI OutputPin_NewSegment(IPin * iface, REFERENCE_TIME tStart, REFERENCE_TIME tStop, double dRate)
1018 {
1019     TRACE("(%p)->(%x%08x, %x%08x, %e)\n", iface, (ULONG)(tStart >> 32), (ULONG)tStart, (ULONG)(tStop >> 32), (ULONG)tStop, dRate);
1020
1021     /* not supposed to do anything in an output pin */
1022
1023     return E_UNEXPECTED;
1024 }
1025
1026 static const IPinVtbl OutputPin_Vtbl =
1027 {
1028     OutputPin_QueryInterface,
1029     IPinImpl_AddRef,
1030     OutputPin_Release,
1031     OutputPin_Connect,
1032     OutputPin_ReceiveConnection,
1033     OutputPin_Disconnect,
1034     IPinImpl_ConnectedTo,
1035     IPinImpl_ConnectionMediaType,
1036     IPinImpl_QueryPinInfo,
1037     IPinImpl_QueryDirection,
1038     IPinImpl_QueryId,
1039     IPinImpl_QueryAccept,
1040     IPinImpl_EnumMediaTypes,
1041     IPinImpl_QueryInternalConnections,
1042     OutputPin_EndOfStream,
1043     OutputPin_BeginFlush,
1044     OutputPin_EndFlush,
1045     OutputPin_NewSegment
1046 };
1047
1048 HRESULT OutputPin_GetDeliveryBuffer(OutputPin * This, IMediaSample ** ppSample, REFERENCE_TIME * tStart, REFERENCE_TIME * tStop, DWORD dwFlags)
1049 {
1050     HRESULT hr;
1051
1052     TRACE("(%p, %p, %p, %x)\n", ppSample, tStart, tStop, dwFlags);
1053
1054     EnterCriticalSection(This->pin.pCritSec);
1055     {
1056         if (!This->pin.pConnectedTo)
1057             hr = VFW_E_NOT_CONNECTED;
1058         else
1059         {
1060             IMemAllocator * pAlloc = NULL;
1061
1062             hr = IMemInputPin_GetAllocator(This->pMemInputPin, &pAlloc);
1063
1064             if (SUCCEEDED(hr))
1065                 hr = IMemAllocator_GetBuffer(pAlloc, ppSample, tStart, tStop, dwFlags);
1066
1067             if (SUCCEEDED(hr))
1068                 hr = IMediaSample_SetTime(*ppSample, tStart, tStop);
1069
1070             if (pAlloc)
1071                 IMemAllocator_Release(pAlloc);
1072         }
1073     }
1074     LeaveCriticalSection(This->pin.pCritSec);
1075
1076     return hr;
1077 }
1078
1079 HRESULT OutputPin_SendSample(OutputPin * This, IMediaSample * pSample)
1080 {
1081     HRESULT hr = S_OK;
1082     IMemInputPin * pMemConnected = NULL;
1083     PIN_INFO pinInfo;
1084
1085     EnterCriticalSection(This->pin.pCritSec);
1086     {
1087         if (!This->pin.pConnectedTo || !This->pMemInputPin)
1088             hr = VFW_E_NOT_CONNECTED;
1089         else
1090         {
1091             /* we don't have the lock held when using This->pMemInputPin,
1092              * so we need to AddRef it to stop it being deleted while we are
1093              * using it. Same with its filter. */
1094             pMemConnected = This->pMemInputPin;
1095             IMemInputPin_AddRef(pMemConnected);
1096             hr = IPin_QueryPinInfo(This->pin.pConnectedTo, &pinInfo);
1097         }
1098     }
1099     LeaveCriticalSection(This->pin.pCritSec);
1100
1101     if (SUCCEEDED(hr))
1102     {
1103         /* NOTE: if we are in a critical section when Receive is called
1104          * then it causes some problems (most notably with the native Video
1105          * Renderer) if we are re-entered for whatever reason */
1106         hr = IMemInputPin_Receive(pMemConnected, pSample);
1107
1108         /* If the filter's destroyed, tell upstream to stop sending data */
1109         if(IBaseFilter_Release(pinInfo.pFilter) == 0 && SUCCEEDED(hr))
1110             hr = S_FALSE;
1111     }
1112     if (pMemConnected)
1113         IMemInputPin_Release(pMemConnected);
1114
1115     return hr;
1116 }
1117
1118 HRESULT OutputPin_DeliverNewSegment(OutputPin * This, REFERENCE_TIME tStart, REFERENCE_TIME tStop, double dRate)
1119 {
1120     HRESULT hr;
1121
1122     EnterCriticalSection(This->pin.pCritSec);
1123     {
1124         if (!This->pin.pConnectedTo)
1125             hr = VFW_E_NOT_CONNECTED;
1126         else
1127             hr = IPin_NewSegment(This->pin.pConnectedTo, tStart, tStop, dRate);
1128     }
1129     LeaveCriticalSection(This->pin.pCritSec);
1130
1131     return hr;
1132 }
1133
1134 HRESULT OutputPin_CommitAllocator(OutputPin * This)
1135 {
1136     HRESULT hr = S_OK;
1137
1138     TRACE("(%p)->()\n", This);
1139
1140     EnterCriticalSection(This->pin.pCritSec);
1141     if (!This->custom_allocator)
1142     {
1143         if (!This->pin.pConnectedTo || !This->pMemInputPin)
1144             hr = VFW_E_NOT_CONNECTED;
1145         else
1146         {
1147             IMemAllocator * pAlloc = NULL;
1148
1149             hr = IMemInputPin_GetAllocator(This->pMemInputPin, &pAlloc);
1150
1151             if (SUCCEEDED(hr))
1152                 hr = IMemAllocator_Commit(pAlloc);
1153
1154             if (pAlloc)
1155                 IMemAllocator_Release(pAlloc);
1156         }
1157     }
1158     LeaveCriticalSection(This->pin.pCritSec);
1159
1160     return hr;
1161 }
1162
1163 HRESULT OutputPin_DeliverDisconnect(OutputPin * This)
1164 {
1165     HRESULT hr;
1166
1167     TRACE("(%p)->()\n", This);
1168
1169     EnterCriticalSection(This->pin.pCritSec);
1170     {
1171         if (!This->pin.pConnectedTo || !This->pMemInputPin)
1172             hr = VFW_E_NOT_CONNECTED;
1173         else if (!This->custom_allocator)
1174         {
1175             IMemAllocator * pAlloc = NULL;
1176
1177             hr = IMemInputPin_GetAllocator(This->pMemInputPin, &pAlloc);
1178
1179             if (SUCCEEDED(hr))
1180                 hr = IMemAllocator_Decommit(pAlloc);
1181
1182             if (pAlloc)
1183                 IMemAllocator_Release(pAlloc);
1184
1185             if (SUCCEEDED(hr))
1186                 hr = IPin_Disconnect(This->pin.pConnectedTo);
1187         }
1188         else /* Kill the allocator! */
1189         {
1190             hr = IMemInputPin_NotifyAllocator(This->pMemInputPin, NULL, 0);
1191             if (SUCCEEDED(hr))
1192                 hr = IPin_Disconnect(This->pin.pConnectedTo);
1193         }
1194
1195     }
1196     LeaveCriticalSection(This->pin.pCritSec);
1197
1198     return hr;
1199 }
1200
1201
1202 static HRESULT PullPin_Init(const IPinVtbl *PullPin_Vtbl, const PIN_INFO * pPinInfo, SAMPLEPROC_PULL pSampleProc, LPVOID pUserData,
1203                             QUERYACCEPTPROC pQueryAccept, CLEANUPPROC pCleanUp, REQUESTPROC pCustomRequest, LPCRITICAL_SECTION pCritSec, PullPin * pPinImpl)
1204 {
1205     /* Common attributes */
1206     pPinImpl->pin.lpVtbl = PullPin_Vtbl;
1207     pPinImpl->pin.refCount = 1;
1208     pPinImpl->pin.pConnectedTo = NULL;
1209     pPinImpl->pin.fnQueryAccept = pQueryAccept;
1210     pPinImpl->pin.pUserData = pUserData;
1211     pPinImpl->pin.pCritSec = pCritSec;
1212     Copy_PinInfo(&pPinImpl->pin.pinInfo, pPinInfo);
1213     ZeroMemory(&pPinImpl->pin.mtCurrent, sizeof(AM_MEDIA_TYPE));
1214
1215     /* Input pin attributes */
1216     pPinImpl->fnSampleProc = pSampleProc;
1217     pPinImpl->fnCleanProc = pCleanUp;
1218     pPinImpl->fnPreConnect = NULL;
1219     pPinImpl->pAlloc = NULL;
1220     pPinImpl->pReader = NULL;
1221     pPinImpl->hThread = NULL;
1222     pPinImpl->hEventStateChanged = CreateEventW(NULL, TRUE, TRUE, NULL);
1223     pPinImpl->thread_sleepy = CreateEventW(NULL, FALSE, FALSE, NULL);
1224
1225     pPinImpl->rtStart = 0;
1226     pPinImpl->rtCurrent = 0;
1227     pPinImpl->rtStop = ((LONGLONG)0x7fffffff << 32) | 0xffffffff;
1228     pPinImpl->dRate = 1.0;
1229     pPinImpl->state = Req_Die;
1230     pPinImpl->fnCustomRequest = pCustomRequest;
1231     pPinImpl->stop_playback = 1;
1232
1233     InitializeCriticalSection(&pPinImpl->thread_lock);
1234     pPinImpl->thread_lock.DebugInfo->Spare[0] = (DWORD_PTR)( __FILE__ ": PullPin.thread_lock");
1235
1236     return S_OK;
1237 }
1238
1239 HRESULT PullPin_Construct(const IPinVtbl *PullPin_Vtbl, const PIN_INFO * pPinInfo, SAMPLEPROC_PULL pSampleProc, LPVOID pUserData, QUERYACCEPTPROC pQueryAccept, CLEANUPPROC pCleanUp, REQUESTPROC pCustomRequest, LPCRITICAL_SECTION pCritSec, IPin ** ppPin)
1240 {
1241     PullPin * pPinImpl;
1242
1243     *ppPin = NULL;
1244
1245     if (pPinInfo->dir != PINDIR_INPUT)
1246     {
1247         ERR("Pin direction(%x) != PINDIR_INPUT\n", pPinInfo->dir);
1248         return E_INVALIDARG;
1249     }
1250
1251     pPinImpl = CoTaskMemAlloc(sizeof(*pPinImpl));
1252
1253     if (!pPinImpl)
1254         return E_OUTOFMEMORY;
1255
1256     if (SUCCEEDED(PullPin_Init(PullPin_Vtbl, pPinInfo, pSampleProc, pUserData, pQueryAccept, pCleanUp, pCustomRequest, pCritSec, pPinImpl)))
1257     {
1258         *ppPin = (IPin *)(&pPinImpl->pin.lpVtbl);
1259         return S_OK;
1260     }
1261
1262     CoTaskMemFree(pPinImpl);
1263     return E_FAIL;
1264 }
1265
1266 HRESULT WINAPI PullPin_ReceiveConnection(IPin * iface, IPin * pReceivePin, const AM_MEDIA_TYPE * pmt)
1267 {
1268     PIN_DIRECTION pindirReceive;
1269     HRESULT hr = S_OK;
1270     PullPin *This = (PullPin *)iface;
1271
1272     TRACE("(%p/%p)->(%p, %p)\n", This, iface, pReceivePin, pmt);
1273     dump_AM_MEDIA_TYPE(pmt);
1274
1275     EnterCriticalSection(This->pin.pCritSec);
1276     {
1277         ALLOCATOR_PROPERTIES props;
1278
1279         props.cBuffers = 3;
1280         props.cbBuffer = 64 * 1024; /* 64k bytes */
1281         props.cbAlign = 1;
1282         props.cbPrefix = 0;
1283
1284         if (This->pin.pConnectedTo)
1285             hr = VFW_E_ALREADY_CONNECTED;
1286
1287         if (SUCCEEDED(hr) && (This->pin.fnQueryAccept(This->pin.pUserData, pmt) != S_OK))
1288             hr = VFW_E_TYPE_NOT_ACCEPTED; /* FIXME: shouldn't we just map common errors onto
1289                                            * VFW_E_TYPE_NOT_ACCEPTED and pass the value on otherwise? */
1290
1291         if (SUCCEEDED(hr))
1292         {
1293             IPin_QueryDirection(pReceivePin, &pindirReceive);
1294
1295             if (pindirReceive != PINDIR_OUTPUT)
1296             {
1297                 ERR("Can't connect from non-output pin\n");
1298                 hr = VFW_E_INVALID_DIRECTION;
1299             }
1300         }
1301
1302         This->pReader = NULL;
1303         This->pAlloc = NULL;
1304         if (SUCCEEDED(hr))
1305         {
1306             hr = IPin_QueryInterface(pReceivePin, &IID_IAsyncReader, (LPVOID *)&This->pReader);
1307         }
1308
1309         if (SUCCEEDED(hr) && This->fnPreConnect)
1310         {
1311             hr = This->fnPreConnect(iface, pReceivePin, &props);
1312         }
1313
1314         if (SUCCEEDED(hr))
1315         {
1316             hr = IAsyncReader_RequestAllocator(This->pReader, NULL, &props, &This->pAlloc);
1317         }
1318
1319         if (SUCCEEDED(hr))
1320         {
1321             CopyMediaType(&This->pin.mtCurrent, pmt);
1322             This->pin.pConnectedTo = pReceivePin;
1323             IPin_AddRef(pReceivePin);
1324             hr = IMemAllocator_Commit(This->pAlloc);
1325
1326         }
1327
1328         if (FAILED(hr))
1329         {
1330              if (This->pReader)
1331                  IAsyncReader_Release(This->pReader);
1332              This->pReader = NULL;
1333              if (This->pAlloc)
1334                  IMemAllocator_Release(This->pAlloc);
1335              This->pAlloc = NULL;
1336         }
1337     }
1338     LeaveCriticalSection(This->pin.pCritSec);
1339     return hr;
1340 }
1341
1342 HRESULT WINAPI PullPin_QueryInterface(IPin * iface, REFIID riid, LPVOID * ppv)
1343 {
1344     PullPin *This = (PullPin *)iface;
1345
1346     TRACE("(%p/%p)->(%s, %p)\n", This, iface, qzdebugstr_guid(riid), ppv);
1347
1348     *ppv = NULL;
1349
1350     if (IsEqualIID(riid, &IID_IUnknown))
1351         *ppv = (LPVOID)iface;
1352     else if (IsEqualIID(riid, &IID_IPin))
1353         *ppv = (LPVOID)iface;
1354     else if (IsEqualIID(riid, &IID_IMediaSeeking))
1355     {
1356         return IBaseFilter_QueryInterface(This->pin.pinInfo.pFilter, &IID_IMediaSeeking, ppv);
1357     }
1358
1359     if (*ppv)
1360     {
1361         IUnknown_AddRef((IUnknown *)(*ppv));
1362         return S_OK;
1363     }
1364
1365     FIXME("No interface for %s!\n", qzdebugstr_guid(riid));
1366
1367     return E_NOINTERFACE;
1368 }
1369
1370 ULONG WINAPI PullPin_Release(IPin *iface)
1371 {
1372     PullPin *This = (PullPin *)iface;
1373     ULONG refCount = InterlockedDecrement(&This->pin.refCount);
1374
1375     TRACE("(%p)->() Release from %d\n", This, refCount + 1);
1376
1377     if (!refCount)
1378     {
1379         if(This->pAlloc)
1380             IMemAllocator_Release(This->pAlloc);
1381         if(This->pReader)
1382             IAsyncReader_Release(This->pReader);
1383         CloseHandle(This->thread_sleepy);
1384         CloseHandle(This->hEventStateChanged);
1385         This->thread_lock.DebugInfo->Spare[0] = 0;
1386         DeleteCriticalSection(&This->thread_lock);
1387         CoTaskMemFree(This);
1388         return 0;
1389     }
1390     return refCount;
1391 }
1392
1393 static HRESULT PullPin_Standard_Request(PullPin *This, BOOL start)
1394 {
1395     REFERENCE_TIME rtSampleStart;
1396     REFERENCE_TIME rtSampleStop;
1397     IMediaSample *sample = NULL;
1398     HRESULT hr;
1399
1400     TRACE("Requesting sample!\n");
1401
1402     if (start)
1403         This->rtNext = This->rtCurrent;
1404
1405     if (This->rtNext >= This->rtStop)
1406         /* Last sample has already been queued, request nothing more */
1407         return S_OK;
1408
1409     hr = IMemAllocator_GetBuffer(This->pAlloc, &sample, NULL, NULL, 0);
1410
1411     if (SUCCEEDED(hr))
1412     {
1413         rtSampleStart = This->rtNext;
1414         rtSampleStop = rtSampleStart + MEDIATIME_FROM_BYTES(IMediaSample_GetSize(sample));
1415         if (rtSampleStop > This->rtStop)
1416             rtSampleStop = MEDIATIME_FROM_BYTES(ALIGNUP(BYTES_FROM_MEDIATIME(This->rtStop), This->cbAlign));
1417         hr = IMediaSample_SetTime(sample, &rtSampleStart, &rtSampleStop);
1418
1419         This->rtCurrent = This->rtNext;
1420         This->rtNext = rtSampleStop;
1421
1422         if (SUCCEEDED(hr))
1423             hr = IAsyncReader_Request(This->pReader, sample, 0);
1424     }
1425     if (FAILED(hr))
1426         FIXME("Failed to queue sample : %08x\n", hr);
1427
1428     return hr;
1429 }
1430
1431 static void CALLBACK PullPin_Flush(PullPin *This)
1432 {
1433     IMediaSample *pSample;
1434     TRACE("Flushing!\n");
1435
1436     EnterCriticalSection(This->pin.pCritSec);
1437     if (This->pReader)
1438     {
1439         /* Flush outstanding samples */
1440         IAsyncReader_BeginFlush(This->pReader);
1441         for (;;)
1442         {
1443             DWORD_PTR dwUser;
1444
1445             IAsyncReader_WaitForNext(This->pReader, 0, &pSample, &dwUser);
1446
1447             if (!pSample)
1448                 break;
1449
1450             assert(!IMediaSample_GetActualDataLength(pSample));
1451             if (This->fnCustomRequest)
1452                 This->fnSampleProc(This->pin.pUserData, pSample, dwUser);
1453
1454             IMediaSample_Release(pSample);
1455         }
1456
1457         IAsyncReader_EndFlush(This->pReader);
1458     }
1459     LeaveCriticalSection(This->pin.pCritSec);
1460 }
1461
1462 static void CALLBACK PullPin_Thread_Process(PullPin *This)
1463 {
1464     HRESULT hr;
1465     IMediaSample * pSample = NULL;
1466     ALLOCATOR_PROPERTIES allocProps;
1467
1468     EnterCriticalSection(This->pin.pCritSec);
1469     SetEvent(This->hEventStateChanged);
1470     LeaveCriticalSection(This->pin.pCritSec);
1471
1472     hr = IMemAllocator_GetProperties(This->pAlloc, &allocProps);
1473
1474     This->cbAlign = allocProps.cbAlign;
1475
1476     if (This->rtCurrent < This->rtStart)
1477         This->rtCurrent = MEDIATIME_FROM_BYTES(ALIGNDOWN(BYTES_FROM_MEDIATIME(This->rtStart), This->cbAlign));
1478
1479     TRACE("Start\n");
1480
1481     if (This->rtCurrent >= This->rtStop)
1482     {
1483         IPin_EndOfStream((IPin *)This);
1484         return;
1485     }
1486
1487     /* There is no sample in our buffer */
1488     if (!This->fnCustomRequest)
1489         hr = PullPin_Standard_Request(This, TRUE);
1490     else
1491         hr = This->fnCustomRequest(This->pin.pUserData);
1492
1493     if (FAILED(hr))
1494         ERR("Request error: %x\n", hr);
1495
1496     do
1497     {
1498         DWORD_PTR dwUser;
1499
1500         TRACE("Process sample\n");
1501
1502         hr = IAsyncReader_WaitForNext(This->pReader, 10000, &pSample, &dwUser);
1503
1504         /* Calling fnCustomRequest is not specifically useful here: It can be handled inside fnSampleProc */
1505         if (pSample && !This->fnCustomRequest)
1506             hr = PullPin_Standard_Request(This, FALSE);
1507
1508         /* Return an empty sample on error to the implementation in case it does custom parsing, so it knows it's gone */
1509         if (SUCCEEDED(hr) || (This->fnCustomRequest && pSample))
1510         {
1511             REFERENCE_TIME rtStart, rtStop;
1512             BOOL rejected;
1513
1514             IMediaSample_GetTime(pSample, &rtStart, &rtStop);
1515
1516             do
1517             {
1518                 hr = This->fnSampleProc(This->pin.pUserData, pSample, dwUser);
1519
1520                 if (This->fnCustomRequest)
1521                     break;
1522
1523                 rejected = FALSE;
1524                 if (This->rtCurrent == rtStart)
1525                 {
1526                     rejected = TRUE;
1527                     TRACE("DENIED!\n");
1528                     Sleep(10);
1529                     /* Maybe it's transient? */
1530                 }
1531                 /* rtNext = rtCurrent, because the next sample is already queued */
1532                 else if (rtStop != This->rtCurrent && rtStop < This->rtStop)
1533                 {
1534                     WARN("Position changed! rtStop: %u, rtCurrent: %u\n", (DWORD)BYTES_FROM_MEDIATIME(rtStop), (DWORD)BYTES_FROM_MEDIATIME(This->rtCurrent));
1535                     PullPin_Flush(This);
1536                     hr = PullPin_Standard_Request(This, TRUE);
1537                 }
1538             } while (rejected && (This->rtCurrent < This->rtStop && hr == S_OK && !This->stop_playback));
1539         }
1540         else
1541         {
1542             /* FIXME: This is not well handled yet! */
1543             ERR("Processing error: %x\n", hr);
1544         }
1545
1546         if (pSample)
1547         {
1548             IMediaSample_Release(pSample);
1549             pSample = NULL;
1550         }
1551     } while (This->rtCurrent < This->rtStop && hr == S_OK && !This->stop_playback);
1552
1553     /* Sample was rejected, and we are asked to terminate */
1554     if (pSample)
1555     {
1556         IMediaSample_Release(pSample);
1557     }
1558
1559     /* Can't reset state to Sleepy here because that might race, instead PauseProcessing will do that for us
1560      * Flush remaining samples
1561      */
1562     PullPin_Flush(This);
1563
1564     TRACE("End: %08x, %d\n", hr, This->stop_playback);
1565 }
1566
1567 static void CALLBACK PullPin_Thread_Pause(PullPin *This)
1568 {
1569     TRACE("(%p)->()\n", This);
1570
1571     EnterCriticalSection(This->pin.pCritSec);
1572     {
1573         This->state = Req_Sleepy;
1574         SetEvent(This->hEventStateChanged);
1575     }
1576     LeaveCriticalSection(This->pin.pCritSec);
1577 }
1578
1579 static void CALLBACK PullPin_Thread_Stop(PullPin *This)
1580 {
1581     TRACE("(%p)->()\n", This);
1582
1583     EnterCriticalSection(This->pin.pCritSec);
1584     {
1585         CloseHandle(This->hThread);
1586         This->hThread = NULL;
1587         SetEvent(This->hEventStateChanged);
1588     }
1589     LeaveCriticalSection(This->pin.pCritSec);
1590
1591     IBaseFilter_Release(This->pin.pinInfo.pFilter);
1592
1593     CoUninitialize();
1594     ExitThread(0);
1595 }
1596
1597 static DWORD WINAPI PullPin_Thread_Main(LPVOID pv)
1598 {
1599     PullPin *This = pv;
1600     CoInitializeEx(NULL, COINIT_MULTITHREADED);
1601
1602     for (;;)
1603     {
1604         WaitForSingleObject(This->thread_sleepy, INFINITE);
1605
1606         TRACE("State: %d\n", This->state);
1607
1608         switch (This->state)
1609         {
1610         case Req_Die: PullPin_Thread_Stop(This); break;
1611         case Req_Run: PullPin_Thread_Process(This); break;
1612         case Req_Pause: PullPin_Thread_Pause(This); break;
1613         case Req_Sleepy: ERR("Should not be signalled with SLEEPY!\n"); break;
1614         default: ERR("Unknown state request: %d\n", This->state); break;
1615         }
1616     }
1617 }
1618
1619 HRESULT PullPin_InitProcessing(PullPin * This)
1620 {
1621     HRESULT hr = S_OK;
1622
1623     TRACE("(%p)->()\n", This);
1624
1625     /* if we are connected */
1626     if (This->pAlloc)
1627     {
1628         DWORD dwThreadId;
1629
1630         WaitForSingleObject(This->hEventStateChanged, INFINITE);
1631         EnterCriticalSection(This->pin.pCritSec);
1632
1633         assert(!This->hThread);
1634         assert(This->state == Req_Die);
1635         assert(This->stop_playback);
1636         assert(WaitForSingleObject(This->thread_sleepy, 0) == WAIT_TIMEOUT);
1637         This->state = Req_Sleepy;
1638
1639         /* AddRef the filter to make sure it and it's pins will be around
1640          * as long as the thread */
1641         IBaseFilter_AddRef(This->pin.pinInfo.pFilter);
1642
1643
1644         This->hThread = CreateThread(NULL, 0, PullPin_Thread_Main, This, 0, &dwThreadId);
1645         if (!This->hThread)
1646         {
1647             hr = HRESULT_FROM_WIN32(GetLastError());
1648             IBaseFilter_Release(This->pin.pinInfo.pFilter);
1649         }
1650
1651         if (SUCCEEDED(hr))
1652         {
1653             SetEvent(This->hEventStateChanged);
1654             /* If assert fails, that means a command was not processed before the thread previously terminated */
1655         }
1656         LeaveCriticalSection(This->pin.pCritSec);
1657     }
1658
1659     TRACE(" -- %x\n", hr);
1660
1661     return hr;
1662 }
1663
1664 HRESULT PullPin_StartProcessing(PullPin * This)
1665 {
1666     /* if we are connected */
1667     TRACE("(%p)->()\n", This);
1668     if(This->pAlloc)
1669     {
1670         assert(This->hThread);
1671
1672         PullPin_WaitForStateChange(This, INFINITE);
1673
1674         assert(This->state == Req_Sleepy);
1675
1676         /* Wake up! */
1677         assert(WaitForSingleObject(This->thread_sleepy, 0) == WAIT_TIMEOUT);
1678         This->state = Req_Run;
1679         This->stop_playback = 0;
1680         ResetEvent(This->hEventStateChanged);
1681         SetEvent(This->thread_sleepy);
1682     }
1683
1684     return S_OK;
1685 }
1686
1687 HRESULT PullPin_PauseProcessing(PullPin * This)
1688 {
1689     /* if we are connected */
1690     TRACE("(%p)->()\n", This);
1691     if(This->pAlloc)
1692     {
1693         assert(This->hThread);
1694
1695         PullPin_WaitForStateChange(This, INFINITE);
1696
1697         EnterCriticalSection(This->pin.pCritSec);
1698         assert(!This->stop_playback);
1699         assert(This->state == Req_Run|| This->state == Req_Sleepy);
1700
1701         assert(WaitForSingleObject(This->thread_sleepy, 0) == WAIT_TIMEOUT);
1702         This->state = Req_Pause;
1703         This->stop_playback = 1;
1704         ResetEvent(This->hEventStateChanged);
1705         SetEvent(This->thread_sleepy);
1706
1707         LeaveCriticalSection(This->pin.pCritSec);
1708     }
1709
1710     return S_OK;
1711 }
1712
1713 HRESULT PullPin_StopProcessing(PullPin * This)
1714 {
1715     TRACE("(%p)->()\n", This);
1716
1717     /* if we are alive */
1718     assert(This->hThread);
1719
1720     PullPin_WaitForStateChange(This, INFINITE);
1721
1722     assert(This->state == Req_Pause || This->state == Req_Sleepy);
1723
1724     This->stop_playback = 1;
1725     This->state = Req_Die;
1726     assert(WaitForSingleObject(This->thread_sleepy, 0) == WAIT_TIMEOUT);
1727     ResetEvent(This->hEventStateChanged);
1728     SetEvent(This->thread_sleepy);
1729
1730     return S_OK;
1731 }
1732
1733 HRESULT PullPin_WaitForStateChange(PullPin * This, DWORD dwMilliseconds)
1734 {
1735     if (WaitForSingleObject(This->hEventStateChanged, dwMilliseconds) == WAIT_TIMEOUT)
1736         return S_FALSE;
1737     return S_OK;
1738 }
1739
1740 HRESULT WINAPI PullPin_EndOfStream(IPin * iface)
1741 {
1742     FIXME("(%p)->() stub\n", iface);
1743
1744     return SendFurther( iface, deliver_endofstream, NULL, NULL );
1745 }
1746
1747 HRESULT WINAPI PullPin_BeginFlush(IPin * iface)
1748 {
1749     PullPin *This = (PullPin *)iface;
1750     TRACE("(%p)->()\n", This);
1751
1752     EnterCriticalSection(This->pin.pCritSec);
1753     {
1754         SendFurther( iface, deliver_beginflush, NULL, NULL );
1755     }
1756     LeaveCriticalSection(This->pin.pCritSec);
1757
1758     EnterCriticalSection(&This->thread_lock);
1759     {
1760         PullPin_WaitForStateChange(This, INFINITE);
1761
1762         if (This->hThread && !This->stop_playback)
1763         {
1764             PullPin_PauseProcessing(This);
1765             PullPin_WaitForStateChange(This, INFINITE);
1766         }
1767     }
1768     LeaveCriticalSection(&This->thread_lock);
1769
1770     EnterCriticalSection(This->pin.pCritSec);
1771     {
1772         This->fnCleanProc(This->pin.pUserData);
1773     }
1774     LeaveCriticalSection(This->pin.pCritSec);
1775
1776     return S_OK;
1777 }
1778
1779 HRESULT WINAPI PullPin_EndFlush(IPin * iface)
1780 {
1781     PullPin *This = (PullPin *)iface;
1782
1783     TRACE("(%p)->()\n", iface);
1784
1785     EnterCriticalSection(&This->thread_lock);
1786     {
1787         FILTER_STATE state;
1788         IBaseFilter_GetState(This->pin.pinInfo.pFilter, INFINITE, &state);
1789
1790         if (This->stop_playback && state == State_Running)
1791             PullPin_StartProcessing(This);
1792
1793         PullPin_WaitForStateChange(This, INFINITE);
1794     }
1795     LeaveCriticalSection(&This->thread_lock);
1796
1797     EnterCriticalSection(This->pin.pCritSec);
1798     SendFurther( iface, deliver_endflush, NULL, NULL );
1799     LeaveCriticalSection(This->pin.pCritSec);
1800
1801     return S_OK;
1802 }
1803
1804 HRESULT WINAPI PullPin_Disconnect(IPin *iface)
1805 {
1806     HRESULT hr;
1807     PullPin *This = (PullPin *)iface;
1808
1809     TRACE("()\n");
1810
1811     EnterCriticalSection(This->pin.pCritSec);
1812     {
1813         if (FAILED(hr = IMemAllocator_Decommit(This->pAlloc)))
1814             ERR("Allocator decommit failed with error %x. Possible memory leak\n", hr);
1815
1816         if (This->pin.pConnectedTo)
1817         {
1818             IPin_Release(This->pin.pConnectedTo);
1819             This->pin.pConnectedTo = NULL;
1820             hr = S_OK;
1821         }
1822         else
1823             hr = S_FALSE;
1824     }
1825     LeaveCriticalSection(This->pin.pCritSec);
1826
1827     return hr;
1828 }
1829
1830 HRESULT WINAPI PullPin_NewSegment(IPin * iface, REFERENCE_TIME tStart, REFERENCE_TIME tStop, double dRate)
1831 {
1832     newsegmentargs args;
1833     FIXME("(%p)->(%s, %s, %g) stub\n", iface, wine_dbgstr_longlong(tStart), wine_dbgstr_longlong(tStop), dRate);
1834
1835     args.tStart = tStart;
1836     args.tStop = tStop;
1837     args.rate = dRate;
1838
1839     return SendFurther( iface, deliver_newsegment, &args, NULL );
1840 }
1841
1842 static const IPinVtbl PullPin_Vtbl =
1843 {
1844     PullPin_QueryInterface,
1845     IPinImpl_AddRef,
1846     PullPin_Release,
1847     InputPin_Connect,
1848     PullPin_ReceiveConnection,
1849     PullPin_Disconnect,
1850     IPinImpl_ConnectedTo,
1851     IPinImpl_ConnectionMediaType,
1852     IPinImpl_QueryPinInfo,
1853     IPinImpl_QueryDirection,
1854     IPinImpl_QueryId,
1855     IPinImpl_QueryAccept,
1856     IPinImpl_EnumMediaTypes,
1857     IPinImpl_QueryInternalConnections,
1858     PullPin_EndOfStream,
1859     PullPin_BeginFlush,
1860     PullPin_EndFlush,
1861     PullPin_NewSegment
1862 };