graphics.h File Reference

#include <iostream>
#include <string>
#include "easygl_constants.h"

Include dependency graph for graphics.h:

This graph shows which files directly or indirectly include this file:

Go to the source code of this file.

Data Structures
struct	t_report

Macros
#define	X11

Enumerations
enum	e_draw_mode { DRAW_NORMAL = 0, DRAW_XOR }

Functions
void	event_loop (void(*act_on_mousebutton)(float x, float y), void(*act_on_mousemove)(float x, float y), void(*act_on_keypress)(char key_pressed), void(*drawscreen)(void))
void	init_graphics (const char *window_name, int cindex_background)
void	init_world (float xl, float yt, float xr, float yb)
void	close_graphics (void)
void	update_message (const char *msg)
void	create_button (const char *prev_button_text, const char *button_text, void(*button_func)(void(*drawscreen)(void)))
void	destroy_button (const char *button_text)
int	init_postscript (const char *fname)
void	close_postscript (void)
void	clearscreen (void)
void	setcolor (int cindex)
void	setcolor (string cname)
int	getcolor (void)
void	setlinestyle (int linestyle)
void	setlinewidth (int linewidth)
void	setfontsize (int pointsize)
void	drawline (float x1, float y1, float x2, float y2)
void	drawrect (float x1, float y1, float x2, float y2)
void	fillrect (float x1, float y1, float x2, float y2)
void	fillpoly (t_point *points, int npoints)
void	drawarc (float xcen, float ycen, float rad, float startang, float angextent)
void	fillarc (float xcen, float ycen, float rad, float startang, float angextent)
void	drawellipticarc (float xc, float yc, float radx, float rady, float startang, float angextent)
void	fillellipticarc (float xc, float yc, float radx, float rady, float startang, float angextent)
void	drawtext (float xc, float yc, const char *text, float boundx)
void	set_mouse_move_input (bool turn_on)
void	set_keypress_input (bool turn_on)
void	enable_or_disable_button (int ibutton, bool enabled)
void	draw_message (void)
void	flushinput (void)
void	set_draw_mode (enum e_draw_mode draw_mode)
void	change_button_text (const char *button_text, const char *new_button_text)
void	report_structure (t_report *)

Macro Definition Documentation

#define X11

Definition at line 13 of file graphics.h.

Enumeration Type Documentation

enum e_draw_mode

Enumerator
DRAW_NORMAL
DRAW_XOR

Definition at line 209 of file graphics.h.

{DRAW_NORMAL = 0, DRAW_XOR};

Function Documentation

void change_button_text	(	const char *	button_text,
		const char *	new_button_text
	)

Definition at line 2906 of file graphics.c.

                                                                              {
/* Change the text on a button with button_name to new_button_text.
 * Not a strictly necessary function, since you could intead just 
 * destroy button_name and make a new buton.
 */
    int i, bnum;
    
    bnum = -1;
    
    for (i=4;i<num_buttons;i++) {
        if (button[i].type == BUTTON_TEXT && 
            strcmp (button[i].text, button_name) == 0) {
            bnum = i;
            break;
        }
    }

    if (bnum != -1) {
        strncpy (button[i].text, new_button_text, BUTTON_TEXT_LEN);
#ifdef X11
        drawbut (i);
#else // Win32
        SetWindowText(button[bnum].hwnd, new_button_text);
#endif
    }
}

Here is the call graph for this function:

void clearscreen

(

void

)

Definition at line 1483 of file graphics.c.

{
   int savecolor;
   if (gl_state.disp_type == SCREEN) {
#ifdef X11
      XClearWindow (display, toplevel);
#else /* Win32 */
      savecolor = currentcolor;
      setcolor(gl_state.background_cindex);
      fillrect (xleft, ytop, xright, ybot);
      setcolor(savecolor);
#endif
   }
   else {  // Postscript
     /* erases current page.  Don't use erasepage, since this will erase *
      * everything, (even stuff outside the clipping path) causing       *
      * problems if this picture is incorporated into a larger document. */
      savecolor = currentcolor;
      setcolor (gl_state.background_cindex);
      fprintf(ps,"clippath fill\n\n");
      setcolor (savecolor);
   }
}

Here is the call graph for this function:

Here is the caller graph for this function:

void close_graphics

(

void

)

Definition at line 2417 of file graphics.c.

{
    if (!gl_state.initialized)
        return;
#ifdef X11
    int i;
    for (i=0;i<=MAX_FONT_SIZE;i++) {
        if (font_is_loaded[i])
            XFreeFont(display,font_info[i]);
    }
    
    XFreeGC(display,gc);
    XFreeGC(display,gcxor);
    XFreeGC(display,gc_menus);
    
    if (private_cmap != None) 
        XFreeColormap (display, private_cmap);
    
    XCloseDisplay(display);
#else /* Win32 */
    int i;
   // Free the font data structure for each loaded font.
   for (i = 0; i <= MAX_FONT_SIZE; i++) {
      if (font_is_loaded[i]) {
         free (font_info[i]);
      }
   }

   // Destroy the window
    if(!DestroyWindow(hMainWnd))
        DRAW_ERROR();

   // free the window class (type information held by MS Windows) 
   // for each of the four window types we created.  Otherwise a 
   // later call to init_graphics to open the graphics window up again
   // will fail.
   if (!UnregisterClass (szAppName, GetModuleHandle(NULL)) )
      DRAW_ERROR();
   if (!UnregisterClass (szGraphicsName, GetModuleHandle(NULL)) )
      DRAW_ERROR();
   if (!UnregisterClass (szStatusName, GetModuleHandle(NULL)) )
      DRAW_ERROR();
   if (!UnregisterClass (szButtonsName, GetModuleHandle(NULL)) )
      DRAW_ERROR();
#endif

    free(button);
   button = NULL;

   for (i = 0; i <= MAX_FONT_SIZE; i++) {
      font_is_loaded[i] = false;
      font_info[i] = NULL;
   }
   gl_state.initialized = false;
}

Here is the caller graph for this function:

void close_postscript

(

void

)

Definition at line 2602 of file graphics.c.

{
        
    fprintf(ps,"showpage\n");
    fprintf(ps,"\n%%%%Trailer\n");
    fclose (ps);
    gl_state.disp_type = SCREEN;
    update_transform();   /* Ensure screen world reflects any changes      *
    * made while printing.                          */
    
    /* Need to make sure that we really set up the graphics context.  
    * The current font set indicates the last font used in a postscript call, 
   * etc., *NOT* the font set in the X11 or Win32 graphics context.  Force the
   * current font, colour etc. to be applied to the graphics context, so 
   * subsequent drawing commands work properly.
   */
    
    force_setcolor (currentcolor);
    force_setlinestyle (currentlinestyle);
    force_setlinewidth (currentlinewidth);
    force_setfontsize (currentfontsize); 
}

Here is the call graph for this function:

Here is the caller graph for this function:

void create_button	(	const char *	prev_button_text,
		const char *	button_text,
		void(*)(void(*drawscreen)(void))	button_func
	)

Definition at line 881 of file graphics.c.

