💾 Archived View for gmi.noulin.net › gitRepositories › ervy › file › bullet.c.gmi captured on 2024-07-09 at 00:17:05. Gemini links have been rewritten to link to archived content
⬅️ Previous capture (2023-01-29)
-=-=-=-=-=-=-
bullet.c (2167B)
1 2 #include "bullet.h" 3 #include "math.h" 4 #include "limits.h" 5 6 char *bullet(char *data, char *opts) { 7 var dat = verifyData(data); 8 if (!dat) ret NULL; 9 10 createSmallJson(newOpts); 11 parseG(&newOpts, "{\ 12 barWidth: 1,\ 13 left: 1,\ 14 width: 20,\ 15 padding: 1,\ 16 style: '*'\ 17 }"); 18 19 createAllocateSmallJson(oopts); 20 if (opts) { 21 parseG(oopts, opts); 22 } 23 24 mergeNSmashG(&newOpts, oopts); 25 26 var barWidth = getG(&newOpts, rtI64, "barWidth"); 27 var left = getG(&newOpts, rtI64, "left"); 28 var width = getG(&newOpts, rtI64, "width"); 29 var padding = getG(&newOpts, rtI64, "padding"); 30 var style = getG(&newOpts, rtChar, "style"); 31 32 var result = repeatS(PAD, left); 33 34 35 createSmallArray(values); 36 37 iter(dat, V) { 38 cast(smallDictt*, v, V); 39 pushG(&values, getNumG(v, "value")); 40 } 41 42 var max = getG(&values, rtF64, 0); 43 44 range(i, lenG(&values)) { 45 max = maxV(max, getNumG(&values, i)); 46 } 47 var maxKeyLength = maxKeyLen(dat); 48 var valLength = lenG(dat); 49 50 range(i, valLength) { 51 var tmp = getG(dat, rtSmallDictt, i); 52 var ratioLength = round(width * getNumG(tmp, "value") / max); 53 54 var padChar = style; 55 if (hasG(tmp, "style")) padChar = getG(tmp, rtChar, "style"); 56 57 var pads = repeatS(padChar, ratioLength); 58 var pad = repeatS(PAD, left); 59 var line = catS(pads, EOL, pad); 60 freeManyS(pads, pad); 61 62 var key = getNDupG(tmp, rtChar, "key"); 63 iPadStartS(&key, maxKeyLength, PAD); 64 iAppendManyS(&result, key, PAD); 65 free(key); 66 67 var curBarWidth = barWidth; 68 if (hasG(tmp, "barWidth")) curBarWidth = getG(tmp, rtI64, "barWidth"); 69 70 range(j, curBarWidth) { 71 if (j > 0) { 72 var pad = repeatS(PAD, maxKeyLength + 1); 73 iAppendManyS(&result, pad, line); 74 free(pad); 75 } 76 else { 77 iAppendS(&result, line); 78 } 79 } 80 81 free(line); 82 83 if (i != valLength - 1) { 84 var eol = repeatS(EOL, padding); 85 var pad = repeatS(PAD, left); 86 iAppendManyS(&result, eol, pad); 87 freeManyS(eol,pad); 88 } 89 90 finishG(tmp); 91 } 92 93 94 freeManyG(&newOpts, &values); 95 terminateG(dat); 96 97 ret result; 98 } 99 // vim: set expandtab ts=2 sw=2: