diff options
Diffstat (limited to 'kpovmodeler/pmscanner.cpp')
-rw-r--r-- | kpovmodeler/pmscanner.cpp | 1353 |
1 files changed, 1353 insertions, 0 deletions
diff --git a/kpovmodeler/pmscanner.cpp b/kpovmodeler/pmscanner.cpp new file mode 100644 index 00000000..f67b7035 --- /dev/null +++ b/kpovmodeler/pmscanner.cpp @@ -0,0 +1,1353 @@ +/* +************************************************************************** + description + -------------------- + copyright : (C) 2000-2003 by Andreas Zehender + email : [email protected] +************************************************************************** + +************************************************************************** +* * +* 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. * +* * +**************************************************************************/ + + +#include <ctype.h> +#include <stdlib.h> +#include <klocale.h> + +#include "pmdebug.h" +#include "pmscanner.h" +#include "pmtokens.h" + + +//#define PMSCAN_DEBUG + +PMReservedWordDict::PMReservedWordDict( PMDictMode mode ) + : QAsciiDict<int>( 353 ) +{ + switch( mode ) + { + case PMDReservedWords: + insert( "aa_level", new int( AA_LEVEL_TOK ) ); + insert( "aa_threshold", new int( AA_THRESHOLD_TOK ) ); + insert( "abs", new int( ABS_TOK ) ); + insert( "absorption", new int( ABSORPTION_TOK ) ); + insert( "accuracy", new int( ACCURACY_TOK ) ); + insert( "acos", new int( ACOS_TOK ) ); + insert( "acosh", new int( ACOSH_TOK ) ); + insert( "adaptive", new int( ADAPTIVE_TOK ) ); + insert( "adc_bailout", new int( ADC_BAILOUT_TOK ) ); + insert( "agate", new int( AGATE_TOK ) ); + insert( "agate_turb", new int( AGATE_TURB_TOK ) ); + insert( "all", new int( ALL_TOK ) ); + insert( "all_intersections", new int( ALL_INTERSECTIONS_TOK ) ); + insert( "alpha", new int( ALPHA_TOK ) ); + insert( "altitude", new int( ALTITUDE_TOK ) ); + insert( "always_sample", new int ( ALWAYS_SAMPLE_TOK ) ); + insert( "ambient", new int( AMBIENT_TOK ) ); + insert( "ambient_light", new int( AMBIENT_LIGHT_TOK ) ); + insert( "angle", new int( ANGLE_TOK ) ); + insert( "aperture", new int( APERTURE_TOK ) ); + insert( "arc_angle", new int( ARC_ANGLE_TOK ) ); + insert( "area_light", new int( AREA_LIGHT_TOK ) ); + insert( "autostop", new int ( AUTOSTOP_TOK ) ); + insert( "circular", new int( AREA_CIRCULAR_TOK ) ); + insert( "asc", new int( ASC_TOK ) ); + insert( "asin", new int( ASIN_TOK ) ); + insert( "asinh", new int( ASINH_TOK ) ); + insert( "assumed_gamma", new int( ASSUMED_GAMMA_TOK ) ); + insert( "atan", new int( ATAN_TOK ) ); + insert( "atan2", new int( ATAN2_TOK ) ); + insert( "atanh", new int( ATANH_TOK ) ); + insert( "atmosphere", new int( ATMOSPHERE_TOK ) ); + insert( "atmospheric_attenuation", new int( ATMOSPHERIC_ATTENUATION_TOK ) ); + insert( "attenuating", new int( ATTENUATING_TOK ) ); + insert( "average", new int( AVERAGE_TOK ) ); + insert( "b_spline", new int( B_SPLINE_TOK ) ); + insert( "background", new int( BACKGROUND_TOK ) ); + insert( "bezier_spline", new int( BEZIER_SPLINE_TOK ) ); + insert( "bicubic_patch", new int( BICUBIC_PATCH_TOK ) ); + insert( "black_hole", new int( BLACK_HOLE_TOK ) ); + insert( "blob", new int( BLOB_TOK ) ); + insert( "blue", new int( BLUE_TOK ) ); + insert( "blur_samples", new int( BLUR_SAMPLES_TOK ) ); + insert( "bounded_by", new int( BOUNDED_BY_TOK ) ); + insert( "box", new int( BOX_TOK ) ); + insert( "boxed", new int( BOXED_TOK ) ); + insert( "bozo", new int( BOZO_TOK ) ); + insert( "brick", new int( BRICK_TOK ) ); + insert( "brick_size", new int( BRICK_SIZE_TOK ) ); + insert( "brightness", new int( BRIGHTNESS_TOK ) ); + insert( "brilliance", new int( BRILLIANCE_TOK ) ); + insert( "bumps", new int( BUMPS_TOK ) ); + insert( "bumpy1", new int( BUMPY1_TOK ) ); + insert( "bumpy2", new int( BUMPY2_TOK ) ); + insert( "bumpy3", new int( BUMPY3_TOK ) ); + insert( "bump_map", new int( BUMP_MAP_TOK ) ); + insert( "bump_size", new int( BUMP_SIZE_TOK ) ); + insert( "camera", new int( CAMERA_TOK ) ); + insert( "caustics", new int( CAUSTICS_TOK ) ); + insert( "ceil", new int( CEIL_TOK ) ); + insert( "checker", new int( CHECKER_TOK ) ); + insert( "chr", new int( CHR_TOK ) ); + insert( "cells", new int( CELLS_TOK ) ); + insert( "clipped_by", new int( CLIPPED_BY_TOK ) ); + insert( "clock", new int( CLOCK_TOK ) ); + insert( "clock_delta", new int( CLOCK_DELTA_TOK ) ); + insert( "collect", new int( COLLECT_TOK ) ); + insert( "color", new int( COLOR_TOK ) ); + insert( "color_map", new int( COLOR_MAP_TOK ) ); + insert( "colour", new int( COLOUR_TOK ) ); + insert( "colour_map", new int( COLOUR_MAP_TOK ) ); + insert( "component", new int( COMPONENT_TOK ) ); + insert( "composite", new int( COMPOSITE_TOK ) ); + insert( "concat", new int( CONCAT_TOK ) ); + insert( "cone", new int( CONE_TOK ) ); + insert( "confidence", new int( CONFIDENCE_TOK ) ); + insert( "conic_sweep", new int( CONIC_SWEEP_TOK ) ); + insert( "conserve_energy", new int( CONSERVE_ENERGY_TOK ) ); + insert( "constant", new int( CONSTANT_TOK ) ); + insert( "contained_by", new int( CONTAINED_BY_TOK ) ); + insert( "control0", new int( CONTROL0_TOK ) ); + insert( "control1", new int( CONTROL1_TOK ) ); + insert( "cos", new int( COS_TOK ) ); + insert( "cosh", new int( COSH_TOK ) ); + insert( "count", new int( COUNT_TOK ) ); + insert( "crackle", new int( CRACKLE_TOK ) ); + insert( "crand", new int( CRAND_TOK ) ); + insert( "cube", new int( CUBE_TOK ) ); + insert( "cubic", new int( CUBIC_TOK ) ); + insert( "cubic_spline", new int( CUBIC_SPLINE_TOK ) ); + insert( "cubic_wave", new int( CUBIC_WAVE_TOK ) ); + insert( "cylinder", new int( CYLINDER_TOK ) ); + insert( "cylindrical", new int( CYLINDRICAL_TOK ) ); + insert( "degrees", new int( DEGREES_TOK ) ); + insert( "dents", new int( DENTS_TOK ) ); + insert( "density", new int( DENSITY_TOK ) ); + insert( "density_file", new int( DENSITY_FILE_TOK ) ); + insert( "density_map", new int( DENSITY_MAP_TOK ) ); + insert( "df3", new int( DF3_TOK ) ); + insert( "difference", new int( DIFFERENCE_TOK ) ); + insert( "diffuse", new int( DIFFUSE_TOK ) ); + insert( "direction", new int( DIRECTION_TOK ) ); + insert( "disc", new int( DISC_TOK ) ); + insert( "dispersion", new int ( DISPERSION_TOK ) ); + insert( "dispersion_samples", new int ( DISPERSION_SAMPLES_TOK ) ); + insert( "dist_exp", new int ( DIST_EXP_TOK ) ); + insert( "distance", new int( DISTANCE_TOK ) ); + insert( "distance_maximum", new int( DISTANCE_MAXIMUM_TOK ) ); + insert( "div", new int( DIV_TOK ) ); + insert( "double_illuminate", new int( DOUBLE_ILLUMINATE_TOK ) ); + insert( "dust", new int( DUST_TOK ) ); + insert( "dust_type", new int( DUST_TYPE_TOK ) ); + insert( "eccentricity", new int( ECCENTRICITY_TOK ) ); + insert( "emission", new int( EMISSION_TOK ) ); + insert( "emitting", new int( EMITTING_TOK ) ); + insert( "error", new int( ERROR_TOK ) ); + insert( "error_bound", new int( ERROR_BOUND_TOK ) ); + insert( "evaluate", new int( EVALUATE_TOK ) ); + insert( "exp", new int( EXP_TOK ) ); + insert( "expand_thresholds", new int (EXPAND_THRESHOLDS_TOK) ); + insert( "exponent", new int( EXPONENT_TOK ) ); + insert( "exterior", new int( EXTERIOR_TOK ) ); + insert( "extinction", new int( EXTINCTION_TOK ) ); + insert( "fade_distance", new int( FADE_DISTANCE_TOK ) ); + insert( "fade_power", new int( FADE_POWER_TOK ) ); + insert( "falloff", new int( FALLOFF_TOK ) ); + insert( "falloff_angle", new int( FALLOFF_ANGLE_TOK ) ); + insert( "false", new int( FALSE_TOK ) ); + insert( "file_exists", new int( FILE_EXISTS_TOK ) ); + insert( "filter", new int( FILTER_TOK ) ); + insert( "finish", new int( FINISH_TOK ) ); + insert( "fisheye", new int( FISHEYE_TOK ) ); + insert( "flatness", new int( FLATNESS_TOK ) ); + insert( "flip", new int( FLIP_TOK ) ); + insert( "floor", new int( FLOOR_TOK ) ); + insert( "focal_point", new int( FOCAL_POINT_TOK ) ); + insert( "fog", new int( FOG_TOK ) ); + insert( "fog_alt", new int( FOG_ALT_TOK ) ); + insert( "fog_offset", new int( FOG_OFFSET_TOK ) ); + insert( "fog_type", new int( FOG_TYPE_TOK ) ); + insert( "form", new int( FORM_TOK ) ); + insert( "fresnel", new int( FRESNEL_TOK ) ); + insert( "frequency", new int( FREQUENCY_TOK ) ); + insert( "function", new int( FUNCTION_TOK ) ); + insert( "gather", new int( GATHER_TOK ) ); + insert( "gif", new int( GIF_TOK ) ); + insert( "global_lights", new int ( GLOBAL_LIGHTS_TOK ) ); + insert( "global_settings", new int( GLOBAL_SETTINGS_TOK ) ); + insert( "glowing", new int( GLOWING_TOK ) ); + insert( "gradient", new int( GRADIENT_TOK ) ); + insert( "granite", new int( GRANITE_TOK ) ); + insert( "gray_threshold", new int( GRAY_THRESHOLD_TOK ) ); + insert( "green", new int( GREEN_TOK ) ); + insert( "halo", new int( HALO_TOK ) ); + insert( "height_field", new int( HEIGHT_FIELD_TOK ) ); + insert( "hexagon", new int( HEXAGON_TOK ) ); + insert( "hf_gray_16", new int( HF_GRAY_16_TOK ) ); + insert( "hierarchy", new int( HIERARCHY_TOK ) ); + insert( "hollow", new int( HOLLOW_TOK ) ); + insert( "hypercomplex", new int( HYPERCOMPLEX_TOK ) ); + insert( "iff", new int( IFF_TOK ) ); + insert( "image_map", new int( IMAGE_MAP_TOK ) ); + insert( "incidence", new int( INCIDENCE_TOK ) ); + insert( "inside_vector", new int( INSIDE_VECTOR_TOK ) ); + insert( "int", new int( INT_TOK ) ); + insert( "interior", new int( INTERIOR_TOK ) ); + insert( "interior_texture", new int( INTERIOR_TEXTURE_TOK ) ); + insert( "interpolate", new int( INTERPOLATE_TOK ) ); + insert( "intersection", new int( INTERSECTION_TOK ) ); + insert( "intervals", new int( INTERVALS_TOK ) ); + insert( "inverse", new int( INVERSE_TOK ) ); + insert( "ior", new int( IOR_TOK ) ); + insert( "irid", new int( IRID_TOK ) ); + insert( "irid_wavelength", new int( IRID_WAVELENGTH_TOK ) ); + insert( "isosurface", new int( ISOSURFACE_TOK ) ); + insert( "jitter", new int( JITTER_TOK ) ); + insert( "julia", new int( JULIA_TOK ) ); + insert( "julia_fractal", new int( JULIA_FRACTAL_TOK ) ); + insert( "lambda", new int( LAMBDA_TOK ) ); + insert( "lathe", new int( LATHE_TOK ) ); + insert( "leopard", new int( LEOPARD_TOK ) ); + insert( "light_group", new int ( LIGHT_GROUP_TOK ) ); + insert( "light_source", new int( LIGHT_SOURCE_TOK ) ); + insert( "linear", new int( LINEAR_TOK ) ); + insert( "linear_spline", new int( LINEAR_SPLINE_TOK ) ); + insert( "linear_sweep", new int( LINEAR_SWEEP_TOK ) ); + insert( "location", new int( LOCATION_TOK ) ); + insert( "log", new int( LOG_TOK ) ); + insert( "looks_like", new int( LOOKS_LIKE_TOK ) ); + insert( "look_at", new int( LOOK_AT_TOK ) ); + insert( "low_error_factor", new int( LOW_ERROR_FACTOR_TOK ) ); + insert( "magnet", new int ( MAGNET_TOK ) ); + insert( "major_radius", new int( MAJOR_RADIUS_TOK ) ); + insert( "mandel", new int( MANDEL_TOK ) ); + insert( "map_type", new int( MAP_TYPE_TOK ) ); + insert( "marble", new int( MARBLE_TOK ) ); + insert( "material", new int( MATERIAL_TOK ) ); + insert( "material_map", new int( MATERIAL_MAP_TOK ) ); + insert( "matrix", new int( MATRIX_TOK ) ); + insert( "max", new int( MAX_TOK ) ); + insert( "max_gradient", new int( MAX_GRADIENT_TOK ) ); + insert( "max_intersections", new int( MAX_INTERSECTIONS_TOK ) ); + insert( "max_iteration", new int( MAX_ITERATION_TOK ) ); + insert( "max_sample", new int( MAX_SAMPLE_TOK ) ); + insert( "max_trace", new int( MAX_TRACE_TOK ) ); + insert( "max_trace_level", new int( MAX_TRACE_LEVEL_TOK ) ); + insert( "max_value", new int( MAX_VALUE_TOK ) ); + insert( "media", new int( MEDIA_TOK ) ); + insert( "media_attenuation", new int( MEDIA_ATTENUATION_TOK ) ); + insert( "media_interaction", new int( MEDIA_INTERACTION_TOK ) ); + insert( "merge", new int( MERGE_TOK ) ); + insert( "mesh", new int( MESH_TOK ) ); + insert( "metallic", new int( METALLIC_TOK ) ); + insert( "method", new int( METHOD_TOK ) ); + insert( "metric", new int( METRIC_TOK ) ); + insert( "min", new int( MIN_TOK ) ); + insert( "minimum_reuse", new int( MINIMUM_REUSE_TOK ) ); + insert( "mod", new int( MOD_TOK ) ); + insert( "mortar", new int( MORTAR_TOK ) ); + insert( "nearest_count", new int( NEAREST_COUNT_TOK ) ); + insert( "no", new int( NO_TOK ) ); + insert( "noise_generator", new int( NOISE_GENERATOR_TOK ) ); + insert( "normal", new int( NORMAL_TOK ) ); + insert( "normal_map", new int( NORMAL_MAP_TOK ) ); + insert( "no_image", new int( NO_IMAGE_TOK ) ); + insert( "no_reflection", new int( NO_REFLECTION_TOK ) ); + insert( "no_shadow", new int( NO_SHADOW_TOK ) ); + insert( "number_of_waves", new int( NUMBER_OF_WAVES_TOK ) ); + insert( "object", new int( OBJECT_TOK ) ); + insert( "octaves", new int( OCTAVES_TOK ) ); + insert( "off", new int( OFF_TOK ) ); + insert( "offset", new int( OFFSET_TOK ) ); + insert( "omega", new int( OMEGA_TOK ) ); + insert( "omnimax", new int( OMNIMAX_TOK ) ); + insert( "on", new int( ON_TOK ) ); + insert( "once", new int( ONCE_TOK ) ); + insert( "onion", new int( ONION_TOK ) ); + insert( "open", new int( OPEN_TOK ) ); + insert( "orient", new int( ORIENT_TOK ) ); + insert( "orthographic", new int( ORTHOGRAPHIC_TOK ) ); + insert( "panoramic", new int( PANORAMIC_TOK ) ); + insert( "parallel", new int( PARALLEL_TOK ) ); + insert( "pass_through", new int ( PASS_THROUGH_TOK ) ); + insert( "pattern1", new int( PATTERN1_TOK ) ); + insert( "pattern2", new int( PATTERN2_TOK ) ); + insert( "pattern3", new int( PATTERN3_TOK ) ); + insert( "perspective", new int( PERSPECTIVE_TOK ) ); + insert( "pgm", new int( PGM_TOK ) ); + insert( "phase", new int( PHASE_TOK ) ); + insert( "phong", new int( PHONG_TOK ) ); + insert( "phong_size", new int( PHONG_SIZE_TOK ) ); + insert( "photons", new int ( PHOTONS_TOK ) ); + insert( "pi", new int( PI_TOK ) ); + insert( "pigment", new int( PIGMENT_TOK ) ); + insert( "pigment_map", new int( PIGMENT_MAP_TOK ) ); + insert( "planar", new int( PLANAR_TOK ) ); + insert( "plane", new int( PLANE_TOK ) ); + insert( "png", new int( PNG_TOK ) ); + insert( "point_at", new int( POINT_AT_TOK ) ); + insert( "poly", new int( POLY_TOK ) ); + insert( "poly_wave", new int( POLY_WAVE_TOK ) ); + insert( "polygon", new int( POLYGON_TOK ) ); + insert( "pot", new int( POT_TOK ) ); + insert( "pow", new int( POW_TOK ) ); + insert( "ppm", new int( PPM_TOK ) ); + insert( "precision", new int( PRECISION_TOK ) ); + insert( "pretrace_end", new int( PRETRACE_END_TOK ) ); + insert( "pretrace_start", new int( PRETRACE_START_TOK ) ); + insert( "prism", new int( PRISM_TOK ) ); + insert( "projected_through", new int( PROJECTED_THROUGH_TOK ) ); + insert( "pwr", new int( PWR_TOK ) ); + insert( "quadratic_spline", new int( QUADRATIC_SPLINE_TOK ) ); + insert( "quadric", new int( QUADRIC_TOK ) ); + insert( "quartic", new int( QUARTIC_TOK ) ); + insert( "quaternion", new int( QUATERNION_TOK ) ); + insert( "quick_color", new int( QUICK_COLOR_TOK ) ); + insert( "quick_colour", new int( QUICK_COLOUR_TOK ) ); + insert( "quilted", new int( QUILTED_TOK ) ); + insert( "radial", new int( RADIAL_TOK ) ); + insert( "radians", new int( RADIANS_TOK ) ); + insert( "radiosity", new int( RADIOSITY_TOK ) ); + insert( "radius", new int( RADIUS_TOK ) ); + insert( "rainbow", new int( RAINBOW_TOK ) ); + insert( "ramp_wave", new int( RAMP_WAVE_TOK ) ); + insert( "rand", new int( RAND_TOK ) ); + insert( "ratio", new int( RATIO_TOK ) ); + insert( "reciprocal", new int( RECIPROCAL_TOK ) ); + insert( "recursion_limit", new int( RECURSION_LIMIT_TOK ) ); + insert( "red", new int( RED_TOK ) ); + insert( "reflection", new int( REFLECTION_TOK ) ); + insert( "reflection_exponent", new int( REFLECTION_EXPONENT_TOK ) ); + insert( "refraction", new int( REFRACTION_TOK ) ); + insert( "repeat", new int( REPEAT_TOK ) ); + insert( "rgb", new int( RGB_TOK ) ); + insert( "rgbf", new int( RGBF_TOK ) ); + insert( "rgbft", new int( RGBFT_TOK ) ); + insert( "rgbt", new int( RGBT_TOK ) ); + insert( "right", new int( RIGHT_TOK ) ); + insert( "ripples", new int( RIPPLES_TOK ) ); + insert( "rotate", new int( ROTATE_TOK ) ); + insert( "roughness", new int( ROUGHNESS_TOK ) ); + insert( "samples", new int( SAMPLES_TOK ) ); + insert( "scale", new int( SCALE_TOK ) ); + insert( "scallop_wave", new int( SCALLOP_WAVE_TOK ) ); + insert( "scattering", new int( SCATTERING_TOK ) ); + insert( "seed", new int( SEED_TOK ) ); + insert( "shadowless", new int( SHADOWLESS_TOK ) ); + insert( "sin", new int( SIN_TOK ) ); + insert( "sine_wave", new int( SINE_WAVE_TOK ) ); + insert( "sinh", new int( SINH_TOK ) ); + insert( "sky", new int( SKY_TOK ) ); + insert( "sky_sphere", new int( SKY_SPHERE_TOK ) ); + insert( "slice", new int( SLICE_TOK ) ); + insert( "slope", new int( SLOPE_TOK ) ); + insert( "slope_map", new int( SLOPE_MAP_TOK ) ); + insert( "smooth", new int( SMOOTH_TOK ) ); + insert( "smooth_triangle", new int( SMOOTH_TRIANGLE_TOK ) ); + insert( "solid", new int( SOLID_TOK ) ); + insert( "sor", new int( SOR_TOK ) ); + insert( "spacing", new int ( SPACING_TOK ) ); + insert( "specular", new int( SPECULAR_TOK ) ); + insert( "sphere", new int( SPHERE_TOK ) ); + insert( "sphere_sweep", new int ( SPHERE_SWEEP_TOK ) ); + insert( "spherical", new int( SPHERICAL_TOK ) ); + insert( "spiral", new int( SPIRAL_TOK ) ); + insert( "spiral1", new int( SPIRAL1_TOK ) ); + insert( "spiral2", new int( SPIRAL2_TOK ) ); + insert( "spotlight", new int( SPOTLIGHT_TOK ) ); + insert( "spotted", new int( SPOTTED_TOK ) ); + insert( "sqr", new int( SQR_TOK ) ); + insert( "sqrt", new int( SQRT_TOK ) ); + insert( "str", new int( STR_TOK ) ); + insert( "strcmp", new int( STRCMP_TOK ) ); + insert( "strength", new int( STRENGTH_TOK ) ); + insert( "strlen", new int( STRLEN_TOK ) ); + insert( "strlwr", new int( STRLWR_TOK ) ); + insert( "strupr", new int( STRUPR_TOK ) ); + insert( "sturm", new int( STURM_TOK ) ); + insert( "substr", new int( SUBSTR_TOK ) ); + insert( "superellipsoid", new int( SUPERELLIPSOID_TOK ) ); + insert( "sys", new int( SYS_TOK ) ); + insert( "t", new int( T_TOK ) ); + insert( "tan", new int( TAN_TOK ) ); + insert( "tanh", new int( TANH_TOK ) ); + insert( "target", new int( TARGET_TOK ) ); + insert( "test_camera_1", new int( TEST_CAMERA_1_TOK ) ); + insert( "test_camera_2", new int( TEST_CAMERA_2_TOK ) ); + insert( "test_camera_3", new int( TEST_CAMERA_3_TOK ) ); + insert( "test_camera_4", new int( TEST_CAMERA_4_TOK ) ); + insert( "text", new int( TEXT_TOK ) ); + insert( "texture", new int( TEXTURE_TOK ) ); + insert( "texture_map", new int( TEXTURE_MAP_TOK ) ); + insert( "tga", new int( TGA_TOK ) ); + insert( "thickness", new int( THICKNESS_TOK ) ); + insert( "threshold", new int( THRESHOLD_TOK ) ); + insert( "tightness", new int( TIGHTNESS_TOK ) ); + insert( "tile2", new int( TILE2_TOK ) ); + insert( "tiles", new int( TILES_TOK ) ); + insert( "tolerance", new int( TOLERANCE_TOK ) ); + insert( "toroidal", new int( TOROIDAL_TOK ) ); + insert( "torus", new int( TORUS_TOK ) ); + insert( "track", new int( TRACK_TOK ) ); + insert( "transform", new int( TRANSFORM_TOK ) ); + insert( "translate", new int( TRANSLATE_TOK ) ); + insert( "transmit", new int( TRANSMIT_TOK ) ); + insert( "triangle", new int( TRIANGLE_TOK ) ); + insert( "triangle_wave", new int( TRIANGLE_WAVE_TOK ) ); + insert( "true", new int( TRUE_TOK ) ); + insert( "ttf", new int( TTF_TOK ) ); + insert( "turbulence", new int( TURBULENCE_TOK ) ); + insert( "turb_depth", new int( TURB_DEPTH_TOK ) ); + insert( "type", new int( TYPE_TOK ) ); + insert( "u", new int( U_TOK ) ); + insert( "ultra_wide_angle", new int( ULTRA_WIDE_ANGLE_TOK ) ); + insert( "union", new int( UNION_TOK ) ); + insert( "up", new int( UP_TOK ) ); + insert( "use_color", new int( USE_COLOR_TOK ) ); + insert( "use_colour", new int( USE_COLOUR_TOK ) ); + insert( "use_index", new int( USE_INDEX_TOK ) ); + insert( "u_steps", new int( U_STEPS_TOK ) ); + insert( "uv_mapping", new int( UV_MAPPING_TOK ) ); + insert( "uv_vectors", new int( UV_VECTORS_TOK ) ); + insert( "v", new int( V_TOK ) ); + insert( "val", new int( VAL_TOK ) ); + insert( "variance", new int( VARIANCE_TOK ) ); + insert( "vaxis_rotate", new int( VAXIS_ROTATE_TOK ) ); + insert( "vcross", new int( VCROSS_TOK ) ); + insert( "vdot", new int( VDOT_TOK ) ); + insert( "vlength", new int( VLENGTH_TOK ) ); + insert( "vnormalize", new int( VNORMALIZE_TOK ) ); + insert( "volume_object", new int( VOLUME_OBJECT_TOK ) ); + insert( "volume_rendered", new int( VOLUME_RENDERED_TOK ) ); + insert( "vol_with_light", new int( VOL_WITH_LIGHT_TOK ) ); + insert( "vrotate", new int( VROTATE_TOK ) ); + insert( "v_steps", new int( V_STEPS_TOK ) ); + insert( "warp", new int( WARP_TOK ) ); + insert( "water_level", new int( WATER_LEVEL_TOK ) ); + insert( "waves", new int( WAVES_TOK ) ); + insert( "width", new int( WIDTH_TOK ) ); + insert( "wood", new int( WOOD_TOK ) ); + insert( "wrinkles", new int( WRINKLES_TOK ) ); + insert( "x", new int( X_TOK ) ); + insert( "y", new int( Y_TOK ) ); + insert( "yes", new int( YES_TOK ) ); + insert( "z", new int( Z_TOK ) ); + break; + case PMDDirectives: + insert( "break", new int( BREAK_TOK ) ); + insert( "case", new int( CASE_TOK ) ); + insert( "debug", new int( DEBUG_TOK ) ); + insert( "declare", new int( DECLARE_TOK ) ); + insert( "default", new int( DEFAULT_TOK ) ); + insert( "else", new int( ELSE_TOK ) ); + insert( "end", new int( END_TOK ) ); + insert( "if", new int( IF_TOK ) ); + insert( "ifdef", new int( IFDEF_TOK ) ); + insert( "ifndef", new int( IFNDEF_TOK ) ); + insert( "include", new int( INCLUDE_TOK ) ); + insert( "range", new int( RANGE_TOK ) ); + insert( "render", new int( RENDER_TOK ) ); + insert( "statistics", new int( STATISTICS_TOK ) ); + insert( "switch", new int( SWITCH_TOK ) ); + insert( "version", new int( VERSION_TOK ) ); + insert( "warning", new int( WARNING_TOK ) ); + insert( "while", new int( WHILE_TOK ) ); + break; + } +} + +PMReservedWordDict::~PMReservedWordDict( ) +{ +} + +PMReservedWordDict PMScanner::m_reservedWords( PMReservedWordDict::PMDReservedWords ); +PMReservedWordDict PMScanner::m_directives( PMReservedWordDict::PMDDirectives ); + +const char* c_commentName = "*PMName "; +const int c_commentNameLength = 8; + +const char* c_commentRawBegin = "*PMRawBegin"; +const int c_commentRawBeginLength = 11; + +const char* c_commentRawEnd = "//*PMRawEnd"; +const int c_commentRawEndLength = 11; + + +PMScanner::PMScanner( QIODevice* device ) +{ + m_svalueAlloc = 256; + m_svalue = ( char* ) malloc( m_svalueAlloc ); + m_svalue[0] = '\0'; + m_lastAlloc = m_svalue + m_svalueAlloc; + m_lastChar = m_svalue; + + m_ivalue = 0; + m_fvalue = 0; + m_pDevice = device; + m_line = 1; + m_char = 0; + m_indentation = 0; + m_rawIndentation = 0; + m_bFunctionMode = false; + +// m_lineData = ""; +// m_lineDataPos = 100; +// m_lineDataLength = 0; + nextChar( ); +} + +PMScanner::~PMScanner( ) +{ + if( m_svalue ) + free( m_svalue ); +} + +void PMScanner::nextChar( ) +{ + do + { + m_char = m_pDevice->getch( ); + } + while( m_char == '\r' ); +} + +void PMScanner::clearSValue( ) +{ + m_svalue[0] = '\0'; + m_lastChar = m_svalue; +} + +void PMScanner::addChar( char c ) +{ + *m_lastChar = c; + m_lastChar++; + + if( m_lastChar == m_lastAlloc ) + { + m_svalueAlloc += 64; + m_svalue = ( char* ) realloc( m_svalue, m_svalueAlloc ); + m_lastAlloc = m_svalue + m_svalueAlloc; + m_lastChar = m_lastAlloc - 64; + } + + *m_lastChar = '\0'; +} + +bool PMScanner::isseparation( int c ) +{ + if( c < 0 ) + return true; + if( isspace( c ) ) + return true; + switch( c ) + { + case '{': + case '}': + case '<': + case '>': + case '(': + case ')': + case '[': + case ']': + case '+': + case '-': + case '*': + case '/': + case ',': + case ';': + case '=': + case '.': + return true; + break; + default: + return false; + } + return false; +} + + +void PMScanner::scanError( int c ) +{ + m_token = SCANNER_ERROR_TOK; + if( isprint( c ) ) + m_error = i18n( "Unexpected character '%1' after \"%2\"" ) + .arg( ( char )c ).arg( m_svalue ); + else + m_error = i18n( "Unexpected character %1 after \"%2\"" ) + .arg( c, 4, 16 ).arg( m_svalue ); + +#ifdef PMSCAN_DEBUG + kdDebug( PMArea ) << "Line " << m_line << ": Error " << m_error << "\n"; +#endif +} + + +int PMScanner::nextToken( ) +{ + int status = START_ST; + int cdepth = 0; + bool consumed; + bool end = false; + + clearSValue( ); + m_ivalue = 0; + m_fvalue = 0; +// m_error = ""; + + if( m_bFunctionMode ) + { + m_bFunctionMode = false; + // FIXME: TODO brackets in comments will not be scanned correctly + int count = 1; + + while( count > 0 ) + { + if( m_char < 0 ) + count = 0; + else if( m_char == '{' ) + count++; + else if( m_char == '}' ) + count--; + if( count > 0 ) + { + addChar( m_char ); + nextChar( ); + } + } + + if( m_char != '}' ) + { + m_error = i18n( "Function statement not terminated" ); +#ifdef PMSCAN_DEBUG + kdDebug( PMArea ) << "Line " << m_line << ": Error " << m_error << "\n"; +#endif + m_token = SCANNER_ERROR_TOK; + } + else + m_token = FUNCTION_TOK; + } + else while( status != TOKEN_END_ST ) + { + consumed = true; + if( m_char < 0 ) + end = true; + switch( status ) + { + case START_ST: //begin + if( m_char < 0 ) + { + m_token = EOF_TOK; + addChar( 'E' ); + addChar( 'O' ); + addChar( 'F' ); + status = TOKEN_END_ST; + consumed = false; + break; + } + if( m_char == '\n' ) + { + m_line ++; + m_indentation = 0; + break; + } + if( m_char == ' ' ) + { + m_indentation++; + break; + } + if( m_char == '\t' ) + { + m_indentation += 8 - m_indentation % 8; + break; + } + if( iscntrl( m_char ) ) + break; + if( isspace( m_char ) ) + break; + if( isalpha( m_char ) || ( m_char == '_' ) ) + { + status = ID_ENDST; + addChar( m_char ); + break; + } + if( isdigit( m_char ) ) + { + status = INTEGER_ENDST; + addChar( m_char ); + break; + } + switch( m_char ) + { + case '.': + status = POINT_ST; + addChar( m_char ); + break; + case '#': + status = DIRECTIVE1_ST; + break; + case '"': + status = STRING1_ST; + break; + case '/': + status = SLASH_ST; + break; + default: + addChar( m_char ); + m_token = m_char; + status = TOKEN_END_ST; + +#ifdef PMSCAN_DEBUG + kdDebug( PMArea ) << "Line " << m_line << ": Single char '" + << QString( QChar( ( char ) m_char ) ) << "'\n"; +#endif + break; + } + break; + case ID_ENDST: // indentifier or reserved word + if( isalnum( m_char ) || ( m_char == '_' ) ) + { + addChar( m_char ); + break; + } + else if( isseparation( m_char ) ) + { + consumed = false; + m_token = m_reservedWords[ m_svalue ]; + if( m_token < 0 ) + m_token = ID_TOK; + +#ifdef PMSCAN_DEBUG + if( m_token == ID_TOK ) + kdDebug( PMArea ) << "Line " << m_line << ": Indentifier: \"" + << m_svalue << "\"\n"; + else + kdDebug( PMArea ) << "Line " << m_line << ": Reserved word: \"" + << m_svalue << "\"\n"; +#endif + + + status = TOKEN_END_ST; + } + else + { + status = TOKEN_END_ST; + scanError( m_char ); + consumed = false; + } + break; + case INTEGER_ENDST: + if( isdigit ( m_char ) ) + { + addChar( m_char ); + break; + } + else if( m_char == '.' ) + { + status = FLOAT1_ST; + addChar( m_char ); + break; + } + else if( ( m_char == 'e' ) || ( m_char == 'E' ) ) + { + status = FLOAT_EXP1_ST; + addChar( m_char ); + break; + } + else if( isseparation( m_char ) ) + { + consumed = false; + m_ivalue = atoi( m_svalue ); +#ifdef PMSCAN_DEBUG + kdDebug( PMArea ) << "Line " << m_line << ": Integer: " + << m_ivalue << "\n"; +#endif + m_token = INTEGER_TOK; + status = TOKEN_END_ST; + } + else + { + status = TOKEN_END_ST; + scanError( m_char ); + consumed = false; + } + break; + case POINT_ST: + if( isdigit( m_char ) ) + { + status = FLOAT_ENDST; + addChar( m_char ); + } + else + { + status = TOKEN_END_ST; + consumed = false; + m_token = '.'; + } + break; + case FLOAT1_ST: + if( isdigit( m_char ) ) + { + status = FLOAT_ENDST; + addChar( m_char ); + break; + } + else + { + scanError( m_char ); + status = TOKEN_END_ST; + consumed = false; + } + break; + case FLOAT_ENDST: + if( isdigit ( m_char ) ) + { + addChar( m_char ); + break; + } + if( ( m_char == 'e' ) || ( m_char == 'E' ) ) + { + status = FLOAT_EXP1_ST; + addChar( m_char ); + break; + } + else if( isseparation( m_char ) ) + { + consumed = false; + m_fvalue = atof( m_svalue ); +#ifdef PMSCAN_DEBUG + kdDebug( PMArea ) << "Line " << m_line << ": Float: " + << m_fvalue << "\n"; +#endif + m_token = FLOAT_TOK; + status = TOKEN_END_ST; + } + else + { + scanError( m_char ); + status = TOKEN_END_ST; + consumed = false; + } + break; + case FLOAT_EXP1_ST: + if( ( m_char == '-' ) || ( m_char == '+' ) ) + { + status = FLOAT_EXP2_ST; + addChar( m_char ); + break; + } + if( isdigit( m_char ) ) + { + status = FLOAT_EXP_ENDST; + addChar( m_char ); + break; + } + else + { + scanError( m_char ); + consumed = false; + status = TOKEN_END_ST; + } + break; + case FLOAT_EXP2_ST: + if( isdigit( m_char ) ) + { + status = FLOAT_EXP_ENDST; + addChar( m_char ); + break; + } + else + { + scanError( m_char ); + consumed = false; + status = TOKEN_END_ST; + } + break; + case FLOAT_EXP_ENDST: + if( isdigit ( m_char ) ) + { + addChar( m_char ); + break; + } + else if( isseparation( m_char ) ) + { + consumed = false; + m_fvalue = atof( m_svalue ); +#ifdef PMSCAN_DEBUG + kdDebug( PMArea ) << "Line " << m_line << ": Float: " + << m_fvalue << "\n"; +#endif + m_token = FLOAT_TOK; + status = TOKEN_END_ST; + } + else + { + scanError( m_char ); + consumed = false; + status = TOKEN_END_ST; + } + break; + case DIRECTIVE1_ST: + if( m_char == ' ' ) + { + // special treatment for povray inc files + // "# debug" directives + break; + } + else if( isalpha ( m_char ) ) + { + status = DIRECTIVE_ENDST; + addChar( m_char ); + break; + } + else + { + scanError( m_char ); + consumed = false; + status = TOKEN_END_ST; + } + break; + case DIRECTIVE_ENDST: + if( isalpha( m_char ) ) + { + addChar( m_char ); + break; + } + else if( isseparation( m_char ) ) + { + consumed = false; +#ifdef PMSCAN_DEBUG + kdDebug( PMArea ) << "Line " << m_line << ": Directive: \"" + << m_svalue << "\"\n"; +#endif + m_token = m_directives[ m_svalue ]; + if( m_token < 0 ) + { + m_error = i18n( "Unknown directive" ); +#ifdef PMSCAN_DEBUG + kdDebug( PMArea ) << "Line " << m_line << ": Error " << m_error << "\n"; +#endif + + m_token = SCANNER_ERROR_TOK; + } + status = TOKEN_END_ST; + } + else + { + scanError( m_char ); + consumed = false; + status = TOKEN_END_ST; + } + break; + case STRING1_ST: + switch( m_char ) + { + case '\n': + case '\r': + consumed = false; + m_error = i18n( "String not terminated" ); + m_token = SCANNER_ERROR_TOK; + status = TOKEN_END_ST; +#ifdef PMSCAN_DEBUG + kdDebug( PMArea ) << "Line " << m_line << ": Error " << m_error << "\n"; +#endif + break; + case '"': +#ifdef PMSCAN_DEBUG + kdDebug( PMArea ) << "Line " << m_line << ": String: \"" + << m_svalue << "\"\n"; +#endif + + m_token = STRING_TOK; + status = TOKEN_END_ST; + break; + case '\\': + status = STRINGBS_ST; + addChar( m_char ); + break; + default: + addChar( m_char ); + break; + } + break; + case STRINGBS_ST: + if( ( m_char == '\n' ) || ( m_char == '\r' ) || ( m_char < 0 ) ) + { + consumed = false; + m_error = i18n( "String not terminated" ); +#ifdef PMSCAN_DEBUG + kdDebug( PMArea ) << "Line " << m_line << ": Error " << m_error << "\n"; +#endif + m_token = SCANNER_ERROR_TOK; + status = TOKEN_END_ST; + break; + } + else + { + status = STRING1_ST; + addChar( m_char ); + break; + } + break; + case SLASH_ST: + switch( m_char ) + { + case '/': + status = LINE_COMMENT_FIRST_ST; + break; + case '*': + status = COMMENT_NEW_LINE_ST; + cdepth ++; + break; + default: + consumed = false; + m_token = '/'; + status = TOKEN_END_ST; + } + break; + case LINE_COMMENT_FIRST_ST: + // skip the first space char + if( ( m_char == '\n' ) || ( m_char == '\r' ) || ( m_char < 0 ) ) + { +#ifdef PMSCAN_DEBUG + kdDebug( PMArea ) << "Line " << m_line << ": Empty line comment\n"; +#endif + consumed = false; + m_token = LINE_COMMENT_TOK; + status = TOKEN_END_ST; + break; + } + else if( !isspace( m_char ) ) + addChar( m_char ); + status = LINE_COMMENT_ST; + break; + case LINE_COMMENT_ST: + if( ( m_char == '\n' ) || ( m_char == '\r' ) || ( m_char < 0 ) ) + { +#ifdef PMSCAN_DEBUG + kdDebug( PMArea ) << "Line " << m_line << ": Line comment: \"" + << m_svalue << "\"\n"; +#endif + consumed = false; + m_token = LINE_COMMENT_TOK; + status = TOKEN_END_ST; + break; + } + else + { + addChar( m_char ); + int l = m_lastChar - m_svalue; + if( l == c_commentNameLength ) + { + if( strcmp( m_svalue, c_commentName ) == 0 ) + { + status = PMNAME_ST; + clearSValue( ); + } + } + if( l == c_commentRawBeginLength ) + { + if( strcmp( m_svalue, c_commentRawBegin ) == 0 ) + { + status = RAW_POVRAY_FIRST_ST; + clearSValue( ); + } + } + break; + } + break; + case COMMENT_NEW_LINE_ST: + // skip any white spaces at begin of line. + if( m_char < 0 ) + { + consumed = false; + m_error = i18n( "Comment not terminated" ); +#ifdef PMSCAN_DEBUG + kdDebug( PMArea ) << "Line " << m_line << ": Error " << m_error << "\n"; +#endif + m_token = SCANNER_ERROR_TOK; + status = TOKEN_END_ST; + } + else if( m_char == '\n' ) + { + addChar( '\n' ); + m_line ++; + } + else if( !isspace( m_char ) ) + { + consumed = false; + status = C_COMMENT_ST; + } + break; + case C_COMMENT_ST: + if( m_char < 0 ) + { + consumed = false; + m_error = i18n( "Comment not terminated" ); +#ifdef PMSCAN_DEBUG + kdDebug( PMArea ) << "Line " << m_line << ": Error " << m_error << "\n"; +#endif + m_token = SCANNER_ERROR_TOK; + status = TOKEN_END_ST; + } + else + { + switch( m_char ) + { + case '*': + status = COMMENT_ST_ST; + break; + case '/': + status = COMMENT_SL_ST; + addChar( m_char ); + break; + case '\n': + addChar( m_char ); + m_line ++; + status = COMMENT_NEW_LINE_ST; + break; + default: + addChar( m_char ); + } + } + break; + case COMMENT_ST_ST: + if( m_char < 0 ) + { + consumed = false; + m_error = i18n( "Comment not terminated" ); +#ifdef PMSCAN_DEBUG + kdDebug( PMArea ) << "Line " << m_line << ": Error " << m_error << "\n"; +#endif + m_token = SCANNER_ERROR_TOK; + status = TOKEN_END_ST; + } + else + { + switch( m_char ) + { + case '/': + cdepth --; + if( cdepth == 0 ) + { +#ifdef PMSCAN_DEBUG + kdDebug( PMArea ) << "Line " << m_line << ": Comment: \"" + << m_svalue << "\"\n"; +#endif + m_token = COMMENT_TOK; + status = TOKEN_END_ST; + break; + } + else + { + status = C_COMMENT_ST; + addChar( '*' ); + addChar( '/' ); + break; + } + case '*': + addChar( m_char ); + break; + case '\n': + status = C_COMMENT_ST; + addChar( '*' ); + addChar( m_char ); + m_line ++; + break; + default: + status = C_COMMENT_ST; + addChar( '*' ); + addChar( m_char ); + break; + } + } + break; + case COMMENT_SL_ST: + if( m_char < 0 ) + { + consumed = false; + m_error = i18n( "Comment not terminated" ); +#ifdef PMSCAN_DEBUG + kdDebug( PMArea ) << "Line " << m_line << ": Error " << m_error << "\n"; +#endif + m_token = SCANNER_ERROR_TOK; + status = TOKEN_END_ST; + } + else + { + switch( m_char ) + { + case '/': + addChar( m_char ); + break; + case '*': + status = C_COMMENT_ST; + addChar( m_char ); + cdepth ++; + break; + case '\n': + status = C_COMMENT_ST; + addChar( m_char ); + m_line ++; + break; + default: + status = C_COMMENT_ST; + addChar( m_char ); + } + } + break; + case PMNAME_ST: + if( ( m_char == '\n' ) || ( m_char == '\r' ) || ( m_char < 0 ) ) + { +#ifdef PMSCAN_DEBUG + kdDebug( PMArea ) << "Line " << m_line << ": PMName: \"" + << m_svalue << "\"\n"; +#endif + consumed = false; + m_token = PMNAME_TOK; + status = TOKEN_END_ST; + break; + } + else + { + addChar( m_char ); + break; + } + break; + case RAW_POVRAY_FIRST_ST: // skip the first line + if( m_char < 0 ) + { + consumed = false; + m_error = i18n( "Raw povray not terminated" ); +#ifdef PMSCAN_DEBUG + kdDebug( PMArea ) << "Line " << m_line << ": Error " << m_error << "\n"; +#endif + m_token = SCANNER_ERROR_TOK; + status = TOKEN_END_ST; + } + if( m_char == '\n' ) + { + m_line++; + m_rawIndentation = 0; + status = RAW_POVRAY_LB_ST; + } + break; + case RAW_POVRAY_LB_ST: + switch( m_char ) + { + case '\n': + addChar( m_char ); + m_line++; + m_rawIndentation = 0; + // status = RAW_POVRAY_LB_ST; + break; + case ' ': + m_rawIndentation++; + if( m_rawIndentation >= m_indentation ) + status = RAW_POVRAY_ST; + break; + case '\t': + m_rawIndentation += 8 - m_rawIndentation % 8; + if( m_rawIndentation >= m_indentation ) + status = RAW_POVRAY_ST; + break; + default: + consumed = false; + status = RAW_POVRAY_ST; + break; + } + break; + case RAW_POVRAY_ST: + if( m_char < 0 ) + { + consumed = false; + m_error = i18n( "Raw povray not terminated" ); +#ifdef PMSCAN_DEBUG + kdDebug( PMArea ) << "Line " << m_line << ": Error " << m_error << "\n"; +#endif + m_token = SCANNER_ERROR_TOK; + status = TOKEN_END_ST; + } + else if( m_char == '\n' ) + { + addChar( m_char ); + m_line++; + m_rawIndentation = 0; + status = RAW_POVRAY_LB_ST; + } + else if( m_char == '/' ) + { + m_rawPovrayEnd = 1; + status = RAW_POVRAY_END_ST; + } + else + addChar( m_char ); + break; + case RAW_POVRAY_END_ST: + if( m_char < 0 ) + { + consumed = false; + m_error = i18n( "Raw povray not terminated" ); +#ifdef PMSCAN_DEBUG + kdDebug( PMArea ) << "Line " << m_line << ": Error " << m_error << "\n"; +#endif + m_token = SCANNER_ERROR_TOK; + status = TOKEN_END_ST; + } + else if( m_char != c_commentRawEnd[m_rawPovrayEnd] ) + { + status = RAW_POVRAY_ST; + int i; + for( i = 0; i < m_rawPovrayEnd; i++ ) + addChar( c_commentRawEnd[i] ); + consumed = false; + } + else + { + m_rawPovrayEnd++; + if( m_rawPovrayEnd >= c_commentRawEndLength ) + { + status = RAW_POVRAY_END_END_ST; + if( m_lastChar > m_svalue ) + { + if( *( m_lastChar - 1 ) == '\n' ) + { + m_lastChar--; + *m_lastChar = 0; + } + } + } + } + break; + case RAW_POVRAY_END_END_ST: + if( ( m_char < 0 ) || ( m_char == '\n' ) ) + { + consumed = false; + status = TOKEN_END_ST; + m_token = RAW_POVRAY_TOK; + } + break; + case TOKEN_END_ST: + break; + } + if( consumed ) + nextChar( ); + if( end && ( status != TOKEN_END_ST ) ) + { + status = TOKEN_END_ST; + kdError( PMArea ) << "Error in scanner: No TOKEN_END_ST after EOF\n"; + } + } + + return m_token; +} + +void PMScanner::scanFunction( ) +{ + m_bFunctionMode = true; +} |