glwidgets.cpp

/* OpenBRF -- by marco tarini. Provided under GNU General Public License */

//#include <GL/glew.h>

#ifdef _WIN32
  #include <Windows.h>
#endif

#include <QtGui>
#include <QDomDocument>
//#include <QtOpenGL>
#include <QOpenGLShaderProgram>
#include <QOpenGLTexture>
#include <QMessageBox>
#include <GL/glu.h>

#include <math.h>

#include "brfData.h"
#include "glwidgets.h"

#include "ddsData.h"

#include "bindTexturePatch.h"

#include <vcg/math/matrix44.h>
#include <wrap/gl/space.h>

#include "mainwindow.h"


GLWidget::GLWidget(QWidget *parent, IniData &_inidata)
  : QOpenGLWidget(parent), inidata(_inidata)
{
#if 1 /* swy: enable multisample antialiasing (MSAA) for less jaggies/softer triangle edges */
    QSurfaceFormat sf = format();
	sf.setSamples(4); /* swy: maybe MSAA x8 is asking for trouble? */
	sf.setSwapBehavior(QSurfaceFormat::TripleBuffer);
	sf.setSwapInterval(-1);
//	sf.setProfile(QSurfaceFormat::CompatibilityProfile); /* swy: some drivers like @kraggrim's Radeon (TM) RX 470 don't work with a compatibility profile, at least in GL 3.0/3.1 */
//	sf.setMajorVersion(3);
//	sf.setMinorVersion(0);
	setFormat(sf);
#endif

	//grabKeyboard ();
	selectNone();
	phi=theta=0;
    dist = 3.9f;
	zoom = 1;
	cx = cy = 0;
	currViewmodeHelmet=currViewmodeInterior=viewmode=0;
	avatP.SetZero();
	avatV.SetZero();
	displaying = NONE;
	timer = new QTimer();
	timer->setInterval(1000/60);
	timer->setSingleShot(false);
	timer->start();

	lastCenter.SetZero();
	lastScale = 1;
	closingUp = 0;
	subsel = -1;

	lastUsedShader = SHADER_FIXEDFUNC;
	lastUsedShaderBumpgreen = 0;

	floatingProbePulseColor = 0;

	applyExtraMatrixToAll = true;
	lastSelected = -1;

	keys[0]=keys[1]=keys[2]=keys[3]=keys[4]=false;

	for (int j=0; j<2; j++)
		for (int i=0; i<SHADER_MODES; i++) {
			shaderTried[i][j] = false;
			shaderProgram[i][j] = new QOpenGLShaderProgram();
		}


	useNormalmap = true;
    useTransparency = true;
	useSpecularmap = true;

	useTexture=true; useWireframe=false; useLighting=useFloor=true; useRuler=false; useHitboxes=false;
	useFloorInAni = true;
	useFloatingProbe = false;
	useComparisonMesh = false;
    autoComputeTangents = false;
	openGL2ready=false;

	bumpmapActivated = false;
	shadowMode = false;
	rulerLength = 100;
	ghostMode = false;
	curMaterialTexture = DIFFUSEA;

	colorMode=1;
	selRefAnimation = -1;
	selRefSkin = -1;
	selFrameN = 0;
	selRefSkel = 0;
	showAlpha=NOALPHA;
	commonBBox = false;
	inferMaterial = true;
	useOpenGL2 = false;

	relTime=0;
	runningState = STOP;
	defaultRunningState = PLAY; // when visualizing animations
	runningSpeed = 1/75.0f;

	clearExtraMatrix();
    //nViewports = 0;

	tw=th=1;
	currentCustomShader = NULL;

	picking = true;
	selPointIndex = -1;
	floatingProbe.SetZero();

	//connect(this, SIGNAL(), this, SLOT(mouseClickEvent(QMouseEvent*)) );
	connect(timer,SIGNAL(timeout()),this,SLOT(onTimer()));
}

bool GlCamera::getCurrent(){
	glGetIntegerv(GL_VIEWPORT,vp);
	glGetDoublev(GL_MODELVIEW_MATRIX,mv);
	glGetDoublev(GL_PROJECTION_MATRIX,pr);
	return true;
}

GlCamera::GlCamera(){}

GlCamera GlCamera::currentCamera(int i){
	GlCamera c;
	c.getCurrent();
	c.targetIndex = i;
	return c;
}

bool GlCamera::isInViewport(int x, int y) const{
	return (x>=vp[0]) && (y>vp[1]) && (x<=vp[0]+vp[2]) && (y<=vp[1]+vp[3]);
}

vcg::Point3f GlCamera::unproject(int x, int y) const{
	double rx,ry,rz;
	float z = 0;
	glReadPixels(x,y,1,1,GL_DEPTH_COMPONENT, GL_FLOAT,(void*)&z);
	gluUnProject(x,y,z,mv,pr,vp,&rx,&ry,&rz);
	return vcg::Point3f(float(rx),float(ry),float(rz));
}

void GLWidget::setFrameNumber(int i){
	if (i<0) return;
	if (selFrameN==i) return;
	selFrameN = i;
	if (!skeletalAnimation()) runningState=PAUSE;
	update();
}

int GLWidget::widthPix() const{
    return width() * devicePixelRatio();
}

int GLWidget::heightPix() const{
    return height() * devicePixelRatio();
}


void GLWidget::setDefaultBgColor(QColor col, bool alsoCurrent){
	defaultBgColor = col;
	if (alsoCurrent){
		currBgColor = col;
		update();
	}
}


void GLWidget::setRefAnimation(int i){

	selRefAnimation = i-1; // -1 for the "none"
	relTime = 0;
	update();
}

void GLWidget::setEditingRef(bool mode){
	if (mode) {
		currBgColor.setRedF(0.45f);
		currBgColor.setGreenF(0.5f);
		currBgColor.setBlueF(0.35f);
	} else {
		currBgColor = defaultBgColor;
	}
}

void GLWidget::setRefSkin(int i){
	selRefSkin = i-1; // -1 for the "none"
	update();
}

int GLWidget::getRefSkin() const{
	return selRefSkin;
}

int GLWidget::getRefSkeleton() const{
	if (displaying == MESH ) {
		if (selRefAnimation>=0) {
			BrfAnimation *a=&(reference->animation[selRefAnimation]);
			return reference->getOneSkeleton( int(a->nbones ), selRefSkel );
		}

	}
	if (displaying == ANIMATION ) {
		if (data)
			if ((selected>=0) && (selected<(int)data->animation.size())) {
				BrfAnimation &a( data->animation[selected]);
				return reference->getOneSkeleton( int(a.nbones ), selRefSkel );
			}
	}
	return selRefSkel;
}

int GLWidget::getRefSkelAni() const{
	if (displaying == MESH || displaying == SKELETON) {
		return selRefAnimation;
	}
	return -1;
}

void GLWidget::setRefSkeleton(int i){
	selRefSkel = i;
	update();
}


static float floatMod(float a,int b){
	if (b<=0) return 0;
	int ia=int((float)floor((double)a));
	return (a-ia) + ia%b; // which is >=0.0f but <b
}

void GLWidget::renderRuler(){
	this->setWireframeLightingMode(false,false,false);
	glDisable(GL_LIGHTING);
	float h=0.4f;
	glBegin(GL_LINES);
	for (int i=1; i<=max(900, rulerLength); i+=1){
		int lvl=0;
		if (i==rulerLength) continue;
		if (i%5==0) lvl =1;
		if (i%10==0) lvl =2;
		if (i%50==0) lvl =3;
		if (i%100==0)lvl =4;
		float rgb = 0.75f + lvl/16.0;
		glColor3f( rgb, rgb, rgb);
		glVertex3f( 0, h, i*0.01 );
		glVertex3f( 0, h*(6-lvl)/7.0, i*0.01 );
	}
    glColor4f( 1,0,0,0.3f);

	float r = rulerLength*0.01f;
    glVertex3f(0,-0.2f,0);
	glVertex3f(0,h,0);
    glVertex3f(0,-0.2f,r);
	glVertex3f(0,h,r);
	glEnd();

	glEnable(GL_BLEND);
	glBlendFunc(GL_SRC_ALPHA,GL_ONE_MINUS_SRC_ALPHA);
	glDisable(GL_CULL_FACE);
    float w=0.1f;
	glBegin(GL_QUADS);
	glVertex3f(-w,h,r);
	glVertex3f( w,h,r);
    glVertex3f( w,-0.2f,r);
    glVertex3f(-w,-0.2f,r);
	glEnd();

	glEnable(GL_CULL_FACE);
	glDisable(GL_BLEND);
	glEnable(GL_LIGHTING);
	glColor4f( 1,1,1,1 );
}

void GLWidget::renderFloatingProbe(){
	//if (selPointIndex>=0)
	{
		glDisable(GL_LIGHTING);
		glDisable(GL_TEXTURE_2D);

		float k = sin(floatingProbePulseColor/150.0);
		glColor4f(1,k,k,0.25);
		glPointSize(8);

		glDisable(GL_DEPTH_TEST); glEnable(GL_BLEND);
		glBegin(GL_POINTS);
		glVertex3fv( floatingProbe.V() );
		glEnd();

		glEnable(GL_DEPTH_TEST); glDisable(GL_BLEND);
		glBegin(GL_POINTS);
		glVertex3fv( floatingProbe.V() );
		glEnd();
	}
}

void GLWidget::renderFloor(){
	this->setWireframeLightingMode(false,false,false);

	glDisable(GL_LIGHTING);
	if ( viewmode!=1 ) {

		// solid floor
		//glEnable(GL_FOG);

		//glDisable(GL_CULL_FACE);
		glBlendFunc(GL_SRC_ALPHA,GL_ONE_MINUS_SRC_ALPHA);
#if (0)
		const int H = 550; // floor size
		const float h = -0.1; // floor size
		{
			glBegin(GL_QUADS);
			glColor4f(bg_r,bg_g,bg_b,0.7f);
			glVertex3f(+H, h, -H);
			glVertex3f(+H, h,  H);
			glVertex3f(-H, h,  H);
			glVertex3f(-H, h, -H);
			glEnd();
		}
#endif

	}
	//glEnable(GL_CULL_FACE);

	//glDisable(GL_FOG);

	const int K = 20; // floor size
	glEnable(GL_BLEND);
	glBlendFunc(GL_ALPHA,GL_ONE_MINUS_SRC_ALPHA);
	glDisable(GL_LIGHTING);
	float bg_r = currBgColor.redF();
	float bg_g = currBgColor.greenF();
	float bg_b = currBgColor.blueF();
    //float bg[4]={bg_r,bg_g,bg_b,0.0f};
    float ccc = (bg_r>0.3)?-0.2:+0.3;
    float c[4]={ccc+bg_r,ccc+bg_g,ccc+bg_b,0.5f};
	glColor4fv(c);
    glDisable(GL_FOG);
    /*
	glHint(GL_FOG_HINT, GL_NICEST);
    glEnable(GL_FOG);
	glFogfv(GL_FOG_COLOR,bg);
    glFogf(GL_FOG_DENSITY,0.125f);*/

	glPushMatrix();
	if (displaying == MESH || displaying == BODY)  {
		glRotatef(+90*currViewmodeHelmet,1,0,0);
		glRotatef(-180*currViewmodeHelmet,0,1,0);
	}

    glPointSize(5);
    glBegin(GL_POINTS);
    glVertex3f(0,0,0);
    glEnd();

	glScalef(0.5,0.5,0.5);
	glBegin(GL_LINES);
	for (int i=-K; i<=K; i++){
        c[3] = 0.5 - 0.35*abs(i)/K;
        glColor4fv(c);
		glVertex3f(-K, 0, i);
		glVertex3f(+K, 0, i);

		glVertex3f(i, 0, +K);
		glVertex3f(i, 0, -K);
	}
	glEnd();
	glHint(GL_FOG_HINT, GL_DONT_CARE);



	glPopMatrix();
	glDisable(GL_FOG);
	glDisable(GL_BLEND);
}

int GLWidget::getFrameNumber() const{
	return selFrameN;
}

void GLWidget::browseTexture(){
	if (!renderedTexture.isEmpty()) {
		//QString f = QUrl::fromLocalFile(renderedTexture).toString();
		//f.truncate(f.lastIndexOf('/')+1);
		//QMessageBox::warning(this,"test", f);
		//QDesktopServices::setUrlHandler("*.*",this,"Explorer");
		//QDesktopServices::openUrl(f);
#if 0
		QStringList args;
		args << QString("/select,") << QDir::toNativeSeparators(renderedTexture);
		QProcess::startDetached("explorer", args);
#else
		MainWindow::selectFileInExplorer(QDir::toNativeSeparators(renderedTexture));
#endif

	}
}

void GLWidget::scaleAsLastBindedTexture(){
	if (tw*th) {
		if (tw>th) glScalef(1,th/float(tw),1);// h = th/float(tw);
		if (tw<th) glScalef(tw/float(th),1,1); //w = tw/float(th);
	}
}

