Menu
▾
▴
[Plplot-cvs] SF.net SVN: plplot:[10542] trunk
|
From: <ai...@us...> - 2009-10-21 21:29:49
|
Revision: 10542
http://plplot.svn.sourceforge.net/plplot/?rev=10542&view=rev
Author: airwin
Date: 2009-10-21 21:29:41 +0000 (Wed, 21 Oct 2009)
Log Message:
-----------
Style C source code in drivers subdirectory.
Modified Paths:
--------------
trunk/drivers/aqt.c
trunk/drivers/cairo.c
trunk/drivers/cgm.c
trunk/drivers/dg300.c
trunk/drivers/gcw.c
trunk/drivers/gd.c
trunk/drivers/hpgl.c
trunk/drivers/impress.c
trunk/drivers/linuxvga.c
trunk/drivers/ljii.c
trunk/drivers/ljiip.c
trunk/drivers/mem.c
trunk/drivers/ntk.c
trunk/drivers/null.c
trunk/drivers/pbm.c
trunk/drivers/pdf.c
trunk/drivers/plmeta.c
trunk/drivers/plplotcanvas-hacktext.c
trunk/drivers/ps.c
trunk/drivers/pstex.c
trunk/drivers/svg.c
trunk/drivers/tek.c
trunk/drivers/test-drv-info.c
trunk/drivers/tk.c
trunk/drivers/tkwin.c
trunk/drivers/wingcc.c
trunk/drivers/xfig.c
trunk/drivers/xwin.c
trunk/scripts/style_source.sh
Modified: trunk/drivers/aqt.c
===================================================================
--- trunk/drivers/aqt.c 2009-10-21 20:14:07 UTC (rev 10541)
+++ trunk/drivers/aqt.c 2009-10-21 21:29:41 UTC (rev 10542)
@@ -1,31 +1,31 @@
/* March 12, 2005
+ *
+ * PLplot driver for AquaTerm and Mac OS X.
+ *
+ * Copyright (C) Per Persson
+ * Copyright (C) 2005 Hazen Babcock
+ *
+ * This file is part of PLplot.
+ *
+ * PLplot is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Library Public License as published
+ * by the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * PLplot 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 Library General Public License for more details.
+ *
+ * You should have received a copy of the GNU Library General Public License
+ * along with PLplot; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
+ *
+ */
- PLplot driver for AquaTerm and Mac OS X.
-
- Copyright (C) Per Persson
- Copyright (C) 2005 Hazen Babcock
-
- This file is part of PLplot.
-
- PLplot is free software; you can redistribute it and/or modify
- it under the terms of the GNU General Library Public License as published
- by the Free Software Foundation; either version 2 of the License, or
- (at your option) any later version.
-
- PLplot 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 Library General Public License for more details.
-
- You should have received a copy of the GNU Library General Public License
- along with PLplot; if not, write to the Free Software
- Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
-
-*/
-
/*---------------------------------------------
- Header files, defines and local variables
- ---------------------------------------------*/
+ * Header files, defines and local variables
+ * ---------------------------------------------*/
/* OS X specific header files */
@@ -39,724 +39,766 @@
/* constants */
-#define SCALE 0.1
-#define AQT_Default_X 720
-#define AQT_Default_Y 540
-#define DPI 72.0
+#define SCALE 0.1
+#define AQT_Default_X 720
+#define AQT_Default_Y 540
+#define DPI 72.0
-#define MAX_STRING_LEN 1000
+#define MAX_STRING_LEN 1000
/* local variables */
-static NSAutoreleasePool *arpool; /* Objective-C autorelease pool */
-static id adapter; /* Adapter object */
+static NSAutoreleasePool *arpool; /* Objective-C autorelease pool */
+static id adapter; /* Adapter object */
PLDLLIMPEXP_DRIVER const char* plD_DEVICE_INFO_aqt = "aqt:AquaTerm (Mac OS X):1:aqt:50:aqt\n";
-static int currentPlot = 0;
-static int maxWindows = 30;
-static int windowXSize = 0;
-static int windowYSize = 0;
+static int currentPlot = 0;
+static int maxWindows = 30;
+static int windowXSize = 0;
+static int windowYSize = 0;
-static bool didTests = false;
-static bool hasShear = false;
-static bool hasAlpha = false;
+static bool didTests = false;
+static bool hasShear = false;
+static bool hasAlpha = false;
/* font stuff */
/*
- AquaTerm font look-up table
+ * AquaTerm font look-up table
+ *
+ * The table is initialized with lowest common denominator truetype
+ * fonts that (I hope) most Macs will have.
+ */
- The table is initialized with lowest common denominator truetype
- fonts that (I hope) most Macs will have.
-*/
-
-#define AQT_N_FontLookup 30
+#define AQT_N_FontLookup 30
static FCI_to_FontName_Table AQT_FontLookup[AQT_N_FontLookup] = {
- {PL_FCI_MARK | 0x000, (unsigned char *) "Helvetica"},
- {PL_FCI_MARK | 0x001, (unsigned char *) "Times-Roman"},
- {PL_FCI_MARK | 0x002, (unsigned char *) "Courier"},
- {PL_FCI_MARK | 0x003, (unsigned char *) "Times-Roman"},
- {PL_FCI_MARK | 0x004, (unsigned char *) "LucidaGrande Regular"},
- {PL_FCI_MARK | 0x010, (unsigned char *) "Helvetica-Oblique"},
- {PL_FCI_MARK | 0x011, (unsigned char *) "Times-Italic"},
- {PL_FCI_MARK | 0x012, (unsigned char *) "Courier-Oblique"},
- {PL_FCI_MARK | 0x013, (unsigned char *) "Times-Italic"},
- {PL_FCI_MARK | 0x014, (unsigned char *) "LucidaGrande Regular"},
- {PL_FCI_MARK | 0x020, (unsigned char *) "Helvetica-Oblique"},
- {PL_FCI_MARK | 0x021, (unsigned char *) "Times-Italic"},
- {PL_FCI_MARK | 0x022, (unsigned char *) "Courier-Oblique"},
- {PL_FCI_MARK | 0x023, (unsigned char *) "Times-Italic"},
- {PL_FCI_MARK | 0x024, (unsigned char *) "LucidaGrande Regular"},
- {PL_FCI_MARK | 0x100, (unsigned char *) "Helvetica-Bold"},
- {PL_FCI_MARK | 0x101, (unsigned char *) "Times-Bold"},
- {PL_FCI_MARK | 0x102, (unsigned char *) "Courier-Bold"},
- {PL_FCI_MARK | 0x103, (unsigned char *) "Times-Bold"},
- {PL_FCI_MARK | 0x104, (unsigned char *) "LucidaGrande Regular"},
- {PL_FCI_MARK | 0x110, (unsigned char *) "Helvetica-BoldOblique"},
- {PL_FCI_MARK | 0x111, (unsigned char *) "Times-BoldItalic"},
- {PL_FCI_MARK | 0x112, (unsigned char *) "Courier-BoldOblique"},
- {PL_FCI_MARK | 0x113, (unsigned char *) "Times-BoldItalic"},
- {PL_FCI_MARK | 0x114, (unsigned char *) "LucidaGrande Regular"},
- {PL_FCI_MARK | 0x120, (unsigned char *) "Helvetica-BoldOblique"},
- {PL_FCI_MARK | 0x121, (unsigned char *) "Times-BoldItalic"},
- {PL_FCI_MARK | 0x122, (unsigned char *) "Courier-BoldOblique"},
- {PL_FCI_MARK | 0x123, (unsigned char *) "Times-BoldItalic"},
- {PL_FCI_MARK | 0x124, (unsigned char *) "LucidaGrande Regular"}
+ { PL_FCI_MARK | 0x000, (unsigned char *) "Helvetica" },
+ { PL_FCI_MARK | 0x001, (unsigned char *) "Times-Roman" },
+ { PL_FCI_MARK | 0x002, (unsigned char *) "Courier" },
+ { PL_FCI_MARK | 0x003, (unsigned char *) "Times-Roman" },
+ { PL_FCI_MARK | 0x004, (unsigned char *) "LucidaGrande Regular" },
+ { PL_FCI_MARK | 0x010, (unsigned char *) "Helvetica-Oblique" },
+ { PL_FCI_MARK | 0x011, (unsigned char *) "Times-Italic" },
+ { PL_FCI_MARK | 0x012, (unsigned char *) "Courier-Oblique" },
+ { PL_FCI_MARK | 0x013, (unsigned char *) "Times-Italic" },
+ { PL_FCI_MARK | 0x014, (unsigned char *) "LucidaGrande Regular" },
+ { PL_FCI_MARK | 0x020, (unsigned char *) "Helvetica-Oblique" },
+ { PL_FCI_MARK | 0x021, (unsigned char *) "Times-Italic" },
+ { PL_FCI_MARK | 0x022, (unsigned char *) "Courier-Oblique" },
+ { PL_FCI_MARK | 0x023, (unsigned char *) "Times-Italic" },
+ { PL_FCI_MARK | 0x024, (unsigned char *) "LucidaGrande Regular" },
+ { PL_FCI_MARK | 0x100, (unsigned char *) "Helvetica-Bold" },
+ { PL_FCI_MARK | 0x101, (unsigned char *) "Times-Bold" },
+ { PL_FCI_MARK | 0x102, (unsigned char *) "Courier-Bold" },
+ { PL_FCI_MARK | 0x103, (unsigned char *) "Times-Bold" },
+ { PL_FCI_MARK | 0x104, (unsigned char *) "LucidaGrande Regular" },
+ { PL_FCI_MARK | 0x110, (unsigned char *) "Helvetica-BoldOblique" },
+ { PL_FCI_MARK | 0x111, (unsigned char *) "Times-BoldItalic" },
+ { PL_FCI_MARK | 0x112, (unsigned char *) "Courier-BoldOblique" },
+ { PL_FCI_MARK | 0x113, (unsigned char *) "Times-BoldItalic" },
+ { PL_FCI_MARK | 0x114, (unsigned char *) "LucidaGrande Regular" },
+ { PL_FCI_MARK | 0x120, (unsigned char *) "Helvetica-BoldOblique" },
+ { PL_FCI_MARK | 0x121, (unsigned char *) "Times-BoldItalic" },
+ { PL_FCI_MARK | 0x122, (unsigned char *) "Courier-BoldOblique" },
+ { PL_FCI_MARK | 0x123, (unsigned char *) "Times-BoldItalic" },
+ { PL_FCI_MARK | 0x124, (unsigned char *) "LucidaGrande Regular" }
};
/*
- AquaTerm font environment variables
+ * AquaTerm font environment variables
+ *
+ * When the driver is initialized it will check to see if
+ * the user has opted to overide one of the above fonts by
+ * setting one of the environment variables below.
+ *
+ * This list must be in the same order with the same number of
+ * elements as the above list
+ *
+ * These are the same environment variable names as would be used
+ * on a linux system, but they have a slightly different meaning.
+ * Since AquaTerm will find the font for us (if it can) given
+ * just the font name, you should only set the environment
+ * variable to the font name. You don't need to provide
+ * a path. If you installed the font using Font Book, AquaTerm
+ * should not have any trouble finding it.
+ *
+ * FIXME: Would it be better to use different environment variable
+ * names then plfreetype.c? If not, then it probably isn't
+ * ideal to have two different copies of the same list of
+ * environment variable names.
+ */
- When the driver is initialized it will check to see if
- the user has opted to overide one of the above fonts by
- setting one of the environment variables below.
-
- This list must be in the same order with the same number of
- elements as the above list
-
- These are the same environment variable names as would be used
- on a linux system, but they have a slightly different meaning.
- Since AquaTerm will find the font for us (if it can) given
- just the font name, you should only set the environment
- variable to the font name. You don't need to provide
- a path. If you installed the font using Font Book, AquaTerm
- should not have any trouble finding it.
-
- FIXME: Would it be better to use different environment variable
- names then plfreetype.c? If not, then it probably isn't
- ideal to have two different copies of the same list of
- environment variable names.
-*/
-
const char *aqt_font_env_names[AQT_N_FontLookup] = {
- "PLPLOT_FREETYPE_SANS_FONT",
- "PLPLOT_FREETYPE_SERIF_FONT",
- "PLPLOT_FREETYPE_MONO_FONT",
- "PLPLOT_FREETYPE_SCRIPT_FONT",
- "PLPLOT_FREETYPE_SYMBOL_FONT",
- "PLPLOT_FREETYPE_SANS_ITALIC_FONT",
- "PLPLOT_FREETYPE_SERIF_ITALIC_FONT",
- "PLPLOT_FREETYPE_MONO_ITALIC_FONT",
- "PLPLOT_FREETYPE_SCRIPT_ITALIC_FONT",
- "PLPLOT_FREETYPE_SYMBOL_ITALIC_FONT",
- "PLPLOT_FREETYPE_SANS_OBLIQUE_FONT",
- "PLPLOT_FREETYPE_SERIF_OBLIQUE_FONT",
- "PLPLOT_FREETYPE_MONO_OBLIQUE_FONT",
- "PLPLOT_FREETYPE_SCRIPT_OBLIQUE_FONT",
- "PLPLOT_FREETYPE_SYMBOL_OBLIQUE_FONT",
- "PLPLOT_FREETYPE_SANS_BOLD_FONT",
- "PLPLOT_FREETYPE_SERIF_BOLD_FONT",
- "PLPLOT_FREETYPE_MONO_BOLD_FONT",
- "PLPLOT_FREETYPE_SCRIPT_BOLD_FONT",
- "PLPLOT_FREETYPE_SYMBOL_BOLD_FONT",
- "PLPLOT_FREETYPE_SANS_BOLD_ITALIC_FONT",
- "PLPLOT_FREETYPE_SERIF_BOLD_ITALIC_FONT",
- "PLPLOT_FREETYPE_MONO_BOLD_ITALIC_FONT",
- "PLPLOT_FREETYPE_SCRIPT_BOLD_ITALIC_FONT",
- "PLPLOT_FREETYPE_SYMBOL_BOLD_ITALIC_FONT",
- "PLPLOT_FREETYPE_SANS_BOLD_OBLIQUE_FONT",
- "PLPLOT_FREETYPE_SERIF_BOLD_OBLIQUE_FONT",
- "PLPLOT_FREETYPE_MONO_BOLD_OBLIQUE_FONT",
- "PLPLOT_FREETYPE_SCRIPT_BOLD_OBLIQUE_FONT",
- "PLPLOT_FREETYPE_SYMBOL_BOLD_OBLIQUE_FONT"
+ "PLPLOT_FREETYPE_SANS_FONT",
+ "PLPLOT_FREETYPE_SERIF_FONT",
+ "PLPLOT_FREETYPE_MONO_FONT",
+ "PLPLOT_FREETYPE_SCRIPT_FONT",
+ "PLPLOT_FREETYPE_SYMBOL_FONT",
+ "PLPLOT_FREETYPE_SANS_ITALIC_FONT",
+ "PLPLOT_FREETYPE_SERIF_ITALIC_FONT",
+ "PLPLOT_FREETYPE_MONO_ITALIC_FONT",
+ "PLPLOT_FREETYPE_SCRIPT_ITALIC_FONT",
+ "PLPLOT_FREETYPE_SYMBOL_ITALIC_FONT",
+ "PLPLOT_FREETYPE_SANS_OBLIQUE_FONT",
+ "PLPLOT_FREETYPE_SERIF_OBLIQUE_FONT",
+ "PLPLOT_FREETYPE_MONO_OBLIQUE_FONT",
+ "PLPLOT_FREETYPE_SCRIPT_OBLIQUE_FONT",
+ "PLPLOT_FREETYPE_SYMBOL_OBLIQUE_FONT",
+ "PLPLOT_FREETYPE_SANS_BOLD_FONT",
+ "PLPLOT_FREETYPE_SERIF_BOLD_FONT",
+ "PLPLOT_FREETYPE_MONO_BOLD_FONT",
+ "PLPLOT_FREETYPE_SCRIPT_BOLD_FONT",
+ "PLPLOT_FREETYPE_SYMBOL_BOLD_FONT",
+ "PLPLOT_FREETYPE_SANS_BOLD_ITALIC_FONT",
+ "PLPLOT_FREETYPE_SERIF_BOLD_ITALIC_FONT",
+ "PLPLOT_FREETYPE_MONO_BOLD_ITALIC_FONT",
+ "PLPLOT_FREETYPE_SCRIPT_BOLD_ITALIC_FONT",
+ "PLPLOT_FREETYPE_SYMBOL_BOLD_ITALIC_FONT",
+ "PLPLOT_FREETYPE_SANS_BOLD_OBLIQUE_FONT",
+ "PLPLOT_FREETYPE_SERIF_BOLD_OBLIQUE_FONT",
+ "PLPLOT_FREETYPE_MONO_BOLD_OBLIQUE_FONT",
+ "PLPLOT_FREETYPE_SCRIPT_BOLD_OBLIQUE_FONT",
+ "PLPLOT_FREETYPE_SYMBOL_BOLD_OBLIQUE_FONT"
};
/* Debugging extras */
-static inline void NOOP_(id x, ...) {;}
+static inline void NOOP_( id x, ... )
+{
+ ;
+}
#ifdef LOGGING
-#define LOG NSLog
+#define LOG NSLog
#else
-#define LOG NOOP_
+#define LOG NOOP_
#endif /* LOGGING */
/*-----------------------------------------------
- function declarations
- -----------------------------------------------*/
+ * function declarations
+ * -----------------------------------------------*/
/* helper functions */
-static void get_cursor(PLStream *, PLGraphicsIn *);
-static void proc_str (PLStream *, EscText *);
-NSMutableAttributedString * create_string(const PLUNICODE *, int, PLFLT);
-static void set_font_and_size(NSMutableAttributedString *, PLUNICODE, PLFLT, int);
-static void check_font_environment_variables(void);
+static void get_cursor( PLStream *, PLGraphicsIn * );
+static void proc_str( PLStream *, EscText * );
+NSMutableAttributedString * create_string( const PLUNICODE *, int, PLFLT );
+static void set_font_and_size( NSMutableAttributedString *, PLUNICODE, PLFLT, int );
+static void check_font_environment_variables( void );
/* PLplot interface functions */
-void plD_dispatch_init_aqt (PLDispatchTable *pdt);
-void plD_init_aqt (PLStream *);
-void plD_line_aqt (PLStream *, short, short, short, short);
-void plD_polyline_aqt (PLStream *, short *, short *, PLINT);
-void plD_eop_aqt (PLStream *);
-void plD_bop_aqt (PLStream *);
-void plD_tidy_aqt (PLStream *);
-void plD_state_aqt (PLStream *, PLINT);
-void plD_esc_aqt (PLStream *, PLINT, void *);
+void plD_dispatch_init_aqt( PLDispatchTable *pdt );
+void plD_init_aqt( PLStream * );
+void plD_line_aqt( PLStream *, short, short, short, short );
+void plD_polyline_aqt( PLStream *, short *, short *, PLINT );
+void plD_eop_aqt( PLStream * );
+void plD_bop_aqt( PLStream * );
+void plD_tidy_aqt( PLStream * );
+void plD_state_aqt( PLStream *, PLINT );
+void plD_esc_aqt( PLStream *, PLINT, void * );
/*---------------------------------------------------------------------
- dispatch_init_init()
-
- Initialize device dispatch table
- ---------------------------------------------------------------------*/
+ * dispatch_init_init()
+ *
+ * Initialize device dispatch table
+ * ---------------------------------------------------------------------*/
void plD_dispatch_init_aqt( PLDispatchTable *pdt )
{
#ifndef ENABLE_DYNDRIVERS
- pdt->pl_MenuStr = "AquaTerm - Mac OS X";
- pdt->pl_DevName = "aqt";
+ pdt->pl_MenuStr = "AquaTerm - Mac OS X";
+ pdt->pl_DevName = "aqt";
#endif
- pdt->pl_type = plDevType_Interactive;
- pdt->pl_seq = 1;
- pdt->pl_init = (plD_init_fp) plD_init_aqt;
- pdt->pl_line = (plD_line_fp) plD_line_aqt;
- pdt->pl_polyline = (plD_polyline_fp) plD_polyline_aqt;
- pdt->pl_eop = (plD_eop_fp) plD_eop_aqt;
- pdt->pl_bop = (plD_bop_fp) plD_bop_aqt;
- pdt->pl_tidy = (plD_tidy_fp) plD_tidy_aqt;
- pdt->pl_state = (plD_state_fp) plD_state_aqt;
- pdt->pl_esc = (plD_esc_fp) plD_esc_aqt;
+ pdt->pl_type = plDevType_Interactive;
+ pdt->pl_seq = 1;
+ pdt->pl_init = (plD_init_fp) plD_init_aqt;
+ pdt->pl_line = (plD_line_fp) plD_line_aqt;
+ pdt->pl_polyline = (plD_polyline_fp) plD_polyline_aqt;
+ pdt->pl_eop = (plD_eop_fp) plD_eop_aqt;
+ pdt->pl_bop = (plD_bop_fp) plD_bop_aqt;
+ pdt->pl_tidy = (plD_tidy_fp) plD_tidy_aqt;
+ pdt->pl_state = (plD_state_fp) plD_state_aqt;
+ pdt->pl_esc = (plD_esc_fp) plD_esc_aqt;
}
/*---------------------------------------------------------------------
- aqt_init()
-
- Initialize device
- ---------------------------------------------------------------------*/
+ * aqt_init()
+ *
+ * Initialize device
+ * ---------------------------------------------------------------------*/
-void plD_init_aqt(PLStream *pls)
+void plD_init_aqt( PLStream *pls )
{
-
- if (arpool == NULL) /* Make sure we don't leak mem by allocating every time */
- {
- arpool = [[NSAutoreleasePool alloc] init];
- adapter = [[AQTAdapter alloc] init];
- }
- [adapter setBackgroundColorRed:0.5 green:0.5 blue:0.5];
+ if ( arpool == NULL ) /* Make sure we don't leak mem by allocating every time */
+ {
+ arpool = [[NSAutoreleasePool alloc] init];
+ adapter = [[AQTAdapter alloc] init];
+ }
+ [adapter setBackgroundColorRed : 0.5 green : 0.5 blue : 0.5];
- pls->termin = 1; /* interactive device */
- pls->dev_flush = 1; /* Handle our own flushes */
- pls->color = 1; /* supports color */
- pls->width = 1;
- pls->verbose = 1;
- pls->bytecnt = 0;
- pls->debug = 1;
- pls->dev_text = 1; /* handles text */
- pls->dev_unicode = 1; /* wants text as unicode */
- pls->page = 0;
- pls->dev_fill0 = 1; /* supports hardware solid fills */
- pls->dev_fill1 = 1;
+ pls->termin = 1; /* interactive device */
+ pls->dev_flush = 1; /* Handle our own flushes */
+ pls->color = 1; /* supports color */
+ pls->width = 1;
+ pls->verbose = 1;
+ pls->bytecnt = 0;
+ pls->debug = 1;
+ pls->dev_text = 1; /* handles text */
+ pls->dev_unicode = 1; /* wants text as unicode */
+ pls->page = 0;
+ pls->dev_fill0 = 1; /* supports hardware solid fills */
+ pls->dev_fill1 = 1;
- pls->graphx = GRAPHICS_MODE;
+ pls->graphx = GRAPHICS_MODE;
- if (!pls->colorset)
- pls->color = 1;
+ if ( !pls->colorset )
+ pls->color = 1;
- /* Set up device parameters */
-
- plP_setpxl(DPI/25.4/SCALE, DPI/25.4/SCALE); /* Pixels/mm. */
-
- /* Set the bounds for plotting. default is AQT_Default_X x AQT_Default_Y unless otherwise specified. */
-
- if (pls->xlength <= 0 || pls->ylength <= 0){
- windowXSize = AQT_Default_X;
- windowYSize = AQT_Default_Y;
- plP_setphy((PLINT) 0, (PLINT) (AQT_Default_X/SCALE), (PLINT) 0, (PLINT) (AQT_Default_Y/SCALE));
- } else {
- windowXSize = pls->xlength;
- windowYSize = pls->ylength;
- plP_setphy((PLINT) 0, (PLINT) (pls->xlength/SCALE), (PLINT) 0, (PLINT) (pls->ylength/SCALE));
- }
+ /* Set up device parameters */
- /* check font environment variables & update font table as necessary */
-
- check_font_environment_variables();
-
- /* Check to see if the users version of aquaterm supports sheared labels. */
- /* If it isn't available 3D plots will look a little strange but things should otherwise be okay. */
-
- if (!didTests) {
- hasShear = [adapter respondsToSelector:@selector(addLabel:atPoint:angle:shearAngle:align:)];
- hasAlpha = [adapter respondsToSelector:@selector(setColorRed:green:blue:alpha:)];
- didTests = true;
- }
+ plP_setpxl( DPI / 25.4 / SCALE, DPI / 25.4 / SCALE ); /* Pixels/mm. */
+
+ /* Set the bounds for plotting. default is AQT_Default_X x AQT_Default_Y unless otherwise specified. */
+
+ if ( pls->xlength <= 0 || pls->ylength <= 0 )
+ {
+ windowXSize = AQT_Default_X;
+ windowYSize = AQT_Default_Y;
+ plP_setphy((PLINT) 0, (PLINT) ( AQT_Default_X / SCALE ), (PLINT) 0, (PLINT) ( AQT_Default_Y / SCALE ));
+ }
+ else
+ {
+ windowXSize = pls->xlength;
+ windowYSize = pls->ylength;
+ plP_setphy((PLINT) 0, (PLINT) ( pls->xlength / SCALE ), (PLINT) 0, (PLINT) ( pls->ylength / SCALE ));
+ }
+
+ /* check font environment variables & update font table as necessary */
+
+ check_font_environment_variables();
+
+ /* Check to see if the users version of aquaterm supports sheared labels. */
+ /* If it isn't available 3D plots will look a little strange but things should otherwise be okay. */
+
+ if ( !didTests )
+ {
+ hasShear = [adapter respondsToSelector:@selector( addLabel:atPoint:angle:shearAngle:align:)];
+ hasAlpha = [adapter respondsToSelector:@selector( setColorRed:green:blue:alpha:)];
+ didTests = true;
+ }
}
/*----------------------------------------------------------------------
- aqt_bop()
-
- Set up for the next page.
- ----------------------------------------------------------------------*/
+ * aqt_bop()
+ *
+ * Set up for the next page.
+ * ----------------------------------------------------------------------*/
-void plD_bop_aqt(PLStream *pls)
+void plD_bop_aqt( PLStream *pls )
{
- currentPlot = currentPlot>=maxWindows?0:currentPlot;
- [adapter openPlotWithIndex:currentPlot++];
- [adapter setPlotSize:NSMakeSize(windowXSize, windowYSize)];
- [adapter setLinewidth:1.0];
- if(hasAlpha){
- [adapter setColorRed:(float)(pls->curcolor.r/255.)
- green:(float)(pls->curcolor.g/255.)
- blue:(float)(pls->curcolor.b/255.)
- alpha:(float)(pls->curcolor.a)];
- } else {
- [adapter setColorRed:(float)(pls->curcolor.r/255.)
- green:(float)(pls->curcolor.g/255.)
- blue:(float)(pls->curcolor.b/255.)];
- }
+ currentPlot = currentPlot >= maxWindows ? 0 : currentPlot;
+ [adapter openPlotWithIndex : currentPlot++];
+ [adapter setPlotSize : NSMakeSize( windowXSize, windowYSize )];
+ [adapter setLinewidth : 1.0];
+ if ( hasAlpha )
+ {
+ [adapter setColorRed : (float) ( pls->curcolor.r / 255. )
+ green : (float) ( pls->curcolor.g / 255. )
+ blue : (float) ( pls->curcolor.b / 255. )
+ alpha : (float) ( pls->curcolor.a )];
+ }
+ else
+ {
+ [adapter setColorRed : (float) ( pls->curcolor.r / 255. )
+ green : (float) ( pls->curcolor.g / 255. )
+ blue : (float) ( pls->curcolor.b / 255. )];
+ }
- pls->page++;
+ pls->page++;
}
/*---------------------------------------------------------------------
- aqt_line()
-
- Draw a line in the current color from (x1,y1) to (x2,y2).
- ---------------------------------------------------------------------*/
+ * aqt_line()
+ *
+ * Draw a line in the current color from (x1,y1) to (x2,y2).
+ * ---------------------------------------------------------------------*/
-void plD_line_aqt(PLStream *pls, short x1a, short y1a, short x2a, short y2a)
+void plD_line_aqt( PLStream *pls, short x1a, short y1a, short x2a, short y2a )
{
- [adapter moveToPoint:NSMakePoint((float)x1a*SCALE, (float)y1a*SCALE)];
- [adapter addLineToPoint:NSMakePoint((float)x2a*SCALE, (float)y2a*SCALE)];
+ [adapter moveToPoint : NSMakePoint((float) x1a * SCALE, (float) y1a * SCALE )];
+ [adapter addLineToPoint : NSMakePoint((float) x2a * SCALE, (float) y2a * SCALE )];
}
/*---------------------------------------------------------------------
- aqt_polyline()
-
- Draw a polyline in the current color.
- ---------------------------------------------------------------------*/
+ * aqt_polyline()
+ *
+ * Draw a polyline in the current color.
+ * ---------------------------------------------------------------------*/
-void plD_polyline_aqt(PLStream *pls, short *xa, short *ya, PLINT npts)
+void plD_polyline_aqt( PLStream *pls, short *xa, short *ya, PLINT npts )
{
- int i;
+ int i;
- for (i = 0; i < npts - 1; i++)
- plD_line_aqt(pls, xa[i], ya[i], xa[i + 1], ya[i + 1]);
+ for ( i = 0; i < npts - 1; i++ )
+ plD_line_aqt( pls, xa[i], ya[i], xa[i + 1], ya[i + 1] );
}
/*---------------------------------------------------------------------
- aqt_eop()
-
- End of page
- ---------------------------------------------------------------------*/
+ * aqt_eop()
+ *
+ * End of page
+ * ---------------------------------------------------------------------*/
-void plD_eop_aqt(PLStream *pls)
+void plD_eop_aqt( PLStream *pls )
{
- [arpool release]; /* prevents a memory leak by freeing everything in */
- /* the auto-release pool when the plot is closed. */
- arpool = [[NSAutoreleasePool alloc] init];
- [adapter renderPlot];
+ [arpool release]; /* prevents a memory leak by freeing everything in */
+ /* the auto-release pool when the plot is closed. */
+ arpool = [[NSAutoreleasePool alloc] init];
+ [adapter renderPlot];
}
/*---------------------------------------------------------------------
- aqt_tidy()
-
- Close graphics file or otherwise clean up.
- ---------------------------------------------------------------------*/
+ * aqt_tidy()
+ *
+ * Close graphics file or otherwise clean up.
+ * ---------------------------------------------------------------------*/
-void plD_tidy_aqt(PLStream *pls)
+void plD_tidy_aqt( PLStream *pls )
{
- [adapter closePlot];
+ [adapter closePlot];
}
/*---------------------------------------------------------------------
- plD_state_aqt()
-
- Handle change in PLStream state (color, pen width, fill attribute, etc).
- ---------------------------------------------------------------------*/
+ * plD_state_aqt()
+ *
+ * Handle change in PLStream state (color, pen width, fill attribute, etc).
+ * ---------------------------------------------------------------------*/
-void plD_state_aqt(PLStream *pls, PLINT op)
+void plD_state_aqt( PLStream *pls, PLINT op )
{
- int i;
- float r,g,b;
-
- switch (op)
+ int i;
+ float r, g, b;
+
+ switch ( op )
{
case PLSTATE_WIDTH:
- [adapter setLinewidth:(float)pls->width];
- break;
-
- case PLSTATE_COLOR0: /* this seems to work, but that isn't to say that it is done right... */
- if(hasAlpha){
- [adapter setBackgroundColorRed:(float)(plsc->cmap0[0].r/255.0)
- green:(float)(plsc->cmap0[0].g/255.0)
- blue:(float)(plsc->cmap0[0].b/255.0)
- alpha:(float)(plsc->cmap0[0].a)];
- } else {
- [adapter setBackgroundColorRed:(float)(plsc->cmap0[0].r/255.0)
- green:(float)(plsc->cmap0[0].g/255.0)
- blue:(float)(plsc->cmap0[0].b/255.0)];
- }
+ [adapter setLinewidth : (float) pls->width];
+ break;
+
+ case PLSTATE_COLOR0: /* this seems to work, but that isn't to say that it is done right... */
+ if ( hasAlpha )
+ {
+ [adapter setBackgroundColorRed : (float) ( plsc->cmap0[0].r / 255.0 )
+ green : (float) ( plsc->cmap0[0].g / 255.0 )
+ blue : (float) ( plsc->cmap0[0].b / 255.0 )
+ alpha : (float) ( plsc->cmap0[0].a )];
+ }
+ else
+ {
+ [adapter setBackgroundColorRed : (float) ( plsc->cmap0[0].r / 255.0 )
+ green : (float) ( plsc->cmap0[0].g / 255.0 )
+ blue : (float) ( plsc->cmap0[0].b / 255.0 )];
+ }
case PLSTATE_COLOR1:
case PLSTATE_FILL:
- if(hasAlpha){
- [adapter setColorRed:(float)(pls->curcolor.r/255.)
- green:(float)(pls->curcolor.g/255.)
- blue:(float)(pls->curcolor.b/255.)
- alpha:(float)(pls->curcolor.a)];
- } else {
- [adapter setColorRed:(float)(pls->curcolor.r/255.)
- green:(float)(pls->curcolor.g/255.)
- blue:(float)(pls->curcolor.b/255.)];
- }
- break;
-
+ if ( hasAlpha )
+ {
+ [adapter setColorRed : (float) ( pls->curcolor.r / 255. )
+ green : (float) ( pls->curcolor.g / 255. )
+ blue : (float) ( pls->curcolor.b / 255. )
+ alpha : (float) ( pls->curcolor.a )];
+ }
+ else
+ {
+ [adapter setColorRed : (float) ( pls->curcolor.r / 255. )
+ green : (float) ( pls->curcolor.g / 255. )
+ blue : (float) ( pls->curcolor.b / 255. )];
+ }
+ break;
+
case PLSTATE_CMAP0:
- break;
-
+ break;
+
case PLSTATE_CMAP1:
- break;
+ break;
}
}
/*---------------------------------------------------------------------
- aqt_esc()
-
- Escape function.
-
- Functions:
-
- PLESC_EH Handle pending events
- PLESC_EXPOSE Force an expose
- PLESC_FILL Fill polygon
- PLESC_FLUSH Flush X event buffer
- PLESC_GETC Get coordinates upon mouse click
- PLESC_REDRAW Force a redraw
- PLESC_RESIZE Force a resize
- ---------------------------------------------------------------------*/
+ * aqt_esc()
+ *
+ * Escape function.
+ *
+ * Functions:
+ *
+ * PLESC_EH Handle pending events
+ * PLESC_EXPOSE Force an expose
+ * PLESC_FILL Fill polygon
+ * PLESC_FLUSH Flush X event buffer
+ * PLESC_GETC Get coordinates upon mouse click
+ * PLESC_REDRAW Force a redraw
+ * PLESC_RESIZE Force a resize
+ * ---------------------------------------------------------------------*/
-void plD_esc_aqt(PLStream *pls, PLINT op, void *ptr)
+void plD_esc_aqt( PLStream *pls, PLINT op, void *ptr )
{
- int i;
- switch (op)
- {
- case PLESC_EXPOSE: /* handle window expose */
- break;
- case PLESC_RESIZE: /* handle window resize */
- break;
- case PLESC_REDRAW: /* handle window redraw */
- break;
- case PLESC_TEXT: /* switch to text screen */
- break;
- case PLESC_GRAPH: /* switch to graphics screen */
- break;
- case PLESC_FILL: /* fill polygon */
- [adapter moveToVertexPoint:NSMakePoint(pls->dev_x[0]*SCALE, pls->dev_y[0]*SCALE)];
- for (i = 1; i < pls->dev_npts ; i++)
- {
- [adapter addEdgeToVertexPoint:NSMakePoint(pls->dev_x[i]*SCALE, pls->dev_y[i]*SCALE)];
- };
- break;
- case PLESC_DI: /* handle DI command */
- break;
- case PLESC_FLUSH: /* flush output */
- [adapter renderPlot];
- break;
- case PLESC_EH: /* handle Window events */
- break;
- case PLESC_GETC: /* get cursor position */
- [adapter renderPlot]; /* needed to give the user something to click on */
- get_cursor(pls, (PLGraphicsIn*)ptr);
- break;
- case PLESC_SWIN: /* set window parameters */
- break;
- case PLESC_HAS_TEXT:
- proc_str(pls, (EscText *)ptr);
- break;
- }
+ int i;
+ switch ( op )
+ {
+ case PLESC_EXPOSE: /* handle window expose */
+ break;
+ case PLESC_RESIZE: /* handle window resize */
+ break;
+ case PLESC_REDRAW: /* handle window redraw */
+ break;
+ case PLESC_TEXT: /* switch to text screen */
+ break;
+ case PLESC_GRAPH: /* switch to graphics screen */
+ break;
+ case PLESC_FILL: /* fill polygon */
+ [adapter moveToVertexPoint : NSMakePoint( pls->dev_x[0] * SCALE, pls->dev_y[0] * SCALE )];
+ for ( i = 1; i < pls->dev_npts; i++ )
+ {
+ [adapter addEdgeToVertexPoint : NSMakePoint( pls->dev_x[i] * SCALE, pls->dev_y[i] * SCALE )];
+ }
+ ;
+ break;
+ case PLESC_DI: /* handle DI command */
+ break;
+ case PLESC_FLUSH: /* flush output */
+ [adapter renderPlot];
+ break;
+ case PLESC_EH: /* handle Window events */
+ break;
+ case PLESC_GETC: /* get cursor position */
+ [adapter renderPlot]; /* needed to give the user something to click on */
+ get_cursor( pls, (PLGraphicsIn*) ptr );
+ break;
+ case PLESC_SWIN: /* set window parameters */
+ break;
+ case PLESC_HAS_TEXT:
+ proc_str( pls, (EscText *) ptr );
+ break;
+ }
}
/*---------------------------------------------------------------------
- get_cursor()
-
- returns the location of the next mouse click
- ---------------------------------------------------------------------*/
+ * get_cursor()
+ *
+ * returns the location of the next mouse click
+ * ---------------------------------------------------------------------*/
-void get_cursor(PLStream *pls, PLGraphicsIn *gin){
- int scanned, x, y, button;
+void get_cursor( PLStream *pls, PLGraphicsIn *gin )
+{
+ int scanned, x, y, button;
NSString *temp;
- plGinInit(gin);
-
- temp = [adapter waitNextEvent];
- scanned = sscanf([temp cString],"1:{%d, %d}:%d", &x, &y, &button);
+ plGinInit( gin );
- if(scanned == 3){ /* check that we did actually get a reasonable event string */
- gin->button = button;
- gin->pX = x;
- gin->pY = y;
- gin->dX = (PLFLT)x/((PLFLT)(pls->xlength));
- gin->dY = (PLFLT)y/((PLFLT)(pls->ylength));
- } else { /* just return zeroes if we did not */
- printf("AquaTerm did not return a valid mouse location!\n");
- gin->button = 0;
- gin->pX = 0;
- gin->pY = 0;
- gin->dX = 0.0;
- gin->dY = 0.0;
- }
+ temp = [adapter waitNextEvent];
+ scanned = sscanf([temp cString], "1:{%d, %d}:%d", &x, &y, &button );
+
+ if ( scanned == 3 ) /* check that we did actually get a reasonable event string */
+ {
+ gin->button = button;
+ gin->pX = x;
+ gin->pY = y;
+ gin->dX = (PLFLT) x / ((PLFLT) ( pls->xlength ));
+ gin->dY = (PLFLT) y / ((PLFLT) ( pls->ylength ));
+ }
+ else /* just return zeroes if we did not */
+ {
+ printf( "AquaTerm did not return a valid mouse location!\n" );
+ gin->button = 0;
+ gin->pX = 0;
+ gin->pY = 0;
+ gin->dX = 0.0;
+ gin->dY = 0.0;
+ }
}
/*---------------------------------------------------------------------
- proc_str()
-
- Processes strings for display. The actual parsing of the unicode
- string is handled by the sub-routine create_string.
- ---------------------------------------------------------------------*/
+ * proc_str()
+ *
+ * Processes strings for display. The actual parsing of the unicode
+ * string is handled by the sub-routine create_string.
+ * ---------------------------------------------------------------------*/
-void proc_str (PLStream *pls, EscText *args)
+void proc_str( PLStream *pls, EscText *args )
{
- PLFLT a1, ft_ht, angle, shear, stride;
- PLINT clxmin, clxmax, clymin, clymax;
- int i, jst, ref;
- NSMutableAttributedString *str;
-
- /* check that we got unicode, warning message and return if not */
-
- if(args->unicode_array_len == 0){
- printf("Non unicode string passed to AquaTerm driver, ignoring\n");
- return;
- }
-
- /* check that unicode string isn't longer then the max we allow */
-
- if(args->unicode_array_len >= MAX_STRING_LEN){
- printf("Sorry, the AquaTerm driver only handles strings of length < %d\n", MAX_STRING_LEN);
- return;
- }
-
- /* set the font height - the 1.2 factor was trial and error */
-
- ft_ht = 1.2 * pls->chrht * DPI/25.4; /* ft_ht in points. ht is in mm */
+ PLFLT a1, ft_ht, angle, shear, stride;
+ PLINT clxmin, clxmax, clymin, clymax;
+ int i, jst, ref;
+ NSMutableAttributedString *str;
- /* given transform, calculate rotation angle & shear angle */
- plRotationShear(args->xform, &angle, &shear, &stride);
- angle *= 180.0/PI;
- shear *= -180.0/PI;
-
- /* text justification, AquaTerm only supports 3 options, so we round appropriately */
-
- if (args->just < 0.33)
- jst = AQTAlignLeft; /* left */
- else if (args->just > 0.66)
- jst = AQTAlignRight; /* right */
- else
- jst = AQTAlignCenter; /* center */
-
- /* set the baseline of the string */
- /* Middle and Bottom are set to Middle since this seems to be what PLplot expects
- as judged by where it renders the symbols in example 1. */
-
- if (args->base == 2) /* Top */
- ref = AQTAlignTop;
- else if (args->base == 1) /* Bottom */
- ref = AQTAlignMiddle;
- else
- ref = AQTAlignMiddle; /* Middle */
-
- /* create an appropriately formatted, etc... unicode string */
-
- str = create_string(args->unicode_array, args->unicode_array_len, ft_ht);
-
- /* display the string */
-
- if(hasAlpha){
- [adapter setColorRed:(float)(pls->curcolor.r/255.)
- green:(float)(pls->curcolor.g/255.)
- blue:(float)(pls->curcolor.b/255.)
- alpha:(float)(pls->curcolor.a)];
- } else {
- [adapter setColorRed:(float)(pls->curcolor.r/255.)
- green:(float)(pls->curcolor.g/255.)
- blue:(float)(pls->curcolor.b/255.)];
- }
-
- if(hasShear){
- [adapter addLabel:str
- atPoint:NSMakePoint((float)args->x*SCALE, (float)args->y*SCALE)
- angle:angle
- shearAngle:shear
- align:(jst | ref)];
- } else {
- [adapter addLabel:str
- atPoint:NSMakePoint((float)args->x*SCALE, (float)args->y*SCALE)
- angle:angle
- align:(jst | ref)];
- }
-
- [str release];
+ /* check that we got unicode, warning message and return if not */
+
+ if ( args->unicode_array_len == 0 )
+ {
+ printf( "Non unicode string passed to AquaTerm driver, ignoring\n" );
+ return;
+ }
+
+ /* check that unicode string isn't longer then the max we allow */
+
+ if ( args->unicode_array_len >= MAX_STRING_LEN )
+ {
+ printf( "Sorry, the AquaTerm driver only handles strings of length < %d\n", MAX_STRING_LEN );
+ return;
+ }
+
+ /* set the font height - the 1.2 factor was trial and error */
+
+ ft_ht = 1.2 * pls->chrht * DPI / 25.4; /* ft_ht in points. ht is in mm */
+
+ /* given transform, calculate rotation angle & shear angle */
+ plRotationShear( args->xform, &angle, &shear, &stride );
+ angle *= 180.0 / PI;
+ shear *= -180.0 / PI;
+
+ /* text justification, AquaTerm only supports 3 options, so we round appropriately */
+
+ if ( args->just < 0.33 )
+ jst = AQTAlignLeft; /* left */
+ else if ( args->just > 0.66 )
+ jst = AQTAlignRight; /* right */
+ else
+ jst = AQTAlignCenter; /* center */
+
+ /* set the baseline of the string */
+ /* Middle and Bottom are set to Middle since this seems to be what PLplot expects
+ * as judged by where it renders the symbols in example 1. */
+
+ if ( args->base == 2 ) /* Top */
+ ref = AQTAlignTop;
+ else if ( args->base == 1 ) /* Bottom */
+ ref = AQTAlignMiddle;
+ else
+ ref = AQTAlignMiddle; /* Middle */
+
+ /* create an appropriately formatted, etc... unicode string */
+
+ str = create_string( args->unicode_array, args->unicode_array_len, ft_ht );
+
+ /* display the string */
+
+ if ( hasAlpha )
+ {
+ [adapter setColorRed : (float) ( pls->curcolor.r / 255. )
+ green : (float) ( pls->curcolor.g / 255. )
+ blue : (float) ( pls->curcolor.b / 255. )
+ alpha : (float) ( pls->curcolor.a )];
+ }
+ else
+ {
+ [adapter setColorRed : (float) ( pls->curcolor.r / 255. )
+ green : (float) ( pls->curcolor.g / 255. )
+ blue : (float) ( pls->curcolor.b / 255. )];
+ }
+
+ if ( hasShear )
+ {
+ [adapter addLabel : str
+ atPoint : NSMakePoint((float) args->x * SCALE, (float) args->y * SCALE )
+ angle : angle
+ shearAngle : shear
+ align : ( jst | ref )];
+ }
+ else
+ {
+ [adapter addLabel : str
+ atPoint : NSMakePoint((float) args->x * SCALE, (float) args->y * SCALE )
+ angle : angle
+ align : ( jst | ref )];
+ }
+
+ [str release];
}
/*---------------------------------------------------------------------
- create_string()
-
- create a NSMutableAttributedString from the plplot ucs4 string
-
- assumptions :
- 1. font changes are unicode >= PL_FCI_MARK
- 2. we'll never have to deal with a string longer then MAX_STRING_LEN characters
- 3. <esc><esc> means we desired <esc> as a character & not actually as <esc>
- 4. there are no two character <esc> sequences... i.e. <esc>fn is now covered by fci
-
- ---------------------------------------------------------------------*/
+ * create_string()
+ *
+ * create a NSMutableAttributedString from the plplot ucs4 string
+ *
+ * assumptions :
+ * 1. font changes are unicode >= PL_FCI_MARK
+ * 2. we'll never have to deal with a string longer then MAX_STRING_LEN characters
+ * 3. <esc><esc> means we desired <esc> as a character & not actually as <esc>
+ * 4. there are no two character <esc> sequences... i.e. <esc>fn is now covered by fci
+ *
+ * ---------------------------------------------------------------------*/
-NSMutableAttributedString * create_string(const PLUNICODE *ucs4, int ucs4_len, PLFLT font_height)
+NSMutableAttributedString * create_string( const PLUNICODE *ucs4, int ucs4_len, PLFLT font_height )
{
- PLUNICODE fci;
- char plplot_esc;
- int i;
- int cur_loc;
- int utf8_len;
- int updown;
- char dummy[MAX_STRING_LEN+1];
- char *font;
- char utf8[5];
- NSMutableAttributedString *str;
+ PLUNICODE fci;
+ char plplot_esc;
+ int i;
+ int cur_loc;
+ int utf8_len;
+ int updown;
+ char dummy[MAX_STRING_LEN + 1];
+ char *font;
+ char utf8[5];
+ NSMutableAttributedString *str;
- updown = 0;
-
- /* initialize the attributed string */
+ updown = 0;
- for(i=0;i<MAX_STRING_LEN;i++) dummy[i] = 'i';
- dummy[MAX_STRING_LEN] = '\0';
- str = [[NSMutableAttributedString alloc] initWithString:[NSString stringWithCString:dummy]];
+ /* initialize the attributed string */
- /* get plplot escape character & current font */
-
- plgesc(&plplot_esc);
- plgfci(&fci);
-
- /* set the font for the string based on the current font & size */
+ for ( i = 0; i < MAX_STRING_LEN; i++ ) dummy[i] = 'i';
+ dummy[MAX_STRING_LEN] = '\0';
+ str = [[NSMutableAttributedString alloc] initWithString:[NSString stringWithCString:dummy]];
- set_font_and_size(str, fci, font_height, 0);
-
- /* parse plplot ucs4 string */
+ /* get plplot escape character & current font */
- cur_loc = 0;
- i = 0;
- while (i < ucs4_len){
- if (ucs4[i] < PL_FCI_MARK){ /* not a font change */
- if (ucs4[i] != (PLUNICODE)plplot_esc) { /* a character to display */
- ucs4_to_utf8(ucs4[i],utf8);
- [str replaceCharactersInRange:NSMakeRange(cur_loc, 1)
- withString:[NSString stringWithUTF8String:utf8]];
- i++;
- cur_loc++;
- continue;
- }
- i++;
- if (ucs4[i] == (PLUNICODE)plplot_esc){
- ucs4_to_utf8(ucs4[i],utf8);
- [str replaceCharactersInRange:NSMakeRange(cur_loc, 1)
- withString:[NSString stringWithUTF8String:utf8]];
- i++;
- cur_loc++;
- continue;
- }
- else {
- if(ucs4[i] == (PLUNICODE)'f'){ /* font change */
- i++;
- printf("hmm, unicode string apparently not following fci convention...\n");
- }
- if(ucs4[i] == (PLUNICODE)'d'){ /* Subscript */
- updown--;
- [str addAttribute:@"NSSuperScript"
- value:[NSNumber numberWithInt:updown]
- range:NSMakeRange(cur_loc, (MAX_STRING_LEN - cur_loc))];
- }
- if(ucs4[i] == (PLUNICODE)'u'){ /* Superscript */
- updown++;
- [str addAttribute:@"NSSuperScript"
- value:[NSNumber numberWithInt:updown]
- range:NSMakeRange(cur_loc, (MAX_STRING_LEN - cur_loc))];
+ plgesc( &plplot_esc );
+ plgfci( &fci );
+
+ /* set the font for the string based on the current font & size */
+
+ set_font_and_size( str, fci, font_height, 0 );
+
+ /* parse plplot ucs4 string */
+
+ cur_loc = 0;
+ i = 0;
+ while ( i < ucs4_len )
+ {
+ if ( ucs4[i] < PL_FCI_MARK ) /* not a font change */
+ {
+ if ( ucs4[i] != (PLUNICODE) plplot_esc ) /* a character to display */
+ {
+ ucs4_to_utf8( ucs4[i], utf8 );
+ [str replaceCharactersInRange : NSMakeRange( cur_loc, 1 )
+ withString :[NSString stringWithUTF8String : utf8]];
+ i++;
+ cur_loc++;
+ continue;
+ }
+ i++;
+ if ( ucs4[i] == (PLUNICODE) plplot_esc )
+ {
+ ucs4_to_utf8( ucs4[i], utf8 );
+ [str replaceCharactersInRange : NSMakeRange( cur_loc, 1 )
+ withString :[NSString stringWithUTF8String : utf8]];
+ i++;
+ cur_loc++;
+ continue;
+ }
+ else
+ {
+ if ( ucs4[i] == (PLUNICODE) 'f' ) /* font change */
+ {
+ i++;
+ printf( "hmm, unicode string apparently not following fci convention...\n" );
}
- i++;
- }
- }
- else { /* a font change */
- set_font_and_size(str, ucs4[i], font_height, cur_loc);
- i++;
- }
- }
-
- /* trim string to appropriate final length */
-
- [str deleteCharactersInRange:NSMakeRange(cur_loc, (MAX_STRING_LEN - cur_loc))];
-
- return str;
+ if ( ucs4[i] == (PLUNICODE) 'd' ) /* Subscript */
+ {
+ updown--;
+ [str addAttribute : @ "NSSuperScript"
+ value :[NSNumber numberWithInt : updown]
+ range : NSMakeRange( cur_loc, ( MAX_STRING_LEN - cur_loc ))];
+ }
+ if ( ucs4[i] == (PLUNICODE) 'u' ) /* Superscript */
+ {
+ updown++;
+ [str addAttribute : @ "NSSuperScript"
+ value :[NSNumber numberWithInt : updown]
+ range : NSMakeRange( cur_loc, ( MAX_STRING_LEN - cur_loc ))];
+ }
+ i++;
+ }
+ }
+ else /* a font change */
+ {
+ set_font_and_size( str, ucs4[i], font_height, cur_loc );
+ i++;
+ }
+ }
+
+ /* trim string to appropriate final length */
+
+ [str deleteCharactersInRange : NSMakeRange( cur_loc, ( MAX_STRING_LEN - cur_loc ))];
+
+ return str;
}
/*---------------------------------------------------------------------
- set_font_and_size
-
- set the font & size of a attributable string object
- ---------------------------------------------------------------------*/
+ * set_font_and_size
+ *
+ * set the font & size of a attributable string object
+ * ---------------------------------------------------------------------*/
-void set_font_and_size(NSMutableAttributedString * str, PLUNICODE fci, PLFLT font_height, int cur_loc)
+void set_font_and_size( NSMutableAttributedString * str, PLUNICODE fci, PLFLT font_height, int cur_loc )
{
- char *font;
+ char *font;
- font = plP_FCI2FontName(fci, AQT_FontLookup, AQT_N_FontLookup);
-
- /* check whether that font exists & if not, use standard font instread */
-
- if(font == NULL){
- printf("AquaTerm : Warning, could not find font given by fci = 0x%x\n", fci);
- font = "Helvetica";
- }
- /* font = "FreeSerif"; */ /* force the font for debugging purposes */
- /* printf("Font at %d is : %s\n", cur_loc, font); */
+ font = plP_FCI2FontName( fci, AQT_FontLookup, AQT_N_FontLookup );
- [str addAttribute:@"AQTFontname"
- value:[NSString stringWithCString:font]
- range:NSMakeRange(cur_loc, (MAX_STRING_LEN - cur_loc))];
- [str addAttribute:@"AQTFontsize"
- value:[NSNumber numberWithFloat:font_height]
- range:NSMakeRange(cur_loc, (MAX_STRING_LEN - cur_loc))];
+ /* check whether that font exists & if not, use standard font instread */
+
+ if ( font == NULL )
+ {
+ printf( "AquaTerm : Warning, could not find font given by fci = 0x%x\n", fci );
+ font = "Helvetica";
+ }
+ /* font = "FreeSerif"; *//* force the font for debugging purposes */
+ /* printf("Font at %d is : %s\n", cur_loc, font); */
+
+ [str addAttribute : @ "AQTFontname"
+ value :[NSString stringWithCString : font]
+ range : NSMakeRange( cur_loc, ( MAX_STRING_LEN - cur_loc ))];
+ [str addAttribute : @ "AQTFontsize"
+ value :[NSNumber numberWithFloat : font_height]
+ range : NSMakeRange( cur_loc, ( MAX_STRING_LEN - cur_loc ))];
}
/*---------------------------------------------------------------------
- check_font_environment_variables
-
- Checks to see if any font environment variables are defined.
- If a font environment variable is defined, then the appropriate
- element of the default font table is replaced with the font name
- string specified by the environment variable.
- ---------------------------------------------------------------------*/
+ * check_font_environment_variables
+ *
+ * Checks to see if any font environment variables are defined.
+ * If a font environment variable is defined, then the appropriate
+ * element of the default font table is replaced with the font name
+ * string specified by the environment variable.
+ * ---------------------------------------------------------------------*/
-void check_font_environment_variables(void){
- int i;
- char *new_font;
- char *begin;
- char *end;
-
- for(i=0;i<AQT_N_FontLookup;i++){
- if ((new_font = getenv(aqt_font_env_names[i])) != NULL){
-
- /* If the user is just blindly following the suggestions in
- the plplot examples then we might get a font name with
- a path and extension. We need to remove that since it
- isn't relevant and will only cause trouble. We warn them
- AquaTerm was not expecting a path or extension. */
-
- begin = strrchr(new_font,'/');
- end = strrchr(new_font,'.');
-
- if(end != NULL) {
- printf("Aquaterm : Warning, removing extension from font name : %s\n", new_font);
- *end = '\0';
- }
- if(begin != NULL) {
- printf("AquaTerm : Warning, removing path from font name : %s\n", new_font);
- new_font = begin+1;
- }
-
- /* printf("new font : %s\n", new_font); */
-
- AQT_FontLookup[i].pfont = (unsigned char*) new_font;
+void check_font_environment_variables( void )
+{
+ int i;
+ char *new_font;
+ char *begin;
+ char *end;
+
+ for ( i = 0; i < AQT_N_FontLookup; i++ )
+ {
+ if (( new_font = getenv( aqt_font_env_names[i] )) != NULL )
+ {
+ /* If the user is just blindly following the suggestions in
+ * the plplot examples then we might get a font name with
+ * a path and extension. We need to remove that since it
+ * isn't relevant and will only cause trouble. We warn them
+ * AquaTerm was not expecting a path or extension. */
+
+ begin = strrchr( new_font, '/' );
+ end = strrchr( new_font, '.' );
+
+ if ( end != NULL )
+ {
+ printf( "Aquaterm : Warning, removing extension from font name : %s\n", new_font );
+ *end = '\0';
+ }
+ if ( begin != NULL )
+ {
+ printf( "AquaTerm : Warning, removing path from font name : %s\n", new_font );
+ new_font = begin + 1;
+ }
+
+ /* printf("new font : %s\n", new_font); */
+
+ AQT_FontLookup[i].pfont = (unsigned char*) new_font;
+ }
}
- }
}
Modified: trunk/drivers/cairo.c
===================================================================
--- trunk/drivers/cairo.c 2009-10-21 20:14:07 UTC (rev 10541)
+++ trunk/drivers/cairo.c 2009-10-21 21:29:41 UTC (rev 10542)
@@ -1,30 +1,30 @@
/* June 2, 2007
+ *
+ * Graphics drivers that are based on the Cairo / Pango Libraries.
+ *
+ * Copyright (C) 2008 Hazen Babcock
+ *
+ * This file is part of PLplot.
+ *
+ * PLplot is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Library Public License as published
+ * by the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * PLplot 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 Library General Public License for more details.
+ *
+ * You should have received a copy of the GNU Library General Public License
+ * along with PLplot; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
+ *
+ */
- Graphics drivers that are based on the Cairo / Pango Libraries.
-
- Copyright (C) 2008 Hazen Babcock
-
- This file is part of PLplot.
-
- PLplot is free software; you can redistribute it and/or modify
- it under the terms of the GNU General Library Public License as published
- by the Free Software Foundation; either version 2 of the License, or
- (at your option) any later version.
-
- PLplot 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 Library General Public License for more details.
-
- You should have received a copy of the GNU Library General Public License
- along with PLplot; if not, write to the Free Software
- Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
-
-*/
-
/*---------------------------------------------------------------------
- Header files
- ---------------------------------------------------------------------*/
+ * Header files
+ * ---------------------------------------------------------------------*/
#include <stdio.h>
#include <string.h>
@@ -40,1607 +40,1670 @@
#include "drivers.h"
/* Driver-dependent includes */
-#if defined(PLD_xcairo)
+#if defined ( PLD_xcairo )
#include <cairo-xlib.h>
#include <X11/X.h>
#include <X11/Xlib.h>
-#include <X11/Xutil.h>
+#include <X11/Xutil.h>
#include <X11/cursorfont.h>
#include <X11/keysym.h>
#endif
-#if defined(PLD_pdfcairo)
+#if defined ( PLD_pdfcairo )
#include <cairo-pdf.h>
#endif
-#if defined(PLD_pscairo)
+#if defined ( PLD_pscairo )
#include <cairo-ps.h>
#endif
-#if defined(PLD_svgcairo)
+#if defined ( PLD_svgcairo )
#include <cairo-svg.h>
#endif
/*---------------------------------------------------------------------
- Constants & global (to this file) variables
- ---------------------------------------------------------------------*/
+ * Constants & global (to this file) variables
+ * ---------------------------------------------------------------------*/
-#define DPI 72
-#define PLCAIRO_DEFAULT_X 720
-#define PLCAIRO_DEFAULT_Y 540
+#define DPI 72
+#define PLCAIRO_DEFAULT_X 720
+#define PLCAIRO_DEFAULT_Y 540
-#define MAX_STRING_LEN 500
-#define MAX_MARKUP_LEN MAX_STRING_LEN * 10
+#define MAX_STRING_LEN 500
+#define MAX_MARKUP_LEN MAX_STRING_LEN * 10
-static int text_clipping;
-static int text_anti_aliasing;
-static int graphics_anti_aliasing;
-static int external_drawable;
-static int rasterize_image;
-static DrvOpt cairo_options[] = {{"text_clipping", DRV_INT, &text_clipping, "Use text clipping (text_clipping=0|1)"},
- {"text_anti_aliasing", DRV_INT, &text_anti_aliasing, "Set desired text anti-aliasing (text_anti_aliasing=0|1|2|3). The numbers are in the same order as the cairo_antialias_t enumeration documented at http://cairographics.org/manual/cairo-cairo-t.html#cairo-antialias-t)"},
- {"graphics_anti_aliasing", DRV_INT, &graphics_anti_aliasing, "Set desired graphics anti-aliasing (graphics_anti_aliasing=0|1|2|3). The numbers are in the same order as the cairo_antialias_t enumeration documented at http://cairographics.org/manual/cairo-cairo-t.html#cairo-antialias-t"},
- {"external_drawable", DRV_INT, &external_drawable, "Plot to external X drawable"},
- {"rasterize_image", DRV_INT, &rasterize_image, "Raster or vector image rendering (rasterize_image=0|1)"},
- {NULL, DRV_INT, NULL, NULL}};
+static int text_clipping;
+static int text_anti_aliasing;
+static int graphics_anti_aliasing;
+static int external_drawable;
+static int rasterize_image;
+static DrvOpt cairo_options[] = { { "text_clipping", DRV_INT, &text_clipping, "Use text clipping (text_clipping=0|1)" },
+ { "text_anti_aliasing", DRV_INT, &text_anti_aliasing, "Set desired text anti-aliasing (text_anti_aliasing=0|1|2|3). The numbers are in the same order as the cairo_antialias_t enumeration documented at http://cairographics.org/manual/cairo-cairo-t.html#cairo-antialias-t)" },
+ { "graphics_anti_aliasing", DRV_INT, &graphics_anti_aliasing, "Set desired graphics anti-aliasing (graphics_anti_aliasing=0|1|2|3). The numbers are in the same order as the cairo_antialias_t enumeration documented at http://cairographics.org/manual/cairo-cairo-t.html#cairo-antialias-t" },
+ { "external_drawable", DRV_INT, &external_drawable, "Plot to external X drawable" },
+ { "rasterize_image", DRV_INT, &rasterize_image, "Raster or vector image rendering (rasterize_image=0|1)" },
+ { NULL, DRV_INT, NULL, NULL } };
-typedef struct {
- cairo_surface_t *cairoSurface;
- cairo_t *cairoContext;
- cairo_surface_t *cairoSurface_raster;
- cairo_t *cairoContext_raster;
- short text_clipping;
- short text_anti_aliasing;
- short graphics_anti_aliasing;
- short rasterize_image;
- double downscale;
- char *pangoMarkupString;
- short upDown;
- float fontSize;
-#if defined(PLD_xcairo)
- cairo_surface_t *cairoSurface_X;
- cairo_t *cairoContext_X;
- short exit_event_loop;
- Display *XDisplay;
- Window XWindow;
- unsigned int xdrawable_mode;
+typedef struct
+{
+ cairo_surface_t *cairoSurface;
+ cairo_t *cairoContext;
+ ca...
[truncated message content] |
