//
//  iphoneViewController.m
//  iphone
//
//  Created by Barry Smith on 5/12/10.
//  Copyright __MyCompanyName__ 2010. All rights reserved.
//

#import "iphoneViewController.h"
#include "PETSc/petsc.h"

@implementation iphoneViewController
@synthesize textField;
@synthesize textView;
@synthesize outPut;


/*
// The designated initializer. Override to perform setup that is required before the view is loaded.
- (id)initWithNibName:(NSString *)nibNameOrNil bundle:(NSBundle *)nibBundleOrNil {
    if ((self = [super initWithNibName:nibNameOrNil bundle:nibBundleOrNil])) {
        // Custom initialization
    }
    return self;
}
*/

/*
// Implement loadView to create a view hierarchy programmatically, without using a nib.
- (void)loadView {
}
*/


/*
// Implement viewDidLoad to do additional setup after loading the view, typically from a nib.
- (void)viewDidLoad {
    [super viewDidLoad];
}
*/


/*
// Override to allow orientations other than the default portrait orientation.
- (BOOL)shouldAutorotateToInterfaceOrientation:(UIInterfaceOrientation)interfaceOrientation {
    // Return YES for supported orientations
    return (interfaceOrientation == UIInterfaceOrientationPortrait);
}
*/

- (void)didReceiveMemoryWarning {
	// Releases the view if it doesn't have a superview.
    [super didReceiveMemoryWarning];
	
	// Release any cached data, images, etc that aren't in use.
}

- (void)viewDidUnload {
	// Release any retained subviews of the main view.
	// e.g. self.myOutlet = nil;
}


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

UITextView *globalTextView;

/*
   This is called by PETSc for all print calls.

   Simply addeds to the NSString in globalTextView and it gets displayed in the UITextView in the display
*/
PetscErrorCode PetscVFPrintfiPhone(FILE *fd,const char *format,va_list Argp)
{
  size_t len;
  char   str[1024];
  
  PetscVSNPrintf(str,1024,format,&len,Argp);
  globalTextView.text = [NSString stringWithFormat:@"%@%s", globalTextView.text,str];
  return 0;
}

#define main ex19
#define help help19
#define Field Field19
#define PETSC_APPLE_FRAMEWORK
#include "../../../../../../src/snes/tutorials/ex19.c"
#undef main 
#undef help
#undef Field
#define main ex48
#define help help48
#define Field Field48
#include "../../../../../../src/snes/tutorials/ex48.c"

/*
    This is called each time one hits return in the TextField.

    Converts the string to a collection of arguments that are then passed on to PETSc
*/
- (BOOL) textFieldShouldReturn: (UITextField*) theTextField {
  [theTextField resignFirstResponder]; /* makes the keyboard disappear */
  textView.text = @"";   /* clears the UITextView */
  globalTextView = textView;   /* we make this class member a global so can use in PetscVFPrintfiPhone() */
  textView.font = [UIFont fontWithName:@"Courier" size:8.0]; /* make the font size in the UITextView a more reasonable size  and use fixed width*/
 
  const char *str = [textField.text UTF8String];
  char **args;
  int argc;
  PetscBool flg1,flg2;
  
  PetscErrorCode ierr = PetscStrToArray(str,' ',&argc,&args);
  ierr = PetscStrncmp(str, "./ex19", 6, &flg1);
  ierr = PetscStrncmp(str, "./ex48", 6, &flg2);
  if (flg1) {
    ex19(argc,args);
  } else if (flg2) {
    ex48(argc,args);
  } else {
    textView.text =@"Must start with ./ex19 or ./ex48";
    ierr = PetscStrToArrayDestroy(argc,args);
    return YES;
  }
  ierr = PetscStrToArrayDestroy(argc,args);
  return YES;
}

@end