void GLWidget::renderTexture(const char* name, bool addExtension){
	glDisable(GL_LIGHTING);
    glDisable(GL_DEPTH_TEST);

	glPolygonMode(GL_FRONT,GL_FILL);

	//char tname[512];
	//sprintf(tname,"%s%s",name,(addExtension)?".dds":"");


	BrfMaterial::Location loc = BrfMaterial::UNKNOWN;
	renderedTexture = locateOnDisk( name, (addExtension)?".dds":"", &loc );
	if (!renderedTexture.isEmpty()) {
		setTextureName(renderedTexture, loc, 0);
	} else {
		setCheckboardTexture();
		lastMatErr.texName=QString("%1%2").arg(name).arg((addExtension)?".dds":"");
		setMaterialError(2); // file not found
	}

	scaleAsLastBindedTexture();

	float w=1,h=1;
	if (showAlpha==PURPLEALPHA) {
		glDisable(GL_TEXTURE_2D);
		glColor3f(1,0,1);
		glBegin(GL_QUADS);
		glVertex2f(-w,-h);
		glVertex2f( w,-h);
		glVertex2f( w, h);
		glVertex2f(-w, h);
		glEnd();
	}

	glEnable(GL_TEXTURE_2D);

	glColor3f(1,1,1);

	if (showAlpha==TRANSALPHA ){
		glEnable(GL_BLEND);
		glBlendFunc(GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA);
    }
    else if (showAlpha==PURPLEALPHA){
		glEnable(GL_BLEND);
		glBlendFunc(GL_ZERO, GL_SRC_ALPHA);
    } else {
        glDisable(GL_BLEND);
    }
    //glDisable(GL_DEPTH_TEST);
	glBegin(GL_QUADS);
	glTexCoord2f(0,1);glVertex2f(-w,-h);
	glTexCoord2f(1,1);glVertex2f( w,-h);
	glTexCoord2f(1,0);glVertex2f( w, h);
	glTexCoord2f(0,0);glVertex2f(-w, h);
	glEnd();

	glDisable(GL_BLEND);
    //glEnable(GL_DEPTH_TEST);

}

void GLWidget::renderBrfItem(const BrfMaterial& t){
	//const char *st;
	int n = 0;
	bool present[SPECULAR-DIFFUSEA+1];
	for (int i=DIFFUSEA; i<=SPECULAR; i++) {
		present[i] = (strcmp( t.getTextureName(i),"none")!=0);
        if (present[i]) n++;
	}
    if (n==0) return;
    float gap = 0.1*(n-1);
    float sc = 1.0/(1.0+gap/2);
    glScalef(sc,sc,1);
    float tr = gap/2;
    glTranslatef(-tr,-tr,0);

    int postPoned = -1;
    int postPonedP = -1;

    for (int i=SPECULAR,p=0; i>=DIFFUSEA; i--) {
		if (present[i]) {
            if (i==curMaterialTexture) {
                postPoned = i;
                postPonedP = p;
            } else {
                glPushMatrix();
                int d = (p - DIFFUSEA);
                glTranslatef(d*0.1f,d*0.1f,0);
                renderTexture(t.getTextureName(i));
                glPopMatrix();
            }
            p++;
        }
	}

    if (postPoned>=0) {
        glPushMatrix();
        int d = (postPonedP - DIFFUSEA);
        glTranslatef(d*0.1f,d*0.1f,0);
        renderTexture(t.getTextureName(postPoned));
        glPopMatrix();
    }
}

void GLWidget::renderBrfItem(const BrfTexture& t){
	if (t.NFrames()>0) {
		renderTexture(t.FrameName( (int(relTime*runningSpeed))%t.NFrames() ) ,false);
	} else
		renderTexture(t.name,false);
}

void GLWidget::renderBrfItem (const BrfMesh& p){
	float fi = 0;
	if (p.HasVertexAni()) {
		if (/* swy: was !skeletalAnimation() */ !p.IsSkinned() && runningState==PLAY) {  /* swy: don't play back the vertex frame animation (used for armor feminization) when this is a skinned mesh simultaneously playing a skeletal animation; otherwise we'd always end up showing it with the (last vertex frame) female variant. Reported by @Earendil */
            fi = floatMod( relTime*runningSpeed, (int)p.frame.size()-3) +2;
			if (fi<0) fi=0;
			if (selFrameN != (int)fi) {
				selFrameN = (int)fi;
                if (selFrameN>=(int)p.frame.size()) selFrameN = (int)p.frame.size()-1;
				emit(signalFrameNumber(selFrameN));
			}
		} else fi=selFrameN;
		if (fi>=(float)p.frame.size()) fi=(float)p.frame.size()-1;
		if (fi<0) fi=0;

	}
	BrfAnimation* a=NULL;
	BrfSkeleton* s=NULL;
	BrfBody* b=NULL;
	if (p.IsSkinned()) {
		if (selRefAnimation>=0) {
			a = &(reference->animation[selRefAnimation]);
			int si = getRefSkeleton();
			if (si>=0) {
				s=&(reference->skeleton[si]);
				if (useHitboxes) {
					int bi = hitBoxes->Find(s->name,BODY);
					if (bi>=0) b = &hitBoxes->body[bi];
				}
			}
			//selRefSkel = si;
		}
	}

	if (a && s) {
        lastSkelAniFrameUsed = fi = floatMod( relTime*runningSpeed , (int)a->frame.size() );
		renderSkinnedMesh(p,*s,*a,fi);
	} else {
		renderMesh(p,fi);
	}
	if (b && s) {
        fi = floatMod( relTime*runningSpeed , (int)a->frame.size() );
		if (a) renderBody(*b,*s,*a,fi, true);
		else renderBody(*b,*s, true);
	}
}

#define GL_LIGHT_MODEL_COLOR_CONTROL  0x81F8
#define GL_SEPARATE_SPECULAR_COLOR  0x81FA

bool usingProgram = false;

void setAmbientDiffuse( float a, float d){
    float va[4]={a,a,a,a};
    float vd[4]={d,d,d,d};
//    glLightModelfv(GL_AMBIENT, va);
    glLightfv(GL_LIGHT0,GL_AMBIENT, va);
    glLightfv(GL_LIGHT0,GL_DIFFUSE, vd);
}

void setSpec( float s ){
    float v[4]={s,s,s,s};
    glLightfv(GL_LIGHT0,GL_SPECULAR, v);
}

void GLWidget::enableDefMaterial(){
    setAmbientDiffuse( 0.35f, 0.60f );
    setSpec( 0.0 );
    glDepthMask( true );
	glDisable(GL_ALPHA_TEST);
	if (useOpenGL2) {
        if (usingProgram) glUseProgram(0);
        //if (usingProgram) #includerelease();
		if (inferMaterial){
            glActiveTexture(GL_TEXTURE1); glDisable(GL_TEXTURE_2D);
            glActiveTexture(GL_TEXTURE2); glDisable(GL_TEXTURE_2D);
            glActiveTexture(GL_TEXTURE0);
		}
	}
	usingProgram = false;

}

#define STRINGIFY(X) #X


QOpenGLShaderProgram* GLWidget::initFramPrograms(int mode, bool green){

	lastUsedShader = mode;
	lastUsedShaderBumpgreen = green;

	if (shaderTried[mode][green]) return NULL;

	QOpenGLShaderProgram * s(shaderProgram[mode][green]);
	QString& log(shaderLog[mode][green]);

	if (s->isLinked()) {
		if (s->bind()) {
			usingProgram = true;
			return s;
		} else return NULL;
	} else {

		QString prefix;
		QString fileVertexSource =  ":/shaders/bump_vertex.cpp";
		QString fileFragmentSource =  ":/shaders/bump_fragment.cpp";

		prefix = (green)?"#define USE_GREEN_NM\n":"";

		switch (mode) {
		case NM_PLAIN:
			break;
		case NM_ALPHA:
			prefix += "#define ALPHA_CUTOUTS\n";
			break;
		case NM_IRON:
			prefix += "#define SPECULAR_ALPHA\n";
			break;
		case NM_SHINE:
			prefix += "#define ALPHA_CUTOUTS\n#define SPECULAR_MAP\n";
			//prefix += "#define ALPHA_CUTOUTS\n#define SPECULAR_MAP\n";
			break;
		case SHADER_IRON:
			prefix = "";
			fileFragmentSource = ":/shaders/iron_fragment.cpp";
			fileVertexSource = "";
			break;
		}

		bool res = true;
		if (!fileVertexSource.isEmpty()) {
			QFile file(fileVertexSource);
			file.open(QIODevice::Text|QIODevice::ReadOnly);
			QString src = QString(file.readAll()).arg(prefix);
			res &= s->addShaderFromSourceCode(QOpenGLShader::Vertex,src);
			if (!s->log().isEmpty())
				log += tr("<br />Vertex compilation: <br />")+s->log().replace("\n","<br />");
		}
		if (res) if (!fileFragmentSource.isEmpty()) {
			QFile file(fileFragmentSource);
			file.open(QIODevice::Text|QIODevice::ReadOnly);
			QString src = QString(file.readAll()).arg(prefix);
			res &= s->addShaderFromSourceCode(QOpenGLShader::Fragment, src);
			if (!s->log().isEmpty())
				log += tr("<br />Fragment compilation: <br />")+s->log().replace("\n","<br />");
		}
		if (res) {
			res &= s->link();
			if (!s->log().isEmpty())
				log += tr("<br />Linking: <br />")+s->log().replace("\n","<br />");
		}
		if (res) {
			res &= s->bind();

			if (!s->log().isEmpty())
				log += tr("<br />Binding: <br />")+s->log().replace("\n","<br />");
			usingProgram = true;
		}

		if (!res) {
			shaderTried[mode][green] = true;
			return NULL;
		} else return s;
	}
}


void GLWidget::enableMaterial(const BrfMaterial &m){

    bool alphaShine = QString(m.shader).contains("iron",Qt::CaseInsensitive)
            && !m.HasSpec() && useTexture;

    if (useTransparency &&  m.FlagBlend()) {
        glEnable(GL_BLEND);
        glBlendFunc( m.FlagBlendFuncSrc(), m.FlagBlendFuncDst() );
    } else glDisable(GL_BLEND);


    glDepthMask( !m.FlagNoZWrite() );

    if (m.FlagNoDepthTest()) glDisable(GL_DEPTH_TEST);
    else glEnable(GL_DEPTH_TEST);

    if (useTransparency && m.FlagAlphaTest() ) {
		glEnable(GL_ALPHA_TEST);
        glAlphaFunc(GL_GREATER, m.FlagAlphaValue() );
	} else {
		glDisable(GL_ALPHA_TEST);
	}

    if (m.FlagUniformLighting() || !useLighting ) {
        setAmbientDiffuse( 1.0f, 0.0f);
    } else
        setAmbientDiffuse( 0.35f, 0.70f);
	currentCustomShader = NULL;
	if (useOpenGL2) {

		BrfShader *bs = inidata.findShader( m.shader ) ;
		if (bs!=NULL) {
			if (customShaders.find( bs->technique ) != customShaders.end()) {
				currentCustomShader  = customShaders[ bs->technique ];
			}
		}
		if (currentCustomShader) {

			currentCustomShader->bind();
			currentCustomShader->setUniformValue("samplRgb",0);
			currentCustomShader->setUniformValue("samplBump",1);
			currentCustomShader->setUniformValue("samplSpec",2);
            currentCustomShader->setUniformValue("alphaLimit",m.FlagAlphaValue() );
			currentCustomShader->setUniformValue("spec_col",m.r,m.g,m.b);
			currentCustomShader->setUniformValue("spec_exp",m.specular);

			currentCustomShader->setUniformValue("usePerVertColor", (colorMode==0)?GLfloat(-1):GLfloat(1));
			usingProgram = true;
		}
		else if (bumpmapActivated) {

			int w;
            if (m.HasSpec()) w=NM_SHINE ;
            else if (alphaShine) w=NM_IRON;
            else if ( m.FlagAlphaTest()||m.FlagBlend() ) w=NM_ALPHA;
			else w=NM_PLAIN;

			QOpenGLShaderProgram* p = initFramPrograms(w, bumpmapUsingGreen);
			if (p)  {
				p->setUniformValue("usePerVertColor", (colorMode==0)?GLfloat(-1):GLfloat(1));
				p->setUniformValue("spec_col",m.r,m.g,m.b);
				p->setUniformValue("spec_exp",m.specular);
				p->setUniformValue("samplRgb",0);
				p->setUniformValue("samplBump",1);
				p->setUniformValue("samplSpec",2);
			}
		} else {
			// disable bump texture
			glActiveTexture(GL_TEXTURE1); glDisable(GL_TEXTURE_2D);
			glActiveTexture(GL_TEXTURE2); glDisable(GL_TEXTURE_2D);
			glActiveTexture(GL_TEXTURE0);

			if (alphaShine){
				glLightModeli(GL_LIGHT_MODEL_COLOR_CONTROL,GL_SEPARATE_SPECULAR_COLOR);
                setSpec( 1.0 );
				float ones[4]={1,1,1,1};
				glMaterialfv(GL_FRONT_AND_BACK, GL_SPECULAR, ones);
				glMateriali(GL_FRONT_AND_BACK,GL_SHININESS, (int)m.specular);

				QOpenGLShaderProgram* p = initFramPrograms(SHADER_IRON, false);
				if (p) {
					p->setUniformValue("spec_col",m.r,m.g,m.b);
					p->setUniformValue("samplRgb",0);
				}
			}

		}


	}

}

void GLWidget::renderBrfItem(const BrfBody& b){

	renderBody(b);
}

void GLWidget::renderBrfItem(const BrfAnimation& a){
    float fi = floatMod( relTime*runningSpeed , (int)a.frame.size() );
	int fii = int(fi);
	if (selFrameN!=fii) emit(signalFrameNumber(fii+1));
	selFrameN = fii;

	//if (runningState==STOP) fi=a.frame.size()-1;
	if (!reference) return;


	int si = reference->getOneSkeleton( int(a.nbones ), selRefSkel );
	if (si==-1) return ; // no skel, no render
	const BrfSkeleton &s(reference->skeleton[si]);


	BrfBody *b = NULL;

	if (useHitboxes ) {
		int bi = hitBoxes->Find(s.name,BODY);
		if (bi>=0) b = &(hitBoxes->body[bi]);
	}

	for (int pass=0; pass<2; pass++) {
		if (pass==0) {
			// shadow pass
			if (!useFloorInAni) continue; // no shoadows in no floor
			setShadowMode(true);
		}

		if (selRefSkin>=0) {
			for (unsigned int i=0; i<reference->mesh.size(); i++){
				if (reference->mesh[i].name[4]==char('A'+selRefSkin))
					renderSkinnedMesh(reference->mesh[i],s,a,fi);
			}
		} else {
			if (!b) renderAnimation(a,s,fi); // naked bones
		}
		if (pass==0) setShadowMode(false);
	}

	if (b)  renderBody( *b, s, a, fi , selRefSkin>=0);



}

