/*
   Copyright (C) 1999-2007 id Software, Inc. and contributors.
   For a list of contributors, see the accompanying CONTRIBUTORS file.

   This file is part of GtkRadiant.

   GtkRadiant is free software; you can redistribute it and/or modify
   it under the terms of the GNU General Public License as published by
   the Free Software Foundation; either version 2 of the License, or
   (at your option) any later version.

   GtkRadiant is distributed in the hope that it will be useful,
   but WITHOUT ANY WARRANTY; without even the implied warranty of
   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
   GNU General Public License for more details.

   You should have received a copy of the GNU General Public License
   along with GtkRadiant; if not, write to the Free Software
   Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
 */

// select.c
#include "stdafx.h"
#include <assert.h>
#include "filters.h"

// externs
CPtrArray g_SelectedFaces;
CPtrArray g_SelectedFaceBrushes;
CPtrArray& g_ptrSelectedFaces = g_SelectedFaces;
CPtrArray& g_ptrSelectedFaceBrushes = g_SelectedFaceBrushes;

/*
   ===========
   Test_Ray
   ===========
 */
#define DIST_START  999999
trace_t Test_Ray( vec3_t origin, vec3_t dir, int flags ){
	brush_t *brush;
	face_t  *face;
	float dist;
	trace_t t;

	memset( &t, 0, sizeof( t ) );
	t.dist = DIST_START;

	if ( flags & SF_CYCLE ) {
		CPtrArray array;
		brush_t *pToSelect = ( selected_brushes.next != &selected_brushes ) ? selected_brushes.next : NULL;
		Select_Deselect();

		// go through active brushes and accumulate all "hit" brushes
		for ( brush = active_brushes.next ; brush != &active_brushes ; brush = brush->next )
		{
			//if ( (flags & SF_ENTITIES_FIRST) && brush->owner == world_entity)
			//  continue;

			if ( brush->bFiltered ) {
				continue;
			}

			if ( !g_PrefsDlg.m_bSelectCurves && brush->patchBrush ) {
				continue;
			}

			if ( !g_PrefsDlg.m_bSelectModels && ( brush->owner->eclass->nShowFlags & ECLASS_MISCMODEL ) ) {
				continue;
			}

			//if (!g_bShowPatchBounds && brush->patchBrush)
			//  continue;

			face = Brush_Ray( origin, dir, brush, &dist, flags );

			if ( face ) {
				array.Add( brush );
			}
		}

		int nSize = array.GetSize();
		if ( nSize > 0 ) {
			bool bFound = false;
			for ( int i = 0; i < nSize; i++ )
			{
				brush_t *b = reinterpret_cast<brush_t*>( array.GetAt( i ) );
				// did we hit the last one selected yet ?
				if ( b == pToSelect ) {
					// yes we want to select the next one in the list
					int n = ( i > 0 ) ? i - 1 : nSize - 1;
					pToSelect = reinterpret_cast<brush_t*>( array.GetAt( n ) );
					bFound = true;
					break;
				}
			}
			if ( !bFound ) {
				pToSelect = reinterpret_cast<brush_t*>( array.GetAt( 0 ) );
			}
		}
		if ( pToSelect ) {
			face = Brush_Ray( origin, dir, pToSelect, &dist, flags );
			t.dist = dist;
			t.brush = pToSelect;
			t.face = face;
			t.selected = false;
			return t;
		}
	}

	if ( !( flags & SF_SELECTED_ONLY ) ) {
		for ( brush = active_brushes.next ; brush != &active_brushes ; brush = brush->next )
		{
			if ( ( flags & SF_ENTITIES_FIRST ) && ( brush->owner == world_entity || !brush->owner->eclass->fixedsize ) ) {
				continue;
			}

			if ( brush->bFiltered ) {
				continue;
			}

			if ( !g_PrefsDlg.m_bSelectCurves && brush->patchBrush ) {
				continue;
			}

			if ( !g_PrefsDlg.m_bSelectModels && ( brush->owner->eclass->nShowFlags & ECLASS_MISCMODEL ) ) {
				continue;
			}

			//if (!g_bShowPatchBounds && brush->patchBrush)
			//  continue;

			face = Brush_Ray( origin, dir, brush, &dist, flags );
			if ( face && dist > 0 && dist < t.dist ) {
				t.dist = dist;
				t.brush = brush;
				t.face = face;
				t.selected = false;
			}
		}
	}


	for ( brush = selected_brushes.next ; brush != &selected_brushes ; brush = brush->next )
	{
		if ( ( flags & SF_ENTITIES_FIRST ) && ( brush->owner == world_entity || !brush->owner->eclass->fixedsize ) ) {
			continue;
		}

		if ( brush->bFiltered ) {
			continue;
		}

		if ( !g_PrefsDlg.m_bSelectCurves && brush->patchBrush ) {
			continue;
		}

		if ( !g_PrefsDlg.m_bSelectModels && ( brush->owner->eclass->nShowFlags & ECLASS_MISCMODEL ) ) {
			continue;
		}

		face = Brush_Ray( origin, dir, brush, &dist, flags );
		if ( dist > 0 && dist < t.dist ) {
			t.dist = dist;
			t.brush = brush;
			t.face = face;
			t.selected = true;
		}
	}

	// if entites first, but didn't find any, check regular

	if ( ( flags & SF_ENTITIES_FIRST ) && t.brush == NULL ) {
		return Test_Ray( origin, dir, flags & ~SF_ENTITIES_FIRST );
	}

	return t;

}


/*
   ============
   Select_Brush

   ============
 */
void Select_Brush( brush_t *brush, bool bComplete, bool bStatus ){
	brush_t *b;
	entity_t    *e;

	g_ptrSelectedFaces.RemoveAll();
	g_ptrSelectedFaceBrushes.RemoveAll();
	if ( g_qeglobals.d_select_count < 2 ) {
		g_qeglobals.d_select_order[g_qeglobals.d_select_count] = brush;
	}
	g_qeglobals.d_select_count++;

	e = brush->owner;
	if ( e ) {
		// select complete entity on first click
		if ( e != world_entity && bComplete == true ) {
			for ( b = selected_brushes.next ; b != &selected_brushes ; b = b->next )
				if ( b->owner == e ) {
					goto singleselect;
				}
			for ( b = e->brushes.onext ; b != &e->brushes ; b = b->onext )
			{
				if ( b == brush ) { // make sure we add the actual selected brush last, mainly for cycle select
					continue;
				}
				Brush_RemoveFromList( b );
				Brush_AddToList( b, &selected_brushes );
			}
			Brush_RemoveFromList( brush );
			Brush_AddToList( brush, &selected_brushes );
		}
		else
		{
singleselect:
			Brush_RemoveFromList( brush );
			Brush_AddToList( brush, &selected_brushes );
			UpdatePatchInspector();
		}

		if ( e->eclass ) {
			UpdateEntitySel( brush->owner->eclass );
		}

		UpdateSurfaceDialog();
	}

	if ( bStatus ) {
		vec3_t vMin, vMax, vSize;
		Select_GetBounds( vMin, vMax );
		VectorSubtract( vMax, vMin, vSize );
		CString strStatus;
		strStatus.Format( "Selection X:: %.1f  Y:: %.1f  Z:: %.1f", vSize[0], vSize[1], vSize[2] );
		g_pParentWnd->SetStatusText( 2, strStatus );
	}
}

/*
   =============
   Select_FaceInSelectedBrushes
   =============
 */
bool Select_FaceInSelectedBrushes( face_t *face ){
	brush_t *brush;
	face_t  *tface;

	for ( brush = selected_brushes.next; brush != &selected_brushes; brush = brush->next )
	{
		for ( tface = brush->brush_faces; tface; tface = tface->next )
		{
			if ( tface == face ) {
				return true;
			}
		}
	}

	return false;
}

/*
   ============
   Select_Ray

   If the origin is inside a brush, that brush will be ignored.
   ============
 */
