Convert a video to DV Stream in CLI with QTKit

qt2dv

// compile with:
// $ gcc -o qt2dv -framework Foundation -framework QTKit qt2dv.m

#import <QTKit/QTKit.h>

int main (int argc, char *argv[])
{
   NSAutoreleasePool *pool = [[NSAutoreleasePool alloc] init];

   NSUserDefaults *args = [NSUserDefaults standardUserDefaults];
   
   QTMovie *movie = [QTMovie movieWithFile:[args stringForKey:@"i"] error:nil];
   NSDictionary *dictionary = [NSDictionary dictionaryWithObjectsAndKeys:
         [NSNumber numberWithBool:YES], QTMovieExport, 
         [NSNumber numberWithLong:kQTFileTypeDVC], 
         QTMovieExportType, nil];

   [movie writeToFile:[args stringForKey:@"o"] withAttributes:dictionary];

   [pool release];
	
   exit(1);
}