time_lbl.h

MPICH是MPI的重要研究,提供了一系列的接口函数,为并行计算的实现提供了编程环境.

/*
   time_lbl.h - time label widget for Upshot

   Ed Karrels
   Argonne National Laboratory

   This will implement a widget that will display scrolling time labels
to match a display whose horizontal axis is time.  Labels will only appear
at integer powers of 10, or simple fractions thereof.  If Im saying this
correctly or not, I mean that labels will be at 1.001, 1.002, 1.003,
or 1.00100, 1.00125, 1.00150, 1.00175, but not 1.0017865, 1.0027865, etc.
The precision displayed will be adjusted to what is appropriate.
As many labels as reasonable possible will be fit on the display.


   time_lbl <window name> <logfile token>
     window name - name of the window to create and the widget command
     logfile token - token for the logfile the label is to be attached to

   <window name> set <totalUnits> <windowUnits> <firstUnit> <lastUnit>
     same as a scrollbar [set] command

*/


#ifndef _TIME_LBL_H_
#define _TIME_LBL_H_

#include "tcl.h"
#include "tk.h"

#ifdef __STDC__
int Timelbl_Init( Tcl_Interp *interp );
#else
int Timelbl_Init();
#endif

/* structure defining an individual hashmark, to be used in a linked
   list of hash marks */
typedef struct timelbl_hashmark_ {
    /* indices that make up this object on the canvas */
  int text_canvas_idx, hashMark_canvas_idx;
    /* which label this is, if the leftmost label is 0 */
  int lbl_idx;
    /* pointer to the next lbl in the list */
  struct timelbl_hashmark_ *next;
} timelbl_hashmark;

typedef struct timelbl_ {
  Tcl_Interp *interp;
  Tk_Window win;
  char *windowName, *canvasName;
  char *fg;			/* color for the text and hashes */
  char *bg;			/* color for the background */
  char *font;			/* font for the text */

  int height;			/* total height of the widget, based on */
				/* text size */

  double starttime, endtime;
  double totaltime;		/* is used often, might as well precompute */

  int visWidth;			/* window width, from the latest resize evt */
  double lastVisWidth;		/* setting from the last visWidth */

  double width;			/* total width, from the latest resize */
				/* event combined with latest 'scroll set' */

    /* the settings from the latest 'scroll set' command */
    /* certain recalculations and redraws will only be necessary if these
       numbers change */
  double span, left;
  double lastSpan;		/* setting from previous 'set' command */

  char *format_str;		/* sprintf format string used to print */
				/* all labels */

  int xview;			/* leftmost coordinate */

    /* list of indices of which labels are currently visible */
    /* The indices used are figured as if each visible label is indexed, */
    /* and the leftmost label is 0 */
  timelbl_hashmark *head, *tail;

  double lbl_width;		/* how much space between label centers */

  double lbl_startx;		/* x-coordinate of leftmost label */

  int is_sized;			/* nonzero after the first configure event */

  double firstHashTime;		/* value for leftmost hash mark */
  double hashIncrement;		/* increment between hash marks */
} timelbl;

/*
   Tk_ConfigSpec's:

   # win - TK_CONFIG_WINDOW - Tk_Window # maybe not

   fg - TK_CONFIG_COLOR - XColor *
   bg - TK_CONFIG_COLOR - XColor *
   font - TK_CONFIG_FONT - XFontStruct *
   width - TK_CONFIG_PIXELS - int
*/



#endif