{
    int i, bnum, space, bheight;
   t_button_type button_type = BUTTON_TEXT;
    
    space = 8;
    
    /* Only allow new buttons that are text or separator (not poly) types.                  
    * They can also only go after buttons that are text buttons.
    */
    
    bnum = -1;
      
    for (i=0; i < num_buttons;i++) {
        if (button[i].type == BUTTON_TEXT && 
            strcmp (button[i].text, prev_button_text) == 0) {
            bnum = i + 1;
            break;
        }
    }
    
    if (bnum == -1) {
        printf ("Error in create_button:  button with text %s not found.\n",
            prev_button_text);
        exit (1);
    }
    
    button = (t_button *) my_realloc (button, (num_buttons+1) * sizeof (t_button));
    /* NB:  Requirement that you specify the button that this button goes under *
    * guarantees that button[num_buttons-2] exists and is a text button.       */
    
   /* Special string to make a separator. */
    if (!strncmp(button_text, "---", 3)) {
        bheight = 2;
       button_type = BUTTON_SEPARATOR;
    }
    else
        bheight = 26;

    for (i=num_buttons;i>bnum;i--) {
        button[i].xleft = button[i-1].xleft;
        button[i].ytop = button[i-1].ytop + bheight + space;
        button[i].height = button[i-1].height;
        button[i].width = button[i-1].width;
        button[i].type = button[i-1].type;
        strcpy (button[i].text, button[i-1].text);
        button[i].fcn = button[i-1].fcn;
        button[i].ispressed = button[i-1].ispressed;
        button[i].enabled = button[i-1].enabled;
        unmap_button (i-1);
    }

    i = bnum;
    button[i].xleft = 6;
    button[i].ytop = button[i-1].ytop + button[i-1].height + space;
    button[i].height = bheight;
    button[i].width = 90;
    button[i].type = button_type;
    strncpy (button[i].text, button_text, BUTTON_TEXT_LEN);
    button[i].fcn = button_func;
    button[i].ispressed = false;
    button[i].enabled = true;

    num_buttons++;

    for (i = 0; i<num_buttons;i++) 
        map_button (i);
}

Here is the call graph for this function:

Here is the caller graph for this function:

void destroy_button

(

const char *

button_text

)

Definition at line 954 of file graphics.c.

{
    int i, bnum, space, bheight;
    
    bnum = -1;
    space = 8;
    for (i = 0; i < num_buttons; i++) {
        if (button[i].type == BUTTON_TEXT && 
            strcmp (button[i].text, button_text) == 0) {
            bnum = i;
            break;
        }
    }
    
    if (bnum == -1) {
        printf ("Error in destroy_button:  button with text %s not found.\n",
            button_text);
        exit (1);
    }

    bheight = button[bnum].height;

    for (i=bnum+1;i<num_buttons;i++) {
        button[i-1].xleft = button[i].xleft;
        button[i-1].ytop = button[i].ytop - bheight - space;
        button[i-1].height = button[i].height;
        button[i-1].width = button[i].width;
        button[i-1].type = button[i].type;
        strcpy (button[i-1].text, button[i].text);
        button[i-1].fcn = button[i].fcn;
        button[i-1].ispressed = button[i].ispressed;
        button[i-1].enabled = button[i].enabled;
        unmap_button (i);
    }
    unmap_button(bnum);

    button = (t_button *) my_realloc (button, (num_buttons-1) * sizeof (t_button));

    num_buttons--;

    for (i=bnum; i<num_buttons;i++) 
        map_button (i);
}

Here is the call graph for this function:

Here is the caller graph for this function:

void draw_message

(

void

)

Definition at line 2063 of file graphics.c.

{
    int savefontsize, savecolor;
    float ylow;
#ifdef X11
    int len, width;
#endif
    
    if (gl_state.disp_type == SCREEN) {
#ifdef X11
        XClearWindow (display, textarea);
        len = strlen (statusMessage);
        width = XTextWidth(font_info[menu_font_size], statusMessage, len);
        XSetForeground(display, gc_menus,colors[WHITE]);
        XDrawRectangle(display, textarea, gc_menus, 0, 0, top_width - MWIDTH, T_AREA_HEIGHT);
        XSetForeground(display, gc_menus,colors[BLACK]);
        XDrawLine(display, textarea, gc_menus, 0, T_AREA_HEIGHT-1, top_width-MWIDTH, T_AREA_HEIGHT-1);
        XDrawLine(display, textarea, gc_menus, top_width-MWIDTH-1, 0, top_width-MWIDTH-1, T_AREA_HEIGHT-1);
        
        XDrawString(display, textarea, gc_menus, 
            (top_width - MWIDTH - width)/2, 
            T_AREA_HEIGHT/2 + (font_info[menu_font_size]->ascent - 
            font_info[menu_font_size]->descent)/2, statusMessage, len);
#else
        if(!InvalidateRect(hStatusWnd, NULL, TRUE))
            DRAW_ERROR();
        if(!UpdateWindow(hStatusWnd))
            DRAW_ERROR();
#endif
    }
    
    else {
    /* Draw the message in the bottom margin.  Printer's generally can't  *
        * print on the bottom 1/4" (area with y < 18 in PostScript coords.)  */
        
        savecolor = currentcolor;
        setcolor (BLACK);
        savefontsize = currentfontsize;
        setfontsize (menu_font_size - 2);  /* Smaller OK on paper */
        ylow = ps_bot - 8; 
        fprintf(ps,"(%s) %.2f %.2f censhow\n",statusMessage,(ps_left+ps_right)/2.,
            ylow);
        setcolor (savecolor);
        setfontsize (savefontsize);
    }
}

Here is the call graph for this function:

Here is the caller graph for this function:

void drawarc	(	float	xcen,
		float	ycen,
		float	rad,
		float	startang,
		float	angextent
	)

Definition at line 1787 of file graphics.c.

{
    drawellipticarc(xc, yc, rad, rad, startang, angextent);
}

Here is the call graph for this function:

Here is the caller graph for this function:

void drawellipticarc	(	float	xc,
		float	yc,
		float	radx,
		float	rady,
		float	startang,
		float	angextent
	)

Definition at line 1719 of file graphics.c.

