nhyatt/putty-source
1
0
Fork 0
mirror of https://git.tartarus.org/simon/putty.git synced 2025-01-09 17:38:00 +00:00
Code Issues Projects Releases Wiki Activity

Right, so that's a hook for scroll optimisations (when Simon gets round to

Browse Source 
them) and a vaguely-working scrollbar.  Next stop: faster and more sensible
redraw in 1-bit modes at least.  Waiting five minutes for the test case
to scroll past is _tedious_.

[originally from svn r64]
This commit is contained in:
Ben Harris 1999-03-01 22:26:50 +00:00
parent eddbb40cf8
commit 409d80171a
2 changed files with 109 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

29
mac.c
View File

@ -1,4 +1,29 @@
/* $Id: mac.c,v 1.1.2.9 1999/02/28 17:05:10 ben Exp $ */
/* $Id: mac.c,v 1.1.2.10 1999/03/01 22:26:49 ben Exp $ */
/*
* Copyright (c) 1999 Ben Harris
* All rights reserved.
*
* Permission is hereby granted, free of charge, to any person
* obtaining a copy of this software and associated documentation
* files (the "Software"), to deal in the Software without
* restriction, including without limitation the rights to use,
* copy, modify, merge, publish, distribute, sublicense, and/or
* sell copies of the Software, and to permit persons to whom the
* Software is furnished to do so, subject to the following
* conditions:
*
* The above copyright notice and this permission notice shall be
* included in all copies or substantial portions of the Software.
*
* THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
* EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
* MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
* NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS BE LIABLE FOR
* ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF
* CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
* CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
* SOFTWARE.
*/
/*
* mac.c -- miscellaneous Mac-specific routines
*/
@ -177,7 +202,7 @@ static void mac_contentclick(WindowPtr window, EventRecord *event) {
switch (mac_windowtype(window)) {
case wTerminal:
/* XXX: Do something. */
mac_clickterm(window, event);
break;
case wAbout:
if (DialogSelect(event, &(DialogPtr)window, &item))

87
macterm.c
View File

@ -1,4 +1,4 @@
/* $Id: macterm.c,v 1.1.2.8 1999/02/28 17:05:11 ben Exp $ */
/* $Id: macterm.c,v 1.1.2.9 1999/03/01 22:26:50 ben Exp $ */
/*
* Copyright (c) 1999 Ben Harris
* All rights reserved.
@ -58,8 +58,12 @@ struct mac_session {
static void mac_initfont(struct mac_session *);
static void mac_initpalette(struct mac_session *);
static void mac_adjustsize(struct mac_session *);
static pascal void mac_scrolltracker(ControlHandle, short);
/* Temporary hack till I get the terminal emulator supporting multiple sessions */
/*
* Temporary hack till I get the terminal emulator supporting multiple
* sessions
*/
static struct mac_session *onlysession;
@ -110,7 +114,7 @@ void mac_newsession(void) {
SetWRefCon(s->window, (long)s);
s->scrollbar = GetNewControl(cVScroll, s->window);
term_init();
term_size(24, 80, 100);
term_size(cfg.height, cfg.width, cfg.savelines);
mac_initfont(s);
mac_initpalette(s);
/* Set to FALSE to not get palette updates in the background. */
@ -181,6 +185,53 @@ static void mac_updatewinbg(struct mac_session *s) {
SetWinColor(s->window, cth);
}
void mac_clickterm(WindowPtr window, EventRecord *event) {
struct mac_session *s;
Point mouse;
ControlHandle control;
int part;
s = (struct mac_session *)GetWRefCon(window);
SetPort(window);
mouse = event->where;
GlobalToLocal(&mouse);
part = FindControl(mouse, window, &control);
if (control == s->scrollbar) {
switch (part) {
case kControlIndicatorPart:
if (TrackControl(control, mouse, NULL) == kControlIndicatorPart)
term_scroll(+1, GetControlValue(control));
break;
case kControlUpButtonPart:
case kControlDownButtonPart:
case kControlPageUpPart:
case kControlPageDownPart:
TrackControl(control, mouse, mac_scrolltracker);
break;
}
}
}
static pascal void mac_scrolltracker(ControlHandle control, short part) {
struct mac_session *s;
s = (struct mac_session *)GetWRefCon((*control)->contrlOwner);
switch (part) {
case kControlUpButtonPart:
term_scroll(0, -1);
break;
case kControlDownButtonPart:
term_scroll(0, +1);
break;
case kControlPageUpPart:
term_scroll(0, -(rows - 1));
break;
case kControlPageDownPart:
term_scroll(0, +(rows - 1));
break;
}
}
void mac_activateterm(WindowPtr window, Boolean active) {
struct mac_session *s;
@ -273,8 +324,6 @@ void do_text(struct mac_session *s, int x, int y, char *text, int len,
/*
* 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) {
@ -360,6 +409,8 @@ void palette_set(int n, int r, int g, int b) {
16, 17, 18, 20, 22
};
if (mac_gestalts.qdvers == gestaltOriginalQD)
return;
col.red = r * 0x0101;
col.green = g * 0x0101;
col.blue = b * 0x0101;
@ -381,3 +432,29 @@ void palette_reset(void) {
ActivatePalette(s->window);
/* Palette Manager will generate update events as required. */
}
/*
* Move `lines' lines from position `from' to position `to' in the
* window.
* Note that this is currently broken if "from" and "to" are more
* than "lines" lines apart.
*/
void optimised_move(int to, int from, int lines) {
Rect r;
RgnHandle update;
struct mac_session *s = onlysession;
int min, max, d;
SetPort(s->window);
min = (to < from ? to : from);
max = to + from - min;
d = max - min;
update = NewRgn();
r.left = 0; r.right = cols * font_width;
r.top = min * font_height; r.bottom = (max+lines) * font_height;
ScrollRect(&r, 0, (to - from) * font_height, update);
InvalRgn(update); /* XXX: necessary? probably harmless anyway */
DisposeRgn(update);
}