| ... | ... |
@@ -0,0 +1,113 @@ |
| 1 |
+#!/usr/bin/awk -f |
|
| 2 |
+function list_pkgs (type, label, test) {
|
|
| 3 |
+ count = 0 |
|
| 4 |
+ for (p in pkg) |
|
| 5 |
+ if (pkg[p][type]) {
|
|
| 6 |
+ count++ |
|
| 7 |
+ } |
|
| 8 |
+ if (count) {
|
|
| 9 |
+ if (label) print count " paquets " label |
|
| 10 |
+ n = asorti(pkg, pkg_sorted) |
|
| 11 |
+ for (i = 1; i <= n; i++) {
|
|
| 12 |
+ p = pkg_sorted[i] |
|
| 13 |
+ pkg_ok = 0 |
|
| 14 |
+ if (test) {
|
|
| 15 |
+ if (pkg[p][type] && pkg[p][test]) |
|
| 16 |
+ pkg_ok = 1 |
|
| 17 |
+ } |
|
| 18 |
+ else {
|
|
| 19 |
+ if (pkg[p][type]) |
|
| 20 |
+ pkg_ok = 1 |
|
| 21 |
+ } |
|
| 22 |
+ if (pkg_ok) {
|
|
| 23 |
+ if (label) print " -> " p |
|
| 24 |
+ delete pkg[p] |
|
| 25 |
+ } |
|
| 26 |
+ } |
|
| 27 |
+ } |
|
| 28 |
+} |
|
| 29 |
+ |
|
| 30 |
+function show_help_and_exit (exitcode) {
|
|
| 31 |
+ print "USAGE" |
|
| 32 |
+ print ENVIRON["_"] " [date formattée] [[-]stdin] [help]\n" |
|
| 33 |
+ print "OPTIONS" |
|
| 34 |
+ print " date : format 20AA-MM-JJ" |
|
| 35 |
+ print " défaut: date du jour\n" |
|
| 36 |
+ print " -stdin, stdin : lit depuis l'entrée standard" |
|
| 37 |
+ print " défaut: lit /var/log/dpkg.log\n" |
|
| 38 |
+ print " help : affiche cette aide et quitte" |
|
| 39 |
+ exit exitcode |
|
| 40 |
+} |
|
| 41 |
+ |
|
| 42 |
+BEGIN {
|
|
| 43 |
+ installed = "installed" |
|
| 44 |
+ remove = "remove" |
|
| 45 |
+ upgrade = "upgrade" |
|
| 46 |
+ notinstalled = "not-installed" |
|
| 47 |
+ trigproc = "trigproc" |
|
| 48 |
+ errors = 0 |
|
| 49 |
+ datefound = 0 |
|
| 50 |
+ filename = "/var/log/dpkg.log" |
|
| 51 |
+ |
|
| 52 |
+ for (i = 1; i < ARGC; i++) |
|
| 53 |
+ switch (ARGV[i]) {
|
|
| 54 |
+ case /^-?stdin$/: |
|
| 55 |
+ filename = "-" |
|
| 56 |
+ break |
|
| 57 |
+ case /^20[0-9]{2}-[0-9]{2}-[0-9]{2}$/:
|
|
| 58 |
+ date = ARGV[i] |
|
| 59 |
+ break |
|
| 60 |
+ case "help": |
|
| 61 |
+ show_help_and_exit(0) |
|
| 62 |
+ default: |
|
| 63 |
+ print ARGV[i] " : option inconnue" |
|
| 64 |
+ show_help_and_exit(1) |
|
| 65 |
+ } |
|
| 66 |
+ |
|
| 67 |
+ if (date == "") |
|
| 68 |
+ date = strftime("%F")
|
|
| 69 |
+ |
|
| 70 |
+ while ((getline < filename) == 1) {
|
|
| 71 |
+ if ($1 == date) {
|
|
| 72 |
+ datefound = 1 |
|
| 73 |
+ switch ($3) {
|
|
| 74 |
+ case "status": |
|
| 75 |
+ pkg[$5][$4] = $NF |
|
| 76 |
+ break |
|
| 77 |
+ case "upgrade": |
|
| 78 |
+ pkg[$4][upgrade] = $NF |
|
| 79 |
+ break |
|
| 80 |
+ case "remove": |
|
| 81 |
+ pkg[$4][remove]++ |
|
| 82 |
+ break |
|
| 83 |
+ case "trigproc": |
|
| 84 |
+ pkg[$4][trigproc]++ |
|
| 85 |
+ break |
|
| 86 |
+ case "configure": |
|
| 87 |
+ default: |
|
| 88 |
+ break |
|
| 89 |
+ } |
|
| 90 |
+ } |
|
| 91 |
+ } |
|
| 92 |
+ |
|
| 93 |
+ if (! datefound) {
|
|
| 94 |
+ printf("date %s non trouvée %s\n", date, filename != "-" ? "dans " filename : "")
|
|
| 95 |
+ exit 1 |
|
| 96 |
+ } |
|
| 97 |
+ |
|
| 98 |
+ list_pkgs(trigproc, "", installed) # pas d'affichage si OK |
|
| 99 |
+ list_pkgs(upgrade, "mis à jour", installed) |
|
| 100 |
+ list_pkgs(remove, "supprimés", notinstalled) |
|
| 101 |
+ list_pkgs(installed, "nouvellement installés") |
|
| 102 |
+ |
|
| 103 |
+ count = 0 |
|
| 104 |
+ for (p in pkg) |
|
| 105 |
+ count++ |
|
| 106 |
+ if (count) |
|
| 107 |
+ print count " erreurs" |
|
| 108 |
+ for (p in pkg) {
|
|
| 109 |
+ status = "" |
|
| 110 |
+ for (s in pkg[p]) if (pkg[p][s]) status = status " " s |
|
| 111 |
+ print " -> " p " (" gensub(" ", "", 1, status) ")"
|
|
| 112 |
+ } |
|
| 113 |
+} |