//int tmpHack;

void GLWidget::renderBrfItem(const BrfSkeleton& p){
	renderFloor();
	BrfBody *b = NULL;
	if (useHitboxes ) {
		int bi = hitBoxes->Find(p.name,BODY);
		if (bi>=0) b = &(hitBoxes->body[bi]);
	}

	BrfAnimation *a =  NULL;
	if (selRefAnimation>=0) a = &(reference->animation[selRefAnimation]);
    float frameNum = (!a)?0:floatMod( relTime*runningSpeed , (int)a->frame.size());

	bool skinRendered = false;
	// draw skin
	if (selRefSkin>=0) {
		if (!b) ghostMode=true;
		char skinIdeChar =char('A'+selRefSkin);
		//skinIdeChar = char('A'+tmpHack++);
		for (unsigned int i=0; i<reference->mesh.size(); i++){
			if (reference->mesh[i].name[4]==skinIdeChar) {
				if (a) renderSkinnedMesh(reference->mesh[i],p,*a,frameNum);
				else renderMesh(reference->mesh[i],0);
				skinRendered = true;
			}
		}
		ghostMode=false;
		if (!b) glClear(GL_DEPTH_BUFFER_BIT);

	}

	if (a) {
		if (!b) /*|| !skinRendered)*/ renderAnimation(*a,p,frameNum); // render bones?
		if (b) renderBody( *b, p , *a, frameNum, selRefSkin>=0 );
	}else {
		if (!b) /*|| !skinRendered)*/ renderSkeleton(p);
		if (b) renderBody( *b, p , selRefSkin>=0 );
	}

}


void GLWidget::setShadowMode(bool on){
	shadowMode = on;
	if (on) {
		glPushMatrix();

		float bg_r = currBgColor.redF();
		float bg_g = currBgColor.greenF();
		float bg_b = currBgColor.blueF();
        /* compute shadow color */
        if (bg_r>0.3f) bg_r*=0.75f; else bg_r=bg_r*1.1f+0.15f;
        if (bg_g>0.3f) bg_g*=0.75f; else bg_g=bg_g*1.1f+0.15f;
        if (bg_b>0.3f) bg_b*=0.75f; else bg_b=bg_b*1.1f+0.15f;

        float c[4]={bg_r,bg_g,bg_b,1};
        //float c[4]={0,0,0,1};
		glEnable(GL_LIGHTING);
		glLightfv(GL_LIGHT1,GL_AMBIENT,c);
        glDisable(GL_LIGHT0);
        glEnable(GL_LIGHT1);
		glTranslatef(0,0,0);
		glScalef(1,0,1);
		glEnable(GL_COLOR_MATERIAL);
		glColor3f(1,1,1);
		glDisable(GL_COLOR_MATERIAL);
		glDisable(GL_DEPTH_TEST);
	}
	else {
		glPopMatrix();
		glEnable(GL_LIGHT0);
		glDisable(GL_LIGHT1);
		glEnable(GL_COLOR_MATERIAL);
		glEnable(GL_DEPTH_TEST);
	}
}

static float* vecf(float ff){
	static float f[4]; f[0]=f[1]=f[2]=ff; f[3]=1; return f;
}

void GLWidget::setWireframeLightingMode(bool wf, bool light, bool tex) {
	glEnable(GL_LIGHTING);
	if (ghostMode) {
		glDisable(GL_TEXTURE_2D);
		//glDisable(GL_LIGHTING);
        //glEnable(GL_FOG);

        setAmbientDiffuse( 0.7f, 0.5f);
        setSpec( 0.0 );
		return;
	}
	if (tex) {
		glEnable(GL_TEXTURE_2D);
	}
	else glDisable(GL_TEXTURE_2D);

	glDisable(GL_FOG);

	if (wf) {

		setAmbientDiffuse(
			(light ||  tex)?0.2 :0.75f,
			(light && !tex)?0.4f:0.0f
		);
		//setSpecularmap( 0 );


		//if (tex) glMaterialfv(GL_FRONT_AND_BACK,GL_EMISSION,vecf(1.0));
		//    else glMaterialfv(GL_FRONT_AND_BACK,GL_EMISSION,vecf(0.0));

		glPolygonMode(GL_FRONT,GL_LINE);
        glDisable(GL_POLYGON_OFFSET_LINE);
        glDisable(GL_POLYGON_OFFSET_FILL);
        //glLineWidth(3);
	} else {
        glLightfv(GL_LIGHT0,GL_DIFFUSE, (light)?vecf(0.75f):vecf(0));
        glLightfv(GL_LIGHT0,GL_SPECULAR,(light)?vecf(0.15f):vecf(0));
        glLightfv(GL_LIGHT0,GL_AMBIENT, (light)?vecf(0.1f ):vecf(1));
		glPolygonMode(GL_FRONT,GL_FILL);
        glEnable(GL_POLYGON_OFFSET_FILL);
        glDisable(GL_POLYGON_OFFSET_LINE);
        glPolygonOffset(+5,+1);
	}
}


void GLWidget::initDefaultTextures(){
	// small checkboard
	const int N = 16;
	QImage im(QSize(16,16),QImage::Format_ARGB32);
	for (int x=0; x<N; x++)
		for (int y=0; y<N; y++)
			if ((x+y)%2) im.setPixel(QPoint(x,y),0xFFFFFFFF);
			else im.setPixel(QPoint(x,y),0xFFAAAAFF);
	checkboardTexture = new QOpenGLTexture(im, QOpenGLTexture::GenerateMipMaps);
	checkboardTexture->setMinMagFilters(QOpenGLTexture::NearestMipMapLinear, QOpenGLTexture::Nearest);
	//glGetIntegerv(GL_TEXTURE_BINDING_2D, &checkboardTexture);

	tw=th=16;
	/* swy: was glTexParameteri(GL_TEXTURE_2D,GL_TEXTURE_MAG_FILTER,GL_NEAREST); */
	/* swy: was glTexParameteri(GL_TEXTURE_2D,GL_TEXTURE_MIN_FILTER,GL_NEAREST); */


	{
		QImage im(1,1,QImage::Format_ARGB32);
		im.setPixel(0,0,0xFFEEEEEE);
		dummyRgbTexture = new QOpenGLTexture(im, QOpenGLTexture::GenerateMipMaps);
		dummyRgbTexture->setMinMagFilters(QOpenGLTexture::NearestMipMapLinear, QOpenGLTexture::Nearest);
		/* swy: was glTexParameteri(GL_TEXTURE_2D,GL_TEXTURE_MAG_FILTER,GL_NEAREST); */
		/* swy: was glTexParameteri(GL_TEXTURE_2D,GL_TEXTURE_MIN_FILTER,GL_NEAREST); */
	}

	{
		QImage im(1,1,QImage::Format_ARGB32);
		im.setPixel(0,0,0xFF000000);
		dummySpecTexture = new QOpenGLTexture(im, QOpenGLTexture::GenerateMipMaps);
		dummySpecTexture->setMinMagFilters(QOpenGLTexture::NearestMipMapLinear, QOpenGLTexture::Nearest);
		/* swy: was glTexParameteri(GL_TEXTURE_2D,GL_TEXTURE_MAG_FILTER,GL_NEAREST); */
		/* swy: was glTexParameteri(GL_TEXTURE_2D,GL_TEXTURE_MIN_FILTER,GL_NEAREST); */
	}
	{
		QImage im(1,1,QImage::Format_ARGB32);
		im.setPixel(0,0,0xFF8080FF); // normal 0,1,0
		dummyNormTexture = new QOpenGLTexture(im, QOpenGLTexture::GenerateMipMaps);
		dummyNormTexture->setMinMagFilters(QOpenGLTexture::NearestMipMapLinear, QOpenGLTexture::Nearest);
		/* swy: was glTexParameteri(GL_TEXTURE_2D,GL_TEXTURE_MAG_FILTER,GL_NEAREST); */
		/* swy: was glTexParameteri(GL_TEXTURE_2D,GL_TEXTURE_MIN_FILTER,GL_NEAREST); */
	}

}

void GLWidget::setCheckboardTexture(){
	if (checkboardTexture) checkboardTexture->bind(QOpenGLTexture::BindingTarget2D); /* glBindTexture( GL_TEXTURE_2D, checkboardTexture); */
}

void GLWidget::setDummyRgbTexture(){
	if (dummyRgbTexture) dummyRgbTexture->bind(QOpenGLTexture::BindingTarget2D); /* glBindTexture(GL_TEXTURE_2D, dummyRgbTexture ); */
}
void GLWidget::setDummySpecTexture(){
	glActiveTexture(GL_TEXTURE2);
	if (dummySpecTexture) dummySpecTexture->bind(QOpenGLTexture::BindingTarget2D); /* glBindTexture(GL_TEXTURE_2D, dummySpecTexture ); */
	glActiveTexture(GL_TEXTURE0);
}
void GLWidget::setDummyNormTexture(){
	glActiveTexture(GL_TEXTURE1);
	if (dummyNormTexture) dummyNormTexture->bind(QOpenGLTexture::BindingTarget2D); /* glBindTexture(GL_TEXTURE_2D, dummyNormTexture ); */
	glActiveTexture(GL_TEXTURE0);
	bumpmapActivated = true; bumpmapUsingGreen = false;
}

bool GLWidget::fixTextureFormat(QString st){

	FILE* f = fopen(st.toUtf8(), "rb");
	if (!f) return false;
	unsigned int h[22]; // header
	fread(h,4 , 22,f); // 4 = sizeof uint
	if (h[0]!=0x20534444) {fclose(f); return false;}// "DDS "
	bool dxt1 = (h[21] ==  0x31545844);
	bool dxt5 = (h[21] ==  0x35545844);
	if (!dxt1 && !dxt5 ) {fclose(f); return false;}
	if (h[5]!=0) {fclose(f); return false;} // problem was not the one expected
	h[5] = h[3]*h[4] / ((dxt1)?2:1);
	// to fix llod:
	if (h[7]==0) h[7] = 1; // at least one mipmap lvl
	rewind(f);
	if (fwrite(h,4,8,f)!=8) {fclose(f); return false;}
	fclose(f);
	return true;
}

void GLWidget::forgetChachedTextures(){
	::forgetChachedTextures();
}

void GLWidget::setTextureName(QString s, int origin, int texUnit){

	if (texUnit!=0) {
		glActiveTexture(GL_TEXTURE0 + texUnit);
	}
    glEnable(GL_TEXTURE_2D);
    DdsData data;
    data.location = origin;
	if (myBindTexture( s, data )){
		//glTexParameteri(GL_TEXTURE_2D,GL_TEXTURE_MAG_FILTER,GL_LINEAR);
		//glTexParameteri(GL_TEXTURE_2D,GL_TEXTURE_MIN_FILTER,GL_LINEAR_MIPMAP_LINEAR);
		setMaterialError(0);

        tw=data.sx;
		th=data.sy;
		ta=(data.ddxversion>=3);

		/* swy: try to guess the normal map channel encoding from the average color */
		/*      - green normal map RGBA/0X0Y: ~0      , ~0.50196, ~0,   ~0.50196    */
		/*      - blue  normal map RGBA/XY__: ~0.50196, ~0.50196, ~1.0, ~1.0        */
		if (ta && data.pixel_data_present     && /* swy: only formats with alpha channel like DXT3 and DXT5 make sense */
		    data.r <= 0.1f && data.b <= 0.1f  && /* swy: R_B_ should be almost zero/black */
		   (data.g >= 0.4f && data.g <= 0.6f) && /* swy: _G_A should contain the normals; which should be around 0.5 */
		   (data.a >= 0.4f && data.a <= 0.6f))
			nmgreen=true;
		else
			nmgreen=false;
		
        //qDebug("Settexture: ta=%d, name=%s",data.ddxversion,s.toLatin1().data());
	} else {
		setMaterialError(3); // format is wrong
		lastMatErr.texName=s;
		setCheckboardTexture();
	}
    emit(setTextureData(data));
	glEnable(GL_TEXTURE_2D);
	if (texUnit!=0) glActiveTexture(GL_TEXTURE0);

}

void GLWidget::setMaterialError(int i){
	if (lastMatErr.type!=i) {
		lastMatErr.type=i;
		emit(notifyCheckboardChanged());
	}
}



void GLWidget::setMaterialName(QString st){
	lastMatErr.matName=QString(st);

	BrfMaterial *m = inidata.findMaterial(st);
	if (m) {
		bumpmapActivated = false;
		lastMatErr.texName=QString("%1.dds").arg(st);
		QString s;
		if (useTexture) {
			s = locateOnDisk(QString(m->diffuseA),".dds",&(m->rgbLocation));
			if (!s.isEmpty()) setTextureName(s, m->rgbLocation,0 );
			else {
				setMaterialError(2); // file not found
				setCheckboardTexture();
			}
		} else {
			setDummyRgbTexture();
		}

		lastUsedShader = SHADER_FIXEDFUNC;
		if (useOpenGL2 && inferMaterial) {
			bool useN = useNormalmap && m->HasBump();
			bool useS = useSpecularmap && m->HasSpec();
			if (useN || useS) {
				if (useN) {
					QString b = locateOnDisk(QString(m->bump),".dds",&(m->bumpLocation));
					if (!b.isEmpty()) {
						setTextureName(b, m->bumpLocation ,1 );
						bumpmapActivated = true;
						bumpmapUsingGreen = nmgreen;
					}
				} else setDummyNormTexture();
				if (useS) {
					QString b = locateOnDisk(QString(m->spec),".dds",&(m->specLocation));
					if (!b.isEmpty()) {
						setTextureName(b, m->specLocation ,2 );
						bumpmapActivated = true;
					}
				} else setDummySpecTexture();
			}
			enableMaterial( *m );
		}

	}
	else {
		setMaterialError(1); // material not found
		setCheckboardTexture();
	}
}

