apps-gorm/Tools/gormtool/AppDelegate.m

/* AppDelegate.m
 *
 * Copyright (C) 2023 Free Software Foundation, Inc.
 *
 * Author:	Gregory John Casamento <greg.casamento@gmail.com>
 * Date:	2023
 *
 * This file is part of GNUstep.
 *
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation; either version 3 of the License, or
 * (at your option) any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program; if not, write to the Free Software
 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02111
 * USA.
 */

#import "ArgPair.h"
#import "GormToolPrivate.h"
#import "AppDelegate.h"

// AppDelegate...
@implementation AppDelegate

- (BOOL) isInTool
{
  return YES;
}

- (NSDictionary *) parseArguments
{
  GormDocumentController *dc = [GormDocumentController sharedDocumentController];
  NSMutableDictionary *result = [NSMutableDictionary dictionary];
  NSProcessInfo *pi = [NSProcessInfo processInfo];
  NSMutableArray *args = [NSMutableArray arrayWithArray: [pi arguments]];
  [args removeObject: [args lastObject]];
  
  NSEnumerator *en = [args objectEnumerator];
  id obj = nil;
  BOOL parse_val = NO;
  ArgPair *pair = nil; // [[ArgPair alloc] init];
  
  while ((obj = [en nextObject]) != nil)
    {
      if (parse_val)
	{
	  [pair setValue: obj];
	  [result setObject: pair forKey: [pair argument]];
	  parse_val = NO;
	  continue;
	}
      else
	{
	  pair = [[ArgPair alloc] init];
	  if ([dc typeFromFileExtension: [obj pathExtension]] != nil)
	    {
	      [pair setArgument: @"--read"];
	      [pair setValue: obj];
	      [result setObject: pair forKey: @"--read"];
	    }
	  else if ([obj isEqualToString: @"--write"])
	    {
	      [pair setArgument: obj];
	      parse_val = YES;
	    }
	  else if ([obj isEqualToString: @"--export-strings-file"])
	    {
	      [pair setArgument: obj];
	      parse_val = YES;
	    }
	  else if ([obj isEqualToString: @"--import-strings-file"])
	    {
	      [pair setArgument: obj];
	      parse_val = YES;
	    }
	  else if ([obj isEqualToString: @"--export-class"])
	    {
	      [pair setArgument: obj];
	      parse_val = YES;
	    }
	  else if ([obj isEqualToString: @"--import-class"])
	    {
	      [pair setArgument: obj];
	      parse_val = YES;
	    }
	}
    }

  return result;
}

- (void) process
{
  NSProcessInfo *pi = [NSProcessInfo processInfo];
  
  [NSClassSwapper setIsInInterfaceBuilder: YES];

  if ([[pi arguments] count] > 1)
    {
      NSString *file = [[pi arguments] lastObject];
      GormDocumentController *dc = [GormDocumentController sharedDocumentController];
      GormDocument *doc = nil;
      NSDictionary *args = [self parseArguments];
      ArgPair *opt = nil;
      
      NSDebugLog(@"args = %@", args);
      NSDebugLog(@"file = %@", file);
      doc = [dc openDocumentWithContentsOfFile: file display: NO];
      NSDebugLog(@"Document = %@", doc);

      // Get the file to write out to...
      NSString *outputFile = file;

      opt = [args objectForKey: @"--write"];
      if (opt != nil)
	{
	  outputFile = [opt value];
	}

      // Get other options...
      opt = [args objectForKey: @"--export-strings-file"];
      if (opt != nil)
	{
	  NSString *stringsFile = [opt value];

	  [doc exportStringsToFile: stringsFile];
	}
      else
	{
	  opt = [args objectForKey: @"--import-strings-file"];
	  if (opt != nil)
	    {
	      NSString *stringsFile = [opt value];
	      BOOL saved = NO;
	      NSURL *file = [NSURL fileURLWithPath: outputFile isDirectory: YES];
	      NSString *type = [dc typeFromFileExtension: [outputFile pathExtension]];
	      NSError *error = nil;
	      
	      [doc importStringsFromFile: stringsFile];
	      saved = [doc saveToURL: file
			      ofType: type
			   forSaveOperation: NSSaveOperation
			       error: &error];
	      if (!saved)
		{
		  NSLog(@"Document %@ of type %@ was not saved", file, type);
		}

	      if (error != nil)
		{
		  NSLog(@"Error = %@", error);
		}
	    }
	  else
	    {
	      opt = [args objectForKey: @"--export-class"];
	      if (opt != nil)
		{
		  NSString *className = [opt value];
		  BOOL saved = NO;
		  GormClassManager *cm = [doc classManager];

		  saved = [cm makeSourceAndHeaderFilesForClass: className
						      withName: [className stringByAppendingPathExtension: @"m"]
							   and: [className stringByAppendingPathExtension: @"h"]];

		  if (saved == NO)
		    {
		      NSLog(@"Class named %@ not saved", className);
		    }
		}
	      else
		{
		  opt = [args objectForKey: @"--import-class"];
		  if (opt != nil)
		    {
		      NSString *classFile = [opt value];
		      BOOL saved = NO;
		      NSURL *file = [NSURL fileURLWithPath: outputFile isDirectory: YES];
		      NSString *type = [dc typeFromFileExtension: [outputFile pathExtension]];
		      NSError *error = nil;
		      GormClassManager *cm = [doc classManager];

		      [cm parseHeader: classFile];
		      saved = [doc saveToURL: file
				      ofType: type
				   forSaveOperation: NSSaveOperation
				       error: &error];
		      if (!saved)
			{
			  NSLog(@"Document %@ of type %@ was not saved", file, type);
			}
		      
		      if (error != nil)
			{
			  NSLog(@"Error = %@", error);
			}		      
		    }
		}
	    }
	}
    }
  
  [NSClassSwapper setIsInInterfaceBuilder: NO];
}

- (void) applicationDidFinishLaunching: (NSNotification *)n
{
  puts("== gormtool");
  
  NSDebugLog(@"processInfo: %@", [NSProcessInfo processInfo]);
  [self process];
 
  [NSApp terminate: nil];
}

- (void) applicationWillTerminate: (NSNotification *)n
{
  puts("== finished...");
}

@end