steveroush

BEGIN{
  int     clusterCnt, cHtmlCnt;
  graph_t aGraph;
  string  printBuf;
  ////////////////  help  /////////////////////////////////////////////
  string  help="
  gvstats.gvpr :
  a GVPR program that provides information about Graphviz input files
  - the file name
  - the layout engine  (if set)

steveroush

/*

  neato complains about overlapping nodes, kicks our warning message (see below),
  and uses splines=false.

  "Warning: the bounding boxes of some nodes touch - falling back to straight
   line edges"

 - to do:
   - multi-edge??

steveroush

#!/bin/sh
cat <<QUitquIT
# This is a shell archive. 
#
# to execute this file, type:   sh alter_archive.sh
# 
# On Linux/UNIX/MacOS(?) systems it is an executable program that will create 
# a subdirectory (named alter.d) in the currect directory and then 
# install multiple (text) files in that directory.  
# This shell archive and all contents are humanly readable - no binary files.

steveroush

#!/bin/sh
cat <<QUitquIT
# This is a shell archive. 
#
# to execute this file, type:   sh socioGram.d_archive.sh
# 
# On Linux/UNIX/MacOS(?) systems it is an executable program that will create 
# a subdirectory (named socioGram.d) in the currect directory and then 
# install multiple (text) files in that directory.  
# This shell archive and all contents are humanly readable - no binary files.

steveroush

/**********************************************************
addRingLabels.gvpr -
   a very specialized gvpr program that adds labels to the output of
     twopiCircles.gvpr

**********************************************************/
N[name=="____Circle____*"&&ringNo>0]{
  $.xlabel=(string)(1 + (int)$.rank);
  $.xlp=(string)($.X+(72*($.width/2))) +"," +(string)$.Y;
}

steveroush

/*************************************************************************
  setTwopiRanks: explicitly set ranks for nodes in twopi graphs
    Though the twopi does not use the term rank (except for the ranksep attribute),
    it essentially does (radial) ranking from the root node.
    However, while *dot* ranking is (by default) based on longest distance,
    twopi ranking is based on soortest (spanning tree) distance.

    setTwopiRanks accomplishes the goal in two ways:
    - nodes that would have a distance greater than the desired rank will cause invisible nodes and edges added to the graph to "pull" the node in to the desired rank.
    - nodes that would have a distance shorter than the desired rank will cause the short edges to be ignored in the rank calculation by appling weight=0 to those edges (see https://graphviz.org/docs/attrs/weight/)

steveroush

/*************************************************************************
  twopiCircles: add circles to twopi graph
      similar to the "addrings" gvpr program that comes with Graphviz source

New Attributes, only used by twopiCircles.gvpr:
  - maxRank - set a maximum number of concentric circles (ranks).
    Ranks counted from the center, Root is not counted as a rank
  - noOffset - if true, draw circles through the center of nodes
    otherwise, draw circles between the ranks
    (i.e half-way from one rank to the next)

steveroush

/***********************************************
 1. save this file as improveEdgeLabels.gvpr
 2. what it does: it allows you to re-position Graphviz edge labels
 3. command line example (works with any Graphviz engine):
   dot myfile.gv |gvpr -cf improveEdgeLabels.gvpr |neato -n2 -Tpng >myfile.png
 4. how to use:
   improveEdgeLabels adds 3 new edge attributes to Graphviz:
   - labelOverlay, labelAdjust, label2Node
   - they can be used separately or in combination
   - if labelOverlay=true

steveroush

#!/bin/sh
cat <<QUitquIT
# This is a shell archive. 
#
# to execute this file, type:   sh keepOrder_archive.sh
# 
# On Linux/UNIX/MacOS(?) systems it is an executable program that will create 
# a subdirectory (named keepOrder) in the currect directory and then 
# install multiple (text) files in that directory.  
# This shell archive and all contents are humanly readable - no binary files.

steveroush

## set -x
## This is a Linux (and maybe MacOS?) shell script.
## It will need to be modified to run on Windows.
## It performs word-wrap (https://en.wikipedia.org/wiki/Line_wrap_and_word_wrap) on the labels of certain Graphviz nodes.
## - not html-like labels
## - not record or Mrecord shaped nodes
## - not edge labels
## - not graph or cluster labels
## - not xlabels
## - it DOES NOT recognize any meaning of TAB character (ASCII 09) or