void Select_Ray( vec3_t origin, vec3_t dir, int flags ){
	trace_t t;
	face_t  *tface;
	bool bOk;
	static trace_t lastTrace = {
		NULL, //	brush
		NULL, //	face
		0,  //	dist
		false //	selected
	};

	t = Test_Ray( origin, dir, flags );
	if ( !t.brush ) {
		return;
	}

	if ( flags & SF_SINGLEFACE ) {
		if ( flags & SF_DRAG ) {
			if ( t.brush == lastTrace.brush && t.face == lastTrace.face ) {
				return;
			}
		}
		lastTrace = t;

		if ( Select_FaceInSelectedBrushes( t.face ) ) {
			// Deselect the brush
			Brush_RemoveFromList( t.brush );
			Brush_AddToList( t.brush, &active_brushes );
			UpdatePatchInspector();

			// Select all of the brush's faces except the one we are pointing at
			for ( tface = t.brush->brush_faces; tface; tface = tface->next )
			{
				if ( tface == t.face ) {
					continue;
				}

				bOk = true;
				// NOTE: keep the size check in the loop, we remove stuff inside
				for ( int i = 0; i < g_SelectedFaces.GetSize(); i++ )
				{
					if ( tface == reinterpret_cast<face_t*>( g_SelectedFaces.GetAt( i ) ) ) {
						bOk = false;
					}
				}

				if ( bOk ) {
					g_SelectedFaces.Add( tface );
					g_SelectedFaceBrushes.Add( t.brush );
				}
			}
			g_qeglobals.d_select_mode = sel_facets_off;
		}
		else
		{
			bOk = true;
			// NOTE: keep the size check in the loop, we remove stuff inside
			for ( int i = 0; i < g_SelectedFaces.GetSize(); i++ )
			{
				if ( t.face == reinterpret_cast<face_t*>( g_SelectedFaces.GetAt( i ) ) ) {
					bOk = false;
					if ( flags & SF_DRAG_ON ) {
						continue;
					}

					g_qeglobals.d_select_mode = sel_facets_off;
					// need to remove i'th entry
					g_SelectedFaces.RemoveAt( i, 1 );
					g_SelectedFaceBrushes.RemoveAt( i, 1 );
				}
			}

			if ( bOk && !( flags & SF_DRAG_OFF ) ) {
				g_SelectedFaces.Add( t.face );
				g_SelectedFaceBrushes.Add( t.brush );
				g_qeglobals.d_select_mode = sel_facets_on;
			}
		}
		UpdateSurfaceDialog();
		Sys_UpdateWindows( W_ALL );
		//g_qeglobals.d_select_mode = sel_brush;
		// Texture_SetTexture requires a brushprimit_texdef fitted to the default width=2 height=2 texture
		brushprimit_texdef_t brushprimit_texdef;
		ConvertTexMatWithQTexture( &t.face->brushprimit_texdef, t.face->d_texture, &brushprimit_texdef, NULL );
		Texture_SetTexture( &t.face->texdef, &brushprimit_texdef, false, NULL, false );
		return;
	}

	// move the brush to the other list
	if ( t.selected ) {
		if ( flags & SF_DRAG_ON ) {
			return;
		}

		g_qeglobals.d_select_mode = sel_brush_off;
		Brush_RemoveFromList( t.brush );
		Brush_AddToList( t.brush, &active_brushes );

		UpdatePatchInspector();
	}
	else
	{
		if ( flags & SF_DRAG_OFF ) {
			return;
		}

		g_qeglobals.d_select_mode = sel_brush_on;
		Select_Brush( t.brush, g_PrefsDlg.m_nCamDragMultiSelect == 1 ? Sys_AltDown() : !Sys_AltDown() );
	}
	UpdateSurfaceDialog();
	Sys_UpdateWindows( W_ALL );
}


void Select_Delete( void ){
	brush_t *brush;
	entity_t *e;

	g_ptrSelectedFaces.RemoveAll();
	g_ptrSelectedFaceBrushes.RemoveAll();

	g_qeglobals.d_select_mode = sel_brush;

	g_qeglobals.d_select_count = 0;
	g_qeglobals.d_num_move_points = 0;
	while ( selected_brushes.next != &selected_brushes )
	{
		brush = selected_brushes.next;
		if ( brush->patchBrush ) {
			Patch_Delete( brush->pPatch );
		}
		e = brush->owner;
		Brush_Free( brush );
		// remove if no brushes
		if ( e != world_entity && e->brushes.onext == &e->brushes ) {
			Entity_Free( e );
		}
	}

	Sys_MarkMapModified();
	UpdateSurfaceDialog();
	Sys_UpdateWindows( W_ALL );
}

// update the workzone to a given brush
void UpdateWorkzone_ForBrush( brush_t* b ){
	VectorCopy( b->mins, g_qeglobals.d_work_min );
	VectorCopy( b->maxs, g_qeglobals.d_work_max );
	//++timo clean
#if 0
	// will update the workzone to the given brush
	// g_pParentWnd->ActiveXY()->GetViewType()
	// cf VIEWTYPE defintion: enum VIEWTYPE {YZ, XZ, XY};
	// we fit our work zone to the last brush on the list (b)
	int nViewType = g_pParentWnd->ActiveXY()->GetViewType();
	int nDim1 = ( nViewType == YZ ) ? 1 : 0;
	int nDim2 = ( nViewType == XY ) ? 1 : 2;
	g_qeglobals.d_work_min[nDim1] = b->mins[nDim1];
	g_qeglobals.d_work_max[nDim1] = b->maxs[nDim1];
	g_qeglobals.d_work_min[nDim2] = b->mins[nDim2];
	g_qeglobals.d_work_max[nDim2] = b->maxs[nDim2];
#endif
}

// here to filter new brushes once unselected
extern void PerformFiltering();

void Select_Deselect( bool bDeselectFaces ){
	brush_t *b;

	Patch_Deselect();

	g_pParentWnd->ActiveXY()->UndoClear();

	g_qeglobals.d_workcount++;
	g_qeglobals.d_select_count = 0;
	g_qeglobals.d_num_move_points = 0;
	b = selected_brushes.next;

	if ( b == &selected_brushes ) {
		if ( bDeselectFaces ) {
			g_ptrSelectedFaces.RemoveAll();
			g_ptrSelectedFaceBrushes.RemoveAll();
		}
		PerformFiltering();
		UpdateSurfaceDialog();
		Sys_UpdateWindows( W_ALL );
		return;
	}

	if ( bDeselectFaces ) {
		g_ptrSelectedFaces.RemoveAll();
		g_ptrSelectedFaceBrushes.RemoveAll();
	}

	g_qeglobals.d_select_mode = sel_brush;

	UpdateWorkzone_ForBrush( b );

	selected_brushes.next->prev = &active_brushes;
	selected_brushes.prev->next = active_brushes.next;
	active_brushes.next->prev = selected_brushes.prev;
	active_brushes.next = selected_brushes.next;
	selected_brushes.prev = selected_brushes.next = &selected_brushes;

	// filter newly created stuff once it's unselected
	PerformFiltering();
	UpdateSurfaceDialog();
	Sys_UpdateWindows( W_ALL );
}

/*
   ============
   Select_Move
   ============
 */
/*! Moves the currently selected brush/patch
    \param delta How far to move the selection (x,y,z)
    \param bSnap If the move should snap to grid points
 */
void Select_Move( vec3_t delta, bool bSnap ){
	brush_t *b;

	// actually move the selected brushes
	for ( b = selected_brushes.next ; b != &selected_brushes ; b = b->next )
		Brush_Move( b, delta, bSnap );

	vec3_t vMin, vMax;
	Select_GetBounds( vMin, vMax );
	CString strStatus;
	strStatus.Format( "Origin X:: %.1f  Y:: %.1f  Z:: %.1f", vMin[0], vMax[1], vMax[2] );
	g_pParentWnd->SetStatusText( 2, strStatus );

	//Sys_UpdateWindows (W_ALL);
}

/*
   =================
   Select_NudgeVerts
   =================
 */
/*! Moves the currently selected brush/patch vertices
    \param delta How far to move the vertices (x,y,z)
    \param bSnap If the move should snap to grid points
 */
void Select_NudgePoint( vec3_t delta, qboolean bSnap ){
	if ( g_qeglobals.d_select_mode == sel_vertex ) {
		// move selected verts
		brush_t *b;
		vec3_t end;
		qboolean success = true;
		for ( b = selected_brushes.next; b != &selected_brushes; b = b->next )
		{
			success &= (qboolean)Brush_MoveVertex( b, g_qeglobals.d_move_points[0], delta, end, bSnap );
		}
		if ( success ) {
			VectorCopy( end, g_qeglobals.d_move_points[0] );
		}
	}
	else if ( g_qeglobals.d_select_mode == sel_curvepoint ) {
		// move selected patch control points
		Patch_UpdateSelected( delta );
	}
}

/*
   ============
   Select_Clone

   Creates an exact duplicate of the selection in place, then moves
   the selected brushes off of their old positions
   ============
 */
void Select_Clone( void ){
	g_bScreenUpdates = false;
	g_pParentWnd->Copy();
	Select_Deselect();
	g_pParentWnd->Paste();
	g_pParentWnd->NudgeSelection( 2, g_qeglobals.d_gridsize );
	g_pParentWnd->NudgeSelection( 3, g_qeglobals.d_gridsize );
	Undo_Start( "clone" );
	Undo_EndBrushList( &selected_brushes );
	Undo_End();
	g_bScreenUpdates = true;
	Sys_UpdateWindows( W_ALL );
}