// SLOTS
void GLWidget::setWireframe(bool i){
	useWireframe = i; update();
}
void GLWidget::setRuler(bool i){
	useRuler = i; update();
}
void GLWidget::setFloatingProbe(bool i){
	useFloatingProbe = i; update();
}
void GLWidget::setHitboxes(bool i){
	useHitboxes = i; update();
}
void GLWidget::setRulerLength(int i){
	rulerLength = i; update();
}
void GLWidget::setLighting(bool i){
	useLighting = i; update();
}
void GLWidget::setTexture(bool i){
	useTexture = i; update();
}
void GLWidget::setNormalmap(bool i){
	useNormalmap = i; update();
}
void GLWidget::setTransparency(bool i){
    useTransparency = i; update();
}
void GLWidget::setSpecularmap(bool i){
	useSpecularmap = i; update();
}
void GLWidget::setComparisonMesh(bool i){
	useComparisonMesh = i; update();
}
void GLWidget::setFloor(bool i){
	useFloor = i; update();
}
void GLWidget::setFloorForAni(bool i){
	useFloorInAni = i; update();
}
void GLWidget::setPlay(){
	defaultRunningState = runningState = PLAY;
	update();
}
void GLWidget::setPause(int i){
	if (i!=-1) {
		relTime = (int)((i-1+runningSpeed/2)/runningSpeed);
	}
	defaultRunningState = runningState = PAUSE;
	update();
}
void GLWidget::setStepon(){
	relTime=relTime+int(1.0/runningSpeed);
	defaultRunningState = runningState = PAUSE;
	update();
}
void GLWidget::setStepback(){
	relTime=relTime-int(1.0/runningSpeed);
	defaultRunningState = runningState = PAUSE;
	selFrameN--;
	update();
}
void GLWidget::clearExtraMatrix(){
	for (int i=0; i<16; i++) extraMatrix[i]=((i%5)==0);
}

void GLWidget::setStop(){
	defaultRunningState = runningState = STOP;
	relTime=0;
	if (!skeletalAnimation()) {
		selFrameN = 1;
		emit(signalFrameNumber(selFrameN));
	}
	update();
}
void GLWidget::setColorPerVert(){
	colorMode=1; update();
}
void GLWidget::setColorPerRig(){
	colorMode=2; update();
}
void GLWidget::setColorPerWhite(){
	colorMode=0; update();
}

void GLWidget::setSubSelected(int k){
	subsel = k;
	update();
}

void GLWidget::setSelection(const QModelIndexList &newsel, int k){
	if (k>=0) displaying=TokenEnum(k);

    bboxReady = false;

	selectNone();

    int _viewmodeMult = viewmodeMult;
    if (!data) _viewmodeMult=1;
    if (displaying!=MESH) {
        if (_viewmodeMult==2) _viewmodeMult=1;
    }

    //const char* pippo = "_none_";

    std::map< QString, int > basenameToVP;

    for (const auto &s : newsel ) {
        int i = s.row();
        lastSelected = i;

        int thisLod = (k==MESH && i < data->mesh.size()) ? data->mesh[ i ].lodLevel : 0;

        switch(_viewmodeMult ){
        case 0:
            // all in one viewport
            if (inViewport.size()==0) {
                inViewport.resize(1);
                inViewport[0].bestLod = 100;
            }
            inViewport[0].items.push_back(i);
            inViewport[0].bestLod = std::min(inViewport[0].bestLod,thisLod);
            break;
        case 2: {
            // it depends...
            int whichVp = -1;
            if (k==MESH && i < data->mesh.size()) {
                const char* base = data->mesh[ i ].baseName;

                auto ma = basenameToVP.find( QString(base) );

                if (ma!=basenameToVP.end()) {
                    whichVp = ma->second; // found!
                } else {
                    basenameToVP[ QString(base) ] = (int)inViewport.size();
                }
            }
            if (whichVp>-1) {
                inViewport[whichVp].items.push_back( i ); // add
                inViewport[whichVp].bestLod = std::min(inViewport[whichVp].bestLod,thisLod);
                break;
            }
            // else continue...
        }
        case 1: {
            // each in its viewport
            ViewportData tmp;
            tmp.items.push_back(i);
            tmp.bestLod =  thisLod;
            inViewport.push_back(tmp);

            } break;
        }
    }
	if (k==ANIMATION) {
		runningState = defaultRunningState;
		if (runningState!=PAUSE) relTime=0;
		selFrameN = -1; // so to resend frame changed next frame
	}

    if (k==MESH) {
        maybeApplyRenderOrder();

        /* autoupdate tangent dirs */
        //QTime t;int count = 0;t.start();

        for (const auto &s : newsel ) {
            BrfMesh&m (data->mesh[s.row()]);
            if (!m.StoresTangentField()) {
                if (!m.HasTangentField() &&autoComputeTangents)
                    m.ComputeTangents();
                else if (m.HasTangentField() && !autoComputeTangents)
                    m.ZeroTangents(); // it didn't have them stored, so lets clean them.
                //count++;
            }
        }
        /*if (count>0) {
            QString msg = QString("Auto-computed tangent dirs for %1 meshes in %2 msecs").arg(count).arg(t.elapsed());
            emit( displayInfo(msg,2000) );
            qDebug(msg.toLatin1().data());
        }*/
    }
	update();
}


void GLWidget::maybeApplyRenderOrder(){
    if (!data) return;
    if (displaying!=MESH) return;
    if (viewmodeMult==1) return;
    for (ViewportData& vd : inViewport) {
        std::vector< std::pair<int,int> > ro( vd.items.size() );
        for (uint i=0; i<min(vd.items.size(), data->mesh.size()); i++) {
            BrfMaterial *mat = inidata.findMaterial( data->mesh[vd.items[i]].material );
            ro[i].first=(mat)? mat->FlagRenderOrder() : 0;
            ro[i].second = vd.items[i];
        }
        std::sort( ro.begin(), ro.end());
        for (uint i =0; i<ro.size(); i++){
            vd.items[i]= ro[i].second;
        }

        /*
         for (uint i =0; i<ro.size(); i++){
            qDebug("%s, (%d)",data->mesh[vd.items[i]].name, ro[i]);
        }qDebug("\n\n");*/
    }


}

/*

void GLWidget::maybeHideLods(){
    if (!data) return;
    if (displaying!=MESH) return;
    if (viewmodeMult !=2) return;

    int max=(int)data->mesh.size();
    if (max>=MAXSEL) max=MAXSEL-1;

    std::vector<int> minLod;
    minLod.resize(nViewports, 999);

    for (int i=0; i<max; i++) if (selGroup[i]) {
        int j =  selViewport[i];
        assert(j>=0);
        if (data->mesh[i].lodLevel<minLod[j]) {
            minLod[j] = data->mesh[i].lodLevel;
        }
    }
    for (int i=0; i<max; i++) if (selGroup[i]) {
        int j =  selViewport[i];
        assert(j>=0);
        if (data->mesh[i].lodLevel>minLod[j]) {
            // hide it!
            selViewport[i] |= (1<<30);
            //selViewport[i] = -1;
            //selGroup[i] = false;
        }
    }
}

void GLWidget::distributeSelectedInViewports(){

    int _viewmodeMult = viewmodeMult;
    if (!data  ) _viewmodeMult=1;
    if (displaying!=MESH) {
        if (_viewmodeMult==2) _viewmodeMult=1;
    }

    nViewports = -1;


    for (int i=0; i<maxSel; i++) {
        if (selGroup[i]) {
            if (_viewmodeMult == 0) {
                selViewport[i] = nViewports = 0;
            }
            if (_viewmodeMult == 1) {
                nViewports++;
                selViewport[i] = nViewports;
            }
            if (_viewmodeMult == 2) {
                char* base = data->mesh[ i ].baseName;
                if (strcmp( pippo, base )!=0) {
                    // new group
                    nViewports++;
                    pippo = base;
                }
                selViewport[i] = nViewports; // show this nmesh
            }
        }
        else selViewport[i] = -1;
    }
    nViewports ++;
}*/



void _subdivideScreen(int nsel,int w,int h, int *ncol, int *nrow, float verticalBias){
	if (nsel<=1) {*ncol = 1; *nrow = 1; return; }


	if (w<h) { _subdivideScreen( nsel,h,w, nrow, ncol, 1.0/verticalBias ); }
	else {
		int best = 0;
		for (int n=(int)(ceil(sqrt(double(nsel)))); n>=1; n--) {
			int m = (nsel+n-1)/n;
			int score;
			score = std::min( float(w)/m*verticalBias , float(h)/n );
			if (score>best) {
				*ncol = m;
				*nrow = n;
				best=score;
			}

		}
	}
}

QString GLWidget::getCurrentShaderDescriptor() const{
	QString st =  (lastUsedShaderBumpgreen)?tr("\"green\" NM"):tr("\"blue\" NM");
	if (currentCustomShader!=NULL) {

		return QString(tr("Custom User Shader"));
	} else
		switch (lastUsedShader) {
		case SHADER_FIXEDFUNC: return tr("Default (fixed functionality)");
		case SHADER_IRON: return tr("Alpha to Shininess");
		case NM_PLAIN: return tr("Plain NormalMap (%1)").arg(st);
		case NM_ALPHA: return tr("NormalMap + Alpha to Transparency (%1)").arg(st);
		case NM_IRON: return tr("NormalMap + Alpha to Shininess (%1)").arg(st);
		case NM_SHINE: return tr("NormalMap + ShininessMap (%1)").arg(st);
		default: return "ERROR";
		}
}
QString GLWidget::getCurrentShaderLog() const{

	if (currentCustomShader!=NULL) {
		QString res = currentCustomShader->log();
		return res.replace("\n","<br />");
	} else
		switch (lastUsedShader) {
		case SHADER_FIXEDFUNC: return "";
		default: return shaderLog[lastUsedShader][lastUsedShaderBumpgreen] ;
			//(shaderProgram[lastUsedShader][lastUsedShaderBumpgreen])->log();
		}

}


GLWidget::~GLWidget()
{
	//makeCurrent();
	//glDeleteLists(object, 1);
}

void GLWidget::setViewmodeMult(int i){
	viewmodeMult=i;
	update();
}
void GLWidget::setViewmode(int i){
	viewmode=i;
	closingUp = 0;
	if (i==2) {
		setFocusPolicy(Qt::WheelFocus);
		this->setFocus();
		float ph = phi*M_PI/180.0;
		float K = 1;
		avatP=
		    lastCenter +
            vcg::Point3f(sin(ph)*dist/lastScale*K,0.6f,cos(ph)*dist/lastScale*K);
		//qDebug("Scale = %f",lastScale);
		emit(displayInfo(tr("Scene mode: navigate with mouse and WASD (levitate with wheel, zoom in with shift)"), 10000));
	} else {
		//setFocusPolicy(Qt::NoFocus);
		setFocusPolicy(Qt::WheelFocus);
		if (i==1)
			emit(displayInfo(tr("Helmet mode: for objects with vertical Z axis, like M&B helmets or weapons."), 8000));
		else
			emit(displayInfo(tr("Default mode: rotate objects with mouse, zoom in/out with wheel."), 8000));
	}
	update();
}

void GLWidget::onTimer(){

	QTime qtime = QTime::currentTime();
	int time =( qtime.msec()+qtime.second()*1000 +qtime.minute()*60000);
	static int lasttime=-1;
	static int done;
	if (lasttime==-1) {lasttime=time; done=time;}
	int elapsed = time-lasttime;
	if (elapsed<0) {
		lasttime = -1;
		return;
	}
	lasttime=time;

	bool needUpdate=false;

	if (useFloatingProbe) {
		floatingProbePulseColor += elapsed;
		needUpdate = true;
	}
	//BrfAnimation::curFrame = BrfMesh::curFrame = time;
	if (animating && runningState==PLAY) {
		relTime += elapsed;
		needUpdate=true;
	}
	if (viewmode==2) {
		if (currViewmodeInterior<1) {
			currViewmodeInterior+=0.125;
			needUpdate=true;
		}
	} else {
		if (currViewmodeInterior>0) {
			currViewmodeInterior-=0.125;
			needUpdate=true;
		}
	}
	if (viewmode==1) {
		if (currViewmodeHelmet<1) {
			currViewmodeHelmet+=0.125;
			needUpdate=true;
		}
	} else {
		if (currViewmodeHelmet>0) {
			currViewmodeHelmet-=0.125;
			needUpdate=true;
		}
	}
	if (viewmode==2) {
        const float acc = 0.006f;
		float ph = phi*M_PI/180.0;
		for (; done<time; done+=10) {
            if (keys[0]) avatV-=vcg::Point3f(sin(ph),0,cos(ph))*acc*0.8f ;
            if (keys[1]) avatV+=vcg::Point3f(sin(ph),0,cos(ph))*acc*0.8f ;
			if (keys[2]) avatV+=vcg::Point3f(cos(ph),0,-sin(ph))*acc ;
            if (keys[3]) avatV-=vcg::Point3f(cos(ph),0,-sin(ph))*acc*0.7f ;
			if (!keys[4]) {
				if (closingUp>0) {
					closingUp-=1/16.0;
					needUpdate=true;
				}
			} else {
				if (closingUp<1) {
					closingUp+=1/16.0;
					needUpdate=true;
				}
			}
			if (avatV.SquaredNorm()>0.00001) {
				needUpdate=true;
			}
            avatV*=0.95f;
			avatP+=avatV;

		}
	}
	if (needUpdate) update();
}



QSize GLWidget::minimumSizeHint() const
{
	return QSize(150, 350);
}

QSize GLWidget::sizeHint() const
{
	return QSize(800, 800);
}


