Gecko [ tanishkshah.com ]

Linux evo.fastest-server.com 5.14.0-284.1101.el9.tuxcare.11.els11.x86_64 #1 SMP PREEMPT_DYNAMIC Fri Aug 14 13:30:35 UTC 2026 x86_64
LiteSpeed
Server IP : 103.249.112.113 & Your IP : 216.73.217.135
Domains : 988 Domain
User : tanishks

Name	Size	Permission	Date
addedges	291 B	-rw-r--r--	2024-04-03 11:16
addranks	830 B	-rw-r--r--	2024-04-03 11:16
addrings	1.29 KB	-rw-r--r--	2024-04-03 11:16
anon	422 B	-rw-r--r--	2024-04-03 11:16
attr	151 B	-rw-r--r--	2024-04-03 11:16
bb	997 B	-rw-r--r--	2024-04-03 11:16
bbox	532 B	-rw-r--r--	2024-04-03 11:16
binduce	1.14 KB	-rw-r--r--	2024-04-03 11:16
bipart	455 B	-rw-r--r--	2024-04-03 11:16
chkclusters	532 B	-rw-r--r--	2024-04-03 11:16
chkedges	916 B	-rw-r--r--	2024-04-03 11:16
cliptree	178 B	-rw-r--r--	2024-04-03 11:16
col	601 B	-rw-r--r--	2024-04-03 11:16
collapse	469 B	-rw-r--r--	2024-04-03 11:16
color	1.41 KB	-rw-r--r--	2024-04-03 11:16
cycle	560 B	-rw-r--r--	2024-04-03 11:16
dechain	264 B	-rw-r--r--	2024-04-03 11:16
deghist	351 B	-rw-r--r--	2024-04-03 11:16
deledges	116 B	-rw-r--r--	2024-04-03 11:16
delmulti	397 B	-rw-r--r--	2024-04-03 11:16
delnodes	249 B	-rw-r--r--	2024-04-03 11:16
depath	547 B	-rw-r--r--	2024-04-03 11:16
dijkstra	647 B	-rw-r--r--	2024-04-03 11:16
flatten	88 B	-rw-r--r--	2024-04-03 11:16
get-layers-list	277 B	-rw-r--r--	2024-04-03 11:16
group	791 B	-rw-r--r--	2024-04-03 11:16
histogram	319 B	-rw-r--r--	2024-04-03 11:16
indent	378 B	-rw-r--r--	2024-04-03 11:16
knbhd	1.2 KB	-rw-r--r--	2024-04-03 11:16
maxdeg	307 B	-rw-r--r--	2024-04-03 11:16
path	449 B	-rw-r--r--	2024-04-03 11:16
rotate	1.17 KB	-rw-r--r--	2024-04-03 11:16
scale	1.12 KB	-rw-r--r--	2024-04-03 11:16
scalexy	1.1 KB	-rw-r--r--	2024-04-03 11:16
span	139 B	-rw-r--r--	2024-04-03 11:16
topon	429 B	-rw-r--r--	2024-04-03 11:16
treetoclust	988 B	-rw-r--r--	2024-04-03 11:16

Rename

/* Given node name and angle, rotate a layout using the given
 * node as origin.
 */

BEGIN {
  double x,y;
  double x0,y0;
  double x1,y1;
  double angle, cosa, sina;
  int cnt, sz;

void rotate (double a, double b) {
    a -= x0;
    b -= y0;
    x1 = a*cosa - b*sina;
    y1 = a*sina + b*cosa;
  }
  char* rotateE (char* p) {
    char* newpos = "";
    cnt = sscanf (p, "e,%lf,%lf%n", &x, &y, &sz);
    if (cnt == 2) {
      rotate (x,y);
      newpos = newpos + sprintf ("e%lf,%lf ", x1, y1);
      p = substr(p, sz);
    }
    cnt = sscanf (p, "s,%lf,%lf%n", &x, &y, &sz);
    if (cnt == 2) {
      rotate (x,y);
      newpos = newpos + sprintf ("s%lf,%lf ", x1, y1);
      p = substr(p, sz);
    }

while (sscanf (p, "%lf,%lf%n", &x, &y, &sz) == 2) {
      rotate (x,y);
      newpos = newpos + sprintf ("%lf,%lf ", x1, y1);
      p = substr(p, sz);
    }

return newpos;
  }
}

BEG_G {
  node_t ctr = node ($, ARGV[0]);

sscanf (ARGV[1], "%f", &angle);
  cosa = cos(angle);
  sina = sin(angle);

sscanf (ctr.pos, "%f,%f", &x0, &y0);
  $.bb ="";
}
N {
  sscanf ($.pos, "%f,%f", &x, &y);
  rotate (x,y);
  $.pos = sprintf ("%f,%f", x1, y1);
}
E {
  $.pos = rotateE($.pos);
}