File: realign.sh 1 #!/bin/sh 2 3 # The MIT License (MIT) 4 # 5 # Copyright © 2020-2025 pacman64 6 # 7 # Permission is hereby granted, free of charge, to any person obtaining a copy 8 # of this software and associated documentation files (the “Software”), to deal 9 # in the Software without restriction, including without limitation the rights 10 # to use, copy, modify, merge, publish, distribute, sublicense, and/or sell 11 # copies of the Software, and to permit persons to whom the Software is 12 # furnished to do so, subject to the following conditions: 13 # 14 # The above copyright notice and this permission notice shall be included in 15 # all copies or substantial portions of the Software. 16 # 17 # THE SOFTWARE IS PROVIDED “AS IS”, WITHOUT WARRANTY OF ANY KIND, EXPRESS OR 18 # IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, 19 # FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE 20 # AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER 21 # LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, 22 # OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE 23 # SOFTWARE. 24 25 26 # realign [filenames...] 27 # 28 # Realign all detected columns, right-aligning any detected numbers in any 29 # column. 30 31 32 case "$1" in 33 -h|--h|-help|--help) 34 awk '/^# +realign /, /^$/ { gsub(/^# ?/, ""); print }' "$0" 35 exit 0 36 ;; 37 esac 38 39 40 awk ' 41 function match_number(v) { 42 return match(v, /^[+-]?[0-9]+(\.[0-9]+)?$/) 43 } 44 45 function match_dot_digits(v) { 46 return match(v, /\.[0-9]+$/) 47 } 48 49 { gsub(/\r$/, "") } 50 51 FNR == 1 { 52 FS = ($0 ~ /\t/) ? "\t" : " " 53 $0 = $0 54 } 55 56 { 57 for (i = 1; i <= NF; i++) { 58 data[NR][i] = $i 59 60 if (match_number($i)) { 61 if (match_dot_digits($i)) { 62 dd = RLENGTH 63 if (dot_decs[i] < dd) dot_decs[i] = dd 64 iw = RSTART - 1 65 if (int_widths[i] < iw) int_widths[i] = iw 66 } else { 67 w = length($i) 68 if (int_widths[i] < w) int_widths[i] = w 69 } 70 71 continue 72 } 73 74 w = length($i) 75 if (widths[i] < w) widths[i] = w 76 } 77 } 78 79 END { 80 # fix column-widths using the number-padding info 81 for (i = 1; i <= NF; i++) { 82 w = int_widths[i] + dot_decs[i] 83 if (widths[i] < w) widths[i] = w 84 } 85 86 for (i = 1; i <= NR; i++) { 87 last = length(data[i]) 88 89 for (j = 1; j <= last; j++) { 90 if (j > 1) printf " " # put 2-space gaps between columns 91 92 v = data[i][j] 93 94 if (!match_number(v)) { 95 # avoid adding trailing spaces at the end of lines 96 printf "%*s", (j == last) ? 0 : -widths[j], v 97 continue 98 } 99 100 w = length(v) 101 if (match_dot_digits(v)) { 102 dd = RLENGTH 103 iw = RSTART - 1 104 } else { 105 dd = 0 106 iw = w 107 } 108 109 dpad = dot_decs[j] - dd 110 ipad = int_widths[j] - iw 111 if (ipad < 0) ipad = 0 112 lpad = widths[j] - (ipad + w + dpad) 113 if (lpad < 0) lpad = 0 114 115 # avoid adding trailing spaces at the end of lines 116 if (j == last) dpad = 0 117 118 printf "%*s%*s%s%*s", lpad, "", ipad, "", v, dpad, "" 119 } 120 121 printf "\n" 122 } 123 } 124 ' "$@"