IFNewProjectFile.m

//
//  IFNewProjectFile.m
//  Inform
//
//  Created by Andrew Hunter on Tue Jun 01 2004.
//  Copyright (c) 2004 Andrew Hunter. All rights reserved.
//

#import "IFNewProjectFile.h"
#import "IFProject.h"
#import "IFCompilerSettings.h"

enum {
	inform6FileTag = 0,
	niFileTag = 1,
	textFileTag = 2,
	richTextFileTag = 3
};

@implementation IFNewProjectFile

- (id) initWithProjectController: (IFProjectController*) control {
	self = [super initWithWindowNibName: @"NewFile"];
	
	if (self) {
		projectController = control;
		newFilename = nil;
	}
	
	return self;
}

- (void) dealloc {
	if (newFilename) [newFilename release];
	[super dealloc];
}

// = Actions =
- (NSString*) getNewFilename {
	if ([[[projectController document] settings] usingNaturalInform]) {
		// Default is to create a 'ni' file
		[fileType selectItem: [[fileType menu] itemWithTag: niFileTag]];
	} else {
		// Default is to create a '.h' file
		// '.h' files are '.i6' files when natural inform is being used
		[fileType selectItem: [[fileType menu] itemWithTag: inform6FileTag]];
	}
	
	// Set the new filename to nothing
	if (newFilename) [newFilename release];
	newFilename = nil;
	
	// Run the sheet
	[NSApp beginSheet: [self window]
	   modalForWindow: [projectController window]
		modalDelegate: nil
	   didEndSelector: nil
		  contextInfo: nil];
	[NSApp runModalForWindow: [self window]];
	[NSApp endSheet: [self window]];
	[[self window] orderOut: self];
	
	return newFilename;
}

- (IBAction) cancel: (id) sender {
	// Am assuming we're a sheet. Which we should always be
	[NSApp stopModal];
}

- (IBAction) addFile: (id) sender {
	// Am assuming we're a sheet. Which we should always be
	[NSApp stopModal];

	// Work out the extension to use
	NSString* extension = nil;
	
	switch ([[fileType selectedItem] tag]) {
		case inform6FileTag:
			if ([[[projectController document] settings] usingNaturalInform]) {
				// With Natural Inform, the extension is '.i6'
				extension = @"i6";
			} else {
				// With standard Inform 6, the extension is '.h'
				extension = @"h";
			}
			break;
		case niFileTag:
			if ([[projectController document] editingExtension])
				extension = nil;
			else
				extension = @"ni";
			break;
		case textFileTag:
			extension = @"txt";
			break;
		case richTextFileTag:
			extension = @"rtf";
			break;
	}
	
	// ... now the whole filename
	NSString* file = [[fileName stringValue] lastPathComponent];
	if (extension && file && [file length] > 0) {
		newFilename = [[file stringByAppendingPathExtension: extension] retain];
	} else if (file && [file length] > 0) {
		newFilename = [file copy];
	}
}

@end