Mailing Lists: Apple Mailing Lists
Image of Mac OS face in stamp
 
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Problem writing a movie from PNG files

Hi All,

Please see code at end of this message. I am trying to create a movie frame by frame. I basically get called with a PNG image file in memory, I have to render the image and write it to the movie file as one frame.

I use the following 3 functions (listed below):

LTWQTUtilsCreateMovie
LTWQTUtilsAddFrameToMovie
LTWQTUtilsCloseMovie

When it's finished there is a 5.3 MB imovie file created, I can open in QuickTime Movie Player but it says the movie has a duration of 0 and doesn't play anything. When the movie opens, the area for the frame is not displayed, only the lower controls part of the window is displayed (like if you just play an audio file).

I'm not sure if I should be using the GWorld functions anymore and not sure if this is why it's not working. Is there a better way of doing this?

Any advice and help greatly appreciated.

All the Best
Dave

/ ************************************************************************ **********************
//**
//** LTWQTUtilsCreateMovie
//**
// ************************************************************************ **********************
OSStatus LTWQTUtilsCreateMovie( char* theFilePathStringPtr,
LTWQTParameterInfoPtr theParameterInfoPtr)
{
OSStatus myOSStatus;
CFStringRef myFilePathStringCFString;
Handle myFileDataRef;
OSType myDataRefType;

//**
//**	Initialize Storage
//**

//**
//** Convert the File Path to a CFString
//**
myFilePathStringCFString = CFStringCreateWithCString (kCFAllocatorDefault,theFilePathStringPtr,kCFStringEncodingMacRoman);
if (myFilePathStringCFString == NULL)
return(kRunRevBadFileNameString);

//**
//** Make a Data Reference from a POSIX File Path String
//**
myOSStatus = QTNewDataReferenceFromFullPathCFString (myFilePathStringCFString,kQTPOSIXPathStyle, 0,&myFileDataRef,&myDataRefType);
if (myOSStatus != noErr)
goto LTWQTUtilsCreateMovie_999;

//**
//** Create the Movie Storage
//**
myOSStatus = CreateMovieStorage (myFileDataRef,myDataRefType,'TVOD',smCurrentScript,createMovieFileDelet eCurFile,&theParameterInfoPtr->QTDataHandler,&theParameterInfoPtr- >QTMovieRef);
if (myOSStatus != noErr)
goto LTWQTUtilsCreateMovie_999;

//**
//** Add the Movie to the Storage
//**
myOSStatus = AddMovieToStorage(theParameterInfoPtr- >QTMovieRef,theParameterInfoPtr->QTDataHandler);
if (myOSStatus != noErr)
goto LTWQTUtilsCreateMovie_999;

//**
//** Create a New Movie Track
//**
theParameterInfoPtr->QTTrackRef = NewMovieTrack(theParameterInfoPtr- >QTMovieRef,
FixRatio(theParameterInfoPtr->QTFrameWidth,1),
FixRatio(theParameterInfoPtr->QTFrameHeight,1),
kNoVolume);
myOSStatus = GetMoviesError();
if (myOSStatus != noErr)
return(myOSStatus);

//**
//** Create Media for Track
//**
theParameterInfoPtr->QTMediaRef = NewTrackMedia(theParameterInfoPtr- >QTTrackRef,VideoMediaType,600,NULL,0);
myOSStatus = GetMoviesError();
if (myOSStatus != noErr)
return(myOSStatus);

//**
//**	Begin Media Edits
//**
myOSStatus = BeginMediaEdits(theParameterInfoPtr->QTMediaRef);
if (myOSStatus != noErr)
	return(myOSStatus);

//**
//**	Clean up and Return
//**
LTWQTUtilsCreateMovie_999:

if (myFilePathStringCFString != NULL)
	CFRelease(myFilePathStringCFString);

if (myOSStatus != noErr)
	{
	if (theParameterInfoPtr->QTMovieRef != NULL)
		{
		DisposeMovie(theParameterInfoPtr->QTMovieRef);
		theParameterInfoPtr->QTMovieRef = NULL;
		}
	}
	
return(myOSStatus);
}




