reactos/rosapps/dflat32/window.c
2003-06-19 02:48:13 +00:00

522 lines
15 KiB
C

/* ---------- window.c ------------- */
#include "dflat.h"
DFWINDOW DfInFocus = NULL;
int DfForeground, DfBackground; /* current video colors */
static void TopLine(DFWINDOW, int, DFRECT);
/* --------- create a window ------------ */
DFWINDOW DfDfCreateWindow(
DFCLASS class, /* class of this window */
char *ttl, /* title or NULL */
int left, int top, /* upper left coordinates */
int height, int width, /* dimensions */
void *extension, /* pointer to additional data */
DFWINDOW parent, /* parent of this window */
int (*wndproc)(struct DfWindow *,enum DfMessages,DF_PARAM,DF_PARAM),
int attrib) /* window attribute */
{
DFWINDOW wnd = DfCalloc(1, sizeof(struct DfWindow));
if (wnd != NULL) {
int base;
/* ----- height, width = -1: fill the screen ------- */
if (height == -1)
height = DfScreenHeight;
if (width == -1)
width = DfScreenWidth;
/* ----- coordinates -1, -1 = center the window ---- */
if (left == -1)
wnd->rc.lf = (DfScreenWidth-width)/2;
else
wnd->rc.lf = left;
if (top == -1)
wnd->rc.tp = (DfScreenHeight-height)/2;
else
wnd->rc.tp = top;
wnd->attrib = attrib;
if (ttl != NULL)
DfAddAttribute(wnd, DF_HASTITLEBAR);
if (wndproc == NULL)
wnd->wndproc = DfClassDefs[class].wndproc;
else
wnd->wndproc = wndproc;
/* ---- derive attributes of base classes ---- */
base = class;
while (base != -1) {
DfAddAttribute(wnd, DfClassDefs[base].attrib);
base = DfClassDefs[base].base;
}
if (parent)
{
if (!DfTestAttribute(wnd, DF_NOCLIP))
{
/* -- keep upper left DfWithin borders of parent - */
wnd->rc.lf = max(wnd->rc.lf,DfGetClientLeft(parent));
wnd->rc.tp = max(wnd->rc.tp,DfGetClientTop(parent));
}
}
else
parent = DfApplicationWindow;
wnd->class = class;
wnd->extension = extension;
wnd->rc.rt = DfGetLeft(wnd)+width-1;
wnd->rc.bt = DfGetTop(wnd)+height-1;
wnd->ht = height;
wnd->wd = width;
if (ttl != NULL)
DfInsertTitle(wnd, ttl);
wnd->parent = parent;
wnd->oldcondition = wnd->condition = DF_SRESTORED;
wnd->RestoredRC = wnd->rc;
DfInitWindowColors(wnd);
DfSendMessage(wnd, DFM_CREATE_WINDOW, 0, 0);
if (DfIsVisible(wnd))
DfSendMessage(wnd, DFM_SHOW_WINDOW, 0, 0);
}
return wnd;
}
/* -------- add a title to a window --------- */
void DfAddTitle(DFWINDOW wnd, char *ttl)
{
DfInsertTitle(wnd, ttl);
DfSendMessage(wnd, DFM_BORDER, 0, 0);
}
/* ----- insert a title into a window ---------- */
void DfInsertTitle(DFWINDOW wnd, char *ttl)
{
wnd->title=DfRealloc(wnd->title,strlen(ttl)+1);
strcpy(wnd->title, ttl);
}
static unsigned char line[300];
/* ------ write a line to video window client area ------ */
void DfWriteLine(DFWINDOW wnd, char *str, int x, int y, BOOL pad)
{
char *cp;
int len;
int dif;
char wline[200];
memset(wline, 0, 200);
len = DfLineLength(str);
dif = strlen(str) - len;
strncpy(wline, str, DfClientWidth(wnd) + dif);
if (pad) {
cp = wline+strlen(wline);
while (len++ < DfClientWidth(wnd)-x)
*cp++ = ' ';
}
DfWPuts(wnd, wline, x, y);
}
DFRECT DfAdjustRectangle(DFWINDOW wnd, DFRECT rc)
{
/* -------- adjust the rectangle ------- */
if (DfTestAttribute(wnd, DF_HASBORDER)) {
if (DfRectLeft(rc) == 0)
--rc.rt;
else if (DfRectLeft(rc) < DfRectRight(rc) &&
DfRectLeft(rc) < DfWindowWidth(wnd)+1)
--rc.lf;
}
if (DfTestAttribute(wnd, DF_HASBORDER | DF_HASTITLEBAR)) {
if (DfRectTop(rc) == 0)
--rc.bt;
else if (DfRectTop(rc) < DfRectBottom(rc) &&
DfRectTop(rc) < DfWindowHeight(wnd)+1)
--rc.tp;
}
DfRectRight(rc) = max(DfRectLeft(rc),
min(DfRectRight(rc),DfWindowWidth(wnd)));
DfRectBottom(rc) = max(DfRectTop(rc),
min(DfRectBottom(rc),DfWindowHeight(wnd)));
return rc;
}
/* -------- display a window's title --------- */
void DfDisplayTitle(DFWINDOW wnd, DFRECT *rcc)
{
if (DfGetTitle(wnd) != NULL)
{
int tlen = min((int)strlen(DfGetTitle(wnd)), (int)DfWindowWidth(wnd)-2);
int tend = DfWindowWidth(wnd)-3-DfBorderAdj(wnd);
DFRECT rc;
if (rcc == NULL)
rc = DfRelativeWindowRect(wnd, DfWindowRect(wnd));
else
rc = *rcc;
rc = DfAdjustRectangle(wnd, rc);
if (DfSendMessage(wnd, DFM_TITLE, (DF_PARAM) rcc, 0))
{
if (wnd == DfInFocus)
{
DfForeground = DfCfg.clr[DF_TITLEBAR] [DF_HILITE_COLOR] [DF_FG];
DfBackground = DfCfg.clr[DF_TITLEBAR] [DF_HILITE_COLOR] [DF_BG];
}
else
{
DfForeground = DfCfg.clr[DF_TITLEBAR] [DF_STD_COLOR] [DF_FG];
DfBackground = DfCfg.clr[DF_TITLEBAR] [DF_STD_COLOR] [DF_BG];
}
memset(line,' ',DfWindowWidth(wnd));
#ifdef INCLUDE_MINIMIZE
if (wnd->condition != DF_ISMINIMIZED)
#endif
strncpy (line + ((DfWindowWidth(wnd)-2 - tlen) / 2),
wnd->title, tlen);
if (DfTestAttribute(wnd, DF_CONTROLBOX))
line[2-DfBorderAdj(wnd)] = DF_CONTROLBOXCHAR;
if (DfTestAttribute(wnd, DF_MINMAXBOX))
{
switch (wnd->condition)
{
case DF_SRESTORED:
#ifdef INCLUDE_MAXIMIZE
line[tend+1] = DF_MAXPOINTER;
#endif
#ifdef INCLUDE_MINIMIZE
line[tend] = DF_MINPOINTER;
#endif
break;
#ifdef INCLUDE_MINIMIZE
case DF_ISMINIMIZED:
line[tend+1] = DF_MAXPOINTER;
break;
#endif
#ifdef INCLUDE_MAXIMIZE
case DF_ISMAXIMIZED:
#ifdef INCLUDE_MINIMIZE
line[tend] = DF_MINPOINTER;
#endif
#ifdef INCLUDE_RESTORE
line[tend+1] = DF_RESTOREPOINTER;
#endif
break;
#endif
default:
break;
}
}
line[DfRectRight(rc)+1] = line[tend+3] = '\0';
if (wnd != DfInFocus)
DfClipString++;
DfWriteLine(wnd, line+DfRectLeft(rc),
DfRectLeft(rc)+DfBorderAdj(wnd),
0,
FALSE);
DfClipString = 0;
}
}
}
/* --- display right border shadow character of a window --- */
static void shadow_char(DFWINDOW wnd, int y)
{
int fg = DfForeground;
int bg = DfBackground;
int x = DfWindowWidth(wnd);
char c = DfVideoChar(DfGetLeft(wnd)+x, DfGetTop(wnd)+y);
if (DfTestAttribute(wnd, DF_SHADOW) == 0)
return;
DfForeground = DARKGRAY;
DfBackground = BLACK;
DfWPutch(wnd, c, x, y);
DfForeground = fg;
DfBackground = bg;
}
/* --- display the bottom border shadow line for a window -- */
static void shadowline(DFWINDOW wnd, DFRECT rc)
{
int i;
int y = DfGetBottom(wnd)+1;
int fg = DfForeground;
int bg = DfBackground;
if ((DfTestAttribute(wnd, DF_SHADOW)) == 0)
return;
for (i = 0; i < DfWindowWidth(wnd)+1; i++)
line[i] = DfVideoChar(DfGetLeft(wnd)+i, y);
line[i] = '\0';
DfForeground = DARKGRAY;
DfBackground = BLACK;
line[DfRectRight(rc)+1] = '\0';
if (DfRectLeft(rc) == 0)
rc.lf++;
DfClipString++;
DfWPuts(wnd, line+DfRectLeft(rc), DfRectLeft(rc),
DfWindowHeight(wnd));
--DfClipString;
DfForeground = fg;
DfBackground = bg;
}
static DFRECT ParamRect(DFWINDOW wnd, DFRECT *rcc)
{
DFRECT rc;
if (rcc == NULL) {
rc = DfRelativeWindowRect(wnd, DfWindowRect(wnd));
if (DfTestAttribute(wnd, DF_SHADOW)) {
rc.rt++;
rc.bt++;
}
}
else
rc = *rcc;
return rc;
}
void DfPaintShadow(DFWINDOW wnd)
{
int y;
DFRECT rc = ParamRect(wnd, NULL);
for (y = 1; y < DfWindowHeight(wnd); y++)
shadow_char(wnd, y);
shadowline(wnd, rc);
}
/* ------- display a window's border ----- */
void DfRepaintBorder(DFWINDOW wnd, DFRECT *rcc)
{
int y;
char lin, side, ne, nw, se, sw;
DFRECT rc, clrc;
if (!DfTestAttribute(wnd, DF_HASBORDER))
return;
rc = ParamRect(wnd, rcc);
clrc = DfAdjustRectangle(wnd, rc);
if (wnd == DfInFocus) {
lin = DF_FOCUS_LINE;
side = DF_FOCUS_SIDE;
ne = DF_FOCUS_NE;
nw = DF_FOCUS_NW;
se = DF_FOCUS_SE;
sw = DF_FOCUS_SW;
}
else {
lin = DF_LINE;
side = DF_SIDE;
ne = DF_NE;
nw = DF_NW;
se = DF_SE;
sw = DF_SW;
}
line[DfWindowWidth(wnd)] = '\0';
/* ---------- window title ------------ */
if (DfTestAttribute(wnd, DF_HASTITLEBAR))
if (DfRectTop(rc) == 0)
if (DfRectLeft(rc) < DfWindowWidth(wnd)-DfBorderAdj(wnd))
DfDisplayTitle(wnd, &rc);
DfForeground = DfFrameForeground(wnd);
DfBackground = DfFrameBackground(wnd);
/* -------- top frame corners --------- */
if (DfRectTop(rc) == 0) {
if (DfRectLeft(rc) == 0)
DfWPutch(wnd, nw, 0, 0);
if (DfRectLeft(rc) < DfWindowWidth(wnd)) {
if (DfRectRight(rc) >= DfWindowWidth(wnd)-1)
DfWPutch(wnd, ne, DfWindowWidth(wnd)-1, 0);
TopLine(wnd, lin, clrc);
}
}
/* ----------- window body ------------ */
for (y = DfRectTop(rc); y <= DfRectBottom(rc); y++) {
char ch;
if (y == 0 || y >= DfWindowHeight(wnd)-1)
continue;
if (DfRectLeft(rc) == 0)
DfWPutch(wnd, side, 0, y);
if (DfRectLeft(rc) < DfWindowWidth(wnd) &&
DfRectRight(rc) >= DfWindowWidth(wnd)-1) {
if (DfTestAttribute(wnd, DF_VSCROLLBAR))
ch = ( y == 1 ? DF_UPSCROLLBOX :
y == DfWindowHeight(wnd)-2 ?
DF_DOWNSCROLLBOX :
y-1 == wnd->VScrollBox ?
DF_SCROLLBOXCHAR :
DF_SCROLLBARCHAR );
else
ch = side;
DfWPutch(wnd, ch, DfWindowWidth(wnd)-1, y);
}
if (DfRectRight(rc) == DfWindowWidth(wnd))
shadow_char(wnd, y);
}
if (DfRectTop(rc) <= DfWindowHeight(wnd)-1 &&
DfRectBottom(rc) >= DfWindowHeight(wnd)-1) {
/* -------- bottom frame corners ---------- */
if (DfRectLeft(rc) == 0)
DfWPutch(wnd, sw, 0, DfWindowHeight(wnd)-1);
if (DfRectLeft(rc) < DfWindowWidth(wnd) &&
DfRectRight(rc) >= DfWindowWidth(wnd)-1)
DfWPutch(wnd, se, DfWindowWidth(wnd)-1,
DfWindowHeight(wnd)-1);
if (wnd->StatusBar == NULL) {
/* ----------- bottom line ------------- */
memset(line,lin,DfWindowWidth(wnd)-1);
if (DfTestAttribute(wnd, DF_HSCROLLBAR)) {
line[0] = DF_LEFTSCROLLBOX;
line[DfWindowWidth(wnd)-3] = DF_RIGHTSCROLLBOX;
memset(line+1, DF_SCROLLBARCHAR, DfWindowWidth(wnd)-4);
line[wnd->HScrollBox] = DF_SCROLLBOXCHAR;
}
line[DfWindowWidth(wnd)-2] = line[DfRectRight(rc)] = '\0';
if (DfRectLeft(rc) != DfRectRight(rc) ||
(DfRectLeft(rc) && DfRectLeft(rc) < DfWindowWidth(wnd)-1))
{
if (wnd != DfInFocus)
DfClipString++;
DfWriteLine(wnd,
line+(DfRectLeft(clrc)),
DfRectLeft(clrc)+1,
DfWindowHeight(wnd)-1,
FALSE);
DfClipString = 0;
}
}
if (DfRectRight(rc) == DfWindowWidth(wnd))
shadow_char(wnd, DfWindowHeight(wnd)-1);
}
if (DfRectBottom(rc) == DfWindowHeight(wnd))
/* ---------- bottom shadow ------------- */
shadowline(wnd, rc);
}
static void TopLine(DFWINDOW wnd, int lin, DFRECT rc)
{
if (DfTestAttribute(wnd, DF_HASMENUBAR))
return;
if (DfTestAttribute(wnd, DF_HASTITLEBAR) && DfGetTitle(wnd))
return;
if (DfRectLeft(rc) == 0) {
DfRectLeft(rc) += DfBorderAdj(wnd);
DfRectRight(rc) += DfBorderAdj(wnd);
}
if (DfRectRight(rc) < DfWindowWidth(wnd)-1)
DfRectRight(rc)++;
if (DfRectLeft(rc) < DfRectRight(rc)) {
/* ----------- top line ------------- */
memset(line,lin,DfWindowWidth(wnd)-1);
if (DfTestAttribute(wnd, DF_CONTROLBOX)) {
strncpy(line+1, " ", 3);
*(line+2) = DF_CONTROLBOXCHAR;
}
line[DfRectRight(rc)] = '\0';
DfWriteLine(wnd, line+DfRectLeft(rc),
DfRectLeft(rc), 0, FALSE);
}
}
/* ------ clear the data space of a window -------- */
void DfClearWindow(DFWINDOW wnd, DFRECT *rcc, int clrchar)
{
if (DfIsVisible(wnd)) {
int y;
DFRECT rc;
if (rcc == NULL)
rc = DfRelativeWindowRect(wnd, DfWindowRect(wnd));
else
rc = *rcc;
if (DfRectLeft(rc) == 0)
DfRectLeft(rc) = DfBorderAdj(wnd);
if (DfRectRight(rc) > DfWindowWidth(wnd)-1)
DfRectRight(rc) = DfWindowWidth(wnd)-1;
DfSetStandardColor(wnd);
memset(line, clrchar, sizeof line);
line[DfRectRight(rc)+1] = '\0';
for (y = DfRectTop(rc); y <= DfRectBottom(rc); y++)
{
if (y < DfTopBorderAdj(wnd) ||
y > DfClientHeight(wnd)+
(DfTestAttribute(wnd, DF_HASMENUBAR) ? 1 : 0))
continue;
DfWriteLine(wnd,
line+(DfRectLeft(rc)),
DfRectLeft(rc),
y,
FALSE);
}
}
}
/* ------ compute the logical line length of a window ------ */
int DfLineLength(char *ln)
{
int len = strlen(ln);
char *cp = ln;
while ((cp = strchr(cp, DF_CHANGECOLOR)) != NULL)
{
cp++;
len -= 3;
}
cp = ln;
while ((cp = strchr(cp, DF_RESETCOLOR)) != NULL)
{
cp++;
--len;
}
return len;
}
void DfInitWindowColors(DFWINDOW wnd)
{
int fbg,col;
int cls = DfGetClass(wnd);
/* window classes without assigned colors inherit parent's colors */
if (DfCfg.clr[cls][0][0] == 0xff && DfGetParent(wnd) != NULL)
cls = DfGetClass(DfGetParent(wnd));
/* ---------- set the colors ---------- */
for (fbg = 0; fbg < 2; fbg++)
for (col = 0; col < 4; col++)
wnd->WindowColors[col][fbg] = DfCfg.clr[cls][col][fbg];
}
void DfPutWindowChar(DFWINDOW wnd, char c, int x, int y)
{
if (x < DfClientWidth(wnd) && y < DfClientHeight(wnd))
DfWPutch(wnd, c, x+DfBorderAdj(wnd), y+DfTopBorderAdj(wnd));
}
void DfPutWindowLine(DFWINDOW wnd, void *s, int x, int y)
{
int saved = FALSE;
int sv = 0;
if (x < DfClientWidth(wnd) && y < DfClientHeight(wnd))
{
char *en = (char *)s+DfClientWidth(wnd)-x;
if ((int)(strlen(s)+x) > (int)DfClientWidth(wnd))
{
sv = *en;
*en = '\0';
saved = TRUE;
}
DfClipString++;
DfWPuts(wnd, s, x+DfBorderAdj(wnd), y+DfTopBorderAdj(wnd));
--DfClipString;
if (saved)
*en = sv;
}
}
/* EOF */