Changeset 157

Timestamp:

12/21/10 03:29:56 (13 years ago)

Author:

nanardon

Message:

• add byfilename functions to Search/Rpms?

File:

• server/trunk/web/lib/Sophie/Controller/Search/Rpms.pm (modified) (2 diffs)

server/trunk/web/lib/Sophie/Controller/Search/Rpms.pm

@@ -53 +53 @@
             },
             {
-                select => [qw(filename pkgid name version arch label) ],
-                as => [qw(filename pkgid distribution release arch media) ],
+                select => [qw(filename pkgid name shortname version arch label) ],
+                as => [qw(filename pkgid distribution dist release arch media) ],
                 rows => $searchspec->{rows} || 10000,
                 order_by => [ 'Rpmfiles.added desc' ],
@@ -155 +155 @@
 }
 
+sub byfilename : Private {
+    my ( $self, $c, $searchspec, $file ) = @_;
+    $searchspec ||= {};
+
+    return $c->stash->{xmlrpc} = [
+        map {
+            { 
+            $_->get_columns
+            }
+        }
+        $c->forward('byfilename_rpc', [ $searchspec, $file ])->all ];
+}
+
+sub byfilename_rpc : XMLRPCPath('byfilename') {
+    my ( $self, $c, $searchspec, $file ) = @_;
+    $searchspec ||= {};
+
+    $c->stash->{rs} =
+        $c->forward('rpms_rs')->search(
+        {
+            filename => { LIKE => $file },
+        },
+        {
+            order_by => [ qw(filename) ],
+        }
+    );
+}
+
 =head1 AUTHOR