merge_help.awk revision 1.1.2.2
1 1.1.2.2 yamt #!/usr/bin/awk -f 2 1.1.2.2 yamt # 3 1.1.2.2 yamt # $FreeBSD$ 4 1.1.2.2 yamt # 5 1.1.2.2 yamt # Merge two boot loader help files for FreeBSD 3.0 6 1.1.2.2 yamt # Joe Abley <jabley (at] patho.gen.nz> 7 1.1.2.2 yamt 8 1.1.2.2 yamt BEGIN \ 9 1.1.2.2 yamt { 10 1.1.2.2 yamt state = 0; 11 1.1.2.2 yamt first = -1; 12 1.1.2.2 yamt ind = 0; 13 1.1.2.2 yamt } 14 1.1.2.2 yamt 15 1.1.2.2 yamt # beginning of first command 16 1.1.2.2 yamt /^###/ && (state == 0) \ 17 1.1.2.2 yamt { 18 1.1.2.2 yamt state = 1; 19 1.1.2.2 yamt next; 20 1.1.2.2 yamt } 21 1.1.2.2 yamt 22 1.1.2.2 yamt # entry header 23 1.1.2.2 yamt /^# T[[:graph:]]+ (S[[:graph:]]+ )*D[[:graph:]][[:print:]]*$/ && (state == 1) \ 24 1.1.2.2 yamt { 25 1.1.2.2 yamt match($0, " T[[:graph:]]+"); 26 1.1.2.2 yamt T = substr($0, RSTART + 2, RLENGTH - 2); 27 1.1.2.2 yamt match($0, " S[[:graph:]]+"); 28 1.1.2.2 yamt S = (RLENGTH == -1) ? "" : substr($0, RSTART + 2, RLENGTH - 2); 29 1.1.2.2 yamt match($0, " D[[:graph:]][[:print:]]*$"); 30 1.1.2.2 yamt D = substr($0, RSTART + 2); 31 1.1.2.2 yamt 32 1.1.2.2 yamt # find a suitable place to store this one... 33 1.1.2.2 yamt ind++; 34 1.1.2.2 yamt if (ind == 1) 35 1.1.2.2 yamt { 36 1.1.2.2 yamt first = ind; 37 1.1.2.2 yamt help[ind, "T"] = T; 38 1.1.2.2 yamt help[ind, "S"] = S; 39 1.1.2.2 yamt help[ind, "link"] = -1; 40 1.1.2.2 yamt } else { 41 1.1.2.2 yamt i = first; j = -1; 42 1.1.2.2 yamt while (help[i, "T"] help[i, "S"] < T S) 43 1.1.2.2 yamt { 44 1.1.2.2 yamt j = i; 45 1.1.2.2 yamt i = help[i, "link"]; 46 1.1.2.2 yamt if (i == -1) break; 47 1.1.2.2 yamt } 48 1.1.2.2 yamt 49 1.1.2.2 yamt if (i == -1) 50 1.1.2.2 yamt { 51 1.1.2.2 yamt help[j, "link"] = ind; 52 1.1.2.2 yamt help[ind, "link"] = -1; 53 1.1.2.2 yamt } else { 54 1.1.2.2 yamt help[ind, "link"] = i; 55 1.1.2.2 yamt if (j == -1) 56 1.1.2.2 yamt first = ind; 57 1.1.2.2 yamt else 58 1.1.2.2 yamt help[j, "link"] = ind; 59 1.1.2.2 yamt } 60 1.1.2.2 yamt } 61 1.1.2.2 yamt help[ind, "T"] = T; 62 1.1.2.2 yamt help[ind, "S"] = S; 63 1.1.2.2 yamt help[ind, "D"] = D; 64 1.1.2.2 yamt 65 1.1.2.2 yamt # set our state 66 1.1.2.2 yamt state = 2; 67 1.1.2.2 yamt help[ind, "text"] = 0; 68 1.1.2.2 yamt next; 69 1.1.2.2 yamt } 70 1.1.2.2 yamt 71 1.1.2.2 yamt # end of last command, beginning of next one 72 1.1.2.2 yamt /^###/ && (state == 2) \ 73 1.1.2.2 yamt { 74 1.1.2.2 yamt state = 1; 75 1.1.2.2 yamt } 76 1.1.2.2 yamt 77 1.1.2.2 yamt (state == 2) \ 78 1.1.2.2 yamt { 79 1.1.2.2 yamt sub("[[:blank:]]+$", ""); 80 1.1.2.2 yamt if (help[ind, "text"] == 0 && $0 ~ /^[[:blank:]]*$/) next; 81 1.1.2.2 yamt help[ind, "text", help[ind, "text"]] = $0; 82 1.1.2.2 yamt help[ind, "text"]++; 83 1.1.2.2 yamt next; 84 1.1.2.2 yamt } 85 1.1.2.2 yamt 86 1.1.2.2 yamt # show them what we have (it's already sorted in help[]) 87 1.1.2.2 yamt END \ 88 1.1.2.2 yamt { 89 1.1.2.2 yamt node = first; 90 1.1.2.2 yamt while (node != -1) 91 1.1.2.2 yamt { 92 1.1.2.2 yamt printf "################################################################################\n"; 93 1.1.2.2 yamt printf "# T%s ", help[node, "T"]; 94 1.1.2.2 yamt if (help[node, "S"] != "") printf "S%s ", help[node, "S"]; 95 1.1.2.2 yamt printf "D%s\n\n", help[node, "D"]; 96 1.1.2.2 yamt for (i = 0; i < help[node, "text"]; i++) 97 1.1.2.2 yamt printf "%s\n", help[node, "text", i]; 98 1.1.2.2 yamt node = help[node, "link"]; 99 1.1.2.2 yamt } 100 1.1.2.2 yamt printf "################################################################################\n"; 101 1.1.2.2 yamt } 102
Indexes created Wed Oct 01 18:09:54 GMT 2025