int GLWidget::readCustomShaders(){


	//WIP:

	customShaders.clear();

	QDomDocument doc( "CustomPreviewShaders" );

	QString filename("customPreviewShaders.xml");
	QFile file( filename );
	if( !file.open( QIODevice::ReadOnly ) ) {
		//QMessageBox::information( this, QString("test"),QString("FILE NOT FOUND"));
		return -1;
	}
	if( !doc.setContent( &file ) ) { file.close();
		QMessageBox::information( this, QString("openBRF"),tr("Error parsing %1:\n\nmaybe the problem is that a shader uses the sign (<) or (>) or (&)?\n\n(it's xml: must use &lt; or &gt; or &amp; instead!)").arg(filename));
		return -2; }
	file.close();

	QDomElement root = doc.documentElement();

	QDomNode n = root.firstChild();

	while( !n.isNull() ){
		QDomElement e = n.toElement();
		if ( e.isNull() ) continue;

		if( e.tagName() == "previewShader" ) {
			QDomNode n1 = n.firstChild();
			QString tech="(default)",vert,frag;

			while( !n1.isNull() ){
				QDomElement e1 = n1.toElement();


				if ( e1.isNull() ) continue;

				if ( e1.tagName() == "techniques" ) tech = e1.text();
				else if ( e1.tagName() == "vertexProgram" ) vert = e1.text();
				else if ( e1.tagName() == "fragmentProgram" ) frag = e1.text();
				else {
					QMessageBox::information( this, "OpenBRF",
					                          QString("Unknown tag in customShader file:\n%1\n").arg(e1.tagName())
					                          );
					return -1;
				}
				n1 = n1.nextSibling();

			}
			n = n.nextSibling();

			QOpenGLShaderProgram *s = new QOpenGLShaderProgram();

			QStringList techList = tech.split(",",Qt::SkipEmptyParts );

			bool ok = false;
			if (s->addShaderFromSourceCode(QOpenGLShader::Vertex,vert))
				if (s->addShaderFromSourceCode(QOpenGLShader::Fragment,frag))
					if (s->link()) {
						for (int i=0; i<techList.size(); i++) {
							customShaders[techList[i].trimmed() ] = s;
							//qDebug("Adding '%s'...",techList[i].trimmed().toLatin1().data());
						}
						ok = true;
					}
			if (!ok)
				QMessageBox::warning( this, "OpenBRF",
				                      QString("Error reading custom shader:\n%1\n").arg(s->log())
				                      );




			/*QMessageBox::information(
					this, QString("test"),
					QString("Techniques:\n%1\n\nvert:\n%2\n\nfrag:\n%3\n").arg(tech).arg(vert).arg(frag)
				);*/
		}


	}

	return 1;

}

void GLWidget::initOpenGL2(){
	if (openGL2ready) return;
    qDebug("Init glew1!");
    //glewInit();
	//initFramPrograms();
    qDebug("Init glew2!");

	/* swy: retrieve the list of supported OpenGL extensions; first as a long space-separated string,
	        then split into a QtSet dictionary for fast lookups */
	const char *longSausageString = (const char *) glGetString(GL_EXTENSIONS);
	supportedExtensionsList = QString(longSausageString).split(" "); qDebug() << supportedExtensionsList;

	if (supportedExtensionsList.contains("GL_EXT_texture_filter_anisotropic"))
	{
		glGetIntegerv(GL_MAX_TEXTURE_MAX_ANISOTROPY_EXT, &maxSupportedTexAnisoTaps);
		qDebug("swy: GL_EXT_texture_filter_anisotropic is supported, with x%u taps...", maxSupportedTexAnisoTaps);
	}

	/* swy: here's a good example about why C++ is an overcomplicated mess that tries to helpfully save you time
	        by being a pain in the rear and fails spectacularly; you can check for != but not for >= */
	QOpenGLVersionProfile glProf(format()); QPair<int, int> r = glProf.version(); int glVersion = (r.first * 10) + r.second;

	if (supportedExtensionsList.contains("GL_ARB_framebuffer_object") ||
	    supportedExtensionsList.contains("GL_EXT_framebuffer_object") || glVersion >= 30)
	{
		qDebug("swy: GL_ARB_framebuffer_object / GL_EXT_framebuffer_object is supported... We can blit MSAA surfaces into a resolved buffer for the floating probe.");
		frameBuffersAreSupported = true;
	}

	openGL2ready = true;

	readCustomShaders();

}

void GLWidget::initializeGL()
{

    initializeOpenGLFunctions();

	openGL2ready = false;
	initDefaultTextures();
	glEnable(GL_DEPTH_TEST);
	glEnable(GL_CULL_FACE);
    float c[4] = {0,0,0,0};
    glLightModelfv(GL_LIGHT_MODEL_AMBIENT,c);

}

void GLWidget::setUseOpenGL2(bool mode){
	if (mode == useOpenGL2) return;
	useOpenGL2 = mode;
	update();
}

void  GLWidget::selectNone(){
    inViewport.clear();
    /*memset( selGroup, 0, MAXSEL * sizeof(bool));
    selected = -1;*/
}

const int N_BONES_COLORS=13;
#define f 0.5f
Point3f boneColor[N_BONES_COLORS]={
  Point3f( 1,1,1),
  Point3f( 1,1,0),
  Point3f( 1,0,1),
  Point3f( 1,0,0),
  Point3f( 0,1,1),
  Point3f( 0,1,0),
  Point3f( 0,0,1),

  Point3f( 1,1,f),
  Point3f( 1,f,1),
  Point3f( 1,f,f),
  Point3f( f,1,1),
  Point3f( f,1,f),
  Point3f( f,f,1),
};
#undef f

void BrfSkinning::SetColorGl()const{
	Point3f c(0,0,0);
	for (int j=0; j<4; j++) {
		if (boneIndex[j]>-1) c+= boneColor[ boneIndex[j]%N_BONES_COLORS ]*boneWeight[j];
	}
	glColor3fv((GLfloat*)&c);
	//glColor3f(boneColor[2][0],boneColor[2][1],boneColor[2][2]);
}

bool GLWidget::skeletalAnimation(){
	if (displaying==MESH) {

        for (int i=0; i<(int)inViewport.size(); i++) {
            for (int j=0; j<(int)inViewport[i].items.size(); j++)
            {
                int k = inViewport[i].items[j];
                if ((int)data->mesh.size() < k)
                    if (data->mesh[k].IsSkinned()) return true;
            }
		}
	}
	return false;

}

void GLWidget::renderSkinnedMesh(const BrfMesh& m,  const BrfSkeleton& s, const BrfAnimation& a, float frame){
	if (useOpenGL2) initOpenGL2();
	int fv =selFrameN;

    if (fv>=(int)m.frame.size()) fv= (int)m.frame.size()-1;
	if (fv<0) fv= 0;

	if ((int)s.bone.size()!=a.nbones || m.maxBone>a.nbones) {
        if (!shadowMode) renderMesh(m,fv); // give up skinning mesh
		return;
	}

	if (!shadowMode) {
		glEnable(GL_COLOR_MATERIAL);
		glColor3f(1,1,1);
		if ((!m.IsSkinned() && colorMode==2)|| colorMode==0) glDisable(GL_COLOR_MATERIAL);
	}

	int fi= (int)frame;
	vector<Matrix44f> bonepos = s.GetBoneMatrices( a.frame[fi] );

	for (int pass=(useWireframe&&!shadowMode)?0:1; pass<2; pass++) {
		if (!shadowMode) setWireframeLightingMode(pass==0, useLighting, useTexture);
		if (pass==1 && !shadowMode) setMaterialName(m.material);

		glBegin(GL_TRIANGLES);
		for (unsigned int i=0; i<m.face.size(); i++) {
			for (int j=0; j<3; j++) {

                const BrfSkinning &skn (m.skinning[ m.vert[ m.face[i].index[j] ].index ]);
				if (!shadowMode) {
					if (colorMode==2) skn.SetColorGl();
					else {
						GLubyte* c = (GLubyte*)&m.vert[ m.face[i].index[j] ].col;
						glColor3ub( c[2],c[1],c[0] );
					}
				}

				//glNormal(vert[face[i].index[j]].__norm);
				const Point3f &norm(m.frame[fv].norm[        m.face[i].index[j]        ]);
				const Point3f &tang(m.vert[                  m.face[i].index[j]        ].tang);
				const int     &tiv (m.vert[                  m.face[i].index[j]        ].tangi);
				const Point3f &pos (m.frame[fv].pos [ m.vert[m.face[i].index[j]].index ]);
				Point3f v(0,0,0);
				Point3f n(0,0,0);
				Point3f t(0,0,0);
				int ti = 0;
				for (int k=0; k<4; k++){
					float wieght = skn.boneWeight[k];
					int       bi = skn.boneIndex [k];
					if (bi>=0 && bi<(int)bonepos.size()) {
						v += (bonepos[bi]* pos  )*wieght;
						n += (bonepos[bi]* norm - bonepos[bi]*Point3f(0,0,0) )*wieght;
						if (bumpmapActivated){
							t += (bonepos[bi]* tang - bonepos[bi]*Point3f(0,0,0) )*wieght;
							ti = tiv;
						}
					}
				}
				glNormal(n);
				glTexCoord(m.vert[m.face[i].index[j]].ta);
				if (bumpmapActivated) {

					glMultiTexCoord3fv(GL_TEXTURE1,t.V());
					glMultiTexCoord1i (GL_TEXTURE2,ti );

				}
				glVertex(v);
			}
		}
		glEnd();
	}
	if (!shadowMode) {
		glDisable(GL_TEXTURE_2D);
		enableDefMaterial();
	}
}

void GLWidget::renderMeshSimple(const BrfMesh &m){

	glDisable(GL_POLYGON_OFFSET_LINE);
	glPolygonMode(GL_FRONT,GL_FILL);
	glDisable(GL_LIGHTING);
	glBegin(GL_TRIANGLES);
	for (unsigned int i=0; i<m.face.size(); i++) {
		for (int j=0; j<3; j++) {
			glVertex(m.frame[0].pos [ m.vert[m.face[i].index[j]].index ]);
		}
	}
	glEnd();
	glEnable(GL_LIGHTING);

}

void GLWidget::renderMesh(const BrfMesh &m, float frame){

	if (useOpenGL2) initOpenGL2();

	int framei = (int) frame;

	glEnable(GL_COLOR_MATERIAL);
	glColor3f(1,1,1);

	int cm = colorMode;
	if (!m.IsSkinned() && cm==2) cm = 0;

	if (cm==0) glDisable(GL_COLOR_MATERIAL);


	for (int pass=(useWireframe)?0:1; pass<2; pass++) {
		setWireframeLightingMode(pass==0, useLighting, useTexture);
		if (pass==1) setMaterialName(m.material);
		glBegin(GL_TRIANGLES);
		for (unsigned int i=0; i<m.face.size(); i++) {
			for (int j=0; j<3; j++) {
				if (cm==2)
                    m.skinning[ m.vert[ m.face[i].index[j] ].index ].SetColorGl();
				else {
					GLubyte* c = (GLubyte*)&m.vert[ m.face[i].index[j] ].col;
					glColor3ub( c[2],c[1],c[0] );
				}

				//glNormal(vert[face[i].index[j]].__norm);
				glNormal(m.frame[framei].norm[      m.face[i].index[j]        ]);
				glTexCoord(m.vert[m.face[i].index[j]].ta);

				if (bumpmapActivated) {
					glMultiTexCoord3fv(GL_TEXTURE1,  m.vert[m.face[i].index[j]].tang.V());
					glMultiTexCoord1i (GL_TEXTURE2,  m.vert[m.face[i].index[j]].tangi );
				}
				glVertex(m.frame[framei].pos [ m.vert[m.face[i].index[j]].index ]);

			}
		}
		glEnd();
	}
	glDisable(GL_TEXTURE_2D);
    if (inferMaterial){
		glActiveTexture(GL_TEXTURE1); glDisable(GL_TEXTURE_2D); glActiveTexture(GL_TEXTURE0);
	}
	enableDefMaterial();
}

void GLWidget::renderCylWire(float rad, float h) {
	const int N = 10;
	h/=2;
	const float S = (float)(1/sqrt(2.0));
	for (int i=0; i<N; i++) {
		float ci = (float)cos(2.0*i/N*3.1415);
		float si = (float)sin(2.0*i/N*3.1415);

		glBegin(GL_LINE_LOOP);
		glNormal3f( 0, si, ci );
		glVertex3f( h, rad*si, rad*ci );

		glNormal3f( S, S*si, S*ci );
		glVertex3f( h+rad*S, S*rad*si, S*rad*ci );

		glNormal3f( 1, 0, 0 );
		glVertex3f( h+rad, 0, 0 );

		glNormal3f( S, -S*si, -S*ci );
		glVertex3f( h+rad*S, -S*rad*si, -S*rad*ci );

		glNormal3f( 0, -si, -ci );
		glVertex3f( h, -rad*si, -rad*ci );
		glNormal3f( 0, -si, -ci );
		glVertex3f(-h, -rad*si, -rad*ci );

		glNormal3f( -S, -S*si, -S*ci );
		glVertex3f( -h-rad*S, -S*rad*si, -S*rad*ci );

		glNormal3f(-1, 0, 0 );
		glVertex3f(-h-rad, 0, 0 );

		glNormal3f( -S, S*si, S*ci );
		glVertex3f(-h-rad*S, S*rad*si, S*rad*ci );

		glNormal3f( 0, si, ci );
		glVertex3f(-h, rad*si, rad*ci );
		glEnd();
	}
	int K = int(h / rad * 3);
	if (K>5) K = 5;if (K<1) K = 1;
	int K0 = (!K)?1:K;
	for (int j=-K; j<=+K; j++) {
		glBegin(GL_LINE_LOOP);
		for (int i=0; i<N; i++) {
			float ci = (float)cos(2.0*i/N*3.1415);
			float si = (float)sin(2.0*i/N*3.1415);
			glNormal3f(0,si,ci);
			glVertex3f( h*j/K0, rad*si, rad*ci );
		}
		glEnd();
	}
}

