From 472cd881bd9d799ef3680ed0c65a40ca2007ac2b Mon Sep 17 00:00:00 2001
From: Nicolas Vigier <boklm@mageia.org>
Date: Mon, 17 Jun 2013 20:48:45 +0000
Subject: Add support for filters on list command

Possible filters are :
 - advisory type
 - distribution release
 - package name
 - CVE
 - media
---
 mgaadv | 30 ++++++++++++++++++++++++++----
 1 file changed, 26 insertions(+), 4 deletions(-)

(limited to 'mgaadv')

diff --git a/mgaadv b/mgaadv
index afbe8dd..e2ed080 100755
--- a/mgaadv
+++ b/mgaadv
@@ -21,9 +21,30 @@ END
         run   => \&listadv,
         descr => 'List advisories',
         usage => <<END,
-$0 list
+$0 list [filter...]
+
+Print the list of published advisories. Optionally you can filter the
+list with one or more filters. Possible filters are :
+- advisory type
+- distribution release
+- package name
+- CVE
+- media
+
+Examples :
+ 
+ list advisories for package wireshark :
+ \$ mgaadv list wireshark
+
+ list security advisories for package wireshark :
+ \$ mgaadv list security wireshark
+
+ list advisories for CVE CVE-2013-3560
+ \$ mgaadv list CVE-2013-3560
+
+ list advisories for Mageia 2 in media tainted :
+ \$ mgaadv list 2 tainted
 
-Print the list of published advisories
 END
     },
     mksite => {
@@ -147,10 +168,11 @@ sub publish {
 }
 
 sub listadv {
-    usageexit('usage', $_[0]) unless @_ == 1;
+    shift;
     my %advdb;
     $advdb{advisories} = MGA::Advisories::get_advisories();
-    MGA::Advisories::listadv(\%advdb);
+    MGA::Advisories::sort_advisories(\%advdb) if @_;
+    MGA::Advisories::listadv(\%advdb, @_);
 }
 
 sub showadv {
-- 
cgit v1.2.1