//++timo clean
#if 0
/*
   ============
   Select_SetTexture
   Timo : bFitScale to compute scale on the plane and counteract plane / axial plane snapping
   Timo :	brush primitive texturing
        the brushprimit_texdef given must be understood as a qtexture_t width=2 height=2 ( HiRes )
   Timo :  texture plugin, added an IPluginTexdef* parameter
        must be casted to an IPluginTexdef!
        if not NULL, get ->Copy() of it into each face or brush ( and remember to hook )
        if NULL, means we have no information, ask for a default
   TTimo - shader code cleanup
   added IShader* parameter
   ============
 */
void WINAPI Select_SetTexture2( IShader* pShader, texdef_t *texdef, brushprimit_texdef_t *brushprimit_texdef, bool bFitScale, void* pPlugTexdef ){
	brush_t *b;
	int nCount = g_ptrSelectedFaces.GetSize();
	if ( nCount > 0 ) {
		Undo_Start( "set face textures" );
		ASSERT( g_ptrSelectedFaces.GetSize() == g_ptrSelectedFaceBrushes.GetSize() );
		for ( int i = 0; i < nCount; i++ )
		{
			face_t *selFace = reinterpret_cast<face_t*>( g_ptrSelectedFaces.GetAt( i ) );
			brush_t *selBrush = reinterpret_cast<brush_t*>( g_ptrSelectedFaceBrushes.GetAt( i ) );
			Undo_AddBrush( selBrush );
			//++timo TODO: propagate the IShader* ..
			SetFaceTexdef( selFace, texdef, brushprimit_texdef, bFitScale, static_cast<IPluginTexdef *>( pPlugTexdef ) );
			Brush_Build( selBrush, bFitScale );
			Undo_EndBrush( selBrush );
		}
		Undo_End();
	}
	else if ( selected_brushes.next != &selected_brushes ) {
		Undo_Start( "set brush textures" );
		for ( b = selected_brushes.next ; b != &selected_brushes ; b = b->next )
			if ( !b->owner->eclass->fixedsize ) {
				Undo_AddBrush( b );
				Brush_SetTexture2( b, pShader, texdef, brushprimit_texdef, bFitScale, static_cast<IPluginTexdef *>( pPlugTexdef ) );
				Undo_EndBrush( b );
			}
		Undo_End();
	}
	Sys_UpdateWindows( W_ALL );
}
#endif

/*
   ============
   Select_SetTexture
   Timo : bFitScale to compute scale on the plane and counteract plane / axial plane snapping
   Timo :	brush primitive texturing
        the brushprimit_texdef given must be understood as a qtexture_t width=2 height=2 ( HiRes )
   Timo :  texture plugin, added an IPluginTexdef* parameter
        must be casted to an IPluginTexdef!
        if not NULL, get ->Copy() of it into each face or brush ( and remember to hook )
        if NULL, means we have no information, ask for a default
   ============
 */
void WINAPI Select_SetTexture( texdef_t *texdef, brushprimit_texdef_t *brushprimit_texdef, bool bFitScale, void* pPlugTexdef ){
	/*
	   #ifdef _DEBUG
	   static int count = 0;
	   #endif
	 */
	brush_t *b;
	/*
	   #ifdef _DEBUG
	   count++;
	   Sys_Printf("count: %d\n", count);
	   if(count==4)
	   Sys_Printf("break!\n");
	   #endif
	 */
	int nCount = g_ptrSelectedFaces.GetSize();
	if ( nCount > 0 ) {
		Undo_Start( "set face textures" );
		assert( g_ptrSelectedFaces.GetSize() == g_ptrSelectedFaceBrushes.GetSize() );
		for ( int i = 0; i < nCount; i++ )
		{
			face_t *selFace = reinterpret_cast<face_t*>( g_ptrSelectedFaces.GetAt( i ) );
			brush_t *selBrush = reinterpret_cast<brush_t*>( g_ptrSelectedFaceBrushes.GetAt( i ) );
			Undo_AddBrush( selBrush );
			SetFaceTexdef( selFace, texdef, brushprimit_texdef, bFitScale, static_cast<IPluginTexdef *>( pPlugTexdef ) );
			Brush_Build( selBrush, bFitScale );
			Undo_EndBrush( selBrush );
		}
		Undo_End();
	}
	else if ( selected_brushes.next != &selected_brushes ) {
		Undo_Start( "set brush textures" );
		for ( b = selected_brushes.next ; b != &selected_brushes ; b = b->next )
			if ( !b->owner->eclass->fixedsize ) {
				Undo_AddBrush( b );
				Brush_SetTexture( b, texdef, brushprimit_texdef, bFitScale, static_cast<IPluginTexdef *>( pPlugTexdef ) );
				Undo_EndBrush( b );
			}
		Undo_End();
	}
	//++timo FIXME: not necessary in every cases, write a message defering / move one level up
	Sys_UpdateWindows( W_ALL );
}


/*
   ================================================================

   TRANSFORMATIONS

   ================================================================
 */

void Select_GetBounds( vec3_t mins, vec3_t maxs ){
	brush_t *b;
	int i;

	for ( i = 0 ; i < 3 ; i++ )
	{
		mins[i] = 99999;
		maxs[i] = -99999;
	}

	for ( b = selected_brushes.next ; b != &selected_brushes ; b = b->next )
	{
		if ( b->owner->eclass->fixedsize ) {
			for ( i = 0 ; i < 3 ; i++ )
			{
				if ( b->owner->origin[i] < mins[i] ) {
					mins[i] = b->owner->origin[i];
				}
				if ( b->owner->origin[i] > maxs[i] ) {
					maxs[i] = b->owner->origin[i];
				}
			}
		}
		else
		{
			for ( i = 0 ; i < 3 ; i++ )
			{
				if ( b->mins[i] < mins[i] ) {
					mins[i] = b->mins[i];
				}
				if ( b->maxs[i] > maxs[i] ) {
					maxs[i] = b->maxs[i];
				}
			}
		}
	}
}

void Select_GetTrueMid( vec3_t mid ){
	vec3_t mins, maxs;
	Select_GetBounds( mins, maxs );

	for ( int i = 0 ; i < 3 ; i++ )
		mid[i] = ( mins[i] + ( ( maxs[i] - mins[i] ) / 2 ) );
}

void Select_GetMid( vec3_t mid ){
	vec3_t mins, maxs;
	int i;

	if ( !g_PrefsDlg.m_bSnap ) {
		Select_GetTrueMid( mid );
		return;
	}

	Select_GetBounds( mins, maxs );

	for ( i = 0 ; i < 3 ; i++ )
		mid[i] = g_qeglobals.d_gridsize * floor( ( ( mins[i] + maxs[i] ) * 0.5 ) / g_qeglobals.d_gridsize );
}

vec3_t select_origin;
vec3_t select_matrix[3];
qboolean select_fliporder;

// FIXME: bApplyBPrimit is supposed to be temporary
// TODO: manage Brush_Build calls, too many of them with the texture processing
// FIXME: the undo doesn't seem to work correctly on texturing and flip/rotate operations?? this is not supposed to be related to the texture locking code, so what is happening?
// FIXME: ApplyMatrix works on flipping operation, b0rks on Rotations (so does the "regular" rotation code??)
// FIXME: what is getting called in free rotation mode? that used to work right?
void Select_ApplyMatrix( bool bSnap, bool bRotation, int nAxis, float fDeg ){ //, qboolean bApplyBPrimit)
	brush_t *b;
	face_t  *f;
	int i, j;
	vec3_t temp, tmporigin;

	for ( b = selected_brushes.next ; b != &selected_brushes ; b = b->next )
	{
		if ( b->owner->eclass->fixedsize ) {
			VectorCopy( b->owner->origin, tmporigin );
			// transform the origin point
			VectorSubtract( b->owner->origin, select_origin, temp );
			for ( j = 0 ; j < 3 ; j++ )
				b->owner->origin[j] = DotProduct( temp, select_matrix[j] ) + select_origin[j];

			// update the origin key
			char text[64];
			sprintf( text, "%i %i %i",
					 (int)b->owner->origin[0], (int)b->owner->origin[1], (int)b->owner->origin[2] );
			SetKeyValue( b->owner, "origin", text );

			/*\todo remove brush-based bounding box for fixedsize entities */
			VectorSubtract( b->owner->origin, tmporigin, temp );
			for ( f = b->brush_faces ; f ; f = f->next )
			{
				// move fixedsize bbox to new origin
				for ( i = 0 ; i < 3 ; i++ )
					VectorAdd( f->planepts[i], temp, f->planepts[i] );
			}
			Brush_Build( b, bSnap,true,false,false ); // don't filter

		}
		else if ( b->patchBrush ) {
			if ( !bRotation && !( ( g_qeglobals.d_select_mode == sel_curvepoint && g_qeglobals.d_num_move_points != 0 ) || g_bPatchBendMode ) ) {
				// invert patch if this is a mirroring operation, unless points are selected or bendmode is active
				patchInvert( b->pPatch );
			}
			// NOTE: does not clamp points to integers
			Patch_ApplyMatrix( b->pPatch, select_origin, select_matrix, false );
		}
		else
		{
			for ( f = b->brush_faces ; f ; f = f->next )
			{
				// FIXME: only in BP mode!
				// if we are using Brush Primitives texturing, we need to compute the texture matrix after the geometric transformation
				// (with the default texturing you don't need to compute anything for flipping and mirroring operations)
				//      if (bApplyBPrimit) {
				//        ApplyMatrix_BrushPrimit (f, select_matrix, select_origin, select_fliporder);
				//      }
				for ( i = 0 ; i < 3 ; i++ )
				{
					VectorSubtract( f->planepts[i], select_origin, temp );
					for ( j = 0 ; j < 3 ; j++ )
						f->planepts[i][j] = DotProduct( temp, select_matrix[j] ) + select_origin[j];
				}
				if ( select_fliporder ) {
					VectorCopy( f->planepts[0], temp );
					VectorCopy( f->planepts[2], f->planepts[0] );
					VectorCopy( temp, f->planepts[2] );
				}
			}
			Brush_Build( b, bSnap,true,false,false ); // don't filter
		}
	}
}