void GLWidget::renderSphereWire() {
	for (int i=0; i<10; i++) {
		glBegin(GL_LINE_STRIP);
		float ci = (float)cos(2.0*i/10.0*3.1415);
		float si = (float)sin(2.0*i/10.0*3.1415);
		for (int j=0; j<10; j++) {
			float cj = (float)cos(2.0*j/10.0*3.1415);
			float sj = (float)sin(2.0*j/10.0*3.1415);
			glVertex3f( ci, si*cj, si*sj );
		}
		glEnd();
	}
	for (int i=0; i<10; i++) {
		glBegin(GL_LINE_STRIP);
		float ci = (float)cos(2.0*i/10.0*3.1415);
		float si = (float)sin(2.0*i/10.0*3.1415);
		for (int j=0; j<10; j++) {
			float cj = (float)cos(2.0*j/10.0*3.1415);
			float sj = (float)sin(2.0*j/10.0*3.1415);
			glVertex3f( cj, sj*ci, sj*si );
		}
		glEnd();
	}
}
void GLWidget::renderOcta(int brightness){
	glBegin(GL_TRIANGLE_FAN);

	glColor3ub(brightness*8/10,235,brightness*8/10);
	glNormal3f(+1,0,0);
	glVertex3f(+1,0,0);
	glColor3ub(brightness,brightness,255);
	glNormal3f(0,-1,0);
	glVertex3f(0,-1,0);
	glNormal3f(0,0,+1);
	glVertex3f(0,0,+1);
	glNormal3f(0,+1,0);
	glVertex3f(0,+1,0);
	glNormal3f(0,0,-1);
	glVertex3f(0,0,-1);
	glNormal3f(0,-1,0);
	glVertex3f(0,-1,0);
	glEnd();

	glBegin(GL_TRIANGLE_FAN);
	glNormal3f(-1,0,0);
	glVertex3f(-1,0,0);
	glNormal3f(0,-1,0);
	glVertex3f(0,-1,0);
	glNormal3f(0,0,-1);
	glVertex3f(0,0,-1);
	glNormal3f(0,+1,0);
	glVertex3f(0,+1,0);
	glNormal3f(0,0,+1);
	glVertex3f(0,0,+1);
	glNormal3f(0,-1,0);
	glVertex3f(0,-1,0);
	glEnd();

}

void GLWidget::renderBodyPart(const BrfBody &p, const BrfSkeleton &s, int i, int lvl){
	glPushMatrix();
	glTranslate(s.bone[i].t);
	Matrix44f mat = s.bone[i].getRotationMatrix();
	glMultMatrixf((const GLfloat *) mat.V());
	if (i==subsel) glLineWidth(2);
	renderBodyPart(p.part[i]);
	if (i==subsel) glLineWidth(1);
	for (unsigned int k=0; k<s.bone[i].next.size(); k++){
		renderBodyPart(p,s,s.bone[i].next[k],lvl+1);
	}
	glPopMatrix();
}

void GLWidget::renderBodyPart(const BrfBody &p, const BrfSkeleton &s, const BrfAnimation &a, float frame, int i, int lvl) {
	glPushMatrix();
	glTranslate(s.bone[i].t);
	Matrix44f mat = a.frame[(int) frame].getRotationMatrix(i);
	glMultMatrixf((const GLfloat *) mat.V());
	//glMultMatrixf(bone[i].mat);
	if (i==subsel) glLineWidth(2);
	renderBodyPart(p.part[i]);
	if (i==subsel) glLineWidth(1);
	for (unsigned int k=0; k<s.bone[i].next.size(); k++){
		renderBodyPart(p,s,a,frame,s.bone[i].next[k],lvl+1);
	}
	glPopMatrix();
}


void GLWidget::renderBone(const BrfSkeleton &s, int i, int lvl) {
	glPushMatrix();
	glTranslate(s.bone[i].t);
	Matrix44f mat = s.bone[i].getRotationMatrix();

	glMultMatrixf((const GLfloat *) mat.V());
	//glMultMatrixf(bone[i].mat);
	glPushMatrix();
	glScalef(BrfSkeleton::BoneSizeX(),BrfSkeleton::BoneSizeY(),BrfSkeleton::BoneSizeZ());
	renderOcta(255-lvl*30);
	glPopMatrix();
	for (unsigned int k=0; k<s.bone[i].next.size(); k++){
		renderBone(s,s.bone[i].next[k],lvl+1);

	}
	glPopMatrix();
}


void GLWidget::renderBone(const BrfAnimation &a,const BrfSkeleton &s, float frame, int i, int lvl) {
	int fi= (int) frame;
	//int fi= (glWidget->frame/100)%(int)frame.size();
	vcg::Matrix44f mat = a.frame[fi].getRotationMatrix(i);

	glPushMatrix();
	glTranslate(s.bone[i].t);
	/*if (lvl!=0);*/ glMultMatrixf((const GLfloat *) mat.V());

	glPushMatrix();
	glScalef(BrfSkeleton::BoneSizeX(),BrfSkeleton::BoneSizeY(),BrfSkeleton::BoneSizeZ());
	renderOcta(255-lvl*30);
	glPopMatrix();
	for (unsigned int k=0; k<s.bone[i].next.size(); k++){
		renderBone(a,s,  frame,  s.bone[i].next[k],lvl+1);
	}
	glPopMatrix();
}


void GLWidget::renderSkeleton(const BrfSkeleton &s){
	if (!shadowMode) {
		glEnable(GL_COLOR_MATERIAL);
		setWireframeLightingMode(false,true,false);
	}

	renderBone(s,s.root,0);

}


void GLWidget::renderBody(const BrfBody& b,const BrfSkeleton& s, bool useGhost){

	if (b.part.size()!=s.bone.size()) return;
	glEnable(GL_COLOR_MATERIAL);

	if (useGhost) {
		glEnable(GL_BLEND);
		glDisable(GL_DEPTH_TEST);
		setWireframeLightingMode(false,false,false);
		renderBodyPart(b,s,s.root,0);
		glEnable(GL_DEPTH_TEST);
		glDisable(GL_BLEND);
	}
	setWireframeLightingMode(false,true,false);
	renderBodyPart(b,s,s.root,0);
}

void GLWidget::renderBody(const BrfBody& b,const BrfSkeleton& s,const BrfAnimation& a,float frame, bool useGhost){
	if (b.part.size()!=s.bone.size()) return;
	glEnable(GL_COLOR_MATERIAL);
	setWireframeLightingMode(false,true,false);
	glTranslate(a.frame[(int)frame].tra);
	if (useGhost) {
		glEnable(GL_BLEND);
		glDisable(GL_DEPTH_TEST);
		renderBodyPart(b,s,a,frame,s.root,0);
		glEnable(GL_DEPTH_TEST);
		glDisable(GL_BLEND);
	}
	renderBodyPart(b,s,a,frame,s.root,0);
}

void GLWidget::renderBody(const BrfBody& b){
	glEnable(GL_COLOR_MATERIAL);
	for (int pass=0; pass<2; pass++) {
		setWireframeLightingMode(false,true,false);
		if (pass==0) {
			if (!useFloatingProbe) {
				glEnable(GL_BLEND);
				glDisable(GL_DEPTH_TEST); // when using floathing probe, needs depth test
			}
		} else {
			glDisable(GL_BLEND);
			glEnable(GL_DEPTH_TEST);
		}
		for (int i=0; i<(int)b.part.size(); i++) {
			if (i==subsel && b.part.size()>1) glLineWidth(2); // thick lines as empahsis on selected subpart (if >1 subpart)
			renderBodyPart(b.part[i]);
			glLineWidth(1);
		}
	}
}



void GLWidget::renderAnimation(const BrfAnimation &a, const BrfSkeleton &s, float frame){
	if (!shadowMode) {
		setWireframeLightingMode(false,true,false);
		glEnable(GL_COLOR_MATERIAL);
	}

	//if (!skel) return;
	if (s.bone.size()!=(unsigned int)a.nbones) return;

	//static bool once=true;
	//if (once)  tmpHack=fopen("debug.txt","wt");


	//if (curFrame>=(int)frame.size()) return;


	int fi= (int)frame;
	//if (capped) fi=0;
	glPushMatrix();
	glTranslate(a.frame[fi].tra);
	renderBone(a,s,frame,s.root,0);
	glPopMatrix();
}

void GLWidget::renderBodyPart(const BrfBodyPart &b) {
	//setWireframeLightingMode(true,false,false);

	if (b.IsEmpty()) return;
    //glEnable(GL_FOG);


	//if (b.type)
	glEnable(GL_COLOR_MATERIAL);
	glEnable(GL_LIGHTING);
	float alpha = (useTexture)?0.15f:0.075f;

	switch(b.type){
	//case BrfBodyPart::MANIFOLD: glColor3f(1,1,1); break;
	//case BrfBodyPart::FACE: glColor3f(0.75f,1,0.75f); break;
    case BrfBodyPart::SPHERE: setAmbientDiffuse(0.6f,0.4f); glColor4f(1,0.75f,0.75f,alpha); break;
    case BrfBodyPart::CAPSULE: setAmbientDiffuse(0.6f,0.4f); glColor4f(0.75,0.75f,1,alpha); break;
    default: break;
	}

	if (b.type==BrfBodyPart::MANIFOLD || b.type==BrfBodyPart::FACE) {
		glPushAttrib(GL_ENABLE_BIT|GL_LIGHTING_BIT);
		glDisable(GL_LIGHTING);


        // set line colors

        {
            float rr = currBgColor.red()/255.0f, gg = currBgColor.green()/255.0f, bb = currBgColor.blue()/255.0f;
            if (rr>0.3f) rr-=0.3f; else rr+=0.3f;
            if (gg>0.3f) gg-=0.3f; else gg+=0.3f;
            if (bb>0.3f) bb-=0.3f; else bb+=0.3f;

            switch(b.type){
            case BrfBodyPart::MANIFOLD:  break;
            case BrfBodyPart::FACE:  bb+=0.2f; rr-=0.2f; break;
            default: break;
            }

            glColor3f(rr,gg,bb);
        }
		for (unsigned int i=0; i<b.face.size(); i++) {
			glBegin(GL_LINE_LOOP);
			for (unsigned int j=0; j<b.face[i].size(); j++)
				glVertex(b.pos[b.face[i][j]]);
			glEnd();
		}

		glEnable(GL_BLEND);
		if (!useFloatingProbe) glDisable(GL_DEPTH_TEST);
		glBlendFunc(GL_ONE,GL_ONE);
		glEnable(GL_CULL_FACE);
		glPolygonMode(GL_FRONT,GL_FILL);
		glDisable(GL_FOG);

		for (int pass=0; pass<2; pass++){
			if (pass==0){ glColor3f(0.1f,0,0); glCullFace(GL_FRONT); }
			else        { glColor3f(0,0,0.1f); glCullFace(GL_BACK); }
			for (unsigned int i=0; i<b.face.size(); i++) {
				glBegin(GL_POLYGON);
				for (unsigned int j=0; j<b.face[i].size(); j++)
					glVertex(b.pos[b.face[i][j]]);
				glVertex(b.pos[b.face[i][0]]);
				glEnd();
			}
		}
		glPopAttrib();
		glEnable(GL_DEPTH_TEST);
	}
	else if (b.type==BrfBodyPart::SPHERE) {
		glPushMatrix();
		glTranslate(b.center);
		glScalef(b.radius,b.radius,b.radius);
		renderSphereWire();
		glPopMatrix();
	} else if (b.type==BrfBodyPart::CAPSULE) {
		glPushMatrix();
		glTranslate((b.center+b.dir)/2);
		glMultMatrixf((GLfloat*)b.GetRotMatrix());
		//glScalef(1,b.radius,b.radius);
		renderCylWire(b.radius,((b.dir-b.center).Norm()));
		glPopMatrix();
	}
    //glDisable(GL_FOG);

}

void GLWidget::setCommonBBoxOn(){
	commonBBox = true;
    bboxReady = false;
	update();
}
void GLWidget::setCommonBBoxOff(){
	commonBBox = false;
    bboxReady = false;
	update();
}
void GLWidget::setInferMaterialOn(){
	inferMaterial = true;
	update();
}
void GLWidget::setInferMaterialOff(){
	inferMaterial = false;
	update();
}



float myrand(float min, float max){
	return min+(max-min)*(rand()%1001)/1000;
}

static Point3f randomUpVector(int, float above, bool YisUp){
	Point3f res;
	float maxup = 1-above;
	do {
		if (YisUp)
			res = Point3f( myrand(-1,1),myrand(-1,maxup),myrand(-1,1));
		else
			res = Point3f( myrand(-1,1),myrand(-1,1),myrand(-1,maxup));
		if (res.SquaredNorm()>1) continue;
		res.Normalize();
		if (res.Y()>maxup) continue;
	} while (0);
	return res;
}

void GLWidget::renderAoOnMeshes(float brightness, float fromAbove, bool perface, bool inAlpha, bool overwrite){
	if (!data) return;
    for (int k=0; k<(int)inViewport.size(); k++)
	renderAoOnMeshesAllInViewportI(brightness, fromAbove, perface, inAlpha, overwrite,k);
/*	if (viewmodeMult == 0) {
		// ao, combined
		renderAoOnMeshesAllSelected(brightness, fromAbove, perface, inAlpha, overwrite);
	}
	else {
		// ao, separated
		// TODO!!!! Fix viewmodeMult == 2

		bool selGroupBackup[MAXSEL];
		for (int i=0;i<MAXSEL; i++) {
			selGroupBackup[i] = selGroup[i];
			selGroup[i] = false;
		}
		for (uint i=0; i<data->mesh.size(); i++) {
			assert(i<MAXSEL);
			if (!(selGroupBackup[i])) continue;
			selGroup[i] = true;
			renderAoOnMeshesAllSelected(brightness, fromAbove, perface, inAlpha, overwrite);
			selGroup[i] = false;
		}
		for (int i=0;i<MAXSEL; i++) selGroup[i] = selGroupBackup[i];
	}*/
}

QImage getTextureImage(){

	int w, h;
	glGetTexLevelParameteriv(GL_TEXTURE_2D,0,GL_TEXTURE_WIDTH,&w);
	glGetTexLevelParameteriv(GL_TEXTURE_2D,0,GL_TEXTURE_HEIGHT,&h);

	if (!w*h) return QImage();

	uchar* pixelData = new uchar[4*w*h];
	glGetTexImage(GL_TEXTURE_2D, 0, GL_BGRA, GL_UNSIGNED_BYTE, pixelData);

	return QImage(pixelData, w, h, QImage::Format_ARGB32);

}