{
    int xl, yt;
    unsigned int width, height;
#ifdef WIN32
    HPEN hOldPen;
        int p1, p2, p3, p4;
#endif
    
    /* Conservative (but fast) clip test -- check containing rectangle of *
    * an ellipse.                                                         */
    
    if (rect_off_screen (xc-radx,yc-rady,xc+radx,yc+rady))
        return;
    
        /* X Windows has trouble with very large angles. (Over 360).    *
    * Do following to prevent its inaccurate (overflow?) problems. */
    if (fabs(angextent) > 360.) 
        angextent = 360.;
    
    startang = angnorm (startang);
    
    if (gl_state.disp_type == SCREEN) {
        xl = (int) (xcoord(xc) - fabs(xmult*radx));
        yt = (int) (ycoord(yc) - fabs(ymult*rady));
        width = (unsigned int) (2*fabs(xmult*radx));
        height = (unsigned int) (2*fabs(ymult*rady));
#ifdef X11
        XDrawArc (display, toplevel, current_gc, xl, yt, width, height,
            (int) (startang*64), (int) (angextent*64));
#else  // Win32
        /* set arc direction */
        if (angextent > 0) {
            p1 = (int)(xcoord(xc) + fabs(xmult*radx)*cos(DEGTORAD(startang)));
            p2 = (int)(ycoord(yc) - fabs(ymult*rady)*sin(DEGTORAD(startang)));
            p3 = (int)(xcoord(xc) + fabs(xmult*radx)*cos(DEGTORAD(startang+angextent-.001)));
            p4 = (int)(ycoord(yc) - fabs(ymult*rady)*sin(DEGTORAD(startang+angextent-.001)));
        }
        else {
            p1 = (int)(xcoord(xc) + fabs(xmult*radx)*cos(DEGTORAD(startang+angextent+.001)));
            p2 = (int)(ycoord(yc) - fabs(ymult*rady)*sin(DEGTORAD(startang+angextent+.001)));
            p3 = (int)(xcoord(xc) + fabs(xmult*radx)*cos(DEGTORAD(startang)));
            p4 = (int)(ycoord(yc) - fabs(ymult*rady)*sin(DEGTORAD(startang)));
        }
        
        hOldPen = (HPEN)SelectObject(hGraphicsDC, hGraphicsPen);
        if(!(hOldPen))
            SELECT_ERROR();     
        if(!Arc(hGraphicsDC, xl, yt, xl+width, yt+height, p1, p2, p3, p4))
            DRAW_ERROR();
        if(!SelectObject(hGraphicsDC, hOldPen))
            SELECT_ERROR();
#endif
    }
    else {
        fprintf(ps, "gsave\n");
        fprintf(ps, "%.2f %.2f translate\n", XPOST(xc), YPOST(yc));
        fprintf(ps, "%.2f 1 scale\n", fabs(radx*ps_xmult)/fabs(rady*ps_ymult));
        fprintf(ps, "0 0 %.2f %.2f %.2f %s\n", /*XPOST(xc)*/ 
            /*YPOST(yc)*/ fabs(rady*ps_xmult), startang, startang+angextent, 
            (angextent < 0) ? "drawarcn" : "drawarc") ;
        fprintf(ps, "grestore\n");
    }
}

Here is the call graph for this function:

Here is the caller graph for this function:

void drawline	(	float	x1,
		float	y1,
		float	x2,
		float	y2
	)

Definition at line 1539 of file graphics.c.

{
/* Draw a line from (x1,y1) to (x2,y2) in the user-drawable area. *
    * Coordinates are in world (user) space.                         */
    
#ifdef WIN32
    HPEN hOldPen;
#endif
    
    if (rect_off_screen(x1,y1,x2,y2))
        return;
    
    if (gl_state.disp_type == SCREEN) {
#ifdef X11
        /* Xlib.h prototype has x2 and y1 mixed up. */ 
        XDrawLine(display, toplevel, current_gc, xcoord(x1), ycoord(y1), xcoord(x2), ycoord(y2));
#else /* Win32 */
        hOldPen = (HPEN)SelectObject(hGraphicsDC, hGraphicsPen);
        if(!(hOldPen))
            SELECT_ERROR();
        if (!BeginPath(hGraphicsDC))
            DRAW_ERROR();
        if(!MoveToEx (hGraphicsDC, xcoord(x1), ycoord(y1), NULL))
            DRAW_ERROR();
        if(!LineTo (hGraphicsDC, xcoord(x2), ycoord(y2)))
            DRAW_ERROR();
        if (!EndPath(hGraphicsDC))
            DRAW_ERROR();
        if (!StrokePath(hGraphicsDC))
            DRAW_ERROR();
        if(!SelectObject(hGraphicsDC, hOldPen))
            SELECT_ERROR();
#endif
    }
    else {
        fprintf(ps,"%.2f %.2f %.2f %.2f drawline\n",XPOST(x1),YPOST(y1),
            XPOST(x2),YPOST(y2));
    }
}

Here is the call graph for this function:

Here is the caller graph for this function:

void drawrect	(	float	x1,
		float	y1,
		float	x2,
		float	y2
	)

Definition at line 1581 of file graphics.c.

{
    int xw1, yw1, xw2, yw2;
#ifdef WIN32
    HPEN hOldPen;
    HBRUSH hOldBrush;
#else
    unsigned int width, height;
    int xl, yt;
#endif
    
    if (rect_off_screen(x1,y1,x2,y2))
        return;
    
    if (gl_state.disp_type == SCREEN) { 
        /* translate to X Windows calling convention. */
        xw1 = xcoord(x1);
        xw2 = xcoord(x2);
        yw1 = ycoord(y1);
        yw2 = ycoord(y2); 
#ifdef X11
        xl = min(xw1,xw2);
        yt = min(yw1,yw2);
        width = abs (xw1-xw2);
        height = abs (yw1-yw2);
        XDrawRectangle(display, toplevel, current_gc, xl, yt, width, height);
#else /* Win32 */
        if(xw1 > xw2) {
            int temp = xw1;
            xw1 = xw2;
            xw2 = temp;
        }
        if(yw1 > yw2) {
            int temp = yw1;
            yw1 = yw2;
            yw2 = temp;
        }
        
        hOldPen = (HPEN)SelectObject(hGraphicsDC, hGraphicsPen);
        if(!(hOldPen))
            SELECT_ERROR();
        hOldBrush = (HBRUSH)SelectObject(hGraphicsDC, GetStockObject(NULL_BRUSH));
        if(!(hOldBrush))
            SELECT_ERROR();
        if(!Rectangle(hGraphicsDC, xw1, yw1, xw2, yw2))
            DRAW_ERROR();
        if(!SelectObject(hGraphicsDC, hOldPen))
            SELECT_ERROR();
        if(!SelectObject(hGraphicsDC, hOldBrush))
            SELECT_ERROR();
#endif
        
    }
    else {
        fprintf(ps,"%.2f %.2f %.2f %.2f drawrect\n",XPOST(x1),YPOST(y1),
            XPOST(x2),YPOST(y2));
    }
}

Here is the call graph for this function:

Here is the caller graph for this function:

void drawtext	(	float	xc,
		float	yc,
		const char *	text,
		float	boundx
	)

Definition at line 1952 of file graphics.c.

