#include <memory>
#include "ext/meshtexturizer.h"
// TnzCore includes
#include "tgl.h" // OpenGL includes
// Qt includes
#include <QReadWriteLock>
#include <QReadLocker>
#include <QWriteLocker>
// tcg includes
#include "tcg/tcg_macros.h"
#include "tcg/tcg_list.h"
#include "tcg/tcg_misc.h"
#define COPIED_BORDER 1 // Amount of tile border from the original image
#define TRANSP_BORDER 1 // Amount of transparent tile border
#define NONPREM_BORDER \
1 // Amount of nonpremultiplied copied transparent border
#define TOTAL_BORDER \
(COPIED_BORDER + TRANSP_BORDER) // Overall border to texture tiles above
#define TOTAL_BORDER_2 (2 * TOTAL_BORDER) // Twice the above
TCG_STATIC_ASSERT(COPIED_BORDER >
0); // Due to GL_LINEAR alpha blending on tile seams
TCG_STATIC_ASSERT(TRANSP_BORDER > 0); // Due to GL_CLAMP beyond tile limits
TCG_STATIC_ASSERT(NONPREM_BORDER <=
TRANSP_BORDER); // The nonpremultiplied border is transparent
//******************************************************************************************
// MeshTexturizer::Imp definition
//******************************************************************************************
class MeshTexturizer::Imp {
typedef MeshTexturizer::TextureData TextureData;
public:
QReadWriteLock m_lock; //!< Lock for synchronized access
tcg::list<std::shared_ptr<TextureData>>
m_textureDatas; //!< Pool of texture datas
public:
Imp() : m_lock(QReadWriteLock::Recursive) {}
bool testTextureAlloc(int lx, int ly);
GLuint textureAlloc(const TRaster32P &ras, const TRaster32P &aux, int x,
int y, int textureLx, int textureLy, bool premultiplied);
void allocateTextures(int groupIdx, const TRaster32P &ras,
const TRaster32P &aux, int x, int y, int textureLx,
int textureLy, bool premultiplied);
TextureData *getTextureData(int groupIdx);
};
//---------------------------------------------------------------------------------
bool MeshTexturizer::Imp::testTextureAlloc(int lx, int ly) {
lx += TOTAL_BORDER_2, ly += TOTAL_BORDER_2; // Add border
glTexImage2D(GL_PROXY_TEXTURE_2D,
0, // one level only
GL_RGBA, // number of pixel channels
lx, // width
ly, // height
0, // border size
TGL_FMT, // pixel format
GL_UNSIGNED_BYTE, // pixel data type
0);
int outLx;
glGetTexLevelParameteriv(GL_PROXY_TEXTURE_2D, 0, GL_TEXTURE_WIDTH, &outLx);
return (lx == outLx);
}
//---------------------------------------------------------------------------------
GLuint MeshTexturizer::Imp::textureAlloc(const TRaster32P &ras,
const TRaster32P &aux, int x, int y,
int textureLx, int textureLy,
bool premultiplied) {
struct locals {
static void clearMatte(const TRaster32P &ras, int xBegin, int yBegin,
int xEnd, int yEnd) {
for (int y = yBegin; y != yEnd; ++y) {
TPixel32 *line = ras->pixels(y), *pixEnd = line + xEnd;
for (TPixel32 *pix = line + xBegin; pix != pixEnd; ++pix) pix->m = 0;
}
}
static void clearMatte_border(const TRaster32P &ras, int border0,
int border1) {
assert(border0 < border1);
// Horizontal
clearMatte(ras, border0, border0, ras->getLx() - border0, border1);
clearMatte(ras, border0, ras->getLy() - border1, ras->getLx() - border0,
ras->getLy() - border0);
// Vertical
clearMatte(ras, border0, border1, border1, ras->getLy() - border1);
clearMatte(ras, ras->getLx() - border1, border1, ras->getLx() - border0,
ras->getLy() - border1);
}
}; // locals
// Prepare the texture tile
assert(aux->getLx() >= textureLx + TOTAL_BORDER_2 &&
aux->getLy() >= textureLy + TOTAL_BORDER_2);
TRect rasRect(x, y, x + textureLx - 1, y + textureLy - 1);
rasRect = rasRect.enlarge(premultiplied ? COPIED_BORDER
: COPIED_BORDER + NONPREM_BORDER);
rasRect = rasRect * ras->getBounds();
TRect auxRect(rasRect - TPoint(x - TOTAL_BORDER, y - TOTAL_BORDER));
// An auxiliary raster must be used to supply the transparent border
TRaster32P tex(aux->extract(0, 0, textureLx + TOTAL_BORDER_2 - 1,
textureLy + TOTAL_BORDER_2 - 1));
tex->clear();
aux->extract(auxRect)->copy(ras->extract(rasRect));
if (!premultiplied && NONPREM_BORDER > 0)
locals::clearMatte_border(aux, TRANSP_BORDER - NONPREM_BORDER,
TRANSP_BORDER);
// Pass the raster into VRAM
GLuint texId;
glGenTextures(1, &texId);
glBindTexture(GL_TEXTURE_2D, texId);
glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_WRAP_S,
GL_CLAMP); // These must be used on a bound texture,
glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_WRAP_T,
GL_CLAMP); // and are remembered in the OpenGL context.
glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MAG_FILTER,
GL_LINEAR); // They can be set here, no need for
glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MIN_FILTER,
GL_LINEAR); // the user to do it.
glPixelStorei(GL_UNPACK_ROW_LENGTH, tex->getWrap());
glPixelStorei(GL_UNPACK_ALIGNMENT, 1);
glTexImage2D(GL_TEXTURE_2D,
0, // one level only
GL_RGBA, // pixel channels count
tex->getLx(), // width
tex->getLy(), // height
0, // border size
TGL_FMT, // pixel format
GL_UNSIGNED_BYTE, // pixel data type
(GLvoid *)tex->getRawData());
return texId;
}
//---------------------------------------------------------------------------------
void MeshTexturizer::Imp::allocateTextures(int groupIdx, const TRaster32P &ras,
const TRaster32P &aux, int x, int y,
int textureLx, int textureLy,
bool premultiplied) {
TextureData *data = m_textureDatas[groupIdx].get();
// Test the specified texture allocation
if (testTextureAlloc(textureLx, textureLy)) {
TPointD scale(data->m_geom.getLx() / (double)ras->getLx(),
data->m_geom.getLy() / (double)ras->getLy());
TRectD tileGeom(TRectD(scale.x * (x - TOTAL_BORDER),
scale.y * (y - TOTAL_BORDER),
scale.x * (x + textureLx + TOTAL_BORDER),
scale.y * (y + textureLy + TOTAL_BORDER)) +
data->m_geom.getP00());
GLuint texId =
textureAlloc(ras, aux, x, y, textureLx, textureLy, premultiplied);
TextureData::TileData td = {texId, tileGeom};
data->m_tileDatas.push_back(td);
return;
}
if (textureLx <= 1 && textureLy <= 1) return; // No texture can be allocated
// The texture could not be allocated. Then, bisecate and branch.
if (textureLx > textureLy) {
int textureLx_2 = textureLx >> 1;
allocateTextures(groupIdx, ras, aux, x, y, textureLx_2, textureLy,
premultiplied);
allocateTextures(groupIdx, ras, aux, x + textureLx_2, y, textureLx_2,
textureLy, premultiplied);
} else {
int textureLy_2 = textureLy >> 1;
allocateTextures(groupIdx, ras, aux, x, y, textureLx, textureLy_2,
premultiplied);
allocateTextures(groupIdx, ras, aux, x, y + textureLy_2, textureLx,
textureLy_2, premultiplied);
}
}
//---------------------------------------------------------------------------------
MeshTexturizer::TextureData *MeshTexturizer::Imp::getTextureData(int groupIdx) {
typedef MeshTexturizer::TextureData TextureData;
// Copy tile datas container
return m_textureDatas[groupIdx].get();
}
//******************************************************************************************
// MeshTexturizer implementation
//******************************************************************************************
MeshTexturizer::MeshTexturizer() : m_imp(new Imp) {}
//---------------------------------------------------------------------------------
MeshTexturizer::~MeshTexturizer() {}
//---------------------------------------------------------------------------------
int MeshTexturizer::bindTexture(const TRaster32P &ras, const TRectD &geom,
PremultMode premultiplyMode) {
QWriteLocker locker(&m_imp->m_lock);
// Backup the state of some specific OpenGL variables that will be changed
// throughout the code
int row_length, alignment;
glGetIntegerv(GL_UNPACK_ROW_LENGTH, &row_length);
glGetIntegerv(GL_UNPACK_ALIGNMENT, &alignment);
// Initialize a new texture data
int dataIdx =
m_imp->m_textureDatas.push_back(std::make_shared<TextureData>(geom));
// Textures must have 2-power sizes. So, let's start with the smallest 2 power
// >= ras's sizes.
int textureLx =
tcg::numeric_ops::GE_2Power((unsigned int)ras->getLx() + TOTAL_BORDER_2);
int textureLy =
tcg::numeric_ops::GE_2Power((unsigned int)ras->getLy() + TOTAL_BORDER_2);
// We'll assume a strict granularity max of 512 x 512 textures
textureLx = std::min(textureLx, 1 << 9);
textureLy = std::min(textureLy, 1 << 9);
// Allocate a suitable texture raster. The texture will include a transparent
// 1-pix border
// that is needed to perform texture mapping with GL_CLAMP transparent
// wrapping
TRaster32P tex(textureLx, textureLy);
// Now, let's tile the specified raster. We'll start from the lower-left
// corner in case
// the raster can be completely included in just one tile
int lx = ras->getLx(), ly = ras->getLy();
int tileLx = textureLx - TOTAL_BORDER_2,
tileLy = textureLy - TOTAL_BORDER_2; // Texture size without border
int xEntireCells = (lx - 1) / tileLx,
yEntireCells =
(ly - 1) /
tileLy; // +1 so in case l == tileL, we get the remainder case
int lastTexLx = tcg::numeric_ops::GE_2Power(
(unsigned int)(lx - xEntireCells * tileLx + TOTAL_BORDER_2));
int lastTexLy = tcg::numeric_ops::GE_2Power(
(unsigned int)(ly - yEntireCells * tileLy + TOTAL_BORDER_2));
int lastTileLx = lastTexLx - TOTAL_BORDER_2,
lastTileLy = lastTexLy - TOTAL_BORDER_2;
bool premultiplied = (premultiplyMode == PREMULTIPLIED);
int i, j;
for (i = 0; i < yEntireCells; ++i) {
for (j = 0; j < xEntireCells; ++j)
// Perform a (possibly subdividing) allocation of the specified tile
m_imp->allocateTextures(dataIdx, ras, tex, j * tileLx, i * tileLy, tileLx,
tileLy, premultiplied);
m_imp->allocateTextures(dataIdx, ras, tex, j * tileLx, i * tileLy,
lastTileLx, tileLy, premultiplied);
}
for (j = 0; j < xEntireCells; ++j)
m_imp->allocateTextures(dataIdx, ras, tex, j * tileLx, i * tileLy, tileLx,
lastTileLy, premultiplied);
m_imp->allocateTextures(dataIdx, ras, tex, j * tileLx, i * tileLy, lastTileLx,
lastTileLy, premultiplied);
// Restore OpenGL variables
glPixelStorei(GL_UNPACK_ROW_LENGTH, row_length);
glPixelStorei(GL_UNPACK_ALIGNMENT, alignment);
return dataIdx;
}
//---------------------------------------------------------------------------------
void MeshTexturizer::rebindTexture(int texId, const TRaster32P &ras,
const TRectD &geom,
PremultMode premultiplyMode) {
QWriteLocker locker(&m_imp->m_lock);
unbindTexture(texId);
int newTexId = bindTexture(ras, geom, premultiplyMode);
assert(texId == newTexId);
}
//---------------------------------------------------------------------------------
void MeshTexturizer::unbindTexture(int texId) {
QWriteLocker locker(&m_imp->m_lock);
m_imp->m_textureDatas.erase(texId);
}
//---------------------------------------------------------------------------------
MeshTexturizer::TextureData *MeshTexturizer::getTextureData(int textureId) {
QReadLocker locker(&m_imp->m_lock);
return m_imp->getTextureData(textureId);
}