From b25a5b794be7093dbcd556fcab2ebc50bb33e8b2 Mon Sep 17 00:00:00 2001
From: Anton Bobov <anton@bobov.name>
Date: Sun, 30 Jan 2022 21:03:14 +0500
Subject: Updates.

---
 packages-by-component | 28 ++++++++++++++++++++++++++++
 1 file changed, 28 insertions(+)
 create mode 100755 packages-by-component

(limited to 'packages-by-component')

diff --git a/packages-by-component b/packages-by-component
new file mode 100755
index 0000000..b4ab600
--- /dev/null
+++ b/packages-by-component
@@ -0,0 +1,28 @@
+#!/bin/bash
+
+set -e
+
+print_help() {
+  cat <<EOF
+Usage: $(basename "$0") COMPONENT
+
+COMPONENT - name of component (ex.: contrib, non-free)
+EOF
+  exit 1
+}
+
+list_installed() {
+    dpkg -l | grep '^ii' | cut -d ' ' -f 3 | cut -d ':' -f 1 | sort -u
+}
+
+list_packages() {
+  component="$1"
+  grep '^Package:' /var/lib/apt/lists/*_"${component}"_*Packages | cut -d ' ' -f 2 | sort -u
+
+}
+
+if [ $# -lt 1 ] ; then
+  print_help
+fi
+
+comm -12 <(list_installed) <(list_packages "$1")
-- 
cgit v1.2.3