// ************************************************************************ **********************
//**
//** LTWQTUtilsCloseMovie
//**
// ************************************************************************ **********************
OSStatus LTWQTUtilsCloseMovie(LTWQTParameterInfoPtr theParameterInfoPtr)
{
OSStatus myOSStatus;
TimeValue myMovieDuration;

//**
//**	Initialize Storage
//**

//**
//**	End Media Edits
//**
myOSStatus = EndMediaEdits(theParameterInfoPtr->QTMediaRef);
if (myOSStatus != noErr)
	goto LTWQTUtilsCloseMovie_999;

//**
//** Insert the Media into the Movie Track
//**
myMovieDuration = GetMediaDuration(theParameterInfoPtr->QTMediaRef);
myOSStatus = InsertMediaIntoTrack(theParameterInfoPtr->QTTrackRef, 0,0,myMovieDuration,fixed1);
if (myOSStatus != noErr)
goto LTWQTUtilsCloseMovie_999;

//**
//**	Close the Movie Storage
//**
myOSStatus = CloseMovieStorage(theParameterInfoPtr->QTDataHandler);
if (myOSStatus != noErr)
	goto LTWQTUtilsCloseMovie_999;

//**
//**	Clean up and Return
//**
LTWQTUtilsCloseMovie_999:
if (theParameterInfoPtr->QTMovieRef != NULL)
	{
	DisposeMovie(theParameterInfoPtr->QTMovieRef);
	theParameterInfoPtr->QTMovieRef = NULL;
	}
	
return(myOSStatus);
}

// ************************************************************************ **********************
//**
//** LTWQTUtilsRenderFrame
//**
// ************************************************************************ **********************
static OSStatus LTWQTUtilsRenderFrame( UInt32 theTrackWidth,
UInt32 theTrackHeight,
GWorldPtr theGWorld,
const char* theImageDataPtr,
UInt32 theImageDataSize)
{
ComponentResult myErr;
Rect myRect;
PointerDataRefRecord myPointerDataRefRecord;
Handle myDataRefHandle;
GraphicsImportComponent myImporter;

//**
//**	Initialize
//**
myDataRefHandle = NULL;
myImporter = NULL;


myPointerDataRefRecord.data = theImageDataPtr;
myPointerDataRefRecord.dataLength = theImageDataSize;
myErr = PtrToHand(&myPointerDataRefRecord,&myDataRefHandle,sizeof (myPointerDataRefRecord));

MacSetRect(&myRect,0,0,theTrackWidth,theTrackHeight);
myErr = OpenADefaultComponent (GraphicsImporterComponentType,kQTFileTypePNG,&myImporter);
if (myErr != noErr)
goto LTWQTUtilsRenderFrame_999;

//**
//** Configure the Graphics Importer
//**
myErr = GraphicsImportSetGWorld(myImporter,theGWorld,NULL);
if (myErr != noErr)
goto LTWQTUtilsRenderFrame_999;

myErr = GraphicsImportSetDataReference (myImporter,myDataRefHandle,PointerDataHandlerSubType);
if (myErr != noErr)
goto LTWQTUtilsRenderFrame_999;

myErr = GraphicsImportSetBoundsRect(myImporter,&myRect);
if (myErr != noErr)
goto LTWQTUtilsRenderFrame_999;

//**
//** Draw the Image into the GWorld
//**
myErr = GraphicsImportDraw(myImporter);
if (myErr != noErr)
goto LTWQTUtilsRenderFrame_999;

//**
//** Clean Up and Return
//**
LTWQTUtilsRenderFrame_999:

if (myImporter != NULL)
CloseComponent(myImporter);

return(myErr);
}