uint manualTextureFetch(const QImage &src, const float* uv){
	int x = (int)((uv[0]-floor(uv[0]))*src.width());
	int y = (int)((uv[1]-floor(uv[1]))*src.height());
	if (x<0) x=0; if (x>=src.width ()) x=src.width ()-1;
	if (y<0) y=0; if (y>=src.height()) y=src.height()-1;
	//return x+y; //0xFF00FFFF;

	//uint pix = src.pixel(x,y);
	return src.pixel(x,y);
}


void GLWidget::setMaterialNameOnlyDiffuse(QString st){
	bool backup0 = useTexture, backup1 = inferMaterial;
	useTexture = true; inferMaterial = false;
	setMaterialName(st);
	useTexture = backup0; inferMaterial = backup1;
}


void GLWidget::renderTextureColorOnMeshes(bool overwrite){
    makeCurrent();
    if (!data) return;
    std::vector<BrfMesh>& v(data->mesh);
    QImage img;
    int lastBind = -1;
    for (uint vi=0; vi<inViewport.size(); vi++)
    for (uint vj=0; vj<inViewport[vi].items.size(); vj++)
    {
        int i = inViewport[vi].items[vj];

        glActiveTexture(0);

        setMaterialNameOnlyDiffuse(v[i].material);
        int currBind; glGetIntegerv(GL_TEXTURE_BINDING_2D,&currBind);
        if (currBind!=lastBind) {
            img = getTextureImage();
            lastBind = currBind;
        }
        if (img.isNull()) continue;


        for (uint j=0; j<v[i].vert.size(); j++) {
            unsigned int newCol = manualTextureFetch(img,v[i].vert[j].ta.V());
            if (overwrite) v[i].vert[j].col = newCol;
            else v[i].vert[j].col = BrfMesh::multCol( v[i].vert[j].col, newCol );
        }

        v[i].hasVertexColor = true;
    }
}

#if 1
void GLWidget::beginSingleSampledFramebufferUse(void) {  /* swy: if we use multisample antialiasing we can't pick the depth via glReadPixels() in unproject(), we need to make a "resolved" copy of it without MSAA */
	if (!frameBuffersAreSupported) return;
	GLsizei w = widthPix(), h = heightPix();

	if (!singleSampleFramebuffer.fbo || singleSampleFramebuffer.w != w || singleSampleFramebuffer.h != h) { /* swy: hasn't been created yet? was the viewport been resized? */

		if (singleSampleFramebuffer.fbo != 0)  glDeleteFramebuffers(1, &singleSampleFramebuffer.fbo); /* swy: delete any previous framebuffers or renderbuffers on resize, don't leave them hanging and leaking, we may eventually run out of memory. */
		if (singleSampleFramebuffer.rb  != 0) glDeleteRenderbuffers(1, &singleSampleFramebuffer.rb);

		GLuint fbo; glGenFramebuffers(1, &fbo);  glBindFramebuffer(GL_FRAMEBUFFER, fbo); /* swy: create the framebuffer and the actual depth buffer surface, no multisampling */
		GLuint rb; glGenRenderbuffers(1, &rb ); glBindRenderbuffer(GL_RENDERBUFFER, rb);
	
		    glRenderbufferStorage(GL_RENDERBUFFER, GL_DEPTH_COMPONENT, w, h); /* swy: attach the depth buffer surface to our framebuffer */
		glFramebufferRenderbuffer(GL_FRAMEBUFFER,  GL_DEPTH_ATTACHMENT, GL_RENDERBUFFER, rb);

		static volatile GLenum status = glCheckFramebufferStatus(GL_FRAMEBUFFER); /* swy: save the width, height and IDs for future frames */
		singleSampleFramebuffer = {fbo, rb, w, h, status};
	}

	glBindFramebuffer(GL_READ_FRAMEBUFFER, defaultFramebufferObject()); /* swy: copy the pixel data from the MSAA depth into the resolved (1 single sample) depth, so that we can grab the value and find the world position from that */
	glBindFramebuffer(GL_DRAW_FRAMEBUFFER, singleSampleFramebuffer.fbo);
	glBlitFramebuffer(0, 0, singleSampleFramebuffer.w, singleSampleFramebuffer.h,
	                  0, 0, singleSampleFramebuffer.w, singleSampleFramebuffer.h, GL_DEPTH_BUFFER_BIT, GL_NEAREST);

	glBindFramebuffer(GL_FRAMEBUFFER, singleSampleFramebuffer.fbo); /* swy: this marks the surface as not only active for write but for reading as well, deselects the default framebuffer completely */
}

void GLWidget::endSingleSampledFramebufferUse(void) {
	if (!frameBuffersAreSupported) return;
	glBindFramebuffer(GL_FRAMEBUFFER, defaultFramebufferObject()); update(); /* swy: restore it back so that we can continue drawing as normal after getting the value we wanted */
}
#endif

void GLWidget::renderAoOnMeshesAllInViewportI(float brightness, float howMuchFromAbove, bool perFace, bool inAlpha, bool overwrite, int I){
	makeCurrent();
	if (!data) return;

#if 1
	beginSingleSampledFramebufferUse();
#endif

	std::vector<BrfMesh>& v(data->mesh);

	// set color to at all meshes black

    for (int i : inViewport[I].items) {
		for (uint j=0; j<v[i].vert.size(); j++) v[i].vert[j].__norm = vcg::Point3f(0,0,0);
		//v[i].ColorAll(0);
	}

	const int RES = 255;
	const int NPASS = 256;

	glMatrixMode(GL_PROJECTION);
	glPushMatrix(); glLoadIdentity();
	glMatrixMode(GL_MODELVIEW);
	glPushMatrix();

	Box3f bbox;bbox.SetNull();
    for (int i : inViewport[I].items)  {
		bbox.Add( v[i].bbox );
	}



	float maxLight = 0;
	for (int n=0; n<NPASS; n++)  {

		glClear(GL_DEPTH_BUFFER_BIT);

		// set a view direction for shadows
		// ld = light dir
		Point3f ld = randomUpVector(n, howMuchFromAbove, viewmode!=1 ),
		    dx(1,0,0), dy;
		maxLight += std::max(-ld.X(),0.0f);
		ld.Normalize();
		dy = (ld^dx).normalized();
		dx = (dy^ld).normalized();
		//double mat[16]={ dx[0],dx[1],dx[2],0,  dy[0],dy[1],dy[2],0,  ld[0],ld[1],ld[2],0, 0,0,0,1};
		double mat[16]={ dx[0],dy[0],ld[0],0,  dx[1],dy[1],ld[1],0,  dx[2],dy[2],ld[2],0, 0,0,0,1};
		glLoadIdentity();
		glMultMatrixd(mat);
		glScale(2.0/bbox.Diag());
		glTranslate(-bbox.Center());
		double matMV[16],matPR[16] = {1,0,0,0, 0,1,0,0, 0,0,1,0, 0,0,0,1};
		int VP[4]={0,0,RES,RES};
		glGetDoublev(GL_MODELVIEW_MATRIX,matMV);
		glViewport(0,0,RES,RES);
		//glWriteMask(GL_FALSE);

        for (int i : inViewport[I].items)
            if (v[i].lodLevel<=inViewport[I].bestLod) renderMeshSimple(v[i]);

		float depthbuf[RES*RES];
		glReadPixels(0, 0, RES,RES,GL_DEPTH_COMPONENT, GL_FLOAT, depthbuf);

		if (perFace) {
            for (int i : inViewport[I].items)  {
				BrfMesh &m(v[i]);
				for (uint fj=0; fj<m.face.size(); fj++)
					for (uint wj=0; wj<3; wj++) {
						int j0 = m.face[fj].index[wj];
						int j1 = m.face[fj].index[(wj+1)%3];
						int j2 = m.face[fj].index[(wj+2)%3];
						Point3f p =
                            m.frame[0].pos[ m.vert[j0].index ] * (4.0f/6.0f)+
                            m.frame[0].pos[ m.vert[j1].index ] * (1.0f/6.0f)+
                            m.frame[0].pos[ m.vert[j2].index ] * (1.0f/6.0f);
						Point3f n =
                            m.frame[0].norm[ j0 ] * (4.0f/6.0f)+
                            m.frame[0].norm[ j1 ] * (1.0f/6.0f)+
                            m.frame[0].norm[ j2 ] * (1.0f/6.0f);
						n = n.Normalize();

						double rx,ry,rz;
						gluProject(p.X(),p.Y(),p.Z(),matMV, matPR, VP, &rx,&ry,&rz);
						float depth = depthbuf[RES*int(ry)+int(rx)];

						if (depth+0.005>rz) { \
							float diff = -ld*n;
							if (diff<0) diff = 0;
							m.vert[j0].__norm[0] += diff;
						}
						m.vert[j0].__norm[1] += 1;
					}
			}
		} else {
            for (int i : inViewport[I].items)  {
				BrfMesh &m(v[i]);
				for (uint j=0; j<m.vert.size(); j++) {
					Point3f p = m.frame[0].pos[ m.vert[j].index ];
					Point3f n = m.frame[0].norm[ j ];
					double rx,ry,rz;
					gluProject(p.X(),p.Y(),p.Z(),matMV, matPR, VP, &rx,&ry,&rz);
					float depth = depthbuf[RES*int(ry)+int(rx)];

					if (depth+0.005>rz) {
						float diff = -ld*n;
						if (diff<0) diff = 0;
						m.vert[j].__norm[0] += diff;

					}
				}
			}
		}

	}

	// find final color
    for (int i : inViewport[I].items)  {
		BrfMesh &m(v[i]);
		for (uint j=0; j<m.vert.size(); j++) {

			float ao =  m.vert[j].__norm[0] /(0.95*maxLight) ;
			if (perFace) ao *= NPASS/(m.vert[j].__norm[1]) ;
			ao = brightness + ao*(1-brightness);
			int k = (uint)floor(ao*255+0.5);
			if (k>255) k=255;
			if (k<0) k=0;
			if (inAlpha)
				m.vert[j].col = ( m.vert[j].col & 0x00FFFFFF) | k<<24;
			else if (overwrite)
				m.vert[j].col = k | k<<8 | k<<16 | (m.vert[j].col & 0xFF000000);
			else
				m.vert[j].col = BrfMesh::multCol(m.vert[j].col, ao);
		}
		m.AdjustNormDuplicates();
		m.hasVertexColor = true;
	}


	glMatrixMode(GL_PROJECTION);
	glPopMatrix();
	glMatrixMode(GL_MODELVIEW);
	glPopMatrix();
	//swapBuffers();

#if 1
	endSingleSampledFramebufferUse();
#endif
}

template<class BrfType> int lodOf(const BrfType& ){ return 0; }
template<> int lodOf<BrfMesh>(const BrfMesh& m){ return m.lodLevel; }

template<class BrfType>
void GLWidget::renderSelected(const std::vector<BrfType>& v){
    static Box3f bbox;

    if (!bboxReady) {
        bbox.SetNull();

        if (commonBBox) for (auto& i: v) bbox.Add(i.bbox );
        else for (auto& inv:inViewport) for (int i:inv.items) if (i < v.size()) bbox.Add( v[i].bbox );
        bboxReady = true;
    }
	animating=false;

	if (displaying == MESH || displaying == BODY) {
		glRotatef(180*currViewmodeHelmet,0,1,0);
		glRotatef(-90*currViewmodeHelmet,1,0,0);
	}

	bool captureViews = (useFloatingProbe);

	glTranslate(-avatP *currViewmodeInterior);

	if (!bbox.IsNull()) {
		float s = 5/bbox.Diag();
		lastScale = s;
		s = s*(1-currViewmodeInterior)+currViewmodeInterior;
		glScalef(s,s,s);

		Point3f ta = -bbox.Center(),  // center on object
		    tb(0,0,-rulerLength/100.0); // center on ruler
		lastCenter = -ta;

		// interpolate between the two centers
		static float k=1.0;

		if (useRuler && displaying == MESH)
        { if (k!=0) { animating =true; k-=0.1f; if (k<0) k=0;} }
		else
        { if (k!=1) { animating =true; k+=0.1f; if (k>1) k=1;} }

		glTranslate( (ta*k + tb*(1-k))*(1-currViewmodeInterior));

	}

    // distributeSelectedInViewports();
    //if (displaying == MESH) maybeHideLods();

	float verticalBias;
	switch (displaying) {
	case ANIMATION:
	case SKELETON: verticalBias = sqrt(1.80); break;
	case MESH:
	case BODY: verticalBias = sqrt(1.20); break;
	default: verticalBias = 1.0;
	}

    _subdivideScreen((int)inViewport.size(),width(),height(), &nViewportCols, &nViewportRows,verticalBias);

	if (captureViews) camera.resize(0);

    bool hideLods = ( (viewmodeMult==2) && (displaying == MESH) );

    for (int vi=0; vi<(int)inViewport.size(); vi++) {
		mySetViewport( vi );
		bool firstDraw = true;

        for (int i:inViewport[vi].items)
		if (i < v.size()) {
        if ( !hideLods || (lodOf(v[i])<=inViewport[vi].bestLod) ) { // don't draw
            glPushMatrix();

			/* swy: this code which draws the 'Compare with mesh' matching mesh before the collision was originally inside the BrfBody
			        variant of GLWidget::renderBrfItem(), but had to be moved out because the glMultMatrixf(extraMatrix) after this
			        meant that the comparison mesh would also get live transformed during the roto-translate tool operation,
			        and we want to keep it unaffected; only moving the collision itself and having this for reference.

			        PS: this mesh also needs to get drawn first/before for the see-through effect of the capsules to work */
			if (useComparisonMesh && v[i].tokenIndex() == BODY) {
				const BrfType &b = v[i];

				std::vector<BrfMesh> &v(data->mesh);
				for (unsigned int j=0; j<v.size(); j++) {
					BrfMesh &m( v[j] );
					if ( m.IsNamedAsBody(b.name) && (m.IsNamedAsLOD()==0)) renderMesh(m,0);
				}

				int si = data->Find(b.name,SKELETON);

				if (si>=0) {
					if (selRefSkin>=0) {
						for (unsigned int i=0; i<reference->mesh.size(); i++)
							if (reference->mesh[i].name[4]==char('A'+selRefSkin))
								renderMesh(reference->mesh[i],0);  // skin!
					} else {
						renderSkeleton(data->skeleton[si]); // naked bones
					}
				}

			}

			if ( (i==lastSelected) || applyExtraMatrixToAll ) glMultMatrixf(extraMatrix);
			renderBrfItem(v[i]);

			if (firstDraw) {
				if (captureViews) camera.push_back( GlCamera::currentCamera(vi) );
				if ((useFloatingProbe) && (viewIs2D()) ) renderFloatingProbe();
				glPopMatrix();
				renderFloorMaybe();
				if ((useFloatingProbe) && (!viewIs2D()) ) renderFloatingProbe();
				if (useRuler && displaying == MESH) renderRuler();
			} else {
				glPopMatrix();
			}
			if (v[i].IsAnimable()) animating=true;
			if ( displaying==SKELETON && selRefAnimation>=0 ) animating=true;
			firstDraw = false;
		}} else {
			qDebug("GLWidget::renderSelected: FIXME: the selection index is bigger than the list of elements, probably wasn't cleared correctly.");
			inViewport.clear();
		}
	}

}

