4 * Copyright 2003 Robert Shearman
5 * Copyright 2004-2005 Christian Costa
6 * Copyright 2008 Maarten Lankhorst
8 * This library is free software; you can redistribute it and/or
9 * modify it under the terms of the GNU Lesser General Public
10 * License as published by the Free Software Foundation; either
11 * version 2.1 of the License, or (at your option) any later version.
13 * This library 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 GNU
16 * Lesser General Public License for more details.
18 * You should have received a copy of the GNU Lesser General Public
19 * License along with this library; if not, write to the Free Software
20 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
23 * - Reference leaks, if they still exist
24 * - Files without an index are not handled correctly yet.
25 * - When stopping/starting, a sample is lost. This should be compensated by
26 * keeping track of previous index/position.
27 * - Debugging channels are noisy at the moment, especially with thread
28 * related messages, however this is the only correct thing to do right now,
29 * since wine doesn't correctly handle all messages yet.
32 #include "quartz_private.h"
33 #include "control_private.h"
42 #include "wine/unicode.h"
43 #include "wine/debug.h"
50 #define TWOCCFromFOURCC(fcc) HIWORD(fcc)
52 /* four character codes used in AVI files */
53 #define ckidINFO mmioFOURCC('I','N','F','O')
54 #define ckidREC mmioFOURCC('R','E','C',' ')
56 WINE_DEFAULT_DEBUG_CHANNEL(quartz);
58 typedef struct StreamData
64 AVISTREAMHEADER streamheader;
66 AVISTDINDEX **stdindex;
70 /* Position, in index units */
71 DWORD pos, pos_next, index, index_next;
73 /* Packet handling: a thread is created and waits on the packet event handle
74 * On an event acquire the sample lock, addref the sample and set it to NULL,
75 * then queue a new packet.
77 HANDLE thread, packet_queued;
80 /* Amount of preroll samples for this stream */
84 typedef struct AVISplitterImpl
87 RIFFCHUNK CurrentChunk;
88 LONGLONG CurrentChunkOffset; /* in media time */
90 AVIMAINHEADER AviHeader;
91 AVIEXTHEADER ExtHeader;
93 AVIOLDINDEX *oldindex;
100 AVISplitterImpl *This;
104 /* The threading stuff cries for an explanation
106 * PullPin starts processing and calls AVISplitter_first_request
107 * AVISplitter_first_request creates a thread for each stream
108 * A stream can be audio, video, subtitles or something undefined.
110 * AVISplitter_first_request loads a single packet to each but one stream,
111 * and queues it for that last stream. This is to prevent WaitForNext to time
114 * The processing loop is entered. It calls IAsyncReader_WaitForNext in the
115 * PullPin. Every time it receives a packet, it will call AVISplitter_Sample
116 * AVISplitter_Sample will signal the relevant thread that a new sample is
117 * arrived, when that thread is ready it will read the packet and transmits
118 * it downstream with AVISplitter_Receive
120 * Threads terminate upon receiving NULL as packet or when ANY error code
121 * != S_OK occurs. This means that any error is fatal to processing.
124 static HRESULT AVISplitter_SendEndOfFile(AVISplitterImpl *This, DWORD streamnumber)
129 TRACE("End of file reached\n");
131 hr = IPin_ConnectedTo(This->Parser.ppPins[streamnumber+1], &ppin);
134 hr = IPin_EndOfStream(ppin);
137 TRACE("--> %x\n", hr);
139 /* Force the pullpin thread to stop */
143 /* Thread worker horse */
144 static HRESULT AVISplitter_next_request(AVISplitterImpl *This, DWORD streamnumber)
146 StreamData *stream = This->streams + streamnumber;
147 PullPin *pin = This->Parser.pInputPin;
148 IMediaSample *sample = NULL;
151 TRACE("(%p, %u)->()\n", This, streamnumber);
153 hr = IMemAllocator_GetBuffer(pin->pAlloc, &sample, NULL, NULL, 0);
155 ERR("... %08x?\n", hr);
159 LONGLONG rtSampleStart;
160 /* Add 4 for the next header, which should hopefully work */
161 LONGLONG rtSampleStop;
163 stream->pos = stream->pos_next;
164 stream->index = stream->index_next;
166 IMediaSample_SetDiscontinuity(sample, stream->seek);
167 stream->seek = FALSE;
171 IMediaSample_SetPreroll(sample, TRUE);
174 IMediaSample_SetPreroll(sample, FALSE);
175 IMediaSample_SetSyncPoint(sample, TRUE);
177 if (stream->stdindex)
179 AVISTDINDEX *index = stream->stdindex[stream->index];
180 AVISTDINDEX_ENTRY *entry = &index->aIndex[stream->pos];
183 if (stream->index >= stream->entries)
185 TRACE("END OF STREAM ON %u\n", streamnumber);
186 IMediaSample_Release(sample);
190 rtSampleStart = index->qwBaseOffset;
191 rtSampleStart += entry->dwOffset;
192 rtSampleStart = MEDIATIME_FROM_BYTES(rtSampleStart);
195 if (index->nEntriesInUse == stream->pos_next)
197 stream->pos_next = 0;
198 ++stream->index_next;
201 rtSampleStop = rtSampleStart + MEDIATIME_FROM_BYTES(entry->dwSize & ~(1 << 31));
203 TRACE("offset(%u) size(%u)\n", (DWORD)BYTES_FROM_MEDIATIME(rtSampleStart), (DWORD)BYTES_FROM_MEDIATIME(rtSampleStop - rtSampleStart));
205 else if (This->oldindex)
207 DWORD flags = This->oldindex->aIndex[stream->pos].dwFlags;
208 DWORD size = This->oldindex->aIndex[stream->pos].dwSize;
214 TRACE("END OF STREAM ON %u\n", streamnumber);
215 IMediaSample_Release(sample);
219 keyframe = !!(flags & AVIIF_KEYFRAME);
221 rtSampleStart = MEDIATIME_FROM_BYTES(This->offset);
222 rtSampleStart += MEDIATIME_FROM_BYTES(This->oldindex->aIndex[stream->pos].dwOffset);
223 rtSampleStop = rtSampleStart + MEDIATIME_FROM_BYTES(size);
224 if (flags & AVIIF_MIDPART)
226 FIXME("Only stand alone frames are currently handled correctly!\n");
228 if (flags & AVIIF_LIST)
230 FIXME("Not sure if this is handled correctly\n");
231 rtSampleStart += MEDIATIME_FROM_BYTES(sizeof(RIFFLIST));
232 rtSampleStop += MEDIATIME_FROM_BYTES(sizeof(RIFFLIST));
236 rtSampleStart += MEDIATIME_FROM_BYTES(sizeof(RIFFCHUNK));
237 rtSampleStop += MEDIATIME_FROM_BYTES(sizeof(RIFFCHUNK));
240 /* Slow way of finding next index */
243 } while (stream->pos_next * sizeof(This->oldindex->aIndex[0]) < This->oldindex->cb
244 && StreamFromFOURCC(This->oldindex->aIndex[stream->pos_next].dwChunkId) != streamnumber);
246 /* End of file soon */
247 if (stream->pos_next * sizeof(This->oldindex->aIndex[0]) >= This->oldindex->cb)
249 stream->pos_next = 0;
250 ++stream->index_next;
253 else /* TODO: Generate an index automagically */
255 ERR("CAN'T PLAY WITHOUT AN INDEX! SOS! SOS! SOS!\n");
259 if (rtSampleStart != rtSampleStop)
261 hr = IMediaSample_SetTime(sample, &rtSampleStart, &rtSampleStop);
263 hr = IAsyncReader_Request(pin->pReader, sample, streamnumber);
266 assert(IMediaSample_Release(sample) == 0);
270 stream->sample = sample;
271 IMediaSample_SetActualDataLength(sample, 0);
272 SetEvent(stream->packet_queued);
279 ERR("There should be no sample!\n");
280 assert(IMediaSample_Release(sample) == 0);
283 TRACE("--> %08x\n", hr);
288 static HRESULT AVISplitter_Receive(AVISplitterImpl *This, IMediaSample *sample, DWORD streamnumber)
290 Parser_OutputPin *pin = (Parser_OutputPin *)This->Parser.ppPins[1+streamnumber];
292 LONGLONG start, stop;
293 StreamData *stream = &This->streams[streamnumber];
295 start = pin->dwSamplesProcessed;
296 start *= stream->streamheader.dwScale;
298 start /= stream->streamheader.dwRate;
300 if (stream->streamheader.dwSampleSize)
302 ULONG len = IMediaSample_GetActualDataLength(sample);
303 ULONG size = stream->streamheader.dwSampleSize;
305 pin->dwSamplesProcessed += len / size;
308 ++pin->dwSamplesProcessed;
310 stop = pin->dwSamplesProcessed;
311 stop *= stream->streamheader.dwScale;
313 stop /= stream->streamheader.dwRate;
315 IMediaSample_SetTime(sample, &start, &stop);
317 hr = OutputPin_SendSample(&pin->pin, sample);
319 /* Uncomment this if you want to debug the time differences between the
320 * different streams, it is useful for that
322 FIXME("stream %u, hr: %08x, Start: %u.%03u, Stop: %u.%03u\n", streamnumber, hr,
323 (DWORD)(start / 10000000), (DWORD)((start / 10000)%1000),
324 (DWORD)(stop / 10000000), (DWORD)((stop / 10000)%1000));
329 static DWORD WINAPI AVISplitter_thread_reader(LPVOID data)
331 struct thread_args *args = data;
332 AVISplitterImpl *This = args->This;
333 DWORD streamnumber = args->stream;
338 HRESULT nexthr = S_FALSE;
339 IMediaSample *sample;
341 WaitForSingleObject(This->streams[streamnumber].packet_queued, INFINITE);
342 sample = This->streams[streamnumber].sample;
343 This->streams[streamnumber].sample = NULL;
347 nexthr = AVISplitter_next_request(This, streamnumber);
349 hr = AVISplitter_Receive(This, sample, streamnumber);
351 FIXME("Receiving error: %08x\n", hr);
353 IMediaSample_Release(sample);
356 if (nexthr == S_FALSE)
357 AVISplitter_SendEndOfFile(This, streamnumber);
358 } while (hr == S_OK);
361 FIXME("Thread %u terminated with hr %08x!\n", streamnumber, hr);
363 TRACE("Thread %u terminated properly\n", streamnumber);
367 static HRESULT AVISplitter_Sample(LPVOID iface, IMediaSample * pSample, DWORD_PTR cookie)
369 AVISplitterImpl *This = iface;
370 StreamData *stream = This->streams + cookie;
373 if (!IMediaSample_GetActualDataLength(pSample))
375 ERR("Received empty sample\n");
379 /* Send the sample to whatever thread is appropiate
380 * That thread should also not have a sample queued at the moment
383 TRACE("(%p)->(%p size: %u, %lu)\n", This, pSample, IMediaSample_GetActualDataLength(pSample), cookie);
384 assert(cookie < This->Parser.cStreams);
385 assert(!stream->sample);
386 assert(WaitForSingleObject(stream->packet_queued, 0) == WAIT_TIMEOUT);
388 IMediaSample_AddRef(pSample);
390 stream->sample = pSample;
391 SetEvent(stream->packet_queued);
396 static HRESULT AVISplitter_done_process(LPVOID iface);
398 /* On the first request we have to be sure that (cStreams-1) samples have
399 * already been processed, because otherwise some pins might not ever finish
400 * a Pause state change
402 static HRESULT AVISplitter_first_request(LPVOID iface)
404 AVISplitterImpl *This = iface;
407 IMediaSample *sample = NULL;
408 BOOL have_sample = FALSE;
410 TRACE("(%p)->()\n", This);
412 for (x = 0; x < This->Parser.cStreams; ++x)
414 StreamData *stream = This->streams + x;
416 /* Nothing should be running at this point */
417 assert(!stream->thread);
420 /* It could be we asked the thread to terminate, and the thread
421 * already terminated before receiving the deathwish */
422 ResetEvent(stream->packet_queued);
424 stream->pos_next = stream->pos;
425 stream->index_next = stream->index;
427 /* There should be a packet queued from AVISplitter_next_request last time
428 * It needs to be done now because this is the only way to ensure that every
429 * stream will have at least 1 packet processed
430 * If this is done after the threads start it could go all awkward and we
431 * would have no guarantees that it's successful at all
436 DWORD_PTR dwUser = ~0;
437 hr = IAsyncReader_WaitForNext(This->Parser.pInputPin->pReader, 10000, &sample, &dwUser);
441 AVISplitter_Sample(iface, sample, dwUser);
442 IMediaSample_Release(sample);
445 hr = AVISplitter_next_request(This, x);
446 TRACE("-->%08x\n", hr);
448 /* Could be an EOF instead */
449 have_sample = (hr == S_OK);
451 AVISplitter_SendEndOfFile(This, x);
453 if (FAILED(hr) && hr != VFW_E_NOT_CONNECTED)
458 /* FIXME: Don't do this for each pin that sent an EOF */
459 for (x = 0; x < This->Parser.cStreams && SUCCEEDED(hr); ++x)
461 struct thread_args *args;
464 if ((This->streams[x].stdindex && This->streams[x].index_next >= This->streams[x].entries) ||
465 (!This->streams[x].stdindex && This->streams[x].index_next))
467 This->streams[x].thread = NULL;
471 args = CoTaskMemAlloc(sizeof(*args));
474 This->streams[x].thread = CreateThread(NULL, 0, AVISplitter_thread_reader, args, 0, &tid);
475 TRACE("Created stream %u thread 0x%08x\n", x, tid);
479 ERR("Horsemen of the apocalypse came to bring error 0x%08x\n", hr);
484 static HRESULT AVISplitter_done_process(LPVOID iface)
486 AVISplitterImpl *This = iface;
490 for (x = 0; x < This->Parser.cStreams; ++x)
492 StreamData *stream = This->streams + x;
494 TRACE("Waiting for %u to terminate\n", x);
495 /* Make the thread return first */
496 SetEvent(stream->packet_queued);
497 assert(WaitForSingleObject(stream->thread, 100000) != WAIT_TIMEOUT);
498 CloseHandle(stream->thread);
499 stream->thread = NULL;
502 assert(IMediaSample_Release(stream->sample) == 0);
503 stream->sample = NULL;
505 ResetEvent(stream->packet_queued);
507 TRACE("All threads are now terminated\n");
512 static HRESULT AVISplitter_QueryAccept(LPVOID iface, const AM_MEDIA_TYPE * pmt)
514 if (IsEqualIID(&pmt->majortype, &MEDIATYPE_Stream) && IsEqualIID(&pmt->subtype, &MEDIASUBTYPE_Avi))
519 static HRESULT AVISplitter_ProcessIndex(AVISplitterImpl *This, AVISTDINDEX **index, LONGLONG qwOffset, DWORD cb)
526 if (cb < sizeof(AVISTDINDEX))
528 FIXME("size %u too small\n", cb);
532 pIndex = CoTaskMemAlloc(cb);
534 return E_OUTOFMEMORY;
536 IAsyncReader_SyncRead(((PullPin *)This->Parser.ppPins[0])->pReader, qwOffset, cb, (BYTE *)pIndex);
537 rest = cb - sizeof(AVISUPERINDEX) + sizeof(RIFFCHUNK) + sizeof(pIndex->aIndex);
539 TRACE("FOURCC: %s\n", debugstr_an((char *)&pIndex->fcc, 4));
540 TRACE("wLongsPerEntry: %hd\n", pIndex->wLongsPerEntry);
541 TRACE("bIndexSubType: %hd\n", pIndex->bIndexSubType);
542 TRACE("bIndexType: %hd\n", pIndex->bIndexType);
543 TRACE("nEntriesInUse: %u\n", pIndex->nEntriesInUse);
544 TRACE("dwChunkId: %.4s\n", (char *)&pIndex->dwChunkId);
545 TRACE("qwBaseOffset: %x%08x\n", (DWORD)(pIndex->qwBaseOffset >> 32), (DWORD)pIndex->qwBaseOffset);
546 TRACE("dwReserved_3: %u\n", pIndex->dwReserved_3);
548 if (pIndex->bIndexType != AVI_INDEX_OF_CHUNKS
549 || pIndex->wLongsPerEntry != 2
550 || rest < (pIndex->nEntriesInUse * sizeof(DWORD) * pIndex->wLongsPerEntry)
551 || (pIndex->bIndexSubType != AVI_INDEX_SUB_DEFAULT))
553 FIXME("Invalid index chunk encountered: %u/%u, %u/%u, %u/%u, %u/%u\n",
554 pIndex->bIndexType, AVI_INDEX_OF_CHUNKS, pIndex->wLongsPerEntry, 2,
555 rest, (DWORD)(pIndex->nEntriesInUse * sizeof(DWORD) * pIndex->wLongsPerEntry),
556 pIndex->bIndexSubType, AVI_INDEX_SUB_DEFAULT);
561 for (x = 0; x < pIndex->nEntriesInUse; ++x)
563 BOOL keyframe = !(pIndex->aIndex[x].dwSize >> 31);
564 DWORDLONG offset = pIndex->qwBaseOffset + pIndex->aIndex[x].dwOffset;
565 TRACE("dwOffset: %x%08x\n", (DWORD)(offset >> 32), (DWORD)offset);
566 TRACE("dwSize: %u\n", (pIndex->aIndex[x].dwSize & ~(1<<31)));
567 TRACE("Frame is a keyframe: %s\n", keyframe ? "yes" : "no");
574 static HRESULT AVISplitter_ProcessOldIndex(AVISplitterImpl *This)
576 ULONGLONG mov_pos = BYTES_FROM_MEDIATIME(This->CurrentChunkOffset) - sizeof(DWORD);
577 AVIOLDINDEX *pAviOldIndex = This->oldindex;
581 for (x = 0; x < pAviOldIndex->cb / sizeof(pAviOldIndex->aIndex[0]); ++x)
583 DWORD temp, temp2 = 0, offset, chunkid;
584 PullPin *pin = This->Parser.pInputPin;
586 offset = pAviOldIndex->aIndex[x].dwOffset;
587 chunkid = pAviOldIndex->aIndex[x].dwChunkId;
589 TRACE("dwChunkId: %.4s\n", (char *)&chunkid);
590 TRACE("dwFlags: %08x\n", pAviOldIndex->aIndex[x].dwFlags);
591 TRACE("dwOffset (%s): %08x\n", relative ? "relative" : "absolute", offset);
592 TRACE("dwSize: %08x\n", pAviOldIndex->aIndex[x].dwSize);
594 /* Only scan once, or else this will take too long */
597 IAsyncReader_SyncRead(pin->pReader, offset, sizeof(DWORD), (BYTE *)&temp);
598 relative = (chunkid != temp);
600 if (chunkid == mmioFOURCC('7','F','x','x')
601 && ((char *)&temp)[0] == 'i' && ((char *)&temp)[1] == 'x')
606 if (offset + mov_pos < BYTES_FROM_MEDIATIME(This->EndOfFile))
607 IAsyncReader_SyncRead(pin->pReader, offset + mov_pos, sizeof(DWORD), (BYTE *)&temp2);
609 if (chunkid == mmioFOURCC('7','F','x','x')
610 && ((char *)&temp2)[0] == 'i' && ((char *)&temp2)[1] == 'x')
612 /* Do nothing, all is great */
614 else if (temp2 != chunkid)
616 ERR("Faulty index or bug in handling: Wanted FCC: %s, Abs FCC: %s (@ %x), Rel FCC: %s (@ %.0x%08x)\n",
617 debugstr_an((char *)&chunkid, 4), debugstr_an((char *)&temp, 4), offset,
618 debugstr_an((char *)&temp2, 4), (DWORD)((mov_pos + offset) >> 32), (DWORD)(mov_pos + offset));
622 TRACE("Scanned dwChunkId: %s\n", debugstr_an((char *)&temp2, 4));
625 TRACE("Scanned dwChunkId: %s\n", debugstr_an((char *)&temp, 4));
627 /* Only dump one packet */
633 FIXME("Dropping index: no idea whether it is relative or absolute\n");
634 CoTaskMemFree(This->oldindex);
635 This->oldindex = NULL;
640 This->offset = (DWORD)mov_pos;
645 static HRESULT AVISplitter_ProcessStreamList(AVISplitterImpl * This, const BYTE * pData, DWORD cb, ALLOCATOR_PROPERTIES *props)
648 const RIFFCHUNK * pChunk;
651 float fSamplesPerSec = 0.0f;
652 DWORD dwSampleSize = 0;
655 static const WCHAR wszStreamTemplate[] = {'S','t','r','e','a','m',' ','%','0','2','d',0};
658 ZeroMemory(&amt, sizeof(amt));
659 piOutput.dir = PINDIR_OUTPUT;
660 piOutput.pFilter = (IBaseFilter *)This;
661 wsprintfW(piOutput.achName, wszStreamTemplate, This->Parser.cStreams);
662 This->streams = CoTaskMemRealloc(This->streams, sizeof(StreamData) * (This->Parser.cStreams+1));
663 stream = This->streams + This->Parser.cStreams;
664 ZeroMemory(stream, sizeof(*stream));
666 for (pChunk = (const RIFFCHUNK *)pData;
667 ((const BYTE *)pChunk >= pData) && ((const BYTE *)pChunk + sizeof(RIFFCHUNK) < pData + cb) && (pChunk->cb > 0);
668 pChunk = (const RIFFCHUNK *)((const BYTE*)pChunk + sizeof(RIFFCHUNK) + pChunk->cb)
673 case ckidSTREAMHEADER:
675 const AVISTREAMHEADER * pStrHdr = (const AVISTREAMHEADER *)pChunk;
676 TRACE("processing stream header\n");
677 stream->streamheader = *pStrHdr;
679 fSamplesPerSec = (float)pStrHdr->dwRate / (float)pStrHdr->dwScale;
680 CoTaskMemFree(amt.pbFormat);
684 switch (pStrHdr->fccType)
686 case streamtypeVIDEO:
687 amt.formattype = FORMAT_VideoInfo;
689 case streamtypeAUDIO:
690 amt.formattype = FORMAT_WaveFormatEx;
693 FIXME("fccType %.4s not handled yet\n", (const char *)&pStrHdr->fccType);
694 amt.formattype = FORMAT_None;
696 amt.majortype = MEDIATYPE_Video;
697 amt.majortype.Data1 = pStrHdr->fccType;
698 amt.subtype = MEDIATYPE_Video;
699 amt.subtype.Data1 = pStrHdr->fccHandler;
700 TRACE("Subtype FCC: %.04s\n", (LPCSTR)&pStrHdr->fccHandler);
701 amt.lSampleSize = pStrHdr->dwSampleSize;
702 amt.bFixedSizeSamples = (amt.lSampleSize != 0);
704 /* FIXME: Is this right? */
705 if (!amt.lSampleSize)
711 amt.bTemporalCompression = IsEqualGUID(&amt.majortype, &MEDIATYPE_Video); /* FIXME? */
712 dwSampleSize = pStrHdr->dwSampleSize;
713 dwLength = pStrHdr->dwLength;
715 dwLength = This->AviHeader.dwTotalFrames;
717 if (pStrHdr->dwSuggestedBufferSize && pStrHdr->dwSuggestedBufferSize > props->cbBuffer)
718 props->cbBuffer = pStrHdr->dwSuggestedBufferSize;
722 case ckidSTREAMFORMAT:
723 TRACE("processing stream format data\n");
724 if (IsEqualIID(&amt.formattype, &FORMAT_VideoInfo))
726 VIDEOINFOHEADER * pvi;
727 /* biCompression member appears to override the value in the stream header.
728 * i.e. the stream header can say something completely contradictory to what
729 * is in the BITMAPINFOHEADER! */
730 if (pChunk->cb < sizeof(BITMAPINFOHEADER))
732 ERR("Not enough bytes for BITMAPINFOHEADER\n");
735 amt.cbFormat = sizeof(VIDEOINFOHEADER) - sizeof(BITMAPINFOHEADER) + pChunk->cb;
736 amt.pbFormat = CoTaskMemAlloc(amt.cbFormat);
737 ZeroMemory(amt.pbFormat, amt.cbFormat);
738 pvi = (VIDEOINFOHEADER *)amt.pbFormat;
739 pvi->AvgTimePerFrame = (LONGLONG)(10000000.0 / fSamplesPerSec);
741 CopyMemory(&pvi->bmiHeader, pChunk + 1, pChunk->cb);
742 if (pvi->bmiHeader.biCompression)
743 amt.subtype.Data1 = pvi->bmiHeader.biCompression;
745 else if (IsEqualIID(&amt.formattype, &FORMAT_WaveFormatEx))
747 amt.cbFormat = pChunk->cb;
748 if (amt.cbFormat < sizeof(WAVEFORMATEX))
749 amt.cbFormat = sizeof(WAVEFORMATEX);
750 amt.pbFormat = CoTaskMemAlloc(amt.cbFormat);
751 ZeroMemory(amt.pbFormat, amt.cbFormat);
752 CopyMemory(amt.pbFormat, pChunk + 1, pChunk->cb);
756 amt.cbFormat = pChunk->cb;
757 amt.pbFormat = CoTaskMemAlloc(amt.cbFormat);
758 CopyMemory(amt.pbFormat, pChunk + 1, amt.cbFormat);
762 TRACE("processing stream name\n");
763 /* FIXME: this doesn't exactly match native version (we omit the "##)" prefix), but hey... */
764 MultiByteToWideChar(CP_ACP, 0, (LPCSTR)(pChunk + 1), pChunk->cb, piOutput.achName, sizeof(piOutput.achName) / sizeof(piOutput.achName[0]));
766 case ckidSTREAMHANDLERDATA:
767 FIXME("process stream handler data\n");
770 TRACE("JUNK chunk ignored\n");
772 case ckidAVISUPERINDEX:
774 const AVISUPERINDEX *pIndex = (const AVISUPERINDEX *)pChunk;
776 long rest = pIndex->cb - sizeof(AVISUPERINDEX) + sizeof(RIFFCHUNK) + sizeof(pIndex->aIndex[0]) * ANYSIZE_ARRAY;
778 if (pIndex->cb < sizeof(AVISUPERINDEX) - sizeof(RIFFCHUNK))
780 FIXME("size %u\n", pIndex->cb);
786 ERR("Stream %d got more than 1 superindex?\n", This->Parser.cStreams);
790 TRACE("wLongsPerEntry: %hd\n", pIndex->wLongsPerEntry);
791 TRACE("bIndexSubType: %hd\n", pIndex->bIndexSubType);
792 TRACE("bIndexType: %hd\n", pIndex->bIndexType);
793 TRACE("nEntriesInUse: %u\n", pIndex->nEntriesInUse);
794 TRACE("dwChunkId: %.4s\n", (const char *)&pIndex->dwChunkId);
795 if (pIndex->dwReserved[0])
796 TRACE("dwReserved[0]: %u\n", pIndex->dwReserved[0]);
797 if (pIndex->dwReserved[2])
798 TRACE("dwReserved[1]: %u\n", pIndex->dwReserved[1]);
799 if (pIndex->dwReserved[2])
800 TRACE("dwReserved[2]: %u\n", pIndex->dwReserved[2]);
802 if (pIndex->bIndexType != AVI_INDEX_OF_INDEXES
803 || pIndex->wLongsPerEntry != 4
804 || rest < (pIndex->nEntriesInUse * sizeof(DWORD) * pIndex->wLongsPerEntry)
805 || (pIndex->bIndexSubType != AVI_INDEX_SUB_2FIELD && pIndex->bIndexSubType != AVI_INDEX_SUB_DEFAULT))
807 FIXME("Invalid index chunk encountered\n");
811 stream->entries = pIndex->nEntriesInUse;
812 stream->stdindex = CoTaskMemRealloc(stream->stdindex, sizeof(*stream->stdindex) * stream->entries);
813 for (x = 0; x < pIndex->nEntriesInUse; ++x)
815 TRACE("qwOffset: %x%08x\n", (DWORD)(pIndex->aIndex[x].qwOffset >> 32), (DWORD)pIndex->aIndex[x].qwOffset);
816 TRACE("dwSize: %u\n", pIndex->aIndex[x].dwSize);
817 TRACE("dwDuration: %u (unreliable)\n", pIndex->aIndex[x].dwDuration);
819 AVISplitter_ProcessIndex(This, &stream->stdindex[x], pIndex->aIndex[x].qwOffset, pIndex->aIndex[x].dwSize);
824 FIXME("unknown chunk type \"%.04s\" ignored\n", (LPCSTR)&pChunk->fcc);
828 if (IsEqualGUID(&amt.formattype, &FORMAT_WaveFormatEx))
830 amt.subtype = MEDIATYPE_Video;
831 amt.subtype.Data1 = ((WAVEFORMATEX *)amt.pbFormat)->wFormatTag;
834 dump_AM_MEDIA_TYPE(&amt);
835 TRACE("fSamplesPerSec = %f\n", (double)fSamplesPerSec);
836 TRACE("dwSampleSize = %x\n", dwSampleSize);
837 TRACE("dwLength = %x\n", dwLength);
839 stream->fSamplesPerSec = fSamplesPerSec;
840 stream->dwSampleSize = dwSampleSize;
841 stream->dwLength = dwLength; /* TODO: Use this for mediaseeking */
842 stream->packet_queued = CreateEventW(NULL, 0, 0, NULL);
844 hr = Parser_AddPin(&(This->Parser), &piOutput, props, &amt);
845 CoTaskMemFree(amt.pbFormat);
851 static HRESULT AVISplitter_ProcessODML(AVISplitterImpl * This, const BYTE * pData, DWORD cb)
853 const RIFFCHUNK * pChunk;
855 for (pChunk = (const RIFFCHUNK *)pData;
856 ((const BYTE *)pChunk >= pData) && ((const BYTE *)pChunk + sizeof(RIFFCHUNK) < pData + cb) && (pChunk->cb > 0);
857 pChunk = (const RIFFCHUNK *)((const BYTE*)pChunk + sizeof(RIFFCHUNK) + pChunk->cb)
862 case ckidAVIEXTHEADER:
865 const AVIEXTHEADER * pExtHdr = (const AVIEXTHEADER *)pChunk;
867 TRACE("processing extension header\n");
868 if (pExtHdr->cb != sizeof(AVIEXTHEADER) - sizeof(RIFFCHUNK))
870 FIXME("Size: %u\n", pExtHdr->cb);
873 TRACE("dwGrandFrames: %u\n", pExtHdr->dwGrandFrames);
874 for (x = 0; x < 61; ++x)
875 if (pExtHdr->dwFuture[x])
876 FIXME("dwFuture[%i] = %u (0x%08x)\n", x, pExtHdr->dwFuture[x], pExtHdr->dwFuture[x]);
877 This->ExtHeader = *pExtHdr;
881 FIXME("unknown chunk type \"%.04s\" ignored\n", (LPCSTR)&pChunk->fcc);
888 static HRESULT AVISplitter_InitializeStreams(AVISplitterImpl *This)
896 for (x = 0; x < This->Parser.cStreams; ++x)
898 This->streams[x].frames = 0;
899 This->streams[x].pos = ~0;
900 This->streams[x].index = 0;
903 nMax = This->oldindex->cb / sizeof(This->oldindex->aIndex[0]);
905 /* Ok, maybe this is more of an excercise to see if I interpret everything correctly or not, but that is useful for now. */
906 for (n = 0; n < nMax; ++n)
908 DWORD streamId = StreamFromFOURCC(This->oldindex->aIndex[n].dwChunkId);
909 if (streamId >= This->Parser.cStreams)
911 FIXME("Stream id %s ignored\n", debugstr_an((char*)&This->oldindex->aIndex[n].dwChunkId, 4));
914 if (This->streams[streamId].pos == ~0U)
915 This->streams[streamId].pos = n;
917 if (This->streams[streamId].streamheader.dwSampleSize)
918 This->streams[streamId].frames += This->oldindex->aIndex[n].dwSize / This->streams[streamId].streamheader.dwSampleSize;
920 ++This->streams[streamId].frames;
923 for (x = 0; x < This->Parser.cStreams; ++x)
925 if ((DWORD)This->streams[x].frames != This->streams[x].streamheader.dwLength)
927 FIXME("stream %u: frames found: %u, frames meant to be found: %u\n", x, (DWORD)This->streams[x].frames, This->streams[x].streamheader.dwLength);
932 else if (!This->streams[0].entries)
934 for (x = 0; x < This->Parser.cStreams; ++x)
936 This->streams[x].frames = This->streams[x].streamheader.dwLength;
938 /* MS Avi splitter does seek through the whole file, we should! */
939 ERR("We should be manually seeking through the entire file to build an index, because the index is missing!!!\n");
943 /* Not much here yet */
944 for (x = 0; x < This->Parser.cStreams; ++x)
946 StreamData *stream = This->streams + x;
952 if (stream->stdindex)
956 for (y = 0; y < stream->entries; ++y)
958 if (stream->streamheader.dwSampleSize)
962 for (z = 0; z < stream->stdindex[y]->nEntriesInUse; ++z)
964 UINT len = stream->stdindex[y]->aIndex[z].dwSize & ~(1 << 31);
965 frames += len / stream->streamheader.dwSampleSize + !!(len % stream->streamheader.dwSampleSize);
969 frames += stream->stdindex[y]->nEntriesInUse;
972 else frames = stream->frames;
974 frames *= stream->streamheader.dwScale;
975 /* Keep accuracy as high as possible for duration */
976 This->Parser.mediaSeeking.llDuration = frames * 10000000;
977 This->Parser.mediaSeeking.llDuration /= stream->streamheader.dwRate;
978 This->Parser.mediaSeeking.llStop = This->Parser.mediaSeeking.llDuration;
979 This->Parser.mediaSeeking.llCurrent = 0;
981 frames /= stream->streamheader.dwRate;
983 TRACE("Duration: %d days, %d hours, %d minutes and %d.%03u seconds\n", (DWORD)(frames / 86400),
984 (DWORD)((frames % 86400) / 3600), (DWORD)((frames % 3600) / 60), (DWORD)(frames % 60),
985 (DWORD)(This->Parser.mediaSeeking.llDuration/10000) % 1000);
991 static HRESULT AVISplitter_Disconnect(LPVOID iface);
993 /* FIXME: fix leaks on failure here */
994 static HRESULT AVISplitter_InputPin_PreConnect(IPin * iface, IPin * pConnectPin, ALLOCATOR_PROPERTIES *props)
996 PullPin *This = (PullPin *)iface;
999 LONGLONG pos = 0; /* in bytes */
1001 RIFFCHUNK * pCurrentChunk;
1002 LONGLONG total, avail;
1006 AVISplitterImpl * pAviSplit = (AVISplitterImpl *)This->pin.pinInfo.pFilter;
1008 hr = IAsyncReader_SyncRead(This->pReader, pos, sizeof(list), (BYTE *)&list);
1009 pos += sizeof(list);
1011 if (list.fcc != FOURCC_RIFF)
1013 ERR("Input stream not a RIFF file\n");
1016 if (list.fccListType != formtypeAVI)
1018 ERR("Input stream not an AVI RIFF file\n");
1022 hr = IAsyncReader_SyncRead(This->pReader, pos, sizeof(list), (BYTE *)&list);
1023 if (list.fcc != FOURCC_LIST)
1025 ERR("Expected LIST chunk, but got %.04s\n", (LPSTR)&list.fcc);
1028 if (list.fccListType != listtypeAVIHEADER)
1030 ERR("Header list expected. Got: %.04s\n", (LPSTR)&list.fccListType);
1034 pBuffer = HeapAlloc(GetProcessHeap(), 0, list.cb - sizeof(RIFFLIST) + sizeof(RIFFCHUNK));
1035 hr = IAsyncReader_SyncRead(This->pReader, pos + sizeof(list), list.cb - sizeof(RIFFLIST) + sizeof(RIFFCHUNK), pBuffer);
1037 pAviSplit->AviHeader.cb = 0;
1039 /* Stream list will set the buffer size here, so set a default and allow an override */
1040 props->cbBuffer = 0x20000;
1042 for (pCurrentChunk = (RIFFCHUNK *)pBuffer; (BYTE *)pCurrentChunk + sizeof(*pCurrentChunk) < pBuffer + list.cb; pCurrentChunk = (RIFFCHUNK *)(((BYTE *)pCurrentChunk) + sizeof(*pCurrentChunk) + pCurrentChunk->cb))
1046 switch (pCurrentChunk->fcc)
1048 case ckidMAINAVIHEADER:
1049 /* AVIMAINHEADER includes the structure that is pCurrentChunk at the moment */
1050 memcpy(&pAviSplit->AviHeader, pCurrentChunk, sizeof(pAviSplit->AviHeader));
1053 pList = (RIFFLIST *)pCurrentChunk;
1054 switch (pList->fccListType)
1056 case ckidSTREAMLIST:
1057 hr = AVISplitter_ProcessStreamList(pAviSplit, (BYTE *)pCurrentChunk + sizeof(RIFFLIST), pCurrentChunk->cb + sizeof(RIFFCHUNK) - sizeof(RIFFLIST), props);
1060 hr = AVISplitter_ProcessODML(pAviSplit, (BYTE *)pCurrentChunk + sizeof(RIFFLIST), pCurrentChunk->cb + sizeof(RIFFCHUNK) - sizeof(RIFFLIST));
1064 case ckidAVIPADDING:
1068 FIXME("unrecognised header list type: %.04s\n", (LPSTR)&pCurrentChunk->fcc);
1071 HeapFree(GetProcessHeap(), 0, pBuffer);
1073 if (pAviSplit->AviHeader.cb != sizeof(pAviSplit->AviHeader) - sizeof(RIFFCHUNK))
1075 ERR("Avi Header wrong size!\n");
1079 pos += sizeof(RIFFCHUNK) + list.cb;
1080 hr = IAsyncReader_SyncRead(This->pReader, pos, sizeof(list), (BYTE *)&list);
1082 while (list.fcc == ckidAVIPADDING || (list.fcc == FOURCC_LIST && list.fccListType != listtypeAVIMOVIE))
1084 pos += sizeof(RIFFCHUNK) + list.cb;
1086 hr = IAsyncReader_SyncRead(This->pReader, pos, sizeof(list), (BYTE *)&list);
1089 if (list.fcc != FOURCC_LIST)
1091 ERR("Expected LIST, but got %.04s\n", (LPSTR)&list.fcc);
1094 if (list.fccListType != listtypeAVIMOVIE)
1096 ERR("Expected AVI movie list, but got %.04s\n", (LPSTR)&list.fccListType);
1100 IAsyncReader_Length(This->pReader, &total, &avail);
1102 /* FIXME: AVIX files are extended beyond the FOURCC chunk "AVI ", and thus won't be played here,
1103 * once I get one of the files I'll try to fix it */
1106 This->rtStart = pAviSplit->CurrentChunkOffset = MEDIATIME_FROM_BYTES(pos + sizeof(RIFFLIST));
1107 pos += list.cb + sizeof(RIFFCHUNK);
1109 pAviSplit->EndOfFile = This->rtStop = MEDIATIME_FROM_BYTES(pos);
1112 ERR("File smaller (%x%08x) then EndOfFile (%x%08x)\n", (DWORD)(total >> 32), (DWORD)total, (DWORD)(pAviSplit->EndOfFile >> 32), (DWORD)pAviSplit->EndOfFile);
1116 hr = IAsyncReader_SyncRead(This->pReader, BYTES_FROM_MEDIATIME(pAviSplit->CurrentChunkOffset), sizeof(pAviSplit->CurrentChunk), (BYTE *)&pAviSplit->CurrentChunk);
1120 props->cbPrefix = 0;
1121 /* Comrades, prevent shortage of buffers, or you will feel the consequences! DA! */
1122 props->cBuffers = 2 * pAviSplit->Parser.cStreams;
1124 /* Now peek into the idx1 index, if available */
1125 if (hr == S_OK && (total - pos) > sizeof(RIFFCHUNK))
1127 memset(&list, 0, sizeof(list));
1129 hr = IAsyncReader_SyncRead(This->pReader, pos, sizeof(list), (BYTE *)&list);
1130 if (list.fcc == ckidAVIOLDINDEX)
1132 pAviSplit->oldindex = CoTaskMemRealloc(pAviSplit->oldindex, list.cb + sizeof(RIFFCHUNK));
1133 if (pAviSplit->oldindex)
1135 hr = IAsyncReader_SyncRead(This->pReader, pos, sizeof(RIFFCHUNK) + list.cb, (BYTE *)pAviSplit->oldindex);
1138 hr = AVISplitter_ProcessOldIndex(pAviSplit);
1142 CoTaskMemFree(pAviSplit->oldindex);
1143 pAviSplit->oldindex = NULL;
1151 for (x = 0; x < pAviSplit->Parser.cStreams; ++x)
1152 if (pAviSplit->streams[x].entries)
1157 CoTaskMemFree(pAviSplit->oldindex);
1158 pAviSplit->oldindex = NULL;
1159 if (indexes < pAviSplit->Parser.cStreams)
1161 /* This error could possible be survived by switching to old type index,
1162 * but I would rather find out why it doesn't find everything here
1164 ERR("%d indexes expected, but only have %d\n", indexes, pAviSplit->Parser.cStreams);
1168 else if (!indexes && pAviSplit->oldindex)
1169 indexes = pAviSplit->Parser.cStreams;
1171 if (!indexes && pAviSplit->AviHeader.dwFlags & AVIF_MUSTUSEINDEX)
1173 FIXME("No usable index was found!\n");
1177 /* Now, set up the streams */
1179 hr = AVISplitter_InitializeStreams(pAviSplit);
1183 AVISplitter_Disconnect(pAviSplit);
1187 TRACE("AVI File ok\n");
1192 static HRESULT AVISplitter_Flush(LPVOID iface)
1194 AVISplitterImpl *This = iface;
1197 TRACE("(%p)->()\n", This);
1199 for (x = 0; x < This->Parser.cStreams; ++x)
1201 StreamData *stream = This->streams + x;
1204 assert(IMediaSample_Release(stream->sample) == 0);
1205 stream->sample = NULL;
1207 ResetEvent(stream->packet_queued);
1208 assert(!stream->thread);
1214 static HRESULT AVISplitter_Disconnect(LPVOID iface)
1216 AVISplitterImpl *This = iface;
1219 /* TODO: Remove other memory that's allocated during connect */
1220 CoTaskMemFree(This->oldindex);
1221 This->oldindex = NULL;
1223 for (x = 0; x < This->Parser.cStreams; ++x)
1227 StreamData *stream = &This->streams[x];
1229 for (i = 0; i < stream->entries; ++i)
1230 CoTaskMemFree(stream->stdindex[i]);
1232 CoTaskMemFree(stream->stdindex);
1233 CloseHandle(stream->packet_queued);
1235 CoTaskMemFree(This->streams);
1236 This->streams = NULL;
1240 static ULONG WINAPI AVISplitter_Release(IBaseFilter *iface)
1242 AVISplitterImpl *This = (AVISplitterImpl *)iface;
1245 ref = InterlockedDecrement(&This->Parser.refCount);
1247 TRACE("(%p)->() Release from %d\n", This, ref + 1);
1251 AVISplitter_Flush(This);
1252 Parser_Destroy(&This->Parser);
1258 static HRESULT AVISplitter_seek(IBaseFilter *iface)
1260 AVISplitterImpl *This = (AVISplitterImpl *)iface;
1261 PullPin *pPin = This->Parser.pInputPin;
1262 LONGLONG newpos, endpos;
1265 newpos = This->Parser.mediaSeeking.llCurrent;
1266 endpos = This->Parser.mediaSeeking.llDuration;
1268 if (newpos > endpos)
1270 WARN("Requesting position %x%08x beyond end of stream %x%08x\n", (DWORD)(newpos>>32), (DWORD)newpos, (DWORD)(endpos>>32), (DWORD)endpos);
1271 return E_INVALIDARG;
1274 FIXME("Moving position to %u.%03u s!\n", (DWORD)(newpos / 10000000), (DWORD)((newpos / 10000)%1000));
1276 EnterCriticalSection(&pPin->thread_lock);
1277 /* Send a flush to all output pins */
1278 IPin_BeginFlush((IPin *)pPin);
1280 /* Make sure this is done while stopped, BeginFlush takes care of this */
1281 EnterCriticalSection(&This->Parser.csFilter);
1282 for (x = 0; x < This->Parser.cStreams; ++x)
1284 Parser_OutputPin *pin = (Parser_OutputPin *)This->Parser.ppPins[1+x];
1285 StreamData *stream = This->streams + x;
1286 IPin *victim = NULL;
1287 LONGLONG wanted_frames;
1288 DWORD last_keyframe = 0, last_keyframeidx = 0, preroll = 0;
1290 wanted_frames = newpos;
1291 wanted_frames *= stream->streamheader.dwRate;
1292 wanted_frames /= 10000000;
1293 wanted_frames /= stream->streamheader.dwScale;
1295 IPin_ConnectedTo((IPin *)pin, &victim);
1298 IPin_NewSegment(victim, newpos, endpos, pPin->dRate);
1299 IPin_Release(victim);
1302 pin->dwSamplesProcessed = 0;
1306 if (stream->stdindex)
1310 for (y = 0; y < stream->entries; ++y)
1312 for (z = 0; z < stream->stdindex[y]->nEntriesInUse; ++z)
1314 if (stream->streamheader.dwSampleSize)
1316 ULONG len = stream->stdindex[y]->aIndex[z].dwSize & ~(1 << 31);
1317 ULONG size = stream->streamheader.dwSampleSize;
1319 pin->dwSamplesProcessed += len / size;
1321 ++pin->dwSamplesProcessed;
1323 else ++pin->dwSamplesProcessed;
1325 if (!(stream->stdindex[y]->aIndex[z].dwSize >> 31))
1328 last_keyframeidx = y;
1334 if (pin->dwSamplesProcessed >= wanted_frames)
1337 if (pin->dwSamplesProcessed >= wanted_frames)
1340 stream->index = last_keyframeidx;
1341 stream->pos = last_keyframe;
1346 nMax = This->oldindex->cb / sizeof(This->oldindex->aIndex[0]);
1348 for (n = 0; n < nMax; ++n)
1350 DWORD streamId = StreamFromFOURCC(This->oldindex->aIndex[n].dwChunkId);
1354 if (stream->streamheader.dwSampleSize)
1356 ULONG len = This->oldindex->aIndex[n].dwSize;
1357 ULONG size = stream->streamheader.dwSampleSize;
1359 pin->dwSamplesProcessed += len / size;
1361 ++pin->dwSamplesProcessed;
1363 else ++pin->dwSamplesProcessed;
1365 if (This->oldindex->aIndex[n].dwFlags & AVIIF_KEYFRAME)
1373 if (pin->dwSamplesProcessed >= wanted_frames)
1377 stream->pos = last_keyframe;
1380 stream->preroll = preroll;
1383 LeaveCriticalSection(&This->Parser.csFilter);
1385 TRACE("Done flushing\n");
1386 IPin_EndFlush((IPin *)pPin);
1387 LeaveCriticalSection(&pPin->thread_lock);
1392 static const IBaseFilterVtbl AVISplitterImpl_Vtbl =
1394 Parser_QueryInterface,
1396 AVISplitter_Release,
1402 Parser_SetSyncSource,
1403 Parser_GetSyncSource,
1406 Parser_QueryFilterInfo,
1407 Parser_JoinFilterGraph,
1408 Parser_QueryVendorInfo
1411 HRESULT AVISplitter_create(IUnknown * pUnkOuter, LPVOID * ppv)
1414 AVISplitterImpl * This;
1416 TRACE("(%p, %p)\n", pUnkOuter, ppv);
1421 return CLASS_E_NOAGGREGATION;
1423 /* Note: This memory is managed by the transform filter once created */
1424 This = CoTaskMemAlloc(sizeof(AVISplitterImpl));
1426 This->streams = NULL;
1427 This->oldindex = NULL;
1429 hr = Parser_Create(&(This->Parser), &AVISplitterImpl_Vtbl, &CLSID_AviSplitter, AVISplitter_Sample, AVISplitter_QueryAccept, AVISplitter_InputPin_PreConnect, AVISplitter_Flush, AVISplitter_Disconnect, AVISplitter_first_request, AVISplitter_done_process, NULL, AVISplitter_seek, NULL);