summaryrefslogtreecommitdiff
path: root/app/lib/params/mkstruct.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/lib/params/mkstruct.c
Initial import of xtrkcad version 1:4.0.2-2
Diffstat (limited to 'app/lib/params/mkstruct.c')
-rw-r--r--app/lib/params/mkstruct.c146
1 files changed, 146 insertions, 0 deletions
diff --git a/app/lib/params/mkstruct.c b/app/lib/params/mkstruct.c
new file mode 100644
index 0000000..8024ec8
--- /dev/null
+++ b/app/lib/params/mkstruct.c
@@ -0,0 +1,146 @@
+/** \file mkstruct.c
+ * Build utility to create simple rectangular structure definitions from a data file.
+ *
+ * $Header: /home/dmarkle/xtrkcad-fork-cvs/xtrkcad/app/lib/params/mkstruct.c,v 1.6 2008-06-10 20:27:21 m_fischer Exp $
+ */
+
+/* XTrkCad - Model Railroad CAD
+ * Copyright (C)
+ *
+ * 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 <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+
+#define BUFSIZE 1024
+
+#if _MSC_VER > 1300
+ #define stricmp _stricmp
+ #define strnicmp _strnicmp
+#endif
+
+#ifndef WIN32
+ #define stricmp strcasecmp
+ #define strnicmp strncasecmp
+#endif // !WIN32
+
+int main ( int argc, char * argv [] )
+{
+ long color = 0xFF00FF;
+ double x;
+ double y;
+ int cm = 0;
+ FILE *fIn, *fOut;
+ int count = 0;
+ char *buffer = malloc( BUFSIZE );
+ char *desc;
+ char *p1;
+ char *p2 = malloc( BUFSIZE );
+ char *scale;
+ char *ptr;
+ int err;
+
+ if( argc != 3 )
+ {
+ fprintf( stderr, "Usage: mkstruct definitions.data param file\n\n"
+ "The data file is read line by line and structure defimitions\n"
+ "are created in the param file.\n\n"
+ "The file structure is:\n"
+ "scale \"description of structure\" x y [cm] [color=#rrggbb]\n\n"
+ "scale : scale of structure\n"
+ "description of structure : name, enclosed in double quotes\n"
+ "x : x dimension of structure\n"
+ "y : y dimension of structure\n"
+ "cm : dimensions are in centimeters (default: inch) (opt.)\n"
+ "color=#rrggbb : color to use for structure (default: #FF00FF) (opt.)\n" );
+ exit( 1 );
+ }
+
+ fIn = fopen( argv[ 1 ], "r" );
+ if( !fIn ) {
+ fprintf( stderr, "Could not open the definition %s\n", argv[ 1 ] );
+ exit( 1 );
+ }
+
+ fOut = fopen( argv[ 2 ], "w" );
+ if( !fOut ) {
+ fprintf( stderr, "Could not create the structures in %s\n", argv[ 2 ] );
+ exit( 1 );
+ }
+
+ if( fgets( buffer, BUFSIZE, fIn ))
+ {
+ fputs( buffer, fOut );
+ printf( "Creating %s\n", buffer + 9 );
+ }
+
+ while(fgets(buffer, BUFSIZE, fIn ))
+ {
+ err = 0;
+ scale = strtok( buffer, " \"" );
+ desc = strtok( NULL, "\"" );
+
+ if( scale == NULL && desc == NULL )
+ err = 1;
+
+ /* get the size information */
+ x = atof( strtok( NULL, " " ));
+ y = atof( strtok( NULL, " " ));
+
+ if( x == 0 || y == 0 ) {
+ err = 1;
+ }
+ /* try to get the next token */
+ p1 = strtok( NULL, " \r\n\t" );
+
+ /* we have an additional token, check it */
+ if( p1 ) {
+ ptr = strtok( NULL, " \r\n\t" );
+ if( !stricmp( p1, "cm" )) {
+ x /= 2.54;
+ y /= 2.54;
+ p1 = ptr;
+ }
+ } else {
+ p1 = strtok( NULL, " " );
+ }
+
+ if( p1 && !strnicmp( p1, "color=", strlen( "color=" ))) {
+ color = atoi( p1 + strlen( "color=#" ));
+ }
+
+ if( !err ) {
+ fprintf( fOut, "STRUCTURE %s \"%s\"\n", scale, desc );
+
+ fprintf( fOut, "\tL %ld 0 %0.6f %0.6f %0.6f %0.6f\n", color, 0.0, 0.0, 0.0, x );
+ fprintf( fOut, "\tL %ld 0 %0.6f %0.6f %0.6f %0.6f\n", color, 0.0, x, y, x );
+ fprintf( fOut, "\tL %ld 0 %0.6f %0.6f %0.6f %0.6f\n", color, y, x, y, 0.0 );
+ fprintf( fOut, "\tL %ld 0 %0.6f %0.6f %0.6f %0.6f\n", color, y, 0.0, 0.0, 0.0 );
+ fprintf( fOut, "\tEND\n");
+ } else {
+ fprintf( stderr, "Error in line %d\n", count );
+ exit( 1 );
+ }
+
+ count++;
+ }
+
+ printf( "Created %d structures.\n", count );
+ fclose( fIn );
+ fclose( fOut );
+ exit(0);
+}