summaryrefslogtreecommitdiff
path: root/app/i18n/stripmsg.c
diff options
context:
space:
mode:
authorJörg Frings-Fürst <debian@jff-webhosting.net>2016-12-28 16:52:56 +0100
committerJörg Frings-Fürst <debian@jff-webhosting.net>2016-12-28 16:52:56 +0100
commit7b358424ebad9349421acd533c2fa1cbf6cf3e3e (patch)
tree686678532eefed525c242fd214d0cfb2914726c5 /app/i18n/stripmsg.c
Initial import of xtrkcad version 1:4.0.2-2
Diffstat (limited to 'app/i18n/stripmsg.c')
-rw-r--r--app/i18n/stripmsg.c273
1 files changed, 273 insertions, 0 deletions
diff --git a/app/i18n/stripmsg.c b/app/i18n/stripmsg.c
new file mode 100644
index 0000000..1e3dc36
--- /dev/null
+++ b/app/i18n/stripmsg.c
@@ -0,0 +1,273 @@
+/* XTrkCad - Model Railroad CAD
+ * Copyright (C) 2008 Mikko Nissinen
+ *
+ * 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 2 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, write to the Free Software
+ * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
+ */
+
+#include <stdlib.h>
+#include <stdio.h>
+#include <string.h>
+
+/*
+ * Input file types:
+ * XTR = Marco file. Parse MESSAGE...END blocks.
+ * XTQ = Configuration file. Parse DEMOGROUP and DEMO lines.
+ * TIP = Tip of the day file.
+ */
+typedef enum { MODE_XTR, MODE_XTQ, MODE_TIP } mode_e;
+
+
+/* Process the given input file. */
+void process( mode_e mode, FILE * inFile )
+{
+ char line[4096];
+ char * cp;
+ int len;
+ int offset;
+ int i;
+
+ while ( fgets( line, sizeof(line), inFile ) != NULL )
+ {
+ offset = 0;
+
+ switch (mode)
+ {
+ case MODE_XTR:
+ if (strncmp( line, "MESSAGE", 7 ) == 0)
+ {
+ while ( ( fgets( line, sizeof(line), inFile ) ) != NULL ) {
+ if ( strncmp(line, "END", 3) == 0)
+ /* End of message block */
+ break;
+ else if (strncmp(line, "__________", 10) == 0
+ || strncmp(line, "==========", 10) == 0)
+ /* Skip */
+ continue;
+
+ len = (int)strlen( line );
+ if (len > 0 && line[len-1] == '\n' ) len--;
+ if (len > 0 && line[len-1] == '\r' ) len--;
+ line[len] = '\0';
+ if (len > 0)
+ {
+ if (strchr(line, '"'))
+ {
+ printf("N_(\"");
+ for (i = 0; i < len; i++)
+ {
+ /* Escape double quotation marks */
+ if (line[i] == '"')
+ putchar('\\');
+ putchar(line[i]);
+ }
+ printf("\\n\");\n");
+ }
+ else
+ {
+ printf("N_(\"%s\\n\");\n", line);
+ }
+ }
+ } // while (in msg block)
+ }
+ break; // case MODE_XTR:
+
+ case MODE_XTQ:
+ if ( strncmp( line, "DEMOGROUP ", 10 ) == 0 )
+ {
+ offset = 10;
+ }
+ else if ( strncmp( line, "DEMO ", 5 ) == 0 )
+ {
+ offset = 6;
+ if (line[5] != '"')
+ break;
+ cp = line+offset;
+ while (*cp && *cp != '"') cp++;
+ if ( !*cp )
+ break;
+ *cp++ = '\0';
+ while (*cp && *cp == ' ') cp++;
+ if ( strlen(cp)==0 )
+ break;
+ }
+ if (offset > 0)
+ {
+ len = (int)strlen( line );
+ if (line[len-1] == '\n' ) len--;
+ if (line[len-1] == '\r' ) len--;
+ line[len] = '\0';
+ if (len == 0)
+ break;
+ printf("N_(\"%s\");\n", line+offset);
+ }
+ break; // case MODE_XTQ:
+
+ case MODE_TIP:
+ /* lines starting with hash sign are ignored (comments) */
+ if (line[0] == '#')
+ continue;
+
+ /* remove CRs and LFs at end of line */
+ cp = line+strlen(line)-1;
+ if (*cp=='\n') cp--;
+ if (*cp=='\r') cp--;
+
+ /* get next line if the line was empty */
+ if (cp < line)
+ continue;
+
+ cp[1] = '\0';
+
+ /* if line ended with a continuation sign, get the rest */
+ while (*cp=='\\') {
+ *cp++ = '\\';
+ *cp++ = 'n';
+
+ /* read a line */
+ if (!fgets( cp, (sizeof(line)) - (cp-line), inFile )) {
+ return;
+ }
+
+ /* lines starting with hash sign are ignored (comments) */
+ if (*cp=='#')
+ continue;
+
+ /* remove CRs and LFs at end of line */
+ cp += strlen(cp)-1;
+ if (*cp=='\n') cp--;
+ if (*cp=='\r') cp--;
+ cp[1] = '\0';
+ }
+
+ if (strchr(line, '"'))
+ {
+ printf("N_(\"");
+ len = strlen(line);
+ for (i = 0; i < len; i++)
+ {
+ /* Escape double quotation marks */
+ if (line[i] == '"')
+ putchar('\\');
+ putchar(line[i]);
+ }
+ printf("\");\n");
+ }
+ else
+ {
+ printf("N_(\"%s\");\n", line);
+ }
+ break; // case MODE_TIP:
+ } // switch (mode)
+ } // while (...)
+}
+
+
+int main ( int argc, char * argv[] )
+{
+ FILE * inFile;
+ mode_e mode;
+ char *ch;
+ int i;
+ int files = 0;
+ int xtrFiles = 0;
+ int xtqFiles = 0;
+ int tipFiles = 0;
+ int errors = 0;
+
+ if ( argc < 2 ) {
+ fprintf( stderr,
+ "Usage: %s files ...\n"
+ " Where \'files\' is a list of files to be parsed. Program\n"
+ " automatically detects the file type from the file extension.\n"
+ " Supported file types are:\n"
+ " .xtr, .xtq, .tip\n",
+ argv[0] );
+ exit(1);
+ }
+
+ /* Print header info */
+ printf("/* ----------------------------------------------------------*\n"
+ " * These strings are generated from the XTrkCad macro and\n"
+ " * Tip of the day files by %s. The strings are\n"
+ " * formatted so that the xgettext can extract them into\n"
+ " * .pot file for translation.\n"
+ " * ----------------------------------------------------------*/\n",
+ argv[0]);
+
+ for (i = 1; i < argc; i++)
+ {
+ /* Set operating mode according to the file name extension */
+ ch = strrchr(argv[i], '.');
+ if (ch == NULL)
+ {
+ errors++;
+ fprintf( stderr, "WARNING: No file name extension in file \"%s\"\n", argv[i]);
+ continue;
+ }
+ ch++;
+ if ( strcmp( ch, "xtq" ) == 0 )
+ mode = MODE_XTQ;
+ else if ( strcmp( ch, "xtr" ) == 0 )
+ mode = MODE_XTR;
+ else if ( strcmp( ch, "tip" ) == 0 )
+ mode = MODE_TIP;
+ else
+ {
+ errors++;
+ fprintf( stderr, "WARNING: Unknown file name extension in file \"%s\"\n", argv[i]);
+ continue;
+ }
+
+ /* Open file */
+ inFile = fopen( argv[i], "r" );
+ if (inFile == NULL) {
+ errors++;
+ perror( argv[i] );
+ continue;
+ }
+
+ /* Process file */
+ process( mode, inFile );
+
+ /* Close file */
+ files++;
+ switch (mode)
+ {
+ case MODE_XTQ:
+ xtqFiles++;
+ break;
+ case MODE_XTR:
+ xtrFiles++;
+ break;
+ case MODE_TIP:
+ tipFiles++;
+ break;
+ }
+ fclose(inFile);
+ inFile = NULL;
+ }
+
+ /* Print out the results */
+ printf("/* ----------------------------------------------------------*\n"
+ " * Input files: %d\n"
+ " * Files handled: %d (xtq: %d, xtr: %d, tip: %d)\n"
+ " * Errors: %d\n"
+ " * ----------------------------------------------------------*/\n",
+ argc-1,
+ files, xtqFiles, xtrFiles, tipFiles,
+ errors);
+
+ exit(0);
+}