{
    int len, width, xw_off, yw_off, font_ascent, font_descent;
    
#ifdef X11
    len = strlen(text);
    width = XTextWidth(font_info[currentfontsize], text, len);
    font_ascent = font_info[currentfontsize]->ascent;
    font_descent = font_info[currentfontsize]->descent;
#else /* WC : WIN32 */
    HFONT hOldFont;
    SIZE textsize;
    TEXTMETRIC textmetric;
    
    hOldFont = (HFONT)SelectObject(hGraphicsDC, hGraphicsFont);
    if(!(hOldFont))
        SELECT_ERROR();
    if(SetTextColor(hGraphicsDC, win32_colors[currentcolor]) == CLR_INVALID)
        DRAW_ERROR();
    
    len = strlen(text);
    if (!GetTextExtentPoint32(hGraphicsDC, text, len, &textsize))
        DRAW_ERROR();
    width = textsize.cx;
    if (!GetTextMetrics(hGraphicsDC, &textmetric))
        DRAW_ERROR();
    font_ascent = textmetric.tmAscent;
    font_descent = textmetric.tmDescent;
#endif  
    if (width > fabs(boundx*xmult)) {
#ifdef WIN32
        if(!SelectObject(hGraphicsDC, hOldFont))
            SELECT_ERROR();
#endif
        return; /* Don't draw if it won't fit */
    }
    
    xw_off = (int)(width/(2.*xmult));      /* NB:  sign doesn't matter. */
    
    /* NB:  2 * descent makes this slightly conservative but simplifies code. */
    yw_off = (int)((font_ascent + 2 * font_descent)/(2.*ymult)); 
    
    /* Note:  text can be clipped when a little bit of it would be visible *
    * right now.  Perhaps X doesn't return extremely accurate width and   *
    * ascent values, etc?  Could remove this completely by multiplying    *
    * xw_off and yw_off by, 1.2 or 1.5.                                   */
    if (rect_off_screen(xc-xw_off, yc-yw_off, xc+xw_off, yc+yw_off)) {
#ifdef WIN32
        if(!SelectObject(hGraphicsDC, hOldFont))
            SELECT_ERROR();
#endif
        return;
    }
    
    if (gl_state.disp_type == SCREEN) {
#ifdef X11
        XDrawString(display, toplevel, current_gc, xcoord(xc)-width/2, ycoord(yc) + 
            (font_info[currentfontsize]->ascent - font_info[currentfontsize]->descent)/2,
            text, len);
#else /* Win32 */
        SetBkMode(hGraphicsDC, TRANSPARENT); 
        if(!TextOut (hGraphicsDC, xcoord(xc)-width/2, ycoord(yc) - (font_ascent + font_descent)/2, 
            text, len))
            DRAW_ERROR();
        if(!SelectObject(hGraphicsDC, hOldFont))
            SELECT_ERROR();
#endif
    }
    else {
        fprintf(ps,"(%s) %.2f %.2f censhow\n",text,XPOST(xc),YPOST(yc));
    }
}

Here is the call graph for this function:

Here is the caller graph for this function:

void enable_or_disable_button	(	int	ibutton,
		bool	enabled
	)

Definition at line 2867 of file graphics.c.

                                                          {

   if (button[ibutton].type != BUTTON_SEPARATOR) {
      button[ibutton].enabled = enabled;
#ifdef WIN32
      EnableWindow(button[ibutton].hwnd, button[ibutton].enabled);
#else  // X11
      drawbut(ibutton);
      XFlush(display);
#endif
   }
}

Here is the call graph for this function:

void event_loop	(	void(*)(float x, float y)	act_on_mousebutton,
		void(*)(float x, float y)	act_on_mousemove,
		void(*)(char key_pressed)	act_on_keypress,
		void(*)(void)	drawscreen
	)

Definition at line 1352 of file graphics.c.

{
#ifdef X11
    XEvent report;
    int bnum;
    float x, y;
    
#define OFF 1
#define ON 0
    
    turn_on_off (ON);
    while (1) {
        XNextEvent (display, &report);
        switch (report.type) {  
        case Expose:
#ifdef VERBOSE 
            printf("Got an expose event.\n");
            printf("Count is: %d.\n",report.xexpose.count);
            printf("Window ID is: %d.\n",report.xexpose.window);
#endif
            if (report.xexpose.count != 0)
                break;
            if (report.xexpose.window == menu)
                drawmenu(); 
            else if (report.xexpose.window == toplevel)
                drawscreen();
            else if (report.xexpose.window == textarea)
                draw_message();
            break;
        case ConfigureNotify:
            top_width = report.xconfigure.width;
            top_height = report.xconfigure.height;
            update_transform();
            drawmenu();
            draw_message();
#ifdef VERBOSE 
            printf("Got a ConfigureNotify.\n");
            printf("New width: %d  New height: %d.\n",top_width,top_height);
#endif
            break; 
        case ButtonPress:
#ifdef VERBOSE 
            printf("Got a buttonpress.\n");
            printf("Window ID is: %d.\n",report.xbutton.window);
#endif
            if (report.xbutton.window == toplevel) {
                x = XTOWORLD(report.xbutton.x);
                y = YTOWORLD(report.xbutton.y); 
                act_on_mousebutton (x, y);
            } 
            else {  /* A menu button was pressed. */
                bnum = which_button(report.xbutton.window);
#ifdef VERBOSE 
                printf("Button number is %d\n",bnum);
#endif
                if (button[bnum].enabled) {
                    button[bnum].ispressed = 1;
                    drawbut(bnum);
                    XFlush(display);  /* Flash the button */
                    button[bnum].fcn (drawscreen);
                    button[bnum].ispressed = 0;
                    drawbut(bnum);
                    if (button[bnum].fcn == proceed) {
                        turn_on_off(OFF);
                        flushinput ();
                        return;  /* Rather clumsy way of returning *
                        * control to the simulator       */
                    }
                }
            }
            break;
        case MotionNotify:
#ifdef VERBOSE 
            printf("Got a MotionNotify Event.\n");
            printf("x: %d    y: %d\n",report.xmotion.x,report.xmotion.y);
#endif
            if (get_mouse_move_input &&
                report.xmotion.x <= top_width-MWIDTH &&
                report.xmotion.y <= top_height-T_AREA_HEIGHT)
                act_on_mousemove(XTOWORLD(report.xmotion.x), YTOWORLD(report.xmotion.y));
            break;
        case KeyPress:
#ifdef VERBOSE 
            printf("Got a KeyPress Event.\n");
#endif
            if (get_keypress_input)
            {
                 char      keyb_buffer[20];
                 XComposeStatus composestatus;
                 KeySym         keysym;
                 int       length, max_bytes;

                 max_bytes = 1;

                 length = XLookupString( &report.xkey, keyb_buffer, max_bytes, &keysym,
                                             &composestatus );

                 keyb_buffer[length] = '\0';   /* terminating NULL */
                 act_on_keypress(keyb_buffer[0]);
            }

            break;
        }
    }
#else /* Win32 */
    MSG msg;
    
    mouseclick_ptr = act_on_mousebutton;
    mousemove_ptr = act_on_mousemove;
    keypress_ptr = act_on_keypress;
    drawscreen_ptr = drawscreen;
    ProceedPressed = FALSE;
    InEventLoop = TRUE;
    
    invalidate_screen();
    
    while(!ProceedPressed && GetMessage(&msg, NULL, 0, 0)) {
        //TranslateMessage(&msg);
        if (msg.message == WM_CHAR) { // only the top window can get keyboard events
            msg.hwnd = hMainWnd;
        }
        DispatchMessage(&msg);
    }
    InEventLoop = FALSE;
#endif
}

Here is the call graph for this function:

Here is the caller graph for this function:

void fillarc	(	float	xcen,
		float	ycen,
		float	rad,
		float	startang,
		float	angextent
	)

Definition at line 1876 of file graphics.c.

                                                                         {
    fillellipticarc(xc, yc, rad, rad, startang, angextent);
}

Here is the call graph for this function:

void fillellipticarc	(	float	xc,
		float	yc,
		float	radx,
		float	rady,
		float	startang,
		float	angextent
	)

Definition at line 1798 of file graphics.c.

