First crack at `terminal-modes' in SSH. PuTTY now sends ERASE by default,
[u/mdw/putty] / macosx / osxmain.m
1 /*
2 * osxmain.m: main-program file of Mac OS X PuTTY.
3 */
4
5 #import <Cocoa/Cocoa.h>
6
7 #define PUTTY_DO_GLOBALS /* actually _define_ globals */
8
9 #include "putty.h"
10 #include "osxclass.h"
11
12 /* ----------------------------------------------------------------------
13 * Global variables.
14 */
15
16 AppController *controller;
17
18 /* ----------------------------------------------------------------------
19 * Miscellaneous elements of the interface to the cross-platform
20 * and Unix PuTTY code.
21 */
22
23 const char platform_x11_best_transport[] = "unix";
24
25 char *platform_get_x_display(void) {
26 return NULL;
27 }
28
29 FontSpec platform_default_fontspec(const char *name)
30 {
31 FontSpec ret;
32 /* FIXME */
33 return ret;
34 }
35
36 Filename platform_default_filename(const char *name)
37 {
38 Filename ret;
39 if (!strcmp(name, "LogFileName"))
40 strcpy(ret.path, "putty.log");
41 else
42 *ret.path = '\0';
43 return ret;
44 }
45
46 char *platform_default_s(const char *name)
47 {
48 return NULL;
49 }
50
51 int platform_default_i(const char *name, int def)
52 {
53 if (!strcmp(name, "CloseOnExit"))
54 return 2; /* maps to FORCE_ON after painful rearrangement :-( */
55 return def;
56 }
57
58 char *x_get_default(const char *key)
59 {
60 return NULL; /* this is a stub */
61 }
62
63 static void commonfatalbox(char *p, va_list ap)
64 {
65 char errorbuf[2048];
66 NSAlert *alert;
67
68 /*
69 * We may have come here because we ran out of memory, in which
70 * case it's entirely likely that that further memory
71 * allocations will fail. So (a) we use vsnprintf to format the
72 * error message rather than the usual dupvprintf; and (b) we
73 * have a fallback way to get the message out via stderr if
74 * even creating an NSAlert fails.
75 */
76 vsnprintf(errorbuf, lenof(errorbuf), p, ap);
77
78 alert = [NSAlert alloc];
79 if (!alert) {
80 fprintf(stderr, "fatal error (and NSAlert failed): %s\n", errorbuf);
81 } else {
82 alert = [[alert init] autorelease];
83 [alert addButtonWithTitle:@"Terminate"];
84 [alert setInformativeText:[NSString stringWithCString:errorbuf]];
85 [alert runModal];
86 }
87 exit(1);
88 }
89
90 void fatalbox(char *p, ...)
91 {
92 va_list ap;
93 va_start(ap, p);
94 commonfatalbox(p, ap);
95 va_end(ap);
96 }
97
98 void modalfatalbox(char *p, ...)
99 {
100 va_list ap;
101 va_start(ap, p);
102 commonfatalbox(p, ap);
103 va_end(ap);
104 }
105
106 void cmdline_error(char *p, ...)
107 {
108 va_list ap;
109 fprintf(stderr, "%s: ", appname);
110 va_start(ap, p);
111 vfprintf(stderr, p, ap);
112 va_end(ap);
113 fputc('\n', stderr);
114 exit(1);
115 }
116
117 /*
118 * Clean up and exit.
119 */
120 void cleanup_exit(int code)
121 {
122 /*
123 * Clean up.
124 */
125 sk_cleanup();
126 random_save_seed();
127 exit(code);
128 }
129
130 /* ----------------------------------------------------------------------
131 * Tiny extension to NSMenuItem which carries a payload of a `void
132 * *', allowing several menu items to invoke the same message but
133 * pass different data through it.
134 */
135 @interface DataMenuItem : NSMenuItem
136 {
137 void *payload;
138 }
139 - (void)setPayload:(void *)d;
140 - (void *)getPayload;
141 @end
142 @implementation DataMenuItem
143 - (void)setPayload:(void *)d
144 {
145 payload = d;
146 }
147 - (void *)getPayload
148 {
149 return payload;
150 }
151 @end
152
153 /* ----------------------------------------------------------------------
154 * Utility routines for constructing OS X menus.
155 */
156
157 NSMenu *newmenu(const char *title)
158 {
159 return [[[NSMenu allocWithZone:[NSMenu menuZone]]
160 initWithTitle:[NSString stringWithCString:title]]
161 autorelease];
162 }
163
164 NSMenu *newsubmenu(NSMenu *parent, const char *title)
165 {
166 NSMenuItem *item;
167 NSMenu *child;
168
169 item = [[[NSMenuItem allocWithZone:[NSMenu menuZone]]
170 initWithTitle:[NSString stringWithCString:title]
171 action:NULL
172 keyEquivalent:@""]
173 autorelease];
174 child = newmenu(title);
175 [item setEnabled:YES];
176 [item setSubmenu:child];
177 [parent addItem:item];
178 return child;
179 }
180
181 id initnewitem(NSMenuItem *item, NSMenu *parent, const char *title,
182 const char *key, id target, SEL action)
183 {
184 unsigned mask = NSCommandKeyMask;
185
186 if (key[strcspn(key, "-")]) {
187 while (*key && *key != '-') {
188 int c = tolower((unsigned char)*key);
189 if (c == 's') {
190 mask |= NSShiftKeyMask;
191 } else if (c == 'o' || c == 'a') {
192 mask |= NSAlternateKeyMask;
193 }
194 key++;
195 }
196 if (*key)
197 key++;
198 }
199
200 item = [[item initWithTitle:[NSString stringWithCString:title]
201 action:NULL
202 keyEquivalent:[NSString stringWithCString:key]]
203 autorelease];
204
205 if (*key)
206 [item setKeyEquivalentModifierMask: mask];
207
208 [item setEnabled:YES];
209 [item setTarget:target];
210 [item setAction:action];
211
212 [parent addItem:item];
213
214 return item;
215 }
216
217 NSMenuItem *newitem(NSMenu *parent, char *title, char *key,
218 id target, SEL action)
219 {
220 return initnewitem([NSMenuItem allocWithZone:[NSMenu menuZone]],
221 parent, title, key, target, action);
222 }
223
224 /* ----------------------------------------------------------------------
225 * AppController: the object which receives the messages from all
226 * menu selections that aren't standard OS X functions.
227 */
228 @implementation AppController
229
230 - (id)init
231 {
232 self = [super init];
233 timer = NULL;
234 return self;
235 }
236
237 - (void)newTerminal:(id)sender
238 {
239 id win;
240 Config cfg;
241
242 do_defaults(NULL, &cfg);
243
244 cfg.protocol = -1; /* PROT_TERMINAL */
245
246 win = [[SessionWindow alloc] initWithConfig:cfg];
247 [win makeKeyAndOrderFront:self];
248 }
249
250 - (void)newSessionConfig:(id)sender
251 {
252 id win;
253 Config cfg;
254
255 do_defaults(NULL, &cfg);
256
257 win = [[ConfigWindow alloc] initWithConfig:cfg];
258 [win makeKeyAndOrderFront:self];
259 }
260
261 - (void)newSessionWithConfig:(id)vdata
262 {
263 id win;
264 Config cfg;
265 NSData *data = (NSData *)vdata;
266
267 assert([data length] == sizeof(cfg));
268 [data getBytes:&cfg];
269
270 win = [[SessionWindow alloc] initWithConfig:cfg];
271 [win makeKeyAndOrderFront:self];
272 }
273
274 - (NSMenu *)applicationDockMenu:(NSApplication *)sender
275 {
276 NSMenu *menu = newmenu("Dock Menu");
277 /*
278 * FIXME: Add some useful things to this, probably including
279 * the saved session list.
280 */
281 return menu;
282 }
283
284 - (void)timerFired:(id)sender
285 {
286 long now, next;
287
288 assert(sender == timer);
289
290 /* `sender' is the timer itself, so its userInfo is an NSNumber. */
291 now = [(NSNumber *)[sender userInfo] longValue];
292
293 [sender invalidate];
294
295 timer = NULL;
296
297 if (run_timers(now, &next))
298 [self setTimer:next];
299 }
300
301 - (void)setTimer:(long)next
302 {
303 long interval = next - GETTICKCOUNT();
304 float finterval;
305
306 if (interval <= 0)
307 interval = 1; /* just in case */
308
309 finterval = interval / (float)TICKSPERSEC;
310
311 if (timer) {
312 [timer invalidate];
313 }
314
315 timer = [NSTimer scheduledTimerWithTimeInterval:finterval
316 target:self selector:@selector(timerFired:)
317 userInfo:[NSNumber numberWithLong:next] repeats:NO];
318 }
319
320 @end
321
322 void timer_change_notify(long next)
323 {
324 [controller setTimer:next];
325 }
326
327 /* ----------------------------------------------------------------------
328 * Annoyingly, it looks as if I have to actually subclass
329 * NSApplication if I want to catch NSApplicationDefined events. So
330 * here goes.
331 */
332 @interface MyApplication : NSApplication
333 {
334 }
335 @end
336 @implementation MyApplication
337 - (void)sendEvent:(NSEvent *)ev
338 {
339 if ([ev type] == NSApplicationDefined)
340 osxsel_process_results();
341
342 [super sendEvent:ev];
343 }
344 @end
345
346 /* ----------------------------------------------------------------------
347 * Main program. Constructs the menus and runs the application.
348 */
349 int main(int argc, char **argv)
350 {
351 NSAutoreleasePool *pool;
352 NSMenu *menu;
353 NSMenuItem *item;
354 NSImage *icon;
355
356 pool = [[NSAutoreleasePool alloc] init];
357
358 icon = [NSImage imageNamed:@"NSApplicationIcon"];
359 [MyApplication sharedApplication];
360 [NSApp setApplicationIconImage:icon];
361
362 controller = [[[AppController alloc] init] autorelease];
363 [NSApp setDelegate:controller];
364
365 [NSApp setMainMenu: newmenu("Main Menu")];
366
367 menu = newsubmenu([NSApp mainMenu], "Apple Menu");
368 [NSApp setServicesMenu:newsubmenu(menu, "Services")];
369 [menu addItem:[NSMenuItem separatorItem]];
370 item = newitem(menu, "Hide PuTTY", "h", NSApp, @selector(hide:));
371 item = newitem(menu, "Hide Others", "o-h", NSApp, @selector(hideOtherApplications:));
372 item = newitem(menu, "Show All", "", NSApp, @selector(unhideAllApplications:));
373 [menu addItem:[NSMenuItem separatorItem]];
374 item = newitem(menu, "Quit", "q", NSApp, @selector(terminate:));
375 [NSApp setAppleMenu: menu];
376
377 menu = newsubmenu([NSApp mainMenu], "File");
378 item = newitem(menu, "New", "n", NULL, @selector(newSessionConfig:));
379 item = newitem(menu, "New Terminal", "t", NULL, @selector(newTerminal:));
380 item = newitem(menu, "Close", "w", NULL, @selector(performClose:));
381
382 menu = newsubmenu([NSApp mainMenu], "Window");
383 [NSApp setWindowsMenu: menu];
384 item = newitem(menu, "Minimise Window", "m", NULL, @selector(performMiniaturize:));
385
386 // menu = newsubmenu([NSApp mainMenu], "Help");
387 // item = newitem(menu, "PuTTY Help", "?", NSApp, @selector(showHelp:));
388
389 /*
390 * Start up the sub-thread doing select().
391 */
392 osxsel_init();
393
394 /*
395 * Start up networking.
396 */
397 sk_init();
398
399 /*
400 * FIXME: To make initial debugging more convenient I'm going
401 * to start by opening a session window unconditionally. This
402 * will probably change later on.
403 */
404 [controller newSessionConfig:nil];
405
406 [NSApp run];
407 [pool release];
408
409 return 0;
410 }