/*  GadTools layout toolkit
**
**  Copyright © 1993-1995 by Olaf `Olsen' Barthel
**  Freely distributable.
*/

#include "gtlayout_global.h"

VOID __regargs
LTP_DrawMultiLineButton(struct RastPort *RPort,WORD Left,WORD Top,WORD Width,WORD Height,struct ImageInfo *ImageInfo)
{
	WORD Len,ThisTop,ThisLeft;
	STRPTR *Lines = ImageInfo -> Lines;
	WORD LineCount = ImageInfo -> LineCount;
	STRPTR KeyStroke = ImageInfo -> KeyStroke;

	ThisTop = Top + (Height - LineCount * RPort -> TxHeight) / 2 + RPort -> TxBaseline;

	do
	{
		Len = strlen(*Lines);

		ThisLeft = Left + (Width - TextLength(RPort,*Lines,Len)) / 2;

		Move(RPort,ThisLeft,ThisTop);
		Text(RPort,*Lines,Len);

		if(KeyStroke)
		{
			if(KeyStroke >= *Lines && KeyStroke < *Lines + Len)
			{
				ULONG OldStyle;

				if(KeyStroke != *Lines)
					ThisLeft += TextLength(RPort,*Lines,(ULONG)KeyStroke - (ULONG)(*Lines));

				OldStyle = SetSoftStyle(RPort,FSF_UNDERLINED,AskSoftStyle(RPort));

				Move(RPort,ThisLeft,ThisTop);
				Text(RPort,KeyStroke,1);

				SetSoftStyle(RPort,OldStyle & ~FSF_UNDERLINED,OldStyle);

				KeyStroke = NULL;
			}
		}

		ThisTop += RPort -> TxHeight;
		Lines++;
	}
	while(--LineCount);
}

VOID __regargs
LTP_DrawBox(struct RastPort *rp,struct DrawInfo *drawInfo,LONG left,LONG top,LONG width,LONG height,BOOLEAN selected,BOOLEAN ghosted,ImageInfo *imageInfo)
{
	UWORD		*pens = drawInfo -> dri_Pens;
	UWORD		 pen1,pen2,pen3,pen4;
	ImageTypes	 imageType = imageInfo -> ImageType;

	if(selected)
	{
		pen1 = SHADOWPEN;
		pen2 = SHINEPEN;
		pen3 = FILLPEN;
		pen4 = FILLTEXTPEN;
	}
	else
	{
		pen1 = SHINEPEN;
		pen2 = SHADOWPEN;
		pen3 = BACKGROUNDPEN;
		pen4 = TEXTPEN;
	}

	LTP_SetPens(rp,pens[pen1],0,JAM1);
	Move(rp,left + 1,top + 1);
	Draw(rp,left + 1,top + height - 2);
	Draw(rp,left,top + height - 1);
	Draw(rp,left,top);
	Draw(rp,left + width - 2,top);

	LTP_SetAPen(rp,pens[pen2]);
	Move(rp,left + width - 2,top + height - 2);
	Draw(rp,left + width - 2,top + 1);
	Draw(rp,left + width - 1,top);
	Draw(rp,left + width - 1,top + height - 1);
	Draw(rp,left + 1,top + height - 1);

	LTP_SetAPen(rp,pens[pen3]);
	RectFill(rp,left + 2,top + 1,left + 2 + width - 5,top + 1 + height - 3);

	LTP_SetAPen(rp,pens[pen4]);

	switch(imageType)
	{
		case IMAGECLASS_PICKER:
		{
			LONG	Left	= left + 4,
				Top	= top + 2,
				Width	= width - 8,
				Height	= height - 4;

			LTP_DrawPicker(rp,FALSE,Left,Top,Width,Height);
			break;
		}

		case IMAGECLASS_MULTILINEBUTTON:

			LTP_DrawMultiLineButton(rp,left + 4,top + 2,width - 8,height - 4,imageInfo);
			break;

		case IMAGECLASS_LEFTINCREMENTER:
		case IMAGECLASS_RIGHTINCREMENTER:

			LTP_DrawIncrementer(rp,imageType == IMAGECLASS_LEFTINCREMENTER,left + 2,top + 1,width - 4,height - 2);
			break;
#ifdef DO_TAPEDECK_KIND
		case IMAGECLASS_BACKWARD:
		case IMAGECLASS_FORWARD:
		case IMAGECLASS_PREVIOUS:
		case IMAGECLASS_NEXT:
		case IMAGECLASS_RECORD:
		case IMAGECLASS_PLAY:
		case IMAGECLASS_STOP:
		case IMAGECLASS_PAUSE:
		case IMAGECLASS_EJECT:
		case IMAGECLASS_REWIND:

			LTP_DrawTapeButton(rp,imageInfo,left,top,width,height,drawInfo -> dri_Resolution . X,drawInfo -> dri_Resolution . Y,pens[pen3]);
			break;
#endif	/* DO_TAPEDECK_KIND */
	}

	if(ghosted)
	{
		if(width > 4 || height > 2)
		{
			LTP_SetAPen(rp,pens[BLOCKPEN]);

			SetAfPt(rp,(UWORD *)&ghostingPat,1);
			RectFill(rp,left + 2,top + 1,left + width - 1 - 2,top + height - 1 - 1);
			SetAfPt(rp,NULL,0);
		}
	}
}