{
    int xl, yt;
    unsigned int width, height;
#ifdef WIN32
    HPEN hOldPen;
    HBRUSH hOldBrush;
   int p1, p2, p3, p4;
#endif
    
    /* Conservative (but fast) clip test -- check containing rectangle of *
    * a circle.                                                          */
    
    if (rect_off_screen (xc-radx,yc-rady,xc+radx,yc+rady))
        return;
    
        /* X Windows has trouble with very large angles. (Over 360).    *
    * Do following to prevent its inaccurate (overflow?) problems. */
    
    if (fabs(angextent) > 360.) 
        angextent = 360.;
    
    startang = angnorm (startang);
    
    if (gl_state.disp_type == SCREEN) {
        xl = (int) (xcoord(xc) - fabs(xmult*radx));
        yt = (int) (ycoord(yc) - fabs(ymult*rady));
        width = (unsigned int) (2*fabs(xmult*radx));
        height = (unsigned int) (2*fabs(ymult*rady));
#ifdef X11
        XFillArc (display, toplevel, current_gc, xl, yt, width, height,
            (int) (startang*64), (int) (angextent*64));
#else  // Win32
        /* set pie direction */
        if (angextent > 0) {
            p1 = (int)(xcoord(xc) + fabs(xmult*radx)*cos(DEGTORAD(startang)));
            p2 = (int)(ycoord(yc) - fabs(ymult*rady)*sin(DEGTORAD(startang)));
            p3 = (int)(xcoord(xc) + fabs(xmult*radx)*cos(DEGTORAD(startang+angextent-.001)));
            p4 = (int)(ycoord(yc) - fabs(ymult*rady)*sin(DEGTORAD(startang+angextent-.001)));
        }
        else {
            p1 = (int)(xcoord(xc) + fabs(xmult*radx)*cos(DEGTORAD(startang+angextent+.001)));
            p2 = (int)(ycoord(yc) - fabs(ymult*rady)*sin(DEGTORAD(startang+angextent+.001)));
            p3 = (int)(xcoord(xc) + fabs(xmult*radx)*cos(DEGTORAD(startang)));
            p4 = (int)(ycoord(yc) - fabs(ymult*rady)*sin(DEGTORAD(startang)));
        }
    
        hOldPen = (HPEN)SelectObject(hGraphicsDC, GetStockObject(NULL_PEN));
        if(!(hOldPen))
            SELECT_ERROR();
        hOldBrush = (HBRUSH)SelectObject(hGraphicsDC, hGraphicsBrush);
        if(!(hOldBrush))
            SELECT_ERROR();
// Win32 API says a zero return value indicates an error, but it seems to always
// return zero.  Don't check for an error on Pie.
      Pie(hGraphicsDC, xl, yt, xl+width, yt+height, p1, p2, p3, p4);

//      if(!Pie(hGraphicsDC, xl, yt, xl+width, yt+height, p1, p2, p3, p4));
//          DRAW_ERROR();
        if(!SelectObject(hGraphicsDC, hOldPen))
            SELECT_ERROR();
        if(!SelectObject(hGraphicsDC, hOldBrush))
            SELECT_ERROR();
#endif
    }
    else {
        fprintf(ps, "gsave\n");
        fprintf(ps, "%.2f %.2f translate\n", XPOST(xc), YPOST(yc));
        fprintf(ps, "%.2f 1 scale\n", fabs(radx*ps_xmult)/fabs(rady*ps_ymult));
        fprintf(ps, "%.2f %.2f %.2f 0 0 %s\n", /*XPOST(xc)*/ 
            /*YPOST(yc)*/ fabs(rady*ps_xmult), startang, startang+angextent, 
            (angextent < 0) ? "fillarcn" : "fillarc") ;
        fprintf(ps, "grestore\n");
    }
}

Here is the call graph for this function:

Here is the caller graph for this function:

void fillpoly	(	t_point *	points,
		int	npoints
	)

Definition at line 1881 of file graphics.c.

{
#ifdef X11
    XPoint transpoints[MAXPTS];
#else
    POINT transpoints[MAXPTS];
    HPEN hOldPen;
    HBRUSH hOldBrush;
#endif
    int i;
    float xmin, ymin, xmax, ymax;
    
    if (npoints > MAXPTS) {
        printf("Error in fillpoly:  Only %d points allowed per polygon.\n",
            MAXPTS);
        printf("%d points were requested.  Polygon is not drawn.\n",npoints);
        return;
    }
    
    /* Conservative (but fast) clip test -- check containing rectangle of *
    * polygon.                                                           */
    
    xmin = xmax = points[0].x;
    ymin = ymax = points[0].y;
    
    for (i=1;i<npoints;i++) {
        xmin = min (xmin,points[i].x);
        xmax = max (xmax,points[i].x);
        ymin = min (ymin,points[i].y);
        ymax = max (ymax,points[i].y);
    }
    
    if (rect_off_screen(xmin,ymin,xmax,ymax))
        return;
    
    if (gl_state.disp_type == SCREEN) {
        for (i=0;i<npoints;i++) {
            transpoints[i].x = (short) xcoord (points[i].x);
            transpoints[i].y = (short) ycoord (points[i].y);
        }
#ifdef X11
        XFillPolygon(display, toplevel, current_gc, transpoints, npoints, Complex,
            CoordModeOrigin);
#else
        hOldPen = (HPEN)SelectObject(hGraphicsDC, GetStockObject(NULL_PEN));
        if(!(hOldPen))
            SELECT_ERROR();
        hOldBrush = (HBRUSH)SelectObject(hGraphicsDC, hGraphicsBrush);
        if(!(hOldBrush))
            SELECT_ERROR();
        if(!Polygon (hGraphicsDC, transpoints, npoints))
            DRAW_ERROR();
        if(!SelectObject(hGraphicsDC, hOldPen))
            SELECT_ERROR();
        if(!SelectObject(hGraphicsDC, hOldBrush))
            SELECT_ERROR();
#endif
    }
    else {
        fprintf(ps,"\n");
        
        for (i=npoints-1;i>=0;i--) 
            fprintf (ps, "%.2f %.2f\n", XPOST(points[i].x), YPOST(points[i].y));
        
        fprintf (ps, "%d fillpoly\n", npoints);
    }
}

Here is the call graph for this function:

Here is the caller graph for this function:

void fillrect	(	float	x1,
		float	y1,
		float	x2,
		float	y2
	)

Definition at line 1643 of file graphics.c.

{
    int xw1, yw1, xw2, yw2;
#ifdef WIN32
    HPEN hOldPen;
    HBRUSH hOldBrush;
#else
    unsigned int width, height;
    int xl, yt;
#endif
    
    if (rect_off_screen(x1,y1,x2,y2))
        return;
    
    if (gl_state.disp_type == SCREEN) {
        /* translate to X Windows calling convention. */
        xw1 = xcoord(x1);
        xw2 = xcoord(x2);
        yw1 = ycoord(y1);
        yw2 = ycoord(y2); 
#ifdef X11
        xl = min(xw1,xw2);
        yt = min(yw1,yw2);
        width = abs (xw1-xw2);
        height = abs (yw1-yw2);
        XFillRectangle(display, toplevel, current_gc, xl, yt, width, height);
#else /* Win32 */
        if(xw1 > xw2) {
            int temp = xw1;
            xw1 = xw2;
            xw2 = temp;
        }
        if(yw1 > yw2) {
            int temp = yw1;
            yw1 = yw2;
            yw2 = temp;
        }
        
        hOldPen = (HPEN)SelectObject(hGraphicsDC, hGraphicsPen);
        if(!(hOldPen))
            SELECT_ERROR(); 
        hOldBrush = (HBRUSH)SelectObject(hGraphicsDC, hGraphicsBrush);
        if(!(hOldBrush))
            SELECT_ERROR();
        if(!Rectangle(hGraphicsDC, xw1, yw1, xw2, yw2))
            DRAW_ERROR();
        if(!SelectObject(hGraphicsDC, hOldPen))
            SELECT_ERROR();
        if(!SelectObject(hGraphicsDC, hOldBrush))
            SELECT_ERROR();
#endif
    }
    else {
        fprintf(ps,"%.2f %.2f %.2f %.2f fillrect\n",XPOST(x1),YPOST(y1),
            XPOST(x2),YPOST(y2));
    }
}

