tcod-haskell-0.1.0.0: libtcod/src/gui/textbox.cpp
/*
* libtcod 1.6.3
* Copyright (c) 2008,2009,2010,2012,2013,2016,2017 Jice & Mingos & rmtew
* All rights reserved.
*
* Redistribution and use in source and binary forms, with or without
* modification, are permitted provided that the following conditions are met:
* * Redistributions of source code must retain the above copyright
* notice, this list of conditions and the following disclaimer.
* * Redistributions in binary form must reproduce the above copyright
* notice, this list of conditions and the following disclaimer in the
* documentation and/or other materials provided with the distribution.
* * The name of Jice or Mingos may not be used to endorse or promote products
* derived from this software without specific prior written permission.
*
* THIS SOFTWARE IS PROVIDED BY JICE, MINGOS AND RMTEW ``AS IS'' AND ANY
* EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
* WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
* DISCLAIMED. IN NO EVENT SHALL JICE, MINGOS OR RMTEW BE LIABLE FOR ANY
* DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
* (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
* LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
* ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
* (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
* SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
*/
#include <textbox.hpp>
#include <string.h>
#include <stdio.h>
float TextBox::blinkingDelay=0.5f;
TextBox::TextBox(int x,int y,int w, int maxw, const char *label, const char *value, const char *tip)
: Widget(x,y,w,1),txt(NULL),blink(0.0f),pos(0),offset(0),maxw(maxw),insert(true),txtcbk(NULL),
data(NULL) {
if ( maxw > 0 ) {
txt = new char[maxw+1];
memset(txt,0,sizeof(char)*(maxw+1));
if ( value ) {
strncpy(txt,value,maxw);
}
}
if ( tip ) setTip(tip);
if ( label ) this->label=TCOD_strdup(label);
boxw=w;
if (label ) {
boxx=(int)strlen(label)+1;
this->w+= boxx;
}
}
TextBox::~TextBox() {
if ( txt ) delete [] txt;
if ( label ) free(label);
}
void TextBox::setText(const char *txt) {
strncpy(this->txt,txt,maxw);
}
void TextBox::render() {
con->setDefaultBackground(back);
con->setDefaultForeground(fore);
con->rect(x,y,w,h,true,TCOD_BKGND_SET);
if ( label ) con->printEx(x,y,TCOD_BKGND_NONE,TCOD_LEFT,label);
con->setDefaultBackground(keyboardFocus == this ? foreFocus : fore);
con->setDefaultForeground(keyboardFocus == this ? backFocus : back);
con->rect(x+boxx,y,boxw,h,false,TCOD_BKGND_SET);
int len=(int)strlen(txt)-offset;
if (len > boxw) len = boxw;
if ( txt ) con->printEx(x+boxx,y,TCOD_BKGND_NONE,TCOD_LEFT,"%.*s",len,&txt[offset]);
if (keyboardFocus == this && blink > 0.0f) {
if (insert) {
con->setCharBackground(x+boxx+pos-offset,y,fore);
con->setCharForeground(x+boxx+pos-offset,y,back);
} else {
con->setCharBackground(x+boxx+pos-offset,y,back);
con->setCharForeground(x+boxx+pos-offset,y,fore);
}
}
}
void TextBox::update(TCOD_key_t k) {
if ( keyboardFocus == this ) {
blink -= elapsed;
if ( blink < -blinkingDelay ) blink += 2*blinkingDelay;
if ( k.vk == TCODK_CHAR ||
(k.vk >= TCODK_0 && k.vk <= TCODK_9) ||
(k.vk >= TCODK_KP0 && k.vk <= TCODK_KP9) ) {
if ( ! insert || (int)strlen(txt) < maxw ) {
if ( insert && pos < (int)strlen(txt) ) {
for (int i=(int)strlen(txt); i >= pos; i-- ) {
txt[i+1]=txt[i];
}
}
txt[pos]=k.c;
if ( pos < maxw ) pos++;
if ( pos >= w ) offset = pos-w+1;
if (txtcbk) txtcbk(this,txt,data);
}
blink=blinkingDelay;
}
switch ( k.vk ) {
case TCODK_LEFT :
if (pos > 0) pos--;
if ( pos < offset ) offset=pos;
blink=blinkingDelay;
break;
case TCODK_RIGHT :
if (pos < (int)strlen(txt)) pos++;
if ( pos >= w ) offset = pos-w+1;
blink=blinkingDelay;
break;
case TCODK_HOME :
pos = offset = 0;
blink=blinkingDelay;
break;
case TCODK_BACKSPACE :
if (pos > 0) {
pos--;
for (uint32_t i=pos; i <= strlen(txt); i++ ) {
txt[i]=txt[i+1];
}
if (txtcbk) txtcbk(this,txt,data);
if ( pos < offset ) offset=pos;
}
blink=blinkingDelay;
break;
case TCODK_DELETE :
if (pos < (int)strlen(txt)) {
for (uint32_t i=pos; i <= strlen(txt); i++ ) {
txt[i]=txt[i+1];
}
if (txtcbk) txtcbk(this,txt,data);
}
blink=blinkingDelay;
break;
/*
case TCODK_INSERT :
insert=!insert;
blink=blinkingDelay;
break;
*/
case TCODK_END :
pos = (int)strlen(txt);
if ( pos >= w ) offset = pos-w+1;
blink=blinkingDelay;
break;
default:break;
}
}
Widget::update(k);
}
void TextBox::onButtonClick() {
if ( mouse.cx >= x+boxx && mouse.cx < x+boxx+boxw ) keyboardFocus=this;
}