void GLWidget::glClearCheckBoard(){
	float K = (currBgColor.redF()<0.9)?+0.15:-0.075;
	glColor3f(currBgColor.redF()+K,currBgColor.greenF()+K,currBgColor.blueF()+K);
	glDisable(GL_LIGHTING);
	glDisable(GL_TEXTURE_2D);

    int w = widthPix();
    int h = heightPix();
	glViewport(0,0,w,h);
	glMatrixMode(GL_PROJECTION);
	glLoadIdentity();
    gluOrtho2D(0,w,0,h);
	glMatrixMode(GL_MODELVIEW);
	glLoadIdentity();

    int N =16 * devicePixelRatio();
	glBegin(GL_QUADS);
	for (int x=0; x<(w+N-1)/N; x++)
		for (int y=0; y<(h+N-1)/N; y++) {
			if ((x+y)&1){
				glVertex2i(x*N+N,y*N+N);
				glVertex2i(x*N,  y*N+N);
				glVertex2i(x*N,  y*N);
				glVertex2i(x*N+N,y*N);
			}
		}
	glEnd();

}

void GLWidget::mySetViewport(int x,int y,int w,int h){
	glViewport(x,y,w,h);
	float wh = float(w)/h;
	glMatrixMode(GL_PROJECTION);
	glLoadIdentity();
	if (displaying==TEXTURE || displaying==MATERIAL) {
		if (w<h)
			gluOrtho2D(-1,+1,-1/wh,+1/wh);
		else
			gluOrtho2D(-wh,+wh,-1,+1);
	} else {
		gluPerspective(60-closingUp*40,wh,0.02,20+currViewmodeInterior*500);
		//if (wh<1) glScalef(wh,wh,1);
        glScalef(0.2f,0.2f,0.2f);
	}

	glMatrixMode(GL_MODELVIEW);
}

void GLWidget::mySetViewport(int viewportIndex){
	int x = viewportIndex % nViewportCols;
	int y = nViewportRows - 1 - viewportIndex / nViewportCols;

    int qx = widthPix()/nViewportCols;
    int qy = heightPix()/nViewportRows;

    mySetViewport(x*qx,y*qy, qx-1, qy-1);
}

int GLWidget::getViewportOf( int x, int y ) const{
    int qx = width()/nViewportCols;
    int qy = height()/nViewportRows;
    int vx = x /qx;
    int vy = y /qy;
    return vx + vy*nViewportCols;

}
bool GLWidget::viewIs2D() const{
	return (displaying==TEXTURE) || (displaying==MATERIAL);
}

void GLWidget::paintGL()
{
	if (!isValid ()) return;
    glViewport(0,0,widthPix(),heightPix());

	glClearColor(currBgColor.redF(),currBgColor.greenF(),currBgColor.blueF(),1);
	glClear(GL_COLOR_BUFFER_BIT | GL_DEPTH_BUFFER_BIT);

	if (viewIs2D()) {
		if (showAlpha==TRANSALPHA) glClearCheckBoard();
		currViewmodeInterior=0;
	}

	if (displaying == NONE) return;
	glMatrixMode(GL_MODELVIEW);
	glLoadIdentity();

	if (viewIs2D()) {
		glScalef(zoom, zoom, 1);
		float x=cx,y=cy;
		float lim = 1-1/zoom;
		if (x<-lim) x=-lim;
		if (x>+lim) x=lim;
		if (y<-lim) y=-lim;
		if (y>+lim) y=lim;
		glTranslatef( x,-y,0);
	} else {
		glTranslatef(0,0,-dist*(1-currViewmodeInterior));

		glRotatef(theta, 1,0,0);
		glRotatef(phi, 0,1,0);

		glScalef(-1,1,1);
		//glFrontFace(GL_CW);
	}
	glEnable(GL_LIGHTING);
	glEnable(GL_LIGHT0);
	glEnable(GL_NORMALIZE);


	if (data) {
		if (displaying == BODY ) renderSelected(data->body);
		if (displaying == MESH ) renderSelected(data->mesh);
		if (displaying == SKELETON ) renderSelected(data->skeleton);
		if (displaying == ANIMATION )  renderSelected(data->animation);
		if (displaying == TEXTURE )  renderSelected(data->texture);
		if (displaying == MATERIAL )  renderSelected(data->material);
	}

}

void GLWidget::renderFloorMaybe(){
	if ( displaying != SKELETON)
		if (((useFloor &&  (displaying == MESH || displaying == BODY) )
			 || (useFloorInAni &&displaying == ANIMATION)  ))
			renderFloor();
}

void GLWidget::resizeGL(int , int )
{
}




QString GLWidget::locateOnDisk(QString nome, const char *ext, BrfMaterial::Location *loc){
	BrfMaterial::Location aloc=BrfMaterial::UNKNOWN;
	if (!loc) loc = &aloc;
	QString tname = QString(nome);
	if (ext[0]) if (!tname.endsWith(".dds",Qt::CaseInsensitive)) tname+=ext;
	if (*loc == BrfMaterial::UNKNOWN) {
		if (QDir(this->texturePath[1]).exists(tname)) *loc = BrfMaterial::MODULE;
		else if (QDir(this->texturePath[0]).exists(tname)) *loc = BrfMaterial::COMMON;
		else if (QDir(this->texturePath[2]).exists(tname)) *loc = BrfMaterial::LOCAL;
		else *loc = BrfMaterial::NOWHERE;
	}

	if (*loc == BrfMaterial::COMMON) return texturePath[0]+"/"+tname;
	if (*loc == BrfMaterial::MODULE) return texturePath[1]+"/"+tname;
	if (*loc == BrfMaterial::LOCAL ) return texturePath[2]+"/"+tname;
	return QString();
}

void GLWidget::showMaterialDiffuseA(){curMaterialTexture = DIFFUSEA; update();}
void GLWidget::showMaterialDiffuseB(){curMaterialTexture = DIFFUSEB;update();}
void GLWidget::showMaterialBump(){curMaterialTexture = BUMP;update();}
void GLWidget::showMaterialEnviro(){curMaterialTexture = ENVIRO;update();}
void GLWidget::showMaterialSpecular(){curMaterialTexture = SPECULAR;update();}

void GLWidget::showAlphaTransparent(){ showAlpha = TRANSALPHA; update();}
void GLWidget::showAlphaPurple(){ showAlpha = PURPLEALPHA; update();}
void GLWidget::showAlphaNo(){showAlpha = NOALPHA; update();}


void GLWidget::mouseDoubleClickEvent(QMouseEvent *m){
    if (inViewport.size()<=1) return;
    int vi = getViewportOf(m->x(), m->y() );
    if (vi<0 || vi>=(int)inViewport.size()) return;
    std::vector<int> sel;

    sel = inViewport[vi].items;

    emit(signalSelection(sel));
}

void GLWidget::setFloatingProbePos(float x, float y, float z){
	if (viewIs2D()) {
		floatingProbe.X()=(x*2-1);
		floatingProbe.Y()=(y*2-1);
		floatingProbe.Z()=0;
	} else {
		floatingProbe.X()=x/100.0;
		floatingProbe.Y()=z/100.0;
		floatingProbe.Z()=y/100.0;
	}
	update();
}

//void GLWidget::set
void GLWidget::mouseClickEvent(QMouseEvent *e){
	int x =             e->x()  * devicePixelRatioF(); /* swy: keep the HiDPI scaling factor in mind to get the right cursor coordinates no matter how big the interface is */
	int y = (height()-1-e->y()) * devicePixelRatioF();
	if (!useFloatingProbe) return;
#if 1 /* swy: if we use multisample antialiasing we can't pick the depth via glReadPixels() in unproject(), we need to make a "resolved" copy of it without MSAA */
	beginSingleSampledFramebufferUse();
#endif
	for (int i=0; i<(int)camera.size(); i++){
		GlCamera &c(camera[i]);
		//if (c.targetIndex==selPointIndex)
		if (c.isInViewport(x,y))  {
			/* swy: was makeCurrent(); */
			floatingProbe = c.unproject(x,y);
			if (floatingProbe.X()!=-666.0) {
				selPointIndex = c.targetIndex;

				if (viewIs2D()) {
					emit notifySelectedPoint(
					      (floatingProbe.X()+1)/2,
					      (floatingProbe.Y()+1)/2,
					      NAN
					      );
				} else {
					emit notifySelectedPoint(
					      floatingProbe.X()*100.0,
					      floatingProbe.Z()*100.0,
					      floatingProbe.Y()*100.0
					      );
				}
				/* swy: was update(); */
			}
		}
	}
#if 1
	endSingleSampledFramebufferUse(); /* swy: restore it back so that we can continue drawing as normal after getting the value we wanted */
#endif
}

void GLWidget::mousePressEvent(QMouseEvent *event)
{
	lastPos = event->pos();
	mouseMoved = false;
}

void GLWidget::mouseReleaseEvent(QMouseEvent *event){
	QPoint nowPos = event->pos();
	if (!mouseMoved) mouseClickEvent(event);
}


void GLWidget::mouseMoveEvent(QMouseEvent *event)
{
	int dx = event->x() - lastPos.x();
	int dy = event->y() - lastPos.y();
    bool shift = (event->modifiers()&Qt::ShiftModifier);

	if (dx*dx+dy*dy>0) mouseMoved = true;

    if ((viewmode!=2)&&shift) {
		if (viewIs2D())
			zoom*=(1.0+dy*0.02);
		else dist*=(1.0+dy*0.01);

		if (zoom<1.0) zoom = 1.0;
		if (zoom>32.0) zoom = 32.0;
		if (dist>18.0) dist=18.0;
		if (dist<0.5) dist=0.5;
	} else {
		if (viewIs2D()) {
			cx += 1/zoom*dx*0.01;
			cy += 1/zoom*dy*0.01;
			if (cx<-1.0) cx=-1.0;
			if (cx>1.0) cx=1.0;
			if (cy<-1.0) cy=-1.0;
			if (cy>1.0) cy=1.0;
		} else {
			float sensib = 0.75;
            if(viewmode==2) {
                sensib*=0.15f;
                if (shift) sensib*=0.3f;
            }
            phi += dx*2.0*sensib;
			theta += dy*1.0*sensib;
			if (theta>90) theta=90;
			if (theta<-90) theta=-90;
		}
	}
	lastPos = event->pos();
	this->update();
}


void GLWidget::keyPressEvent( QKeyEvent * e ){
	if (e->key()==Qt::Key_W || e->key()==Qt::Key_Forward) keys[0]=true;
	if (e->key()==Qt::Key_S || e->key()==Qt::Key_Back) keys[1]=true;
	if (e->key()==Qt::Key_A || e->key()==Qt::Key_Left) keys[2]=true;
	if (e->key()==Qt::Key_D || e->key()==Qt::Key_Right) keys[3]=true;
	if (e->key()==Qt::Key_Shift) keys[4]=true;

	if(viewmode==2) {
        if (e->key()==Qt::Key_R) { avatP[1]+=0.2f; update(); }
        if (e->key()==Qt::Key_F) { avatP[1]-=0.2f; update(); }
	}

	QWidget::keyPressEvent(e);
}

void GLWidget::keyReleaseEvent( QKeyEvent * e ){
	if (e->key()==Qt::Key_W || e->key()==Qt::Key_Forward) keys[0]=false;
	if (e->key()==Qt::Key_S || e->key()==Qt::Key_Back) keys[1]=false;
	if (e->key()==Qt::Key_A || e->key()==Qt::Key_Left) keys[2]=false;
	if (e->key()==Qt::Key_D || e->key()==Qt::Key_Right) keys[3]=false;
	if (e->key()==Qt::Key_Shift) keys[4]=false;
	else QWidget::keyReleaseEvent(e);
}

void GLWidget::wheelEvent(QWheelEvent *event)
{
	if (event->angleDelta().y()>0) {
        if (viewIs2D()) zoom/=1.2f; else {
            if(viewmode==2) avatP[1]+=0.2f;
            else dist*=1.1f;

		}
	} else {
        if (viewIs2D()) zoom*=1.2f; else {
            if(viewmode==2) avatP[1]-=0.2f;
            else dist/=1.1f;
		}
	}
	if (zoom<1.0) zoom = 1.0;
	if (zoom>32.0) zoom = 32.0;
	if (dist>18.0) dist=18.0;
	if (dist<0.5) dist=0.5;

	update();
}