void ProjectOnPlane( vec3_t& normal,float dist,vec3_t& ez, vec3_t& p ){
	if ( fabs( ez[0] ) == 1 ) {
		p[0] = ( dist - normal[1] * p[1] - normal[2] * p[2] ) / normal[0];
	}
	else if ( fabs( ez[1] ) == 1 ) {
		p[1] = ( dist - normal[0] * p[0] - normal[2] * p[2] ) / normal[1];
	}
	else{
		p[2] = ( dist - normal[0] * p[0] - normal[1] * p[1] ) / normal[2];
	}
}

void Back( vec3_t& dir, vec3_t& p ){
	if ( fabs( dir[0] ) == 1 ) {
		p[0] = 0;
	}
	else if ( fabs( dir[1] ) == 1 ) {
		p[1] = 0;
	}
	else{p[2] = 0; }
}



// using scale[0] and scale[1]
void ComputeScale( vec3_t& rex, vec3_t& rey, vec3_t& p, face_t* f ){
	float px = DotProduct( rex, p );
	float py = DotProduct( rey, p );
	px *= f->texdef.scale[0];
	py *= f->texdef.scale[1];
	vec3_t aux;
	VectorCopy( rex, aux );
	VectorScale( aux, px, aux );
	VectorCopy( aux, p );
	VectorCopy( rey, aux );
	VectorScale( aux, py, aux );
	VectorAdd( p, aux, p );
}

void ComputeAbsolute( face_t* f, vec3_t& p1, vec3_t& p2, vec3_t& p3 ){
	vec3_t ex,ey,ez;            // local axis base

#ifdef _DEBUG
	if ( g_qeglobals.m_bBrushPrimitMode ) {
		Sys_Printf( "Warning : illegal call of ComputeAbsolute in brush primitive mode\n" );
	}
#endif

	// compute first local axis base
	TextureAxisFromPlane( &f->plane, ex, ey );
	CrossProduct( ex, ey, ez );

	vec3_t aux;
	VectorCopy( ex, aux );
	VectorScale( aux, -f->texdef.shift[0], aux );
	VectorCopy( aux, p1 );
	VectorCopy( ey, aux );
	VectorScale( aux, -f->texdef.shift[1], aux );
	VectorAdd( p1, aux, p1 );
	VectorCopy( p1, p2 );
	VectorAdd( p2, ex, p2 );
	VectorCopy( p1, p3 );
	VectorAdd( p3, ey, p3 );
	VectorCopy( ez, aux );
	VectorScale( aux, -f->texdef.rotate, aux );
	VectorRotate( p1, aux, p1 );
	VectorRotate( p2, aux, p2 );
	VectorRotate( p3, aux, p3 );
	// computing rotated local axis base
	vec3_t rex,rey;
	VectorCopy( ex, rex );
	VectorRotate( rex, aux, rex );
	VectorCopy( ey, rey );
	VectorRotate( rey, aux, rey );

	ComputeScale( rex,rey,p1,f );
	ComputeScale( rex,rey,p2,f );
	ComputeScale( rex,rey,p3,f );

	// project on normal plane
	// along ez
	// assumes plane normal is normalized
	ProjectOnPlane( f->plane.normal,f->plane.dist,ez,p1 );
	ProjectOnPlane( f->plane.normal,f->plane.dist,ez,p2 );
	ProjectOnPlane( f->plane.normal,f->plane.dist,ez,p3 );
};


void AbsoluteToLocal( plane_t normal2, face_t* f, vec3_t& p1, vec3_t& p2, vec3_t& p3 ){
	vec3_t ex,ey,ez;

#ifdef _DEBUG
	if ( g_qeglobals.m_bBrushPrimitMode ) {
		Sys_Printf( "Warning : illegal call of AbsoluteToLocal in brush primitive mode\n" );
	}
#endif

	// computing new local axis base
	TextureAxisFromPlane( &normal2, ex, ey );
	CrossProduct( ex, ey, ez );

	// projecting back on (ex,ey)
	Back( ez,p1 );
	Back( ez,p2 );
	Back( ez,p3 );

	vec3_t aux;
	// rotation
	VectorCopy( p2, aux );
	VectorSubtract( aux, p1,aux );

	float x = DotProduct( aux,ex );
	float y = DotProduct( aux,ey );
	f->texdef.rotate = 180 * atan2( y,x ) / Q_PI;

	vec3_t rex,rey;
	// computing rotated local axis base
	VectorCopy( ez, aux );
	VectorScale( aux, f->texdef.rotate, aux );
	VectorCopy( ex, rex );
	VectorRotate( rex, aux, rex );
	VectorCopy( ey, rey );
	VectorRotate( rey, aux, rey );

	// scale
	VectorCopy( p2, aux );
	VectorSubtract( aux, p1, aux );
	f->texdef.scale[0] = DotProduct( aux, rex );
	VectorCopy( p3, aux );
	VectorSubtract( aux, p1, aux );
	f->texdef.scale[1] = DotProduct( aux, rey );

	// shift
	// only using p1
	x = DotProduct( rex,p1 );
	y = DotProduct( rey,p1 );
	x /= f->texdef.scale[0];
	y /= f->texdef.scale[1];

	VectorCopy( rex, p1 );
	VectorScale( p1, x, p1 );
	VectorCopy( rey, aux );
	VectorScale( aux, y, aux );
	VectorAdd( p1, aux, p1 );
	VectorCopy( ez, aux );
	VectorScale( aux, -f->texdef.rotate, aux );
	VectorRotate( p1, aux, p1 );
	f->texdef.shift[0] = -DotProduct( p1, ex );
	f->texdef.shift[1] = -DotProduct( p1, ey );

	// stored rot is good considering local axis base
	// change it if necessary
	f->texdef.rotate = -f->texdef.rotate;

	Clamp( f->texdef.shift[0], f->d_texture->width );
	Clamp( f->texdef.shift[1], f->d_texture->height );
	Clamp( f->texdef.rotate, 360 );

}

void RotateFaceTexture( face_t* f, int nAxis, float fDeg ){
	vec3_t p1,p2,p3, rota;
	p1[0] = p1[1] = p1[2] = 0;
	VectorCopy( p1, p2 );
	VectorCopy( p1, p3 );
	VectorCopy( p1, rota );
	ComputeAbsolute( f, p1, p2, p3 );

	rota[nAxis] = fDeg;
	VectorRotateOrigin( p1, rota, select_origin, p1 );
	VectorRotateOrigin( p2, rota, select_origin, p2 );
	VectorRotateOrigin( p3, rota, select_origin, p3 );

	plane_t normal2;
	vec3_t vNormal;
	vNormal[0] = f->plane.normal[0];
	vNormal[1] = f->plane.normal[1];
	vNormal[2] = f->plane.normal[2];
	VectorRotate( vNormal, rota, vNormal );
	normal2.normal[0] = vNormal[0];
	normal2.normal[1] = vNormal[1];
	normal2.normal[2] = vNormal[2];
	AbsoluteToLocal( normal2, f, p1, p2,p3 );

}

