mirror of
https://git.tartarus.org/simon/putty.git
synced 2025-01-10 09:58:01 +00:00
278 lines
7.2 KiB
C
278 lines
7.2 KiB
C
/*
|
|
* macterm.c -- Macintosh terminal front-end
|
|
*/
|
|
|
|
#include <MacTypes.h>
|
|
#include <Fonts.h>
|
|
#include <Gestalt.h>
|
|
#include <MacWindows.h>
|
|
#include <Palettes.h>
|
|
#include <Quickdraw.h>
|
|
#include <QuickdrawText.h>
|
|
#include <Sound.h>
|
|
|
|
#include <stdlib.h>
|
|
|
|
#include "macresid.h"
|
|
#include "putty.h"
|
|
#include "mac.h"
|
|
|
|
struct mac_session {
|
|
short fontnum;
|
|
int font_ascent;
|
|
WindowPtr window;
|
|
PaletteHandle palette;
|
|
};
|
|
|
|
static void mac_initfont(struct mac_session *);
|
|
static void mac_initpalette(struct mac_session *);
|
|
|
|
/* Temporary hack till I get the terminal emulator supporting multiple sessions */
|
|
|
|
static struct mac_session *onlysession;
|
|
|
|
static void inbuf_putc(int c) {
|
|
inbuf[inbuf_head] = c;
|
|
inbuf_head = (inbuf_head+1) & INBUF_MASK;
|
|
}
|
|
|
|
static void inbuf_putstr(const char *c) {
|
|
while (*c)
|
|
inbuf_putc(*c++);
|
|
}
|
|
|
|
void mac_newsession(void) {
|
|
struct mac_session *s;
|
|
int i;
|
|
|
|
/* This should obviously be initialised by other means */
|
|
s = smalloc(sizeof(*s));
|
|
cfg.bksp_is_delete = TRUE;
|
|
cfg.rxvt_homeend = FALSE;
|
|
cfg.linux_funkeys = FALSE;
|
|
cfg.app_cursor = FALSE;
|
|
cfg.app_keypad = FALSE;
|
|
cfg.savelines = 100;
|
|
cfg.dec_om = FALSE;
|
|
cfg.wrap_mode =
|
|
cfg.lfhascr = FALSE;
|
|
cfg.win_name_always = FALSE;
|
|
cfg.width = 80;
|
|
cfg.height = 24;
|
|
strcpy(cfg.font, "Monaco");
|
|
cfg.fontisbold = 0;
|
|
cfg.fontheight = 9;
|
|
cfg.vtmode = VT_POORMAN;
|
|
cfg.try_palette = FALSE;
|
|
cfg.bold_colour = TRUE;
|
|
cfg.colours = GetNewPalette(PREF_pltt_ID);
|
|
if (cfg.colours == NULL)
|
|
fatalbox("Failed to get default palette");
|
|
onlysession = s;
|
|
|
|
/* XXX: Own storage management? */
|
|
if (mac_qdversion == gestaltOriginalQD)
|
|
s->window = GetNewWindow(wTerminal, NULL, (WindowPtr)-1);
|
|
else
|
|
s->window = GetNewCWindow(wTerminal, NULL, (WindowPtr)-1);
|
|
SetWRefCon(s->window, (long)s);
|
|
term_init();
|
|
term_size(24, 80, 100);
|
|
mac_initfont(s);
|
|
mac_initpalette(s);
|
|
/* Set to FALSE to not get palette updates in the background. */
|
|
SetPalette(s->window, s->palette, TRUE);
|
|
ActivatePalette(s->window);
|
|
ShowWindow(s->window);
|
|
inbuf_putstr("\033[1mBold\033[m \033[2mfaint\033[m \033[3mitalic\033[m \033[4mu_line\033[m "
|
|
"\033[5mslow bl\033[m \033[6mfast bl\033[m \033[7minverse\033[m \033[8mconceal\033[m "
|
|
"\033[9mstruck\033[m \033[21mdbl ul\033[m\015\012");
|
|
term_out();
|
|
inbuf_putstr("\033[30mblack \033[31mred \033[32mgreen \033[33myellow "
|
|
"\033[34mblue \033[35mmagenta \033[36mcyan \033[37mwhite\015\012");
|
|
term_out();
|
|
inbuf_putstr("\033[1m\033[30mblack \033[31mred \033[32mgreen \033[33myellow "
|
|
"\033[1m\033[34mblue \033[35mmagenta \033[36mcyan \033[37mwhite\015\012");
|
|
term_out();
|
|
inbuf_putstr("\033[37;44mwhite on blue \033[32;41mgreen on red\015\012");
|
|
term_out();
|
|
|
|
}
|
|
|
|
static void mac_initfont(struct mac_session *s) {
|
|
Str255 macfont;
|
|
FontInfo fi;
|
|
|
|
SetPort(s->window);
|
|
macfont[0] = sprintf((char *)&macfont[1], "%s", cfg.font);
|
|
GetFNum(macfont, &s->fontnum);
|
|
TextFont(s->fontnum);
|
|
TextFace(cfg.fontisbold ? bold : 0);
|
|
TextSize(cfg.fontheight);
|
|
GetFontInfo(&fi);
|
|
font_width = fi.widMax;
|
|
font_height = fi.ascent + fi.descent + fi.leading;
|
|
s->font_ascent = fi.ascent;
|
|
SizeWindow(s->window, cols * font_width, rows * font_height, true);
|
|
}
|
|
|
|
static void mac_initpalette(struct mac_session *s) {
|
|
|
|
if (mac_qdversion == gestaltOriginalQD)
|
|
return;
|
|
s->palette = NewPalette((*cfg.colours)->pmEntries, NULL, pmCourteous, 0);
|
|
if (s->palette == NULL)
|
|
fatalbox("Unable to create palette");
|
|
CopyPalette(cfg.colours, s->palette, 0, 0, (*cfg.colours)->pmEntries);
|
|
}
|
|
|
|
/*
|
|
* Call from the terminal emulator to draw a bit of text
|
|
*
|
|
* x and y are text row and column (zero-based)
|
|
*/
|
|
void do_text(struct mac_session *s, int x, int y, char *text, int len,
|
|
unsigned long attr) {
|
|
int style = 0;
|
|
int bgcolour, fgcolour;
|
|
RGBColor rgbfore, rgbback;
|
|
Rect textrect;
|
|
|
|
SetPort(s->window);
|
|
|
|
/* First check this text is relevant */
|
|
textrect.top = y * font_height;
|
|
textrect.bottom = (y + 1) * font_height;
|
|
textrect.left = x * font_width;
|
|
textrect.right = (x + len) * font_width;
|
|
if (!RectInRgn(&textrect, s->window->visRgn))
|
|
return;
|
|
|
|
TextFont(s->fontnum);
|
|
if (cfg.fontisbold || (attr & ATTR_BOLD) && !cfg.bold_colour)
|
|
style |= bold;
|
|
if (attr & ATTR_UNDER)
|
|
style |= underline;
|
|
TextFace(style);
|
|
TextSize(cfg.fontheight);
|
|
TextMode(srcCopy);
|
|
if (attr & ATTR_REVERSE) {
|
|
bgcolour = ((attr & ATTR_FGMASK) >> ATTR_FGSHIFT) * 2;
|
|
fgcolour = ((attr & ATTR_BGMASK) >> ATTR_BGSHIFT) * 2;
|
|
} else {
|
|
fgcolour = ((attr & ATTR_FGMASK) >> ATTR_FGSHIFT) * 2;
|
|
bgcolour = ((attr & ATTR_BGMASK) >> ATTR_BGSHIFT) * 2;
|
|
}
|
|
if ((attr & ATTR_BOLD) && cfg.bold_colour)
|
|
fgcolour++;
|
|
/* RGBForeColor(&s->palette[fgcolour]); */ /* XXX Non-Color-QD version */
|
|
/* RGBBackColor(&s->palette[bgcolour]); */
|
|
PmForeColor(fgcolour);
|
|
PmBackColor(bgcolour);
|
|
SetFractEnable(FALSE); /* We want characters on pixel boundaries */
|
|
MoveTo(textrect.left, textrect.top + s->font_ascent);
|
|
DrawText(text, 0, len);
|
|
|
|
/* Tell the window manager about it in case this isn't an update */
|
|
ValidRect(&textrect);
|
|
}
|
|
|
|
/*
|
|
* Call from the terminal emulator to get its graphics context.
|
|
* I feel this should disappear entirely (and do_text should take
|
|
* a Session as an argument). Simon may disagree.
|
|
*/
|
|
struct mac_session *get_ctx(void) {
|
|
|
|
return onlysession;
|
|
}
|
|
|
|
/*
|
|
* Presumably this does something in Windows
|
|
*/
|
|
void free_ctx(struct mac_session *ctx) {
|
|
|
|
}
|
|
|
|
/*
|
|
* Set the scroll bar position
|
|
*/
|
|
void set_sbar(int total, int start, int page) {
|
|
|
|
/* Do something once we actually have a scroll bar */
|
|
}
|
|
|
|
/*
|
|
* Beep
|
|
*/
|
|
void beep(void) {
|
|
|
|
SysBeep(30);
|
|
/*
|
|
* XXX We should indicate the relevant window and/or use the
|
|
* Notification Manager
|
|
*/
|
|
}
|
|
|
|
/*
|
|
* Set icon string -- a no-op here (Windowshade?)
|
|
*/
|
|
void set_icon(char *icon) {
|
|
|
|
}
|
|
|
|
/*
|
|
* Set the window title
|
|
*/
|
|
void set_title(char *title) {
|
|
Str255 mactitle;
|
|
struct mac_session *s = onlysession;
|
|
|
|
mactitle[0] = sprintf((char *)&mactitle[1], "%s", title);
|
|
SetWTitle(s->window, mactitle);
|
|
}
|
|
|
|
/*
|
|
* Resize the window at the emulator's request
|
|
*/
|
|
void request_resize(int w, int h) {
|
|
|
|
cols = w;
|
|
rows = h;
|
|
mac_initfont(onlysession);
|
|
}
|
|
|
|
/*
|
|
* Set the logical palette
|
|
*/
|
|
void palette_set(int n, int r, int g, int b) {
|
|
RGBColor col;
|
|
struct mac_session *s = onlysession;
|
|
static const int first[21] = {
|
|
0, 2, 4, 6, 8, 10, 12, 14,
|
|
1, 3, 5, 7, 9, 11, 13, 15,
|
|
16, 17, 18, 20, 22
|
|
};
|
|
|
|
col.red = r * 0x0101;
|
|
col.green = g * 0x0101;
|
|
col.blue = b * 0x0101;
|
|
SetEntryColor(s->palette, first[n], &col);
|
|
if (first[n] >= 18)
|
|
SetEntryColor(s->palette, first[n]+1, &col);
|
|
ActivatePalette(s->window);
|
|
}
|
|
|
|
/*
|
|
* Reset to the default palette
|
|
*/
|
|
void palette_reset(void) {
|
|
struct mac_session *s = onlysession;
|
|
|
|
if (mac_qdversion == gestaltOriginalQD)
|
|
return;
|
|
CopyPalette(cfg.colours, s->palette, 0, 0, (*cfg.colours)->pmEntries);
|
|
ActivatePalette(s->window);
|
|
/* Palette Manager will generate update events as required. */
|
|
}
|