Here is the call graph for this function:

Here is the caller graph for this function:

void flushinput

(

void

)

Definition at line 2027 of file graphics.c.

{
    if (gl_state.disp_type != SCREEN) 
        return;
#ifdef X11
    XFlush(display);
#endif
}

Here is the caller graph for this function:

int getcolor

(

void

)

Definition at line 647 of file graphics.c.

               {
    return currentcolor;
}

Here is the caller graph for this function:

void init_graphics	(	const char *	window_name,
		int	cindex_background
	)

Definition at line 1003 of file graphics.c.

{
   if (gl_state.initialized)  // Singleton graphics.
      return;

   reset_common_state ();
#ifdef WIN32
   reset_win32_state ();
#endif

   gl_state.disp_type = SCREEN;
   gl_state.background_cindex = cindex;


#ifdef X11
   char *display_name = NULL;
   int x, y;                                   /* window position */
   unsigned int border_width = 2;  /* ignored by OpenWindows */
   XTextProperty windowName;
   
   /* X Windows' names for my colours. */
   const char *cnames[NUM_COLOR] = {"white", "black", "grey55", "grey75", "blue", 
    "green", "yellow", "cyan", "red", "RGBi:0.0/0.5/0.0", "magenta",
    "bisque", "lightblue", "thistle", "plum", "khaki", "coral",
    "turquoise", "mediumpurple", "darkslateblue", "darkkhaki" };
    
   XColor exact_def;
   Colormap cmap;
   unsigned long valuemask = 0; /* ignore XGCvalues and use defaults */
   XGCValues values;
   XEvent event;

   /* connect to X server */
   if ( (display=XOpenDisplay(display_name)) == NULL )
   {
      fprintf( stderr, "Cannot connect to X server %s\n",
        XDisplayName(display_name));
      exit( -1 );
   }
    
   /* get screen size from display structure macro */
   screen_num = DefaultScreen(display);
   display_width = DisplayWidth(display, screen_num);
   display_height = DisplayHeight(display, screen_num);
   
   x = 0;
   y = 0;
    
   top_width = 2 * display_width / 3;
   top_height = 4 * display_height / 5;
   
   cmap = DefaultColormap(display, screen_num);
   private_cmap = None;
    
   for (int i=0;i<NUM_COLOR;i++) {
      if (!XParseColor(display,cmap,cnames[i],&exact_def)) {
         fprintf(stderr, "Color name %s not in database", cnames[i]);
         exit(-1);
      }
      if (!XAllocColor(display, cmap, &exact_def)) {
         fprintf(stderr, "Couldn't allocate color %s.\n",cnames[i]); 
        
         if (private_cmap == None) {
            fprintf(stderr, "Will try to allocate a private colourmap.\n");
            fprintf(stderr, "Colours will only display correctly when your "
                            "cursor is in the graphics window.\n"
                            "Exit other colour applications and rerun this "
                            "program if you don't like that.\n\n");
                
            private_cmap = XCopyColormapAndFree (display, cmap);
            cmap = private_cmap;
            if (!XAllocColor (display, cmap, &exact_def)) {
               fprintf (stderr, "Couldn't allocate color %s as private.\n",
                                 cnames[i]);
               exit (1);
            }
         }
            
         else {
            fprintf (stderr, "Couldn't allocate color %s as private.\n",
               cnames[i]);
            exit (1);
         }
      }
      colors[i] = exact_def.pixel;
   }  // End setting up colours
    
   toplevel = XCreateSimpleWindow(display,RootWindow(display,screen_num),
              x, y, top_width, top_height, border_width, colors[BLACK],
              colors[cindex]);  

   if (private_cmap != None) 
      XSetWindowColormap (display, toplevel, private_cmap);
    
   XSelectInput (display, toplevel, ExposureMask | StructureNotifyMask |
                    ButtonPressMask | PointerMotionMask | KeyPressMask);
    
   /* Create default Graphics Contexts.  valuemask = 0 -> use defaults. */
   current_gc = gc = XCreateGC(display, toplevel, valuemask, &values);
   gc_menus = XCreateGC(display, toplevel, valuemask, &values);
    
   /* Create XOR graphics context for Rubber Banding */
   values.function = GXxor;   
   values.foreground = colors[cindex];
   gcxor = XCreateGC(display, toplevel, (GCFunction | GCForeground),
                     &values);
    
   /* specify font for menus.  */
   load_font(menu_font_size);
   XSetFont(display, gc_menus, font_info[menu_font_size]->fid);
    
   /* Set drawing defaults for user-drawable area.  Use whatever the *
   * initial values of the current stuff was set to.                */
   force_setfontsize(currentfontsize);
   force_setcolor (currentcolor);
   force_setlinestyle (currentlinestyle);
   force_setlinewidth (currentlinewidth);
    
   // Need a non-const name to pass to XStringListTo... 
   // (even though X11 won't change it).
  char *window_name_copy = (char *) my_malloc (BUFSIZE * sizeof (char));
  strncpy (window_name_copy, window_name, BUFSIZE);
   XStringListToTextProperty(&window_name_copy, 1, &windowName);
   free (window_name_copy);
   window_name_copy = NULL;

   XSetWMName (display, toplevel, &windowName);
   /* XSetWMIconName (display, toplevel, &windowName); */
    
   /* XStringListToTextProperty copies the window_name string into            *
    * windowName.value.  Free this memory now.                                */
    
   free (windowName.value);  
    
   XMapWindow (display, toplevel);
   build_textarea ();
   build_default_menu ();
    
   /* The following is completely unnecessary if the user is using the       *
    * interactive (event_loop) graphics.  It waits for the first Expose      *
    * event before returning so that I can tell the window manager has got   *
    * the top-level window up and running.  Thus the user can start drawing  *
    * into this window immediately, and there's no danger of the window not  *
    * being ready and output being lost.                                     */
   XPeekIfEvent (display, &event, test_if_exposed, NULL); 
    
#else /* WIN32 */
   WNDCLASS wndclass;
   HINSTANCE hInstance = GetModuleHandle(NULL);
   int x, y;
   LOGBRUSH lb;
   lb.lbStyle = BS_SOLID;
   lb.lbColor = win32_colors[currentcolor];
   lb.lbHatch = (LONG)NULL;
   x = 0;
   y = 0;
    
   /* get screen size from display structure macro */
   display_width = GetSystemMetrics( SM_CXSCREEN );
   if (!(display_width))
      CREATE_ERROR();
   display_height = GetSystemMetrics( SM_CYSCREEN );
   if (!(display_height))
      CREATE_ERROR();
   top_width = 2*display_width/3;
   top_height = 4*display_height/5;
    
   /* Grab the Application name */
   wsprintf(szAppName, TEXT(window_name));
    
   //hGraphicsPen = CreatePen(win32_line_styles[SOLID], 1, win32_colors[BLACK]);
   hGraphicsPen = ExtCreatePen(PS_GEOMETRIC | win32_line_styles[currentlinestyle] |
                  PS_ENDCAP_FLAT, 1, &lb, (LONG)NULL, NULL);
   if(!hGraphicsPen)
      CREATE_ERROR();
   hGraphicsBrush = CreateSolidBrush(win32_colors[DARKGREY]); 
   if(!hGraphicsBrush)
      CREATE_ERROR();
   hGrayBrush = CreateSolidBrush(win32_colors[LIGHTGREY]);
   if(!hGrayBrush)
      CREATE_ERROR();

   load_font (currentfontsize);
   hGraphicsFont = CreateFontIndirect(font_info[currentfontsize]);
   if (!hGraphicsFont)
      CREATE_ERROR();
    
   /* Register the Main Window class */
   wndclass.style = CS_HREDRAW | CS_VREDRAW | CS_OWNDC;
   wndclass.lpfnWndProc = MainWND;
   wndclass.cbClsExtra = 0;
   wndclass.cbWndExtra = 0;
   wndclass.hInstance = hInstance;
   wndclass.hIcon = LoadIcon (NULL, IDI_APPLICATION);
   wndclass.hCursor = LoadCursor( NULL, IDC_ARROW);
   wndclass.hbrBackground = (HBRUSH) CreateSolidBrush(win32_colors[cindex]);
   wndclass.lpszMenuName = NULL;
   wndclass.lpszClassName = szAppName;
    
   if (!RegisterClass(&wndclass)) {
      printf ("Error code: %d\n", GetLastError());
      MessageBox(NULL, TEXT("Initialization of Windows graphics (init_graphics) failed."),
                    szAppName, MB_ICONERROR);
      exit(-1);
   }
    
   /* Register the Graphics Window class */
   wndclass.lpfnWndProc = GraphicsWND;
   wndclass.hIcon = NULL;
   wndclass.lpszClassName = szGraphicsName;
    
   if(!RegisterClass(&wndclass))
      DRAW_ERROR();
    
   /* Register the Status Window class */
   wndclass.lpfnWndProc = StatusWND;
   wndclass.hIcon = NULL;
   wndclass.lpszClassName = szStatusName;
   wndclass.hbrBackground = hGrayBrush;
   
   if(!RegisterClass(&wndclass))
      DRAW_ERROR();
    
   /* Register the Buttons Window class */
   wndclass.lpfnWndProc = ButtonsWND;
   wndclass.hIcon = NULL;
   wndclass.lpszClassName = szButtonsName;
   wndclass.hbrBackground = hGrayBrush;
    
   if (!RegisterClass(&wndclass))
      DRAW_ERROR();
    
   hMainWnd = CreateWindow(szAppName, TEXT(window_name),
                 WS_OVERLAPPEDWINDOW, x, y, top_width, top_height,
                 NULL, NULL, hInstance, NULL);
    
   if(!hMainWnd)
      DRAW_ERROR();
    
   /* Set drawing defaults for user-drawable area.  Use whatever the *
    * initial values of the current stuff was set to.                */
    
   if (ShowWindow(hMainWnd, SW_SHOWNORMAL))
      DRAW_ERROR();
   build_default_menu();
   if (!UpdateWindow(hMainWnd))
      DRAW_ERROR();
   win32_drain_message_queue ();
#endif
   gl_state.initialized = true;
}

