+++ /dev/null
-/*
-Copyright (C) 1999-2006 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
-*/
-
-#include "qdata.h"
-#include "flex.h"
-
-#define MAXFILES 2048
-
-typedef struct
-{
- int x;
- int y;
- int w;
- int h;
- int cw;
- int ch;
- int rw;
- int index;
- int depth;
- int col;
- int baseline;
- char name[128];
-} Coords;
-
-int filenum;
-int valid;
-Coords in[MAXFILES];
-Coords out;
-char outscript[256];
-char sourcedir[256];
-char outusage[256];
-char root[32];
-
-int destsize = 0;
-byte *pixels = NULL; // Buffer to load image
-long *outpixels = NULL; // Buffer to store combined textures
-long *usagemap = NULL; // Buffer of usage map
-void *bmptemp = NULL; // Buffer of usage map
-byte *map = NULL;
-
-int xcharsize;
-int ycharsize;
-int dosort = 0;
-int missed = 0;
-int overlap = 0;
-int nobaseline = 0;
-int percent;
-
-//////////////////////////////////////////////////
-// Setting the char based usage map //
-//////////////////////////////////////////////////
-
-byte TryPlace(Coords *coord)
-{
- int x, y;
- byte entry = 0;
- byte *mapitem;
-
- mapitem = map + (coord->x / xcharsize) + ((coord->y / ycharsize) * out.cw);
-
- for (y = 0; y < coord->ch; y++, mapitem += out.cw - coord->cw)
- {
- for (x = 0; x < coord->cw; x++)
- {
- if (entry |= *mapitem++ & 8)
- {
- return(entry);
- }
- }
- }
- return(entry);
-}
-
-void SetMap(Coords *coord)
-{
- int x, y;
- byte *mapitem;
-
- mapitem = map + (coord->x / xcharsize) + ((coord->y / ycharsize) * out.cw);
-
- for (y = 0; y < coord->ch; y++, mapitem += out.cw - coord->cw)
- for (x = 0; x < coord->cw; x++)
- *mapitem++ |= 8;
-}
-
-//////////////////////////////////////////////////
-// Setting the pixel based usage map //
-//////////////////////////////////////////////////
-
-void CheckOverlap(Coords *coord)
-{
- int x;
- int y;
- long *dest;
-
- x = coord->x;
- y = coord->y;
-
- dest = (long *)(usagemap + x + (y * out.w));
-
- for (y = 0; y < coord->h; y++, dest += out.w - coord->w)
- {
- for (x = 0; x < coord->w; x++)
- {
- if (*dest++)
- {
- overlap++;
- return;
- }
- }
- }
-}
-
-void SetUsageMap(Coords *coord)
-{
- int x;
- int y;
- long *dest;
-
- x = coord->x;
- y = coord->y;
-
- dest = (long *)(usagemap + x + (y * out.w));
-
- for (y = 0; y < coord->h; y++, dest += out.w - coord->w)
- {
- for (x = 0; x < coord->w; x++)
- {
- *dest++ = coord->col;
- }
- }
-}
-
-//////////////////////////////////////////////////
-// Flips the BMP image to the correct way up //
-//////////////////////////////////////////////////
-
-void CopyLine(byte *dest, byte *src, int size)
-{
- int x;
-
- for (x = 0; x < size; x++)
- *dest++ = *src++;
-}
-
-/****************************************************/
-/* Printing headers etc */
-/****************************************************/
-
-void RemoveLeading(char *name)
-{
- int i;
- char temp[128];
-
- for(i = strlen(name) - 1; i > 0; i--)
- {
- if((name[i] == '\\') || (name[i] == '/'))
- {
- strcpy(temp, name + i + 1);
- strcpy(name, temp);
- return;
- }
- }
-}
-
-void RemoveExt(char *name)
-{
- while ((*name != '.') && *name)
- name++;
- *name = 0;
-}
-
-/****************************************************/
-/* Misc calcualtions */
-/****************************************************/
-
-int TotalArea()
-{
- int i;
- int total = 0;
-
- for (i = 0; i < (filenum + 2); i++)
- total += in[i].w * in[i].h;
-
- return(total);
-}
-
-/****************************************************/
-/* Setup and checking of all info */
-/****************************************************/
-
-void InitVars()
-{
- filenum = 0;
- valid = 0;
- dosort = 0;
- missed = 0;
- overlap = 0;
- nobaseline = 0;
-
- memset(outscript, 0, sizeof(outscript));
- memset(outscript, 0, sizeof(sourcedir));
- memset(outscript, 0, sizeof(outusage));
- memset(outscript, 0, sizeof(root));
-
- memset(in, 0, sizeof(in));
- memset(&out, 0, sizeof(out));
-}
-void Cleanup()
-{
- if (pixels)
- free(pixels);
- if (usagemap)
- free(usagemap);
- if (outpixels)
- free(outpixels);
- if (bmptemp)
- free(bmptemp);
- if (map)
- free(map);
-}
-
-typedef struct glxy_s
-{
- float xl, yt, xr, yb;
- int w, h, baseline;
-} glxy_t;
-
-int SaveScript(char *name)
-{
- FILE *fp;
- int i, j;
- glxy_t buff;
-
- if(fp = fopen(name, "wb"))
- {
- for (j = 0; j < filenum; j++)
- {
- for (i = 0; i < filenum; i++)
- {
- if (in[i].index == j)
- {
- if (in[i].depth)
- {
- buff.xl = (float)in[i].x / (float)out.w;
- buff.yt = (float)in[i].y / (float)out.h;
- buff.xr = ((float)in[i].w + (float)in[i].x) / (float)out.w;
- buff.yb = ((float)in[i].h + (float)in[i].y) / (float)out.h;
- buff.w = in[i].w;
- buff.h = in[i].h;
- buff.baseline = in[i].baseline;
- }
- else
- {
- memset(&buff, 0, sizeof(glxy_t));
- }
- fwrite(&buff, 1, sizeof(glxy_t), fp);
- i = filenum;
- }
- }
- }
- fclose(fp);
- return(true);
- }
- else
- return(false);
-}
-
-int GetScriptInfo(char *name)
-{
- FILE *fp;
- char buffer[256];
- char tempbuff[256];
- char delims[] = {" \t,\n"};
-
- printf("Opening script file %s.\n", name);
-
- if (fp = fopen(name, "r"))
- {
- while(fgets(buffer, 256, fp))
- {
- if (strncmp(buffer, "//", 2) && strncmp(buffer, "\n", 1))
- {
- strupr(buffer);
- strcpy(tempbuff, buffer);
- if (strcmp(strtok(tempbuff, delims), "OUTPUT") == 0)
- {
- strcpy(out.name, strtok(NULL, delims));
- strlwr(out.name);
- }
-
- strcpy(tempbuff, buffer);
- if (strcmp(strtok(tempbuff, delims), "SOURCEDIR") == 0)
- {
- strcpy(tempbuff, strtok(NULL, delims));
- strcpy(sourcedir, ExpandPathAndArchive(tempbuff));
- }
-
- strcpy(tempbuff, buffer);
- if (strcmp(strtok(tempbuff, delims), "DOSORT") == 0)
- dosort = 1;
-
- strcpy(tempbuff, buffer);
- if (strcmp(strtok(tempbuff, delims), "XCHARSIZE") == 0)
- xcharsize = strtol(strtok(NULL, delims), NULL, 0);
-
- strcpy(tempbuff, buffer);
- if (strcmp(strtok(tempbuff, delims), "YCHARSIZE") == 0)
- ycharsize = strtol(strtok(NULL, delims), NULL, 0);
-
- strcpy(tempbuff, buffer);
- if (strcmp(strtok(tempbuff, delims), "OUTSCRIPT") == 0)
- {
- strcpy(outscript, strtok(NULL, delims));
- strlwr(outscript);
- }
-
- strcpy(tempbuff, buffer);
- if (strcmp(strtok(tempbuff, delims), "OUTUSAGE") == 0)
- strcpy(outusage, strtok(NULL, delims));
-
- strcpy(tempbuff, buffer);
- if (strcmp(strtok(tempbuff, delims), "POS") == 0)
- {
- out.w = strtol(strtok(NULL, delims), NULL, 0);
- out.h = strtol(strtok(NULL, delims), NULL, 0);
- }
-
- strcpy(tempbuff, buffer);
- if (strcmp(strtok(tempbuff, delims), "FILE") == 0)
- {
- strcpy(in[filenum].name, strtok(NULL, delims));
- in[filenum].x = strtol(strtok(NULL, delims), NULL, 0);
- in[filenum].y = strtol(strtok(NULL, delims), NULL, 0);
- in[filenum].col = strtol(strtok(NULL, delims), NULL, 0);
- filenum++;
- }
- }
- }
- fclose(fp);
- return(true);
- }
- else
- {
- printf("ERROR : Could not open script file.\n");
- return(false);
- }
-}
-
-int CheckVars()
-{
- int i;
-
- if (out.name[0] == 0)
- {
- printf("ERROR : No output name specified.\n");
- return(false);
- }
- if ((out.w <= 0) || (out.h <= 0))
- {
- printf("ERROR : Invalid VRAM coordinates.\n");
- return(false);
- }
- if (filenum == 0)
- {
- printf("ERROR : No input files specified.\n");
- return(false);
- }
- for (i = 0; i < filenum; i++)
- if (in[i].name[0] == 0)
- {
- printf("ERROR : Input filename invalid.\n");
- return(false);
- }
- return(true);
-}
-
-// Makes sure texture is totally within the output area
-
-int CheckCoords(Coords *coord)
-{
- if ((coord->x + coord->w) > out.w)
- return(false);
- if ((coord->y + coord->h) > out.h)
- return(false);
-
- return(true);
-}
-// Gets the width, height, palette width and palette height of each BMP file
-
-int GetFileDimensions()
-{
- int i;
- int width, height;
- char name[128];
-
- for (i = 0; i < filenum; i++)
- {
- in[i].index = i;
-
- strcpy(name, sourcedir);
- strcat(name, in[i].name);
- printf("Getting file dimensions, file : %s \r", in[i].name);
- if(FileExists(name))
- {
- LoadAnyImage(name, NULL, NULL, &width, &height);
- in[i].depth = 32;
- in[i].rw = width;
- in[i].w = width; // makes it width in
- in[i].h = height;
- in[i].cw = (in[i].w + (xcharsize - 1)) / xcharsize;
- in[i].ch = (in[i].h + (ycharsize - 1)) / ycharsize;
-
- if (!CheckCoords(&in[i]) && (in[i].x >= 0))
- {
- printf("Error : texture %s out of bounds.\n", in[i].name);
- return(false);
- }
- valid++;
- }
- else
- {
- in[i].depth = 0;
- in[i].x = -1;
- in[i].y = -1;
- in[i].w = 0;
- in[i].h = 0;
- }
- }
- printf("\n\n");
- return(true);
-}
-
-// Sorts files into order for optimal space finding
-// Fixed position ones first, followed by the others in descending size
-// The theory being that it is easier to find space for smaller textures.
-// size = (width + height)
-// For space finding it is easier to place a 32x32 than a 128x2
-
-#define WEIGHT 0x8000
-
-void Swap(Coords *a, Coords *b)
-{
- Coords c;
-
- c = *a;
- *a = *b;
- *b = c;
-}
-
-void SortInNames()
-{
- int i, j;
- int largest, largcount;
- int size;
-
- printf("Sorting filenames by size.\n\n");
-
- for (j = 0; j < filenum; j++)
- {
- largest = -1;
- largcount = -1;
-
- for (i = j; i < filenum; i++)
- {
- if (in[i].depth)
- {
- size = in[i].w + in[i].h;
-
- if ((in[i].x < 0) && (size > largest))
- {
- largcount = i;
- largest = size;
- }
- }
- }
- if ((largcount >= 0) && (largcount != j))
- Swap(&in[j], &in[largcount]);
- }
-}
-
-int SetVars(char *name)
-{
- if (!GetScriptInfo(name))
- return(false);
-
- if (!CheckVars())
- return(false);
-
- destsize = out.w * out.h;
-
- out.cw = out.w / xcharsize;
- out.ch = out.h / ycharsize;
-
- if ((usagemap = (long *)SafeMalloc(destsize * 4, "")) == NULL)
- return(false);
- if ((outpixels = (long *)SafeMalloc(destsize * 4, "")) == NULL)
- return(false);
- if ((bmptemp = (void *)SafeMalloc(destsize * 4, "")) == NULL)
- return(false);
- if ((map = (byte *)SafeMalloc(destsize / (xcharsize * ycharsize), "")) == NULL)
- return(false);
-
- if (GetFileDimensions() == false)
- return(false);
-
- if (dosort)
- SortInNames();
-
- return(true);
-}
-/****************************************************/
-/* Actual copying routines */
-/****************************************************/
-
-int FindCoords(Coords *coord)
-{
- int tx, ty;
-
- if (coord->x >= 0)
- {
- SetMap(coord);
- return(true);
- }
- else
- {
- for (ty = 0; ty < out.ch; ty++)
- {
- for (tx = 0; tx < out.cw; tx++)
- {
- coord->x = (tx * xcharsize);
- coord->y = (ty * ycharsize);
-
- if (CheckCoords(coord) && !TryPlace(coord))
- {
- SetMap(coord);
- return(true);
- }
- }
- }
- }
- coord->x = -1;
- coord->y = -1;
-
- return(false);
-}
-
-void CheckBaseline(int i)
-{
- int y;
- long *pix;
-
- in[i].baseline = -1;
- pix = (long *)pixels;
-
- for(y = 0; y < in[i].h; y++, pix += in[i].w)
- {
- if((*pix & 0x00ffffff) == 0x00ff00ff)
- {
- in[i].baseline = y;
- break;
- }
- }
- pix = (long *)pixels;
- for(y = 0; y < in[i].w * in[i].h; y++, pix++)
- {
- if((*pix & 0x00ffffff) == 0x00ff00ff)
- {
- *pix = 0;
- }
- }
-
- if(in[i].baseline == -1)
- {
- printf("\nERROR : %s has no baseline\n", in[i].name);
- nobaseline++;
- }
-}
-
-void CopyToMain32(Coords *coord)
-{
- int x;
- int y;
- long *source;
- long *dest;
-
- x = coord->x;
- y = coord->y;
-
- source = (long *)pixels;
- dest = (long *)(outpixels + x + (y * out.w));
-
- for (y = 0; y < coord->h; y++, dest += out.w - coord->w)
- {
- for (x = 0; x < coord->w; x++)
- {
- *dest++ = *source++;
- }
- }
-}
-
-void CreateMain()
-{
- int i, count;
- int width, height;
- char name[128];
-
- for (i = 0, count = 0; i < filenum; i++)
- {
- if (in[i].depth)
- {
- printf("\rProcessing %d of %d (%d missed, %d overlapping, %d nobase)\r", count + 1, valid, missed, overlap, nobaseline);
- count++;
- if (!FindCoords(&in[i]))
- missed++;
- else
- {
- strcpy(name, sourcedir);
- strcat(name, in[i].name);
- LoadAnyImage(name, &pixels, NULL, &width, &height);
- CheckBaseline(i);
- CheckOverlap(&in[i]);
- CopyToMain32(&in[i]);
- SetUsageMap(&in[i]);
- }
- }
- }
-}
-
-void Cmd_TextureMix()
-{
- miptex32_t *qtex32;
- char filename[1024];
- int size;
-
- InitVars();
-
- GetScriptToken (false);
-
- strcpy(root, token);
- RemoveExt(root);
- RemoveLeading(root);
-
- strcpy(filename, ExpandPathAndArchive(token));
- if (SetVars(filename))
- {
- // Create combined texture
- percent = ((TotalArea() * 100) / (out.w * out.h));
- printf("Total area consumed : %d%%\n", percent);
- printf("Texture resolution : %dx%d pixels.\n", xcharsize, ycharsize);
- CreateMain();
-
- // Save image as m32
- sprintf (filename, "%spics/misc/%s.m32", gamedir, out.name);
- qtex32 = CreateMip32((unsigned *)outpixels, out.w, out.h, &size, false);
-
- qtex32->contents = 0;
- qtex32->value = 0;
- qtex32->scale_x = 1.0;
- qtex32->scale_y = 1.0;
- sprintf (qtex32->name, "misc/%s", out.name);
-
- printf ("\n\nwriting %s\n", filename);
- SaveFile (filename, (byte *)qtex32, size);
- free (qtex32);
-
- // Save out script file
- sprintf (filename, "%spics/misc/%s.fnt", gamedir, outscript);
- printf("Writing %s as script file\n", filename);
- if (!SaveScript(filename))
- {
- printf("Unable to save output script.\n");
- }
- }
- printf("Everythings groovy.\n");
- Cleanup();
-}
-
-// end
-