mirror of
https://github.com/electronicarts/CnC_Red_Alert.git
synced 2025-12-16 07:31:39 -05:00
Initial commit of Command & Conquer Red Alert source code.
This commit is contained in:
LFeenanEA
458
VQ/VQM32/CAPTOKEN.CPP
Normal file
458
VQ/VQM32/CAPTOKEN.CPP
Normal file
@@ -0,0 +1,458 @@
|
||||
/*
|
||||
** Command & Conquer Red Alert(tm)
|
||||
** Copyright 2025 Electronic Arts Inc.
|
||||
**
|
||||
** This program 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 3 of the License, or
|
||||
** (at your option) any later version.
|
||||
**
|
||||
** This program 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 this program. If not, see <http://www.gnu.org/licenses/>.
|
||||
*/
|
||||
|
||||
/****************************************************************************
|
||||
*
|
||||
* C O N F I D E N T I A L -- W E S T W O O D S T U D I O S
|
||||
*
|
||||
*----------------------------------------------------------------------------
|
||||
*
|
||||
* FILE
|
||||
* captoken.c
|
||||
*
|
||||
* DESCRIPTION
|
||||
* Tokenize a caption script for playback processing.
|
||||
*
|
||||
* PROGRAMMER
|
||||
* Denzil E. Long, Jr.
|
||||
*
|
||||
* DATE
|
||||
* July 26, 1995
|
||||
*
|
||||
****************************************************************************/
|
||||
|
||||
#include <stdlib.h>
|
||||
#include <stdio.h>
|
||||
#include <errno.h>
|
||||
#include <string.h>
|
||||
#include <ctype.h>
|
||||
#include "captoken.h"
|
||||
|
||||
/*---------------------------------------------------------------------------
|
||||
* PRIVATE DECLARATIONS
|
||||
*-------------------------------------------------------------------------*/
|
||||
|
||||
#define STRING_LENGTH 256
|
||||
#define PADSIZE(size) (((size)+1)&(~1))
|
||||
|
||||
typedef enum {
|
||||
TOKEN_NULL = 0,
|
||||
TOKEN_BGCOL,
|
||||
TOKEN_FGCOL,
|
||||
TOKEN_XPOS,
|
||||
TOKEN_YPOS,
|
||||
TOKEN_ABS,
|
||||
TOKEN_LEFT,
|
||||
TOKEN_RIGHT,
|
||||
TOKEN_CENTER,
|
||||
TOKEN_FLASH,
|
||||
TOKEN_CPF,
|
||||
TOKEN_END
|
||||
} TokenTag;
|
||||
|
||||
typedef struct _Token {
|
||||
char *name;
|
||||
long tag;
|
||||
} Token;
|
||||
|
||||
/* Script tokens:
|
||||
* BG/BGCOL - Background pen color (EX: BG=<color name>)
|
||||
* FG/FGCOL - Foreground pen color (EX: FG=<color name>)
|
||||
* X/XPOS - X pixel position of text (EX: X=<pixel cord>)
|
||||
* Y/YPOS - Y pixel position of text (EX: Y=<pixel cord>)
|
||||
* ABS/ABSOLUTE - Absolute justification
|
||||
* LEFT - Left side justification
|
||||
* RIGHT - Right side justification
|
||||
* CENTER - Center justification
|
||||
* FLASH - Enable flashing of text
|
||||
* CPF - Print rate in characters per frame (EX: CPF=<rate>)
|
||||
* END - Terminate compilation of caption script
|
||||
*/
|
||||
Token tokens[] = {
|
||||
"BG", TOKEN_BGCOL,
|
||||
"BGCOL", TOKEN_BGCOL,
|
||||
"FG", TOKEN_FGCOL,
|
||||
"FGCOL", TOKEN_FGCOL,
|
||||
"X", TOKEN_XPOS,
|
||||
"XPOS", TOKEN_XPOS,
|
||||
"Y", TOKEN_YPOS,
|
||||
"YPOS", TOKEN_YPOS,
|
||||
"ABS", TOKEN_ABS,
|
||||
"ABSOLUTE", TOKEN_ABS,
|
||||
"LEFT", TOKEN_LEFT,
|
||||
"RIGHT", TOKEN_RIGHT,
|
||||
"CENTER", TOKEN_CENTER,
|
||||
"FLASH", TOKEN_FLASH,
|
||||
"CPF", TOKEN_CPF,
|
||||
"END", TOKEN_END,
|
||||
NULL, TOKEN_NULL,
|
||||
};
|
||||
|
||||
Token colors[] = {
|
||||
"BLACK", 0,
|
||||
"WHITE", 251,
|
||||
"RED", 252,
|
||||
"GREEN", 253,
|
||||
"SHADOW", 254,
|
||||
"CYCLE", 255,
|
||||
NULL, -1,
|
||||
};
|
||||
|
||||
/* Prototypes. */
|
||||
static long GetColorNum(char *name);
|
||||
static long IsNumeric(char *string);
|
||||
static void FormatString(char *string);
|
||||
|
||||
|
||||
/****************************************************************************
|
||||
*
|
||||
* NAME
|
||||
* BuildCaptions - Compile a caption script.
|
||||
*
|
||||
* SYNOPSIS
|
||||
* Size = BuildCaptions(Name, Buffer)
|
||||
*
|
||||
* long BuildCaptions(char *, char *);
|
||||
*
|
||||
* FUNCTION
|
||||
* Generate a compiled caption script for use in VQA playback.
|
||||
*
|
||||
* INPUTS
|
||||
* Name - Name of caption script file to compile.
|
||||
* Buffer - Buffer to put compiled captions into.
|
||||
*
|
||||
* RESULT
|
||||
* Size - Size of compiled captions (in bytes).
|
||||
*
|
||||
****************************************************************************/
|
||||
|
||||
long BuildCaptions(char *name, char *buffer)
|
||||
{
|
||||
FILE *fp;
|
||||
char *ptr;
|
||||
char *ptr1;
|
||||
long size = 0;
|
||||
long error;
|
||||
long i;
|
||||
long tag;
|
||||
CaptionText caption;
|
||||
char string[STRING_LENGTH];
|
||||
|
||||
/* Initialize the caption parameters. */
|
||||
memset(&caption, 0, sizeof(CaptionText));
|
||||
|
||||
/* Open the captions script file. */
|
||||
fp = fopen(name, "r");
|
||||
|
||||
if (fp != NULL) {
|
||||
error = 0;
|
||||
|
||||
while (!error) {
|
||||
if (fgets(string, STRING_LENGTH, fp) == NULL) {
|
||||
if (errno == 0) {
|
||||
error = 1;
|
||||
}
|
||||
|
||||
break;
|
||||
}
|
||||
|
||||
/* Replace the newline with a NULL terminator. */
|
||||
string[strlen(string) - 1] = 0;
|
||||
|
||||
/* Ignore comment lines. */
|
||||
if (string[0] == ';') continue;
|
||||
|
||||
ptr = strtok(string, "=");
|
||||
|
||||
if (ptr != NULL) {
|
||||
|
||||
/* Check for a comma */
|
||||
ptr1 = strchr(ptr, ',');
|
||||
|
||||
if (ptr1 != NULL) {
|
||||
*ptr1++ = 0;
|
||||
}
|
||||
|
||||
/* Is this a frame number. */
|
||||
if (IsNumeric(ptr) && IsNumeric(ptr1)) {
|
||||
i = atoi(ptr);
|
||||
|
||||
/* Frames must be defined in ascending order. */
|
||||
if ((unsigned short)i >= caption.OnFrame) {
|
||||
caption.OnFrame = i;
|
||||
caption.OffFrame = atoi(ptr1);
|
||||
caption.Size = sizeof(CaptionText);
|
||||
|
||||
/* Get caption text. */
|
||||
ptr = strtok(NULL, "");
|
||||
|
||||
if (ptr != NULL) {
|
||||
FormatString(ptr);
|
||||
i = strlen(ptr) + 1;
|
||||
caption.Size += PADSIZE(i);
|
||||
size += caption.Size;
|
||||
|
||||
/* Copy the caption structure. */
|
||||
memcpy(buffer, &caption, sizeof(CaptionText));
|
||||
buffer += sizeof(CaptionText);
|
||||
|
||||
/* Copy the caption text. */
|
||||
memcpy(buffer, ptr, i);
|
||||
buffer += i;
|
||||
|
||||
/* WORD align */
|
||||
if (PADSIZE(i) > i) {
|
||||
*buffer++ = 0;
|
||||
}
|
||||
}
|
||||
} else {
|
||||
error = 1;
|
||||
break;
|
||||
}
|
||||
} else {
|
||||
|
||||
/* Search for matching token. */
|
||||
tag = TOKEN_NULL;
|
||||
i = 0;
|
||||
|
||||
while (tokens[i].name != NULL) {
|
||||
if (strcmpi(tokens[i].name, ptr) == 0) {
|
||||
tag = tokens[i].tag;
|
||||
break;
|
||||
}
|
||||
|
||||
i++;
|
||||
}
|
||||
|
||||
/* Get the data element. */
|
||||
ptr = strtok(NULL, "");
|
||||
|
||||
switch (tag) {
|
||||
case TOKEN_BGCOL:
|
||||
caption.BgPen = (char)GetColorNum(ptr);
|
||||
break;
|
||||
|
||||
case TOKEN_FGCOL:
|
||||
caption.FgPen = (char)GetColorNum(ptr);
|
||||
break;
|
||||
|
||||
case TOKEN_XPOS:
|
||||
caption.Xpos = (unsigned short)atoi(ptr);
|
||||
break;
|
||||
|
||||
case TOKEN_YPOS:
|
||||
caption.Ypos = (unsigned short)atoi(ptr);
|
||||
break;
|
||||
|
||||
case TOKEN_ABS:
|
||||
caption.Flags &= ~CTF_JUSTIFY;
|
||||
caption.Flags |= CTF_ABS;
|
||||
break;
|
||||
|
||||
case TOKEN_LEFT:
|
||||
caption.Flags &= ~CTF_JUSTIFY;
|
||||
caption.Flags |= CTF_LEFT;
|
||||
break;
|
||||
|
||||
case TOKEN_RIGHT:
|
||||
caption.Flags &= ~CTF_JUSTIFY;
|
||||
caption.Flags |= CTF_RIGHT;
|
||||
break;
|
||||
|
||||
case TOKEN_CENTER:
|
||||
caption.Flags &= ~CTF_JUSTIFY;
|
||||
caption.Flags |= CTF_CENTER;
|
||||
break;
|
||||
|
||||
case TOKEN_FLASH:
|
||||
if (strcmpi(ptr, "OFF") == 0) {
|
||||
caption.Flags &= ~CTF_FLASH;
|
||||
} else {
|
||||
caption.Flags |= CTF_FLASH;
|
||||
}
|
||||
break;
|
||||
|
||||
case TOKEN_CPF:
|
||||
caption.CPF = (char)atoi(ptr);
|
||||
break;
|
||||
|
||||
/* Termination captions */
|
||||
case TOKEN_END:
|
||||
caption.Size = sizeof(CaptionText);
|
||||
caption.OnFrame = (unsigned short)-1;
|
||||
memcpy(buffer, &caption, sizeof(CaptionText));
|
||||
buffer += sizeof(CaptionText);
|
||||
break;
|
||||
|
||||
default:
|
||||
break;
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
/* Close the script file. */
|
||||
fclose(fp);
|
||||
}
|
||||
|
||||
return (size);
|
||||
}
|
||||
|
||||
|
||||
/****************************************************************************
|
||||
*
|
||||
* NAME
|
||||
* GetColorNum - Get the color number from the color name.
|
||||
*
|
||||
* SYNOPSIS
|
||||
* Color = GetColorNum(Name)
|
||||
*
|
||||
* long GetColorNum(char *);
|
||||
*
|
||||
* FUNCTION
|
||||
* Look the color number that corresponds to the color name.
|
||||
*
|
||||
* INPUTS
|
||||
* Name - Name of color.
|
||||
*
|
||||
* RESULT
|
||||
* Color - Color number.
|
||||
*
|
||||
****************************************************************************/
|
||||
|
||||
static long GetColorNum(char *name)
|
||||
{
|
||||
long color = -1;
|
||||
long i;
|
||||
|
||||
i = 0;
|
||||
|
||||
/* Scan for a matching name and return the corresponding color number. */
|
||||
while (colors[i].name != NULL) {
|
||||
if (strcmpi(colors[i].name, name) == 0) {
|
||||
color = colors[i].tag;
|
||||
}
|
||||
|
||||
i++;
|
||||
}
|
||||
|
||||
return (color);
|
||||
}
|
||||
|
||||
|
||||
/****************************************************************************
|
||||
*
|
||||
* NAME
|
||||
* IsNumeric - Check if a string is numeric.
|
||||
*
|
||||
* SYNOPSIS
|
||||
* Condition = IsNumeric(String)
|
||||
*
|
||||
* long IsNumeric(char *);
|
||||
*
|
||||
* FUNCTION
|
||||
* Interogate the string to see if it represents a numeric value. Each
|
||||
* byte of the string must be between 0x30 and 0x39 inclusively.
|
||||
*
|
||||
* INPUTS
|
||||
* String - String to check.
|
||||
*
|
||||
* RESULT
|
||||
* Condition - 1 if numeric, 0 if not.
|
||||
*
|
||||
****************************************************************************/
|
||||
|
||||
static long IsNumeric(char *string)
|
||||
{
|
||||
long flag = 1;
|
||||
|
||||
/* Ignore any proceeding sign designation. */
|
||||
if ((*string == '-') || (*string == '+')) {
|
||||
string++;
|
||||
}
|
||||
|
||||
/* Check to see if every byte in the string is a digit. */
|
||||
while (flag && (*string != 0)) {
|
||||
if (!isdigit(*string++)) {
|
||||
flag = 0;
|
||||
}
|
||||
}
|
||||
|
||||
return (flag);
|
||||
}
|
||||
|
||||
|
||||
/****************************************************************************
|
||||
*
|
||||
* NAME
|
||||
* FormatString - Parse any format codes in the string.
|
||||
*
|
||||
* SYNOPSIS
|
||||
* FormatString(String)
|
||||
*
|
||||
* void FormatString(char *);
|
||||
*
|
||||
* FUNCTION
|
||||
* Format a string with any embedded format commands contained in the
|
||||
* input string.
|
||||
*
|
||||
* Supported format commands:
|
||||
* /n - Insert carriage return. (0x0D)
|
||||
* /r - Insert carriage return. (0x0D)
|
||||
* // - Literal backslash.
|
||||
*
|
||||
* INPUTS
|
||||
* String - Pointer to string to format.
|
||||
*
|
||||
* RESULT
|
||||
* NONE
|
||||
*
|
||||
****************************************************************************/
|
||||
|
||||
static void FormatString(char *string)
|
||||
{
|
||||
char *ptr;
|
||||
|
||||
/* NULL strings are invalid. */
|
||||
if (string != NULL) {
|
||||
ptr = string;
|
||||
|
||||
/* Scan the string for embedded format commands. */
|
||||
while ((ptr = strchr(ptr, '/')) != NULL) {
|
||||
switch (*(ptr + 1)) {
|
||||
|
||||
/* Carriage return. */
|
||||
case 'n':
|
||||
case 'r':
|
||||
*ptr = 0x0D;
|
||||
break;
|
||||
|
||||
/* Literal backslash. */
|
||||
case '/':
|
||||
break;
|
||||
|
||||
default:
|
||||
break;
|
||||
}
|
||||
|
||||
/* Remove the unwanted character. */
|
||||
strcpy((ptr + 1), (ptr + 2));
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
Reference in New Issue
Block a user