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