// ************************************************************************ **********************
//**
//** LTWQTUtilsAddFrameToMovie
//**
// ************************************************************************ **********************
OSStatus LTWQTUtilsAddFrameToMovie( LTWQTParameterInfoPtr theParameterInfoPtr,
const char* theImageBufferPtr,
UInt32 theImageBufferSize)
{
OSStatus myOSStatus;
GWorldPtr myGWorld = NULL;
PixMapHandle myPixMap = NULL;
CodecType myCodecType = kJPEGCodecType;
long myMaxComprSize = 0L;
Handle myComprDataHdl = NULL;
Ptr myComprDataPtr = NULL;
ImageDescriptionHandle myImageDesc = NULL;
CGrafPtr mySavedPort = NULL;
GDHandle mySavedDevice = NULL;
Rect myRect;
CodecQ myCodecQuality;

myCodecType = kJPEGCodecType;
myCodecQuality = codecNormalQuality;


myCodecType = kVideoCodecType;
myCodecQuality = codecLosslessQuality;

MacSetRect(&myRect,0,0,theParameterInfoPtr- >QTFrameWidth,theParameterInfoPtr->QTFrameHeight);
myOSStatus = NewGWorld(&myGWorld,32,&myRect,NULL,NULL,(GWorldFlags) 0);
if (myOSStatus != noErr)
goto LTWQTUtilsAddFrameToMovie_999;

myPixMap = GetGWorldPixMap(myGWorld);
if (myPixMap == NULL)
	goto LTWQTUtilsAddFrameToMovie_999;

LockPixels(myPixMap);
myOSStatus = GetMaxCompressionSize(	myPixMap,
									&myRect,
									0,							// let ICM choose depth
									codecNormalQuality,
									myCodecType,
									(CompressorComponent) anyCodec,
									&myMaxComprSize);
if (myOSStatus != noErr)
	goto LTWQTUtilsAddFrameToMovie_999;

myComprDataHdl = NewHandle(myMaxComprSize);
if (myComprDataHdl == NULL)
	goto LTWQTUtilsAddFrameToMovie_999;

HLockHi(myComprDataHdl);
myComprDataPtr = *myComprDataHdl;

myImageDesc = (ImageDescriptionHandle) NewHandle(4);
if (myImageDesc == NULL)
	goto LTWQTUtilsAddFrameToMovie_999;

GetGWorld(&mySavedPort,&mySavedDevice);
SetGWorld(myGWorld,NULL);
EraseRect(&myRect);

//**
//** Render the Image
//**
myOSStatus = LTWQTUtilsRenderFrame(theParameterInfoPtr- >QTFrameWidth,theParameterInfoPtr- >QTFrameHeight,myGWorld,theImageBufferPtr,theImageBufferSize);
if (myOSStatus != noErr)
goto LTWQTUtilsAddFrameToMovie_999;

//**
//**	Compress the Image
//**
myOSStatus = CompressImage(	myPixMap,
							&myRect,
							myCodecQuality,
							myCodecType,
							myImageDesc,
							myComprDataPtr);
if (myOSStatus != noErr)
	goto LTWQTUtilsAddFrameToMovie_999;

//**
//**	Add the Image to the Movie
//**
myOSStatus = AddMediaSample(theParameterInfoPtr->QTMediaRef,
							myComprDataHdl,
							0,													// no offset in data
							(**myImageDesc).dataSize,
							kVideoFrameDuration,								// frame duration
							(SampleDescriptionHandle) myImageDesc,
							1,													// one sample
							0,													// self-contained samples
							NULL);
if (myOSStatus != noErr)
	goto LTWQTUtilsAddFrameToMovie_999;


//**
//**	Clean up and Return
//**
LTWQTUtilsAddFrameToMovie_999:
SetGWorld(mySavedPort,mySavedDevice);

if (myImageDesc != NULL)
	DisposeHandle((Handle)myImageDesc);

if (myComprDataHdl != NULL)
	DisposeHandle(myComprDataHdl);

if (myGWorld != NULL)
	DisposeGWorld(myGWorld);

return(myOSStatus);
}




_______________________________________________
Do not post admin requests to the list. They will be ignored.
QuickTime-API mailing list      (email@hidden)
Help/Unsubscribe/Update your Subscription:
http://lists.apple.com/mailman/options/quicktime-api/email@hidden

This email sent to email@hidden


Visit the Apple Store online or at retail locations.
1-800-MY-APPLE

Contact Apple | Terms of Use | Privacy Policy

Copyright © 2007 Apple Inc. All rights reserved.