void RotateTextures( int nAxis, float fDeg, vec3_t vOrigin ){
	for ( brush_t* b = selected_brushes.next ; b != &selected_brushes ; b = b->next )
	{
		for ( face_t* f = b->brush_faces ; f ; f = f->next )
		{
			if ( g_qeglobals.m_bBrushPrimitMode ) {
				RotateFaceTexture_BrushPrimit( f, nAxis, fDeg, vOrigin );
			}
			else{
				RotateFaceTexture( f, nAxis, fDeg );
			}
		}
		Brush_Build( b, false,true,false,false ); // don't filter
	}
}

void Select_ApplyMatrix_BrushPrimit(){
  #ifdef _DEBUG
	if ( !g_qeglobals.m_bBrushPrimitMode ) {
		Sys_FPrintf( SYS_ERR,"ERROR: Select_ApplyMatrix_BrushPrimit called in non-BP mode\n" );
	}
  #endif
	for ( brush_t* b = selected_brushes.next ; b != &selected_brushes ; b = b->next )
	{
		for ( face_t* f = b->brush_faces ; f ; f = f->next )
		{
			ApplyMatrix_BrushPrimit( f, select_matrix, select_origin );
		}
	}
}

void Select_FlipAxis( int axis ){
	int i;

	Select_GetMid( select_origin );
	for ( i = 0 ; i < 3 ; i++ )
	{
		VectorCopy( vec3_origin, select_matrix[i] );
		select_matrix[i][i] = 1;
	}
	select_matrix[axis][axis] = -1;
	select_fliporder = true;

	// texture locking
	if ( g_PrefsDlg.m_bRotateLock ) {
		// axis flipping inverts space orientation, we have to use a general texture locking algorithm instead of the RotateFaceTexture
		if ( g_qeglobals.m_bBrushPrimitMode ) {
			Select_ApplyMatrix_BrushPrimit();
		}
		else
		{
			// there's never been flip locking for non BP mode, this would be tricky to write and there's not much interest for it with the coming of BP format
			// what could be done is converting regular to BP, locking, then back to regular :)
			Sys_FPrintf( SYS_WRN, "WARNING: regular texturing doesn't have texture lock on flipping operations\n" );
		}
	}
	// geometric transformation
	Select_ApplyMatrix( true, false, 0, 0 );
	Sys_UpdateWindows( W_ALL );
}


void Select_Scale( float x, float y, float z ){
	Select_GetMid( select_origin );
	for ( brush_t* b = selected_brushes.next ; b != &selected_brushes ; b = b->next )
	{
		// ignore fixedsize entities
		if ( b->owner->eclass->fixedsize ) {
			continue;
		}
		for ( face_t* f = b->brush_faces ; f ; f = f->next )
		{
			for ( int i = 0 ; i < 3 ; i++ )
			{
				f->planepts[i][0] -= select_origin[0];
				f->planepts[i][1] -= select_origin[1];
				f->planepts[i][2] -= select_origin[2];
				f->planepts[i][0] *= x;
				f->planepts[i][1] *= y;
				f->planepts[i][2] *= z;

				f->planepts[i][0] += select_origin[0];
				f->planepts[i][1] += select_origin[1];
				f->planepts[i][2] += select_origin[2];
			}
		}
		Brush_Build( b, false,true,false,false ); // don't filter
		if ( b->patchBrush ) {
			vec3_t v;
			v[0] = x;
			v[1] = y;
			v[2] = z;
			Patch_Scale( b->pPatch, select_origin, v );
		}
	}
}

void Select_RotateAxis( int axis, float deg, bool bPaint, bool bMouse ){
	int i;
	vec_t c, s;

	if ( deg == 0 ) {
		return;
	}

	if ( bMouse ) {
		VectorCopy( g_pParentWnd->ActiveXY()->RotateOrigin(), select_origin );
	}
	else
	{
		Select_GetMid( select_origin );
	}

	/*
	   if(axis == 2)
	   {
	   vec3_t rotation;
	   VectorSet(rotation, 0, 0, 360 - deg);
	   for(brush_t *b = selected_brushes.next; b != &selected_brushes; b = b->next)
	    if(b->owner->model.pEdit)
	      b->owner->model.pEdit->Rotate(select_origin, rotation);
	   }
	 */

	select_fliporder = false;

	// the "90" degrees algorithm is mostly used on axis rotate as a speedup and possibly avoiding rounding errors as much as possible
	// previous implementation was doing an indirect-oriented rotation over the plane whereas the general algo below was doing a direct-oriented rotation
	// this was confusing the texture locking algorithms, fixed it to be direct-oriented (side consequence is that the axis rotate toolbar button rotates the other way now)
	// NOTE: previous algo was using vec3_origin in the matrix computation..
	//   I don't see what an origin does in linear transformations (3x3 matrixes always relate to a (0,0,0) origin)
	//   in Radiant it's initialized as (0,0,0) and never set to another value
	//   so I got rid of it when it's not used for initialisation tasks (and even if it's not (0,0,0) it should not matter
	if ( deg == 90 ) {
		c = 0;
		s = 1;
	}
	else
	{
		c = cos( deg * Q_PI / 180.0 );
		s = sin( deg * Q_PI / 180.0 );
	}

	for ( i = 0 ; i < 3 ; i++ )
	{
		VectorCopy( vec3_origin, select_matrix[i] );
		select_matrix[i][i] = 1;
	}

	switch ( axis )
	{
	case 0:
		select_matrix[1][1] = c;
		select_matrix[1][2] = s;
		select_matrix[2][1] = -s;
		select_matrix[2][2] = c;
		break;
	case 1:
		select_matrix[0][0] = c;
		select_matrix[0][2] = s;
		select_matrix[2][0] = -s;
		select_matrix[2][2] = c;
		break;
	case 2:
		select_matrix[0][0] = c;
		select_matrix[0][1] = s;
		select_matrix[1][0] = -s;
		select_matrix[1][1] = c;
		break;
	}


	// texture locking
	if ( g_PrefsDlg.m_bRotateLock ) {
		// Terrible hack, reversing input rotation angle to correct
		// texture rotation direction for X and Z axes.
		// RotateTextures needs to be changed to fix this properly?
		if ( axis == 1 ) {
			RotateTextures( axis, deg, select_origin );
		}
		else{
			RotateTextures( axis, deg * -1, select_origin );
		}
	}
	// geometric transformation
	Select_ApplyMatrix( !bMouse, true, axis, deg ); //, false);

	if ( bPaint ) {
		Sys_UpdateWindows( W_ALL );
	}
}

/*
   ================================================================

   GROUP SELECTIONS

   ================================================================
 */

void Select_RealCompleteTall( vec3_t mins, vec3_t maxs ){
	brush_t *b, *next;

	int nDim1 = ( g_pParentWnd->ActiveXY()->GetViewType() == YZ ) ? 1 : 0;
	int nDim2 = ( g_pParentWnd->ActiveXY()->GetViewType() == XY ) ? 1 : 2;

	g_qeglobals.d_select_mode = sel_brush;

	for ( b = active_brushes.next ; b != &active_brushes ; b = next )
	{
		next = b->next;

		if ( b->bFiltered ) {
			continue;
		}

		if ( ( b->maxs[nDim1] > maxs[nDim1] || b->mins[nDim1] < mins[nDim1] )
			 || ( b->maxs[nDim2] > maxs[nDim2] || b->mins[nDim2] < mins[nDim2] ) ) {
			continue;
		}

		Brush_RemoveFromList( b );
		Brush_AddToList( b, &selected_brushes );
	}
}

void Select_CompleteTall( void ){
	vec3_t mins, maxs;

	if ( !QE_SingleBrush() ) {
		return;
	}

	Undo_Start( "select complete tall" );
	Undo_AddBrushList( &selected_brushes );
	Undo_End();

	VectorCopy( selected_brushes.next->mins, mins );
	VectorCopy( selected_brushes.next->maxs, maxs );
	Select_Delete();

	Select_RealCompleteTall( mins, maxs );
	Sys_UpdateWindows( W_ALL );
}

void Select_PartialTall( void ){
	brush_t *b, *next;
	vec3_t mins, maxs;

	if ( !QE_SingleBrush() ) {
		return;
	}

	Undo_Start( "select complete tall" );
	Undo_AddBrushList( &selected_brushes );
	Undo_End();

	g_qeglobals.d_select_mode = sel_brush;

	VectorCopy( selected_brushes.next->mins, mins );
	VectorCopy( selected_brushes.next->maxs, maxs );
	Select_Delete();

	int nDim1 = ( g_pParentWnd->ActiveXY()->GetViewType() == YZ ) ? 1 : 0;
	int nDim2 = ( g_pParentWnd->ActiveXY()->GetViewType() == XY ) ? 1 : 2;

	for ( b = active_brushes.next ; b != &active_brushes ; b = next )
	{
		next = b->next;

		if ( b->bFiltered ) {
			continue;
		}

		if ( ( b->mins[nDim1] > maxs[nDim1] || b->maxs[nDim1] < mins[nDim1] )
			 || ( b->mins[nDim2] > maxs[nDim2] || b->maxs[nDim2] < mins[nDim2] ) ) {
			continue;
		}


		Brush_RemoveFromList( b );
		Brush_AddToList( b, &selected_brushes );
	}

	Sys_UpdateWindows( W_ALL );
}

void Select_Touching( void ){
	brush_t *b, *next;
	int i;
	vec3_t mins, maxs;

	if ( !QE_SingleBrush() ) {
		return;
	}

	g_qeglobals.d_select_mode = sel_brush;

	VectorCopy( selected_brushes.next->mins, mins );
	VectorCopy( selected_brushes.next->maxs, maxs );

	for ( b = active_brushes.next ; b != &active_brushes ; b = next )
	{
		next = b->next;

		if ( b->bFiltered ) {
			continue;
		}

		for ( i = 0 ; i < 3 ; i++ )
			if ( b->mins[i] > maxs[i] + 1 || b->maxs[i] < mins[i] - 1 ) {
				break;
			}

		if ( i == 3 ) {
			Brush_RemoveFromList( b );
			Brush_AddToList( b, &selected_brushes );
		}
	}

	Sys_UpdateWindows( W_ALL );
}

void Select_Inside( void ){
	brush_t *b, *next;
	int i;
	vec3_t mins, maxs;

	if ( !QE_SingleBrush() ) {
		return;
	}

	Undo_Start( "select inside" );
	Undo_AddBrushList( &selected_brushes );
	Undo_End();

	g_qeglobals.d_select_mode = sel_brush;

	VectorCopy( selected_brushes.next->mins, mins );
	VectorCopy( selected_brushes.next->maxs, maxs );
	Select_Delete();

	for ( b = active_brushes.next ; b != &active_brushes ; b = next )
	{
		next = b->next;

		if ( b->bFiltered ) {
			continue;
		}

		for ( i = 0 ; i < 3 ; i++ )
			if ( b->maxs[i] > maxs[i] || b->mins[i] < mins[i] ) {
				break;
			}
		if ( i == 3 ) {
			Brush_RemoveFromList( b );
			Brush_AddToList( b, &selected_brushes );
		}
	}

	Sys_UpdateWindows( W_ALL );
}

void Select_SelectGroup( entity_t* group ){
	brush_t*  b;
	//brush_t*  next;

	Undo_Start( "select func group" );
	Undo_AddBrushList( &selected_brushes );
	Undo_End();

	Select_Deselect();

	b = &group->brushes;

	do
	{
		b = b->onext;
		Brush_RemoveFromList( b );
		Brush_AddToList( b, &selected_brushes );
	} while ( b->onext != &group->brushes );

	Sys_UpdateWindows( W_ALL );
}


void Select_Ungroup( void ){
	int numselectedgroups;
	entity_t    *e;
	brush_t     *b,* sb;

	numselectedgroups = 0;
	for ( sb = selected_brushes.next; sb != &selected_brushes; sb = sb->next )
	{
		e = sb->owner;

		if ( e == world_entity || e->eclass->fixedsize ) {
			continue;
		}

		for ( b = e->brushes.onext; b != &e->brushes; b = e->brushes.onext )
		{
			Entity_UnlinkBrush( b );
			Entity_LinkBrush( world_entity, b );
		}
		Entity_Free( e );
		numselectedgroups++;
	}

	if ( numselectedgroups <= 0 ) {
		Sys_Printf( "No grouped entities selected.\n" );
		return;
	}
	Sys_Printf( "Ungrouped %d entit%s.\n", numselectedgroups, ( numselectedgroups == 1 ) ? "y" : "ies" );
	Sys_UpdateWindows( W_ALL );
}

/*!
   group selected brushes into specified entity
   if an entity is empty afterwards, destroy it
 */
void Select_GroupEntity( entity_t* group ){
	entity_t* e;
	brush_t *b;

	if ( group->eclass->fixedsize ) {
		Sys_FPrintf( SYS_ERR, "Select_GroupEntity: can't group anything to a fixedsize entity\n" );
		return;
	}

	for ( b = selected_brushes.next; b != &selected_brushes; b = b->next )
	{
		if ( b->owner->eclass->fixedsize ) {
			continue;
		}
		e = b->owner;
		Entity_UnlinkBrush( b );
		Entity_LinkBrush( group, b );
		if ( e != world_entity && e->brushes.onext == &e->brushes ) {
			Undo_AddEntity( e );
			Entity_Free( e );
		}
	}
}

/*!
   merge all selected entities together into the first one selected
   NOTE: makes use of order of selected_brushes list
   can be used to move world brushes in an entity, or to merge several ents together
   NOTE: didn't devise a strategy on the epairs, we merge into the first entity and use those
 */
void Select_MergeEntity(){
	entity_t* e = NULL;
	brush_t* b;
	for ( b = selected_brushes.next; b != &selected_brushes; b = b->next )
	{
		if ( !b->owner->eclass->fixedsize ) {
			e = b->owner;
			break;
		}
	}

	if ( e != NULL ) {
		Select_GroupEntity( e );

		int count = 0;
		for ( b = e->brushes.onext; b != &e->brushes; b = b->onext )
		{
			//Brush_RemoveFromList (b);
			//Brush_AddToList(b, &active_brushes);
			count++;
		}
		Sys_Printf( "Merged %d brushes into %s entity\n", count, ValueForKey( e, "classname" ) );
	}
}

/*
   ====================
   Select_Seperate
   ====================
 */
void Select_Seperate( void ) {
	Select_GroupEntity( world_entity );
}

/*
   ====================
   Select_MakeStructural
   ====================
 */
void Select_MakeStructural( void ){
	brush_t *b;
	face_t  *f;

	for ( b = selected_brushes.next ; b != &selected_brushes ; b = b->next )
	{
		for ( f = b->brush_faces ; f ; f = f->next )
			f->texdef.contents &= ~CONTENTS_DETAIL;
		b->bFiltered = FilterBrush( b );
	}
	Select_Deselect();
	Sys_UpdateWindows( W_ALL );
}

void Select_MakeDetail( void ){
	brush_t *b;
	face_t  *f;

	for ( b = selected_brushes.next ; b != &selected_brushes ; b = b->next )
	{
		for ( f = b->brush_faces ; f ; f = f->next )
			f->texdef.contents |= CONTENTS_DETAIL;
		b->bFiltered = FilterBrush( b );
	}
	Select_Deselect();
	Sys_UpdateWindows( W_ALL );
}

// brush primitive texture adjustments, use the camera view to map adjustments
// ShiftTextureRelative_BrushPrimit ( s , t ) will shift relative to the texture
void ShiftTextureRelative_Camera( face_t *f, int x, int y ){
	vec3_t vecS, vecT;
	vec_t XY[2]; // the values we are going to send for translation
	vec_t sgn[2]; // +1 or -1
	int axis[2];
	CamWnd* pCam;

	// get the two relative texture axes for the current texturing
	BrushPrimit_GetRelativeAxes( f, vecS, vecT );

	// center point of the face, project it on the camera space
	vec3_t C;
	VectorClear( C );
	int i;
	for ( i = 0; i < f->face_winding->numpoints; i++ )
	{
		VectorAdd( C,f->face_winding->points[i],C );
	}
	VectorScale( C,1.0 / f->face_winding->numpoints,C );

	pCam = g_pParentWnd->GetCamWnd();
	pCam->MatchViewAxes( C, vecS, axis[0], sgn[0] );
	pCam->MatchViewAxes( C, vecT, axis[1], sgn[1] );

	// this happens when the two directions can't be mapped on two different directions on the screen
	// then the move will occur against a single axis
	// (i.e. the user is not positioned well enough to send understandable shift commands)
	// NOTE: in most cases this warning is not very relevant because the user would use one of the two axes
	// for which the solution is easy (the other one being unknown)
	// so this warning could be removed
	if ( axis[0] == axis[1] ) {
		Sys_FPrintf( SYS_WRN, "Warning: degenerate in ShiftTextureRelative_Camera\n" );
	}

	// compute the X Y geometric increments
	// those geometric increments will be applied along the texture axes (the ones we computed above)
	XY[0] = 0;
	XY[1] = 0;
	if ( x != 0 ) {
		// moving right/left
		XY[axis[0]] += sgn[0] * x;
	}
	if ( y != 0 ) {
		XY[axis[1]] += sgn[1] * y;
	}
	// we worked out a move along vecS vecT, and we now it's geometric amplitude
	// apply it
	ShiftTextureRelative_BrushPrimit( f, XY[0], XY[1] );
}