Here is the call graph for this function:

Here is the caller graph for this function:

int init_postscript

(

const char *

fname

)

Definition at line 2477 of file graphics.c.

{
    
    ps = fopen (fname,"w");
    if (ps == NULL) {
        printf("Error: could not open %s for PostScript output.\n",fname);
        printf("Drawing to screen instead.\n");
        return (0);
    }
    gl_state.disp_type = POSTSCRIPT;  /* Graphics go to postscript file now. */
    
    /* Header for minimal conformance with the Adobe structuring convention */
    fprintf(ps,"%%!PS-Adobe-1.0\n");
    fprintf(ps,"%%%%DocumentFonts: Helvetica\n");
    fprintf(ps,"%%%%Pages: 1\n");
    /* Set up postscript transformation macros and page boundaries */
    update_ps_transform();
    /* Bottom margin is at ps_bot - 15. to leave room for the on-screen message. */
    fprintf(ps,"%%%%HiResBoundingBox: %.2f %.2f %.2f %.2f\n",
        ps_left, ps_bot - 15., ps_right, ps_top); 
    fprintf(ps,"%%%%EndComments\n");
    
    fprintf(ps,"/censhow   %%draw a centered string\n");
    fprintf(ps," { moveto               %% move to proper spot\n");
    fprintf(ps,"   dup stringwidth pop  %% get x length of string\n");
    fprintf(ps,"   -2 div               %% Proper left start\n");
    fprintf(ps,"   yoff rmoveto         %% Move left that much and down half font height\n");
    fprintf(ps,"   show newpath } def   %% show the string\n\n"); 
    
    fprintf(ps,"/setfontsize     %% set font to desired size and compute "
        "centering yoff\n");
    fprintf(ps," { /Helvetica findfont\n");
    fprintf(ps,"   8 scalefont\n");
    fprintf(ps,"   setfont         %% Font size set ...\n\n");
    fprintf(ps,"   0 0 moveto      %% Get vertical centering offset\n");
    fprintf(ps,"   (Xg) true charpath\n");
    fprintf(ps,"   flattenpath pathbbox\n");
    fprintf(ps,"   /ascent exch def pop -1 mul /descent exch def pop\n");
    fprintf(ps,"   newpath\n");
    fprintf(ps,"   descent ascent sub 2 div /yoff exch def } def\n\n");
    
    fprintf(ps,"%% Next two lines for debugging only.\n");
    fprintf(ps,"/str 20 string def\n");
    fprintf(ps,"/pnum {str cvs print (  ) print} def\n");
    
    fprintf(ps,"/drawline      %% draw a line from (x2,y2) to (x1,y1)\n");
    fprintf(ps," { moveto lineto stroke } def\n\n");
    
    fprintf(ps,"/rect          %% outline a rectangle \n");
    fprintf(ps," { /y2 exch def /x2 exch def /y1 exch def /x1 exch def\n");
    fprintf(ps,"   x1 y1 moveto\n");
    fprintf(ps,"   x2 y1 lineto\n");
    fprintf(ps,"   x2 y2 lineto\n");
    fprintf(ps,"   x1 y2 lineto\n");
    fprintf(ps,"   closepath } def\n\n");
    
    fprintf(ps,"/drawrect      %% draw outline of a rectanagle\n");
    fprintf(ps," { rect stroke } def\n\n");
    
    fprintf(ps,"/fillrect      %% fill in a rectanagle\n");
    fprintf(ps," { rect fill } def\n\n");
    
    fprintf (ps,"/drawarc { arc stroke } def           %% draw an arc\n");
    fprintf (ps,"/drawarcn { arcn stroke } def "
        "        %% draw an arc in the opposite direction\n\n");
    
    fprintf (ps,"%%Fill a counterclockwise or clockwise arc sector, "
        "respectively.\n");
    fprintf (ps,"/fillarc { moveto currentpoint 5 2 roll arc closepath fill } "
        "def\n");
    fprintf (ps,"/fillarcn { moveto currentpoint 5 2 roll arcn closepath fill } "
        "def\n\n");
    
    fprintf (ps,"/fillpoly { 3 1 roll moveto         %% move to first point\n"
        "   2 exch 1 exch {pop lineto} for   %% line to all other points\n"
        "   closepath fill } def\n\n");
    
    
    fprintf(ps,"%%Color Definitions:\n");
    fprintf(ps,"/white { 1 setgray } def\n");
    fprintf(ps,"/black { 0 setgray } def\n");
    fprintf(ps,"/grey55 { .55 setgray } def\n");
    fprintf(ps,"/grey75 { .75 setgray } def\n");
    fprintf(ps,"/blue { 0 0 1 setrgbcolor } def\n");
    fprintf(ps,"/green { 0 1 0 setrgbcolor } def\n");
    fprintf(ps,"/yellow { 1 1 0 setrgbcolor } def\n");
    fprintf(ps,"/cyan { 0 1 1 setrgbcolor } def\n");
    fprintf(ps,"/red { 1 0 0 setrgbcolor } def\n");
    fprintf(ps,"/darkgreen { 0 0.5 0 setrgbcolor } def\n");
    fprintf(ps,"/magenta { 1 0 1 setrgbcolor } def\n");
    fprintf(ps,"/bisque { 1 0.89 0.77 setrgbcolor } def\n");
    fprintf(ps,"/lightblue { 0.68 0.85 0.9 setrgbcolor } def\n");
    fprintf(ps,"/thistle { 0.85 0.75 0.85 setrgbcolor } def\n");
    fprintf(ps,"/plum { 0.87 0.63 0.87 setrgbcolor } def\n");
    fprintf(ps,"/khaki { 0.94 0.9 0.55 setrgbcolor } def\n");
    fprintf(ps,"/coral { 1 0.5 0.31 setrgbcolor } def\n");
    fprintf(ps,"/turquoise { 0.25 0.88 0.82 setrgbcolor } def\n");
    fprintf(ps,"/mediumpurple { 0.58 0.44 0.86 setrgbcolor } def\n");
    fprintf(ps,"/darkslateblue { 0.28 0.24 0.55 setrgbcolor } def\n");
    fprintf(ps,"/darkkhaki { 0.74 0.72 0.42 setrgbcolor } def\n");
    
    fprintf(ps,"\n%%Solid and dashed line definitions:\n");
    fprintf(ps,"/linesolid {[] 0 setdash} def\n");
    fprintf(ps,"/linedashed {[3 3] 0 setdash} def\n");
    
    fprintf(ps,"\n%%%%EndProlog\n");
    fprintf(ps,"%%%%Page: 1 1\n\n");
    
    /* Set up PostScript graphics state to match current one. */
    force_setcolor (currentcolor);
    force_setlinestyle (currentlinestyle);
    force_setlinewidth (currentlinewidth);
    force_setfontsize (currentfontsize); 
    
    /* Draw this in the bottom margin -- must do before the clippath is set */
    draw_message ();
    
    /* Set clipping on page. */
    fprintf(ps,"%.2f %.2f %.2f %.2f rect ",ps_left, ps_bot,ps_right,ps_top);
    fprintf(ps,"clip newpath\n\n");
    
    return (1);
}

