-/*\r
-Copyright (C) 1999-2007 id Software, Inc. and contributors.\r
-For a list of contributors, see the accompanying CONTRIBUTORS file.\r
-\r
-This file is part of GtkRadiant.\r
-\r
-GtkRadiant is free software; you can redistribute it and/or modify\r
-it under the terms of the GNU General Public License as published by\r
-the Free Software Foundation; either version 2 of the License, or\r
-(at your option) any later version.\r
-\r
-GtkRadiant is distributed in the hope that it will be useful,\r
-but WITHOUT ANY WARRANTY; without even the implied warranty of\r
-MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the\r
-GNU General Public License for more details.\r
-\r
-You should have received a copy of the GNU General Public License\r
-along with GtkRadiant; if not, write to the Free Software\r
-Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA\r
-*/\r
-\r
-#include "qdata.h"\r
-#include "flex.h"\r
-\r
-#define MAXFILES 2048\r
-\r
-typedef struct\r
-{\r
- int x;\r
- int y;\r
- int w;\r
- int h;\r
- int cw;\r
- int ch;\r
- int rw;\r
- int index;\r
- int depth;\r
- int col;\r
- int baseline;\r
- char name[128];\r
-} Coords;\r
-\r
-int filenum;\r
-int valid;\r
-Coords in[MAXFILES];\r
-Coords out;\r
-char outscript[256];\r
-char sourcedir[256];\r
-char outusage[256];\r
-char root[32];\r
-\r
-int destsize = 0;\r
-byte *pixels = NULL; // Buffer to load image\r
-long *outpixels = NULL; // Buffer to store combined textures\r
-long *usagemap = NULL; // Buffer of usage map\r
-void *bmptemp = NULL; // Buffer of usage map\r
-byte *map = NULL;\r
-\r
-int xcharsize;\r
-int ycharsize;\r
-int dosort = 0;\r
-int missed = 0;\r
-int overlap = 0;\r
-int nobaseline = 0;\r
-int percent;\r
-\r
-//////////////////////////////////////////////////\r
-// Setting the char based usage map //\r
-//////////////////////////////////////////////////\r
-\r
-byte TryPlace(Coords *coord)\r
-{\r
- int x, y;\r
- byte entry = 0;\r
- byte *mapitem;\r
- \r
- mapitem = map + (coord->x / xcharsize) + ((coord->y / ycharsize) * out.cw);\r
-\r
- for (y = 0; y < coord->ch; y++, mapitem += out.cw - coord->cw)\r
- {\r
- for (x = 0; x < coord->cw; x++)\r
- {\r
- if (entry |= *mapitem++ & 8)\r
- {\r
- return(entry);\r
- }\r
- }\r
- }\r
- return(entry);\r
-}\r
-\r
-void SetMap(Coords *coord)\r
-{\r
- int x, y;\r
- byte *mapitem;\r
-\r
- mapitem = map + (coord->x / xcharsize) + ((coord->y / ycharsize) * out.cw);\r
-\r
- for (y = 0; y < coord->ch; y++, mapitem += out.cw - coord->cw)\r
- for (x = 0; x < coord->cw; x++)\r
- *mapitem++ |= 8;\r
-}\r
-\r
-//////////////////////////////////////////////////\r
-// Setting the pixel based usage map //\r
-//////////////////////////////////////////////////\r
-\r
-void CheckOverlap(Coords *coord)\r
-{\r
- int x;\r
- int y;\r
- long *dest;\r
-\r
- x = coord->x;\r
- y = coord->y;\r
-\r
- dest = (long *)(usagemap + x + (y * out.w));\r
-\r
- for (y = 0; y < coord->h; y++, dest += out.w - coord->w)\r
- {\r
- for (x = 0; x < coord->w; x++)\r
- {\r
- if (*dest++)\r
- {\r
- overlap++;\r
- return;\r
- }\r
- }\r
- }\r
-}\r
-\r
-void SetUsageMap(Coords *coord)\r
-{\r
- int x;\r
- int y;\r
- long *dest;\r
-\r
- x = coord->x;\r
- y = coord->y;\r
-\r
- dest = (long *)(usagemap + x + (y * out.w));\r
-\r
- for (y = 0; y < coord->h; y++, dest += out.w - coord->w)\r
- {\r
- for (x = 0; x < coord->w; x++)\r
- {\r
- *dest++ = coord->col;\r
- }\r
- }\r
-}\r
-\r
-//////////////////////////////////////////////////\r
-// Flips the BMP image to the correct way up //\r
-//////////////////////////////////////////////////\r
-\r
-void CopyLine(byte *dest, byte *src, int size)\r
-{\r
- int x;\r
- \r
- for (x = 0; x < size; x++)\r
- *dest++ = *src++;\r
-}\r
-\r
-/****************************************************/\r
-/* Printing headers etc */\r
-/****************************************************/\r
-\r
-void RemoveLeading(char *name)\r
-{\r
- int i;\r
- char temp[128];\r
-\r
- for(i = strlen(name) - 1; i > 0; i--)\r
- {\r
- if((name[i] == '\\') || (name[i] == '/'))\r
- {\r
- strcpy(temp, name + i + 1);\r
- strcpy(name, temp);\r
- return;\r
- }\r
- }\r
-}\r
-\r
-void RemoveExt(char *name)\r
-{\r
- while ((*name != '.') && *name)\r
- name++;\r
- *name = 0;\r
-}\r
-\r
-/****************************************************/\r
-/* Misc calcualtions */\r
-/****************************************************/\r
-\r
-int TotalArea()\r
-{\r
- int i;\r
- int total = 0;\r
-\r
- for (i = 0; i < (filenum + 2); i++)\r
- total += in[i].w * in[i].h;\r
-\r
- return(total);\r
-}\r
-\r
-/****************************************************/\r
-/* Setup and checking of all info */\r
-/****************************************************/\r
-\r
-void InitVars()\r
-{\r
- filenum = 0;\r
- valid = 0;\r
- dosort = 0;\r
- missed = 0;\r
- overlap = 0;\r
- nobaseline = 0;\r
- \r
- memset(outscript, 0, sizeof(outscript));\r
- memset(outscript, 0, sizeof(sourcedir));\r
- memset(outscript, 0, sizeof(outusage));\r
- memset(outscript, 0, sizeof(root));\r
-\r
- memset(in, 0, sizeof(in));\r
- memset(&out, 0, sizeof(out));\r
-}\r
-void Cleanup()\r
-{\r
- if (pixels)\r
- free(pixels);\r
- if (usagemap)\r
- free(usagemap);\r
- if (outpixels)\r
- free(outpixels);\r
- if (bmptemp)\r
- free(bmptemp);\r
- if (map)\r
- free(map);\r
-}\r
-\r
-typedef struct glxy_s\r
-{\r
- float xl, yt, xr, yb;\r
- int w, h, baseline;\r
-} glxy_t;\r
-\r
-int SaveScript(char *name)\r
-{\r
- FILE *fp;\r
- int i, j;\r
- glxy_t buff;\r
- \r
- if(fp = fopen(name, "wb"))\r
- {\r
- for (j = 0; j < filenum; j++)\r
- {\r
- for (i = 0; i < filenum; i++)\r
- {\r
- if (in[i].index == j)\r
- {\r
- if (in[i].depth)\r
- {\r
- buff.xl = (float)in[i].x / (float)out.w;\r
- buff.yt = (float)in[i].y / (float)out.h;\r
- buff.xr = ((float)in[i].w + (float)in[i].x) / (float)out.w;\r
- buff.yb = ((float)in[i].h + (float)in[i].y) / (float)out.h;\r
- buff.w = in[i].w;\r
- buff.h = in[i].h;\r
- buff.baseline = in[i].baseline;\r
- }\r
- else\r
- {\r
- memset(&buff, 0, sizeof(glxy_t));\r
- }\r
- fwrite(&buff, 1, sizeof(glxy_t), fp);\r
- i = filenum;\r
- }\r
- }\r
- }\r
- fclose(fp);\r
- return(true);\r
- }\r
- else\r
- return(false);\r
-}\r
-\r
-int GetScriptInfo(char *name)\r
-{\r
- FILE *fp;\r
- char buffer[256];\r
- char tempbuff[256];\r
- char delims[] = {" \t,\n"};\r
-\r
- printf("Opening script file %s.\n", name);\r
-\r
- if (fp = fopen(name, "r"))\r
- {\r
- while(fgets(buffer, 256, fp))\r
- {\r
- if (strncmp(buffer, "//", 2) && strncmp(buffer, "\n", 1))\r
- {\r
- strupr(buffer);\r
- strcpy(tempbuff, buffer);\r
- if (strcmp(strtok(tempbuff, delims), "OUTPUT") == 0)\r
- {\r
- strcpy(out.name, strtok(NULL, delims));\r
- strlwr(out.name);\r
- }\r
-\r
- strcpy(tempbuff, buffer);\r
- if (strcmp(strtok(tempbuff, delims), "SOURCEDIR") == 0)\r
- {\r
- strcpy(tempbuff, strtok(NULL, delims));\r
- strcpy(sourcedir, ExpandPathAndArchive(tempbuff));\r
- }\r
-\r
- strcpy(tempbuff, buffer);\r
- if (strcmp(strtok(tempbuff, delims), "DOSORT") == 0)\r
- dosort = 1;\r
-\r
- strcpy(tempbuff, buffer);\r
- if (strcmp(strtok(tempbuff, delims), "XCHARSIZE") == 0)\r
- xcharsize = strtol(strtok(NULL, delims), NULL, 0);\r
-\r
- strcpy(tempbuff, buffer);\r
- if (strcmp(strtok(tempbuff, delims), "YCHARSIZE") == 0)\r
- ycharsize = strtol(strtok(NULL, delims), NULL, 0);\r
-\r
- strcpy(tempbuff, buffer);\r
- if (strcmp(strtok(tempbuff, delims), "OUTSCRIPT") == 0)\r
- {\r
- strcpy(outscript, strtok(NULL, delims));\r
- strlwr(outscript);\r
- }\r
-\r
- strcpy(tempbuff, buffer);\r
- if (strcmp(strtok(tempbuff, delims), "OUTUSAGE") == 0)\r
- strcpy(outusage, strtok(NULL, delims));\r
-\r
- strcpy(tempbuff, buffer);\r
- if (strcmp(strtok(tempbuff, delims), "POS") == 0)\r
- {\r
- out.w = strtol(strtok(NULL, delims), NULL, 0);\r
- out.h = strtol(strtok(NULL, delims), NULL, 0);\r
- }\r
-\r
- strcpy(tempbuff, buffer);\r
- if (strcmp(strtok(tempbuff, delims), "FILE") == 0)\r
- {\r
- strcpy(in[filenum].name, strtok(NULL, delims));\r
- in[filenum].x = strtol(strtok(NULL, delims), NULL, 0);\r
- in[filenum].y = strtol(strtok(NULL, delims), NULL, 0);\r
- in[filenum].col = strtol(strtok(NULL, delims), NULL, 0);\r
- filenum++;\r
- }\r
- }\r
- }\r
- fclose(fp);\r
- return(true);\r
- }\r
- else\r
- {\r
- printf("ERROR : Could not open script file.\n");\r
- return(false);\r
- }\r
-}\r
-\r
-int CheckVars()\r
-{\r
- int i;\r
-\r
- if (out.name[0] == 0)\r
- {\r
- printf("ERROR : No output name specified.\n");\r
- return(false);\r
- }\r
- if ((out.w <= 0) || (out.h <= 0))\r
- {\r
- printf("ERROR : Invalid VRAM coordinates.\n");\r
- return(false);\r
- }\r
- if (filenum == 0)\r
- {\r
- printf("ERROR : No input files specified.\n");\r
- return(false);\r
- }\r
- for (i = 0; i < filenum; i++)\r
- if (in[i].name[0] == 0)\r
- {\r
- printf("ERROR : Input filename invalid.\n");\r
- return(false);\r
- }\r
- return(true);\r
-}\r
-\r
-// Makes sure texture is totally within the output area\r
-\r
-int CheckCoords(Coords *coord)\r
-{\r
- if ((coord->x + coord->w) > out.w)\r
- return(false);\r
- if ((coord->y + coord->h) > out.h)\r
- return(false);\r
-\r
- return(true);\r
-}\r
-// Gets the width, height, palette width and palette height of each BMP file\r
-\r
-int GetFileDimensions()\r
-{\r
- int i;\r
- int width, height;\r
- char name[128];\r
-\r
- for (i = 0; i < filenum; i++)\r
- {\r
- in[i].index = i;\r
-\r
- strcpy(name, sourcedir);\r
- strcat(name, in[i].name);\r
- printf("Getting file dimensions, file : %s \r", in[i].name);\r
- if(FileExists(name))\r
- {\r
- LoadAnyImage(name, NULL, NULL, &width, &height);\r
- in[i].depth = 32;\r
- in[i].rw = width;\r
- in[i].w = width; // makes it width in \r
- in[i].h = height;\r
- in[i].cw = (in[i].w + (xcharsize - 1)) / xcharsize;\r
- in[i].ch = (in[i].h + (ycharsize - 1)) / ycharsize;\r
-\r
- if (!CheckCoords(&in[i]) && (in[i].x >= 0))\r
- {\r
- printf("Error : texture %s out of bounds.\n", in[i].name);\r
- return(false);\r
- }\r
- valid++;\r
- }\r
- else\r
- {\r
- in[i].depth = 0;\r
- in[i].x = -1;\r
- in[i].y = -1;\r
- in[i].w = 0;\r
- in[i].h = 0;\r
- }\r
- }\r
- printf("\n\n");\r
- return(true);\r
-}\r
-\r
-// Sorts files into order for optimal space finding\r
-// Fixed position ones first, followed by the others in descending size\r
-// The theory being that it is easier to find space for smaller textures.\r
-// size = (width + height)\r
-// For space finding it is easier to place a 32x32 than a 128x2\r
-\r
-#define WEIGHT 0x8000\r
-\r
-void Swap(Coords *a, Coords *b)\r
-{\r
- Coords c;\r
-\r
- c = *a;\r
- *a = *b;\r
- *b = c;\r
-}\r
-\r
-void SortInNames()\r
-{\r
- int i, j;\r
- int largest, largcount;\r
- int size;\r
-\r
- printf("Sorting filenames by size.\n\n");\r
-\r
- for (j = 0; j < filenum; j++)\r
- {\r
- largest = -1;\r
- largcount = -1;\r
-\r
- for (i = j; i < filenum; i++)\r
- {\r
- if (in[i].depth)\r
- {\r
- size = in[i].w + in[i].h;\r
- \r
- if ((in[i].x < 0) && (size > largest))\r
- {\r
- largcount = i;\r
- largest = size;\r
- }\r
- }\r
- }\r
- if ((largcount >= 0) && (largcount != j))\r
- Swap(&in[j], &in[largcount]);\r
- }\r
-}\r
-\r
-int SetVars(char *name)\r
-{\r
- if (!GetScriptInfo(name))\r
- return(false);\r
-\r
- if (!CheckVars())\r
- return(false);\r
-\r
- destsize = out.w * out.h;\r
-\r
- out.cw = out.w / xcharsize;\r
- out.ch = out.h / ycharsize;\r
-\r
- if ((usagemap = (long *)SafeMalloc(destsize * 4, "")) == NULL)\r
- return(false);\r
- if ((outpixels = (long *)SafeMalloc(destsize * 4, "")) == NULL)\r
- return(false); \r
- if ((bmptemp = (void *)SafeMalloc(destsize * 4, "")) == NULL)\r
- return(false);\r
- if ((map = (byte *)SafeMalloc(destsize / (xcharsize * ycharsize), "")) == NULL)\r
- return(false);\r
-\r
- if (GetFileDimensions() == false)\r
- return(false);\r
-\r
- if (dosort)\r
- SortInNames();\r
-\r
- return(true);\r
-}\r
-/****************************************************/\r
-/* Actual copying routines */\r
-/****************************************************/\r
-\r
-int FindCoords(Coords *coord)\r
-{\r
- int tx, ty;\r
-\r
- if (coord->x >= 0)\r
- { \r
- SetMap(coord);\r
- return(true);\r
- }\r
- else\r
- {\r
- for (ty = 0; ty < out.ch; ty++)\r
- {\r
- for (tx = 0; tx < out.cw; tx++)\r
- {\r
- coord->x = (tx * xcharsize);\r
- coord->y = (ty * ycharsize);\r
- \r
- if (CheckCoords(coord) && !TryPlace(coord))\r
- {\r
- SetMap(coord);\r
- return(true);\r
- }\r
- }\r
- }\r
- }\r
- coord->x = -1;\r
- coord->y = -1;\r
-\r
- return(false);\r
-}\r
-\r
-void CheckBaseline(int i)\r
-{\r
- int y;\r
- long *pix;\r
-\r
- in[i].baseline = -1;\r
- pix = (long *)pixels;\r
-\r
- for(y = 0; y < in[i].h; y++, pix += in[i].w)\r
- {\r
- if((*pix & 0x00ffffff) == 0x00ff00ff)\r
- {\r
- in[i].baseline = y;\r
- break;\r
- }\r
- }\r
- pix = (long *)pixels;\r
- for(y = 0; y < in[i].w * in[i].h; y++, pix++)\r
- {\r
- if((*pix & 0x00ffffff) == 0x00ff00ff)\r
- {\r
- *pix = 0;\r
- }\r
- }\r
-\r
- if(in[i].baseline == -1)\r
- {\r
- printf("\nERROR : %s has no baseline\n", in[i].name);\r
- nobaseline++;\r
- }\r
-}\r
-\r
-void CopyToMain32(Coords *coord)\r
-{\r
- int x;\r
- int y;\r
- long *source;\r
- long *dest;\r
-\r
- x = coord->x;\r
- y = coord->y;\r
-\r
- source = (long *)pixels;\r
- dest = (long *)(outpixels + x + (y * out.w));\r
-\r
- for (y = 0; y < coord->h; y++, dest += out.w - coord->w)\r
- {\r
- for (x = 0; x < coord->w; x++)\r
- {\r
- *dest++ = *source++;\r
- }\r
- }\r
-}\r
-\r
-void CreateMain()\r
-{\r
- int i, count;\r
- int width, height;\r
- char name[128];\r
- \r
- for (i = 0, count = 0; i < filenum; i++)\r
- {\r
- if (in[i].depth)\r
- {\r
- printf("\rProcessing %d of %d (%d missed, %d overlapping, %d nobase)\r", count + 1, valid, missed, overlap, nobaseline);\r
- count++;\r
- if (!FindCoords(&in[i]))\r
- missed++;\r
- else\r
- {\r
- strcpy(name, sourcedir);\r
- strcat(name, in[i].name);\r
- LoadAnyImage(name, &pixels, NULL, &width, &height);\r
- CheckBaseline(i);\r
- CheckOverlap(&in[i]);\r
- CopyToMain32(&in[i]);\r
- SetUsageMap(&in[i]);\r
- }\r
- }\r
- }\r
-}\r
-\r
-void Cmd_TextureMix()\r
-{\r
- miptex32_t *qtex32;\r
- char filename[1024];\r
- int size;\r
-\r
- InitVars();\r
-\r
- GetScriptToken (false);\r
-\r
- strcpy(root, token);\r
- RemoveExt(root);\r
- RemoveLeading(root);\r
-\r
- strcpy(filename, ExpandPathAndArchive(token));\r
- if (SetVars(filename))\r
- {\r
- // Create combined texture\r
- percent = ((TotalArea() * 100) / (out.w * out.h));\r
- printf("Total area consumed : %d%%\n", percent);\r
- printf("Texture resolution : %dx%d pixels.\n", xcharsize, ycharsize);\r
- CreateMain();\r
-\r
- // Save image as m32\r
- sprintf (filename, "%spics/misc/%s.m32", gamedir, out.name);\r
- qtex32 = CreateMip32((unsigned *)outpixels, out.w, out.h, &size, false);\r
-\r
- qtex32->contents = 0;\r
- qtex32->value = 0;\r
- qtex32->scale_x = 1.0;\r
- qtex32->scale_y = 1.0;\r
- sprintf (qtex32->name, "misc/%s", out.name);\r
-\r
- printf ("\n\nwriting %s\n", filename);\r
- SaveFile (filename, (byte *)qtex32, size);\r
- free (qtex32);\r
-\r
- // Save out script file\r
- sprintf (filename, "%spics/misc/%s.fnt", gamedir, outscript);\r
- printf("Writing %s as script file\n", filename);\r
- if (!SaveScript(filename))\r
- {\r
- printf("Unable to save output script.\n");\r
- }\r
- }\r
- printf("Everythings groovy.\n");\r
- Cleanup();\r
-}\r
-\r
-// end\r
-\r
+/*
+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
+*/
+
+#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
+
projects / xonotic / netradiant.git / blobdiff