void Select_ShiftTexture( int x, int y ){
	brush_t     *b;
	face_t      *f;

	int nFaceCount = g_ptrSelectedFaces.GetSize();

	if ( selected_brushes.next == &selected_brushes && nFaceCount == 0 ) {
		return;
	}

	for ( b = selected_brushes.next ; b != &selected_brushes ; b = b->next )
	{
		for ( f = b->brush_faces ; f ; f = f->next )
		{
			if ( g_qeglobals.m_bBrushPrimitMode ) {
				ShiftTextureRelative_Camera( f, x, y );
			}
			else
			{
				f->texdef.shift[0] += x;
				f->texdef.shift[1] += y;
			}
		}
		Brush_Build( b,true,true,false,false ); // don't filter
		if ( b->patchBrush ) {
			Patch_ShiftTexture( b->pPatch, x, y );
		}
	}

	if ( nFaceCount > 0 ) {
		for ( int i = 0; i < nFaceCount; i++ )
		{
			face_t *selFace = reinterpret_cast<face_t*>( g_ptrSelectedFaces.GetAt( i ) );
			brush_t *selBrush = reinterpret_cast<brush_t*>( g_ptrSelectedFaceBrushes.GetAt( i ) );
			if ( g_qeglobals.m_bBrushPrimitMode ) {
				ShiftTextureRelative_Camera( selFace, x, y );
			}
			else
			{
				selFace->texdef.shift[0] += x;
				selFace->texdef.shift[1] += y;
			}
			Brush_Build( selBrush,true,true,false,false ); // don't filter
		}
	}

	Sys_UpdateWindows( W_CAMERA );
}

//  setting float as input
void Select_ScaleTexture( float x, float y ){
	brush_t     *b;
	face_t      *f;

	int nFaceCount = g_ptrSelectedFaces.GetSize();

	if ( selected_brushes.next == &selected_brushes && nFaceCount == 0 ) {
		return;
	}

	for ( b = selected_brushes.next ; b != &selected_brushes ; b = b->next )
	{
		for ( f = b->brush_faces ; f ; f = f->next )
		{
			if ( g_qeglobals.m_bBrushPrimitMode ) {
				// apply same scale as the spinner button of the surface inspector
				float shift[2];
				float rotate;
				float scale[2];
				brushprimit_texdef_t bp;
				// compute normalized texture matrix
				ConvertTexMatWithQTexture( &f->brushprimit_texdef, f->d_texture, &bp, NULL );
				// compute fake shift scale rot
				TexMatToFakeTexCoords( bp.coords, shift, &rotate, scale );
				// update
				scale[0] += static_cast<float>( x ) * 0.1;
				scale[1] += static_cast<float>( y ) * 0.1;
				// compute new normalized texture matrix
				FakeTexCoordsToTexMat( shift, rotate, scale, bp.coords );
				// apply to face texture matrix
				ConvertTexMatWithQTexture( &bp, NULL, &f->brushprimit_texdef, f->d_texture );
			}
			else
			{
				f->texdef.scale[0] += x;
				f->texdef.scale[1] += y;
			}
		}
		Brush_Build( b,true,true,false,false ); // don't filter
		if ( b->patchBrush ) {
			Patch_ScaleTexture( b->pPatch, x, y );
		}
	}

	if ( nFaceCount > 0 ) {
		for ( int i = 0; i < nFaceCount; i++ )
		{
			face_t *selFace = reinterpret_cast<face_t*>( g_ptrSelectedFaces.GetAt( i ) );
			brush_t *selBrush = reinterpret_cast<brush_t*>( g_ptrSelectedFaceBrushes.GetAt( i ) );
			if ( g_qeglobals.m_bBrushPrimitMode ) {
				float shift[2];
				float rotate;
				float scale[2];
				brushprimit_texdef_t bp;
				ConvertTexMatWithQTexture( &selFace->brushprimit_texdef, selFace->d_texture, &bp, NULL );
				TexMatToFakeTexCoords( bp.coords, shift, &rotate, scale );
				scale[0] += static_cast<float>( x ) * 0.1;
				scale[1] += static_cast<float>( y ) * 0.1;
				FakeTexCoordsToTexMat( shift, rotate, scale, bp.coords );
				ConvertTexMatWithQTexture( &bp, NULL, &selFace->brushprimit_texdef, selFace->d_texture );
			}
			else
			{
				selFace->texdef.scale[0] += x;
				selFace->texdef.scale[1] += y;
			}
			Brush_Build( selBrush,true,true,false,false ); // don't filter
		}
	}

	Sys_UpdateWindows( W_CAMERA );
}

void Select_RotateTexture( int amt ){
	brush_t     *b;
	face_t      *f;

	int nFaceCount = g_ptrSelectedFaces.GetSize();

	if ( selected_brushes.next == &selected_brushes && nFaceCount == 0 ) {
		return;
	}

	for ( b = selected_brushes.next ; b != &selected_brushes ; b = b->next )
	{
		for ( f = b->brush_faces ; f ; f = f->next )
		{
			if ( g_qeglobals.m_bBrushPrimitMode ) {
				// apply same scale as the spinner button of the surface inspector
				float shift[2];
				float rotate;
				float scale[2];
				brushprimit_texdef_t bp;
				// compute normalized texture matrix
				ConvertTexMatWithQTexture( &f->brushprimit_texdef, f->d_texture, &bp, NULL );
				// compute fake shift scale rot
				TexMatToFakeTexCoords( bp.coords, shift, &rotate, scale );
				// update
				rotate += amt;
				// compute new normalized texture matrix
				FakeTexCoordsToTexMat( shift, rotate, scale, bp.coords );
				// apply to face texture matrix
				ConvertTexMatWithQTexture( &bp, NULL, &f->brushprimit_texdef, f->d_texture );
			}
			else
			{
				f->texdef.rotate += amt;
				f->texdef.rotate = static_cast<int>( f->texdef.rotate ) % 360;
			}
		}
		Brush_Build( b,true,true,false,false ); // don't filter
		if ( b->patchBrush ) {
			//Patch_RotateTexture(b->nPatchID, amt);
			Patch_RotateTexture( b->pPatch, amt );
		}
	}

	if ( nFaceCount > 0 ) {
		for ( int i = 0; i < nFaceCount; i++ )
		{
			face_t *selFace = reinterpret_cast<face_t*>( g_ptrSelectedFaces.GetAt( i ) );
			brush_t *selBrush = reinterpret_cast<brush_t*>( g_ptrSelectedFaceBrushes.GetAt( i ) );
			if ( g_qeglobals.m_bBrushPrimitMode ) {
				float shift[2];
				float rotate;
				float scale[2];
				brushprimit_texdef_t bp;
				ConvertTexMatWithQTexture( &selFace->brushprimit_texdef, selFace->d_texture, &bp, NULL );
				TexMatToFakeTexCoords( bp.coords, shift, &rotate, scale );
				rotate += amt;
				FakeTexCoordsToTexMat( shift, rotate, scale, bp.coords );
				ConvertTexMatWithQTexture( &bp, NULL, &selFace->brushprimit_texdef, selFace->d_texture );
			}
			else
			{
				selFace->texdef.rotate += amt;
				selFace->texdef.rotate = static_cast<int>( selFace->texdef.rotate ) % 360;
			}
			Brush_Build( selBrush,true,true,false,false ); // don't filter
		}
	}

	Sys_UpdateWindows( W_CAMERA );
}

// TTimo modified to handle shader architecture:
// expects shader names at input, comparison relies on shader names .. texture names no longer relevant
void FindReplaceTextures( const char* pFind, const char* pReplace, bool bSelected, bool bForce, bool bSelectMatchingFaces ){
	if ( strchr( pFind, ' ' ) || strchr( pReplace, ' ' ) ) {
		Sys_FPrintf( SYS_WRN, "FindReplaceTextures: '%s' or '%s' have spaces, aborted\n", pFind, pReplace );
		return;
	}

	brush_t* pList = ( bSelected ) ? &selected_brushes : &active_brushes;
	if ( !bSelected ) {
		Select_Deselect();
	}

	//++timo BP mode: replacing a texture in BP mode is not that easy, you need to recompute the texture matrix
	// if the size of the replacing texture differs, otherwise you get wrong scaling
	if ( g_qeglobals.m_bBrushPrimitMode ) {
		Sys_Printf( "TODO: finalize find/replace code for brush primitives" );
	}

	CPtrArray mFaces;
	for ( brush_t* pBrush = pList->next ; pBrush != pList; pBrush = pBrush->next )
	{
		if ( !bSelectMatchingFaces && pBrush->patchBrush ) {
			Patch_FindReplaceTexture( pBrush, pFind, pReplace, bForce );
		}

		bool found = false; //spog
		for ( face_t* pFace = pBrush->brush_faces; pFace; pFace = pFace->next )
		{
			if ( bForce || strcmpi( pFace->pShader->getName(), pFind ) == 0 ) {
				if ( !bSelectMatchingFaces ) {
					pFace->pShader->DecRef();
					pFace->pShader = QERApp_Shader_ForName( pReplace );
					pFace->pShader->IncRef();
					pFace->d_texture = pFace->pShader->getTexture();
					pFace->texdef.SetName( pReplace );
					found = true;
				}
				else if ( bSelectMatchingFaces ) {
					mFaces.Add( pFace );
				}
			}
		}

		if ( found ) { // spog - speed increase, only build brushes that changed
			Brush_Build( pBrush );
		}

	}

	if ( bSelectMatchingFaces ) {
		if ( bSelected ) {
			Select_Deselect();
		}

		int nSize = mFaces.GetSize();
		for ( int i = 0; i < nSize; i++ ) {
			g_SelectedFaces.Add( reinterpret_cast<face_t *>( mFaces.GetAt( i ) ) );
		}
	}

	Sys_UpdateWindows( W_CAMERA );
}

void Select_AllOfType(){
	brush_t *b, *next;
	entity_t    *e;
	// if no brush selected, we will select based on texture
	//   the first selected face's texture if any, or the current texture
	// if a brush is selected, we will select entities (first non-worldspawn owner in selected brushes)
	if ( selected_brushes.next == &selected_brushes ) {

		CString strName;
		if ( g_ptrSelectedFaces.GetSize() == 0 ) {
			strName = g_qeglobals.d_texturewin.texdef.GetName();
		}
		else
		{
			face_t *selFace = reinterpret_cast<face_t*>( g_ptrSelectedFaces.GetAt( 0 ) );
			strName = selFace->texdef.GetName();
		}

		Sys_Printf( "Selecting all brushes with the texture %s\n", strName.GetBuffer() );

		Select_Deselect();
		for ( b = active_brushes.next ; b != &active_brushes ; b = next )
		{
			next = b->next;

			if ( b->bFiltered ) {
				continue;
			}

			if ( b->patchBrush ) {
				if ( strcmpi( strName, b->pPatch->pShader->getName() ) == 0 ) {
					Brush_RemoveFromList( b );
					Brush_AddToList( b, &selected_brushes );
				}
			}
			else
			{
				for ( face_t* pFace = b->brush_faces; pFace; pFace = pFace->next )
				{
					if ( strcmpi( strName, pFace->texdef.GetName() ) == 0 ) {
						Brush_RemoveFromList( b );
						Brush_AddToList( b, &selected_brushes );
					}
				}
			}
		}
		Sys_UpdateWindows( W_ALL );
		return;
	}


	b = selected_brushes.next;
	e = b->owner;

	if ( e != NULL ) {
		if ( e != world_entity ) {
			CString strName = e->eclass->name;
			CString strKey, strVal;
			bool bCriteria = GetSelectAllCriteria( strKey, strVal );
			Sys_Printf( "Selecting all %s entities\n", strName.GetBuffer() );
			Select_Deselect();

			for ( b = active_brushes.next ; b != &active_brushes ; b = next )
			{
				next = b->next;

				if ( b->bFiltered ) {
					continue;
				}

				e = b->owner;
				if ( e != NULL ) {
					if ( strcmpi( e->eclass->name, strName ) == 0 ) {
						bool doIt = true;
						if ( bCriteria ) {
							CString str = ValueForKey( e, strKey );
							if ( str.CompareNoCase( strVal ) != 0 ) {
								doIt = false;
							}
						}
						if ( doIt ) {
							Brush_RemoveFromList( b );
							Brush_AddToList( b, &selected_brushes );
						}
					}
				}
			}
		}
	}
	Sys_UpdateWindows( W_ALL );

}

void Select_Reselect(){
	Select_Brush( selected_brushes.next );
	Sys_UpdateWindows( W_ALL );
}


void Select_FitTexture( int nHeight, int nWidth ){
	brush_t     *b;

	int nFaceCount = g_ptrSelectedFaces.GetSize();

	if ( selected_brushes.next == &selected_brushes && nFaceCount == 0 ) {
		return;
	}

	for ( b = selected_brushes.next ; b != &selected_brushes ; b = b->next )
	{
		Brush_FitTexture( b, nHeight, nWidth );
		Brush_Build( b,true,true,false,false ); // don't filter
	}

	if ( nFaceCount > 0 ) {
		for ( int i = 0; i < nFaceCount; i++ )
		{
			face_t *selFace = reinterpret_cast<face_t*>( g_ptrSelectedFaces.GetAt( i ) );
			brush_t *selBrush = reinterpret_cast<brush_t*>( g_ptrSelectedFaceBrushes.GetAt( i ) );
			Face_FitTexture( selFace, nHeight, nWidth );
			Brush_Build( selBrush,true,true,false,false ); // don't filter
		}
	}

	Sys_UpdateWindows( W_CAMERA );
}

void Select_Hide(){
	for ( brush_t* b = selected_brushes.next ; b && b != &selected_brushes ; b = b->next )
	{
		b->hiddenBrush = true;
		b->bFiltered = true;
	}
	Sys_UpdateWindows( W_ALL );
}

void Select_ShowAllHidden(){
	brush_t* b;
	for ( b = selected_brushes.next ; b && b != &selected_brushes ; b = b->next )
	{
		if ( b->hiddenBrush ) {
			b->hiddenBrush = false;
			b->bFiltered = FilterBrush( b );
		}
	}
	for ( b = active_brushes.next ; b && b != &active_brushes ; b = b->next )
	{
		if ( b->hiddenBrush ) {
			b->hiddenBrush = false;
			b->bFiltered = FilterBrush( b );
		}
	}
	Sys_UpdateWindows( W_ALL );
}


/*
   ============
   Select_Invert
   ============
 */
void Select_Invert( void ){
	brush_t *next, *prev, *b;

	Sys_Printf( "inverting selection...\n" );

	next = active_brushes.next;
	prev = active_brushes.prev;
	if ( selected_brushes.next != &selected_brushes ) {
		active_brushes.next = selected_brushes.next;
		active_brushes.prev = selected_brushes.prev;
		active_brushes.next->prev = &active_brushes;
		active_brushes.prev->next = &active_brushes;
	}
	else
	{
		active_brushes.next = &active_brushes;
		active_brushes.prev = &active_brushes;
	}
	if ( next != &active_brushes ) {
		selected_brushes.next = next;
		selected_brushes.prev = prev;
		selected_brushes.next->prev = &selected_brushes;
		selected_brushes.prev->next = &selected_brushes;
	}
	else
	{
		selected_brushes.next = &selected_brushes;
		selected_brushes.prev = &selected_brushes;
	}

	// now check if any hidden brush is selected
	for ( b = selected_brushes.next; b != &selected_brushes; )
	{
		if ( b->patchBrush ) {
			b->pPatch->bSelected = true;
		}

		if ( b->bFiltered ) {
			brush_t *pb = b;
			b = b->next;
			Brush_RemoveFromList( pb );
			Brush_AddToList( pb, &active_brushes );
		}
		else{ b = b->next; }

	}

	for ( b = active_brushes.next; b != &active_brushes; b = b->next )
	{
		if ( b->patchBrush ) {
			b->pPatch->bSelected = false;
		}
	}

	// since invert selection only works at the brush level,
	// set g_qeglobals.d_select_mode accordingly
	g_qeglobals.d_select_mode = sel_brush;

	// since invert selection only works at the brush level,
	// set g_qeglobals.d_select_mode accordingly
	g_qeglobals.d_select_mode = sel_brush;

	Sys_UpdateWindows( W_ALL );

	Sys_Printf( "done.\n" );
}

#ifdef ENABLE_GROUPS
/*
   ===========
   Select_Name
   ===========
 */
void Select_Name( const char *pName ){
	if ( g_qeglobals.m_bBrushPrimitMode ) {
		for ( brush_t* b = selected_brushes.next ; b && b != &selected_brushes ; b = b->next )
		{
			Brush_SetEpair( b, "Name", pName );
		}
	}
}

/*
   =================
   Select_AddToGroup
   add selected brushes to a group, update the tree
   =================
 */
void Select_AddToGroup( const char *pName ){
	if ( g_qeglobals.m_bBrushPrimitMode ) {
		for ( brush_t* b = selected_brushes.next ; b && b != &selected_brushes ; b = b->next )
		{
			Brush_SetEpair( b, "group", pName );
			Group_AddToProperGroup( b );
		}
	}
}
#endif