Here is the call graph for this function:

Here is the caller graph for this function:

void init_world	(	float	xl,
		float	yt,
		float	xr,
		float	yb
	)

Definition at line 2038 of file graphics.c.

{
    /* Sets the coordinate system the user wants to draw into.          */
    
    xleft = x1;
    xright = x2;
    ytop = y1;
    ybot = y2;
    
    saved_xleft = xleft;     /* Save initial world coordinates to allow full */
    saved_xright = xright;   /* view button to zoom all the way out.         */
    saved_ytop = ytop;
    saved_ybot = ybot;
    
    if (gl_state.disp_type == SCREEN) {
        update_transform();
    }
    else {
        update_ps_transform();
    }
}

Here is the call graph for this function:

Here is the caller graph for this function:

void report_structure

(

t_report *

)

Definition at line 2843 of file graphics.c.

                                        {
    report->xmult = xmult;
    report->ymult = ymult;
    report->xleft = xleft;
    report->xright = xright;
    report->ytop = ytop;
    report->ybot = ybot;
    report->ps_xmult = ps_xmult;
    report->ps_ymult = ps_ymult;
    report->top_width = top_width;
    report->top_height = top_height;
}

void set_draw_mode

(

enum e_draw_mode

draw_mode

)

Definition at line 2881 of file graphics.c.

                                                {
/* Set normal (overwrite) or xor (useful for rubber-banding)
 * drawing mode.
 */

   if (draw_mode == DRAW_NORMAL) {
#ifdef X11
      current_gc = gc;
#else
      if (!SetROP2(hGraphicsDC, R2_COPYPEN))
         SELECT_ERROR();
#endif
   }
   else {  // DRAW_XOR
#ifdef X11
      current_gc = gcxor;
#else
      if (!SetROP2(hGraphicsDC, R2_XORPEN))
         SELECT_ERROR();
#endif
   }
   current_draw_mode = draw_mode;
}

Here is the caller graph for this function:

void set_keypress_input

(

bool

turn_on

)

Definition at line 2862 of file graphics.c.

                                      {
    get_keypress_input = enable;
}

void set_mouse_move_input

(

bool

turn_on

)

Definition at line 2857 of file graphics.c.

                                        {
    get_mouse_move_input = enable;
}

void setcolor

(

int

cindex

)

Definition at line 619 of file graphics.c.

{
    if (currentcolor != cindex) 
        force_setcolor (cindex);
   
}

Here is the call graph for this function:

Here is the caller graph for this function:

void setcolor

(

string

cname

)

Definition at line 631 of file graphics.c.

                             {
   int icolor = -1;
   for (int i = 0; i < NUM_COLOR; i++) {
      if (cname == ps_cnames[i]) {
         icolor = i;
         break;
      }
   }
   if (icolor == -1) {
      cout << "Error: unknown color " << cname << endl;
   }
   else {
      setcolor (icolor);
   }   
}

Here is the call graph for this function:

void setfontsize

(

int

pointsize

)

Definition at line 796 of file graphics.c.

{
    
    if (pointsize != currentfontsize) 
        force_setfontsize (pointsize);
}

Here is the call graph for this function:

Here is the caller graph for this function:

void setlinestyle

(

int

linestyle

)

Definition at line 697 of file graphics.c.

{
    if (linestyle != currentlinestyle) 
        force_setlinestyle (linestyle);
}

Here is the call graph for this function:

Here is the caller graph for this function:

void setlinewidth

(

int

linewidth

)

Definition at line 743 of file graphics.c.

{
    if (linewidth != currentlinewidth)
        force_setlinewidth (linewidth);
}

Here is the call graph for this function:

Here is the caller graph for this function:

void update_message

(

const char *

msg

)

Definition at line 2113 of file graphics.c.

{
    strncpy (statusMessage, msg, BUFSIZE);
    draw_message ();
#ifdef X11
// Make this appear immediately.  Win32 does that automaticaly.
        XFlush (display);  
#endif // X11
}

Here is the call graph for this function:

Here is the caller graph for this function: