aboutsummaryrefslogtreecommitdiffstats
path: root/Rpmdrake/icon.pm
diff options
context:
space:
mode:
authorThierry Vignaud <tv@mandriva.org>2007-02-20 14:01:04 +0000
committerThierry Vignaud <tv@mandriva.org>2007-02-20 14:01:04 +0000
commit2659811fb6c849f2a10be546fffea4eb6e505a17 (patch)
treef0735c22b7546b2d3a4a9d1e8d25e312916d6900 /Rpmdrake/icon.pm
parent70d01ff8b83dbdb88e7819bce4288152cee437c5 (diff)
downloadrpmdrake-2659811fb6c849f2a10be546fffea4eb6e505a17.tar
rpmdrake-2659811fb6c849f2a10be546fffea4eb6e505a17.tar.gz
rpmdrake-2659811fb6c849f2a10be546fffea4eb6e505a17.tar.bz2
rpmdrake-2659811fb6c849f2a10be546fffea4eb6e505a17.tar.xz
rpmdrake-2659811fb6c849f2a10be546fffea4eb6e505a17.zip
split out icon stuff into Rpmdrake::icon
Diffstat (limited to 'Rpmdrake/icon.pm')
-rwxr-xr-xRpmdrake/icon.pm198
1 files changed, 198 insertions, 0 deletions
diff --git a/Rpmdrake/icon.pm b/Rpmdrake/icon.pm
new file mode 100755
index 00000000..bdc72a70
--- /dev/null
+++ b/Rpmdrake/icon.pm
@@ -0,0 +1,198 @@
+package Rpmdrake::icon;
+#*****************************************************************************
+#
+# Copyright (c) 2002 Guillaume Cottenceau
+# Copyright (c) 2002-2007 Thierry Vignaud <tvignaud@mandriva.com>
+# Copyright (c) 2003, 2004, 2005 MandrakeSoft SA
+# Copyright (c) 2005-2007 Mandriva SA
+#
+# This program is free software; you can redistribute it and/or modify
+# it under the terms of the GNU General Public License version 2, as
+# published by the Free Software Foundation.
+#
+# This program is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+# GNU General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License
+# along with this program; if not, write to the Free Software
+# Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
+#
+#*****************************************************************************
+#
+# $Id$
+
+use strict;
+our @ISA = qw(Exporter);
+use lib qw(/usr/lib/libDrakX);
+use common;
+use mygtk2 qw(gtknew); #- do not import anything else, especially gtkadd() which conflicts with ugtk2 one
+
+our @EXPORT = qw(get_icon);
+#- /usr/share/rpmlint/config (duplicates are normal, so that we are not too far away from .py)
+my %group_icons = (
+ N("Accessibility") => 'accessibility_section',
+ N("Archiving") => 'archiving_section',
+ join('|', N("Archiving"), N("Backup")) => 'backup_section',
+ join('|', N("Archiving"), N("Cd burning")) => 'cd_burning_section',
+ join('|', N("Archiving"), N("Compression")) => 'compression_section',
+ join('|', N("Archiving"), N("Other")) => 'other_archiving',
+ N("Books") => 'documentation_section',
+ join('|', N("Books"), N("Computer books")) => 'documentation_section',
+ join('|', N("Books"), N("Faqs")) => 'documentation_section',
+ join('|', N("Books"), N("Howtos")) => 'documentation_section',
+ join('|', N("Books"), N("Literature")) => 'documentation_section',
+ join('|', N("Books"), N("Other")) => 'education_other_section',
+ N("Cluster") => 'parallel_computing_section',
+ join('|', N("Cluster"), N("Message Passing")) => '',
+ join('|', N("Cluster"), N("Queueing Services")) => '',
+ N("Communications") => 'communications_section',
+ N("Databases") => 'databases_section',
+ N("Development") => 'development_section',
+ join('|', N("Development"), N("C")) => '',
+ join('|', N("Development"), N("C++")) => '',
+ join('|', N("Development"), N("Databases")) => 'databases_section',
+ join('|', N("Development"), N("GNOME and GTK+")) => 'gnome_section',
+ join('|', N("Development"), N("Java")) => '',
+ join('|', N("Development"), N("KDE and Qt")) => 'kde_section',
+ join('|', N("Development"), N("Kernel")) => 'hardware_configuration_section',
+ join('|', N("Development"), N("Other")) => 'development_tools_section',
+ join('|', N("Development"), N("Perl")) => '',
+ join('|', N("Development"), N("PHP")) => '',
+ join('|', N("Development"), N("Python")) => '',
+ N("Editors") => 'emulators_section',
+ N("Education") => 'education_section',
+ N("Emulators") => 'emulators_section',
+ N("File tools") => 'file_tools_section',
+ N("Games") => 'amusement_section',
+ join('|', N("Games"), N("Adventure")) => 'adventure_section',
+ join('|', N("Games"), N("Arcade")) => 'arcade_section',
+ join('|', N("Games"), N("Boards")) => 'boards_section',
+ join('|', N("Games"), N("Cards")) => 'cards_section',
+ join('|', N("Games"), N("Other")) => 'other_amusement',
+ join('|', N("Games"), N("Puzzles")) => 'puzzle_section',
+ join('|', N("Games"), N("Sports")) => 'sport_section',
+ join('|', N("Games"), N("Strategy")) => 'strategy_section',
+ N("Graphical desktop") => 'office_section',
+ join('|', N("Graphical desktop"),
+ #-PO: This is a package/product name. Only translate it if needed:
+ N("Enlightenment")) => '',
+ join('|', N("Graphical desktop"), N("FVWM based")) => '',
+ join('|', N("Graphical desktop"),
+ #-PO: This is a package/product name. Only translate it if needed:
+ N("GNOME")) => 'gnome_section',
+ join('|', N("Graphical desktop"),
+ #-PO: This is a package/product name. Only translate it if needed:
+ N("Icewm")) => '',
+ join('|', N("Graphical desktop"),
+ #-PO: This is a package/product name. Only translate it if needed:
+ N("KDE")) => 'kde_section',
+ join('|', N("Graphical desktop"), N("Other")) => 'more_applications_other_section',
+ join('|', N("Graphical desktop"),
+ #-PO: This is a package/product name. Only translate it if needed:
+ N("Sawfish")) => '',
+ join('|', N("Graphical desktop"),
+ #-PO: This is a package/product name. Only translate it if needed:
+ N("WindowMaker")) => '',
+ join('|', N("Graphical desktop"),
+ #-PO: This is a package/product name. Only translate it if needed:
+ N("Xfce")) => '',
+ N("Graphics") => 'graphics_section',
+ N("Monitoring") => 'monitoring_section',
+ N("Multimedia") => 'multimedia_section',
+ join('|', N("Multimedia"), N("Video")) => 'video_section',
+ N("Networking") => 'networking_section',
+ join('|', N("Networking"), N("Chat")) => 'chat_section',
+ join('|', N("Networking"), N("File transfer")) => 'file_transfer_section',
+ join('|', N("Networking"), N("IRC")) => 'irc_section',
+ join('|', N("Networking"), N("Instant messaging")) => 'instant_messaging_section',
+ join('|', N("Networking"), N("Mail")) => 'mail_section',
+ join('|', N("Networking"), N("News")) => 'news_section',
+ join('|', N("Networking"), N("Other")) => 'other_networking',
+ join('|', N("Networking"), N("Remote access")) => 'remote_access_section',
+ join('|', N("Networking"), N("WWW")) => 'networking_www_section',
+ N("Office") => 'office_section',
+ N("Public Keys") => 'packaging_section',
+ N("Publishing") => 'publishing_section',
+ N("Sciences") => 'sciences_section',
+ join('|', N("Sciences"), N("Astronomy")) => 'astronomy_section',
+ join('|', N("Sciences"), N("Biology")) => 'biology_section',
+ join('|', N("Sciences"), N("Chemistry")) => 'chemistry_section',
+ join('|', N("Sciences"), N("Computer science")) => 'computer_science_section',
+ join('|', N("Sciences"), N("Geosciences")) => 'geosciences_section',
+ join('|', N("Sciences"), N("Mathematics")) => 'mathematics_section',
+ join('|', N("Sciences"), N("Other")) => 'other_sciences',
+ join('|', N("Sciences"), N("Physics")) => 'physics_section',
+ N("Shells") => 'shells_section',
+ N("Sound") => 'sound_section',
+ N("System") => 'system_section',
+ join('|', N("System"), N("Base")) => 'system_section',
+ join('|', N("System"), N("Configuration")) => 'configuration_section',
+ join('|', N("System"), N("Configuration"), N("Boot and Init")) => 'boot_init_section',
+ join('|', N("System"), N("Configuration"), N("Hardware")) => 'hardware_configuration_section',
+ join('|', N("System"), N("Configuration"), N("Networking")) => 'networking_configuration_section',
+ join('|', N("System"), N("Configuration"), N("Other")) => 'system_other_section',
+ join('|', N("System"), N("Configuration"), N("Packaging")) => 'packaging_section',
+ join('|', N("System"), N("Configuration"), N("Printing")) => 'printing_section',
+ join('|', N("System"), N("Deploiement")) => '',
+ join('|', N("System"), N("Deployment")) => '',
+ join('|', N("System"), N("Fonts")) => 'chinese_section',
+ join('|', N("System"), N("Fonts"), N("Console")) => 'interpreters_section',
+ join('|', N("System"), N("Fonts"), N("True type")) => '',
+ join('|', N("System"), N("Fonts"), N("Type1")) => '',
+ join('|', N("System"), N("Fonts"), N("X11 bitmap")) => '',
+ join('|', N("System"), N("Internationalization")) => 'chinese_section',
+ join('|', N("System"), N("Kernel and hardware")) => 'hardware_configuration_section',
+ join('|', N("System"), N("Libraries")) => '',
+ join('|', N("System"), N("Servers")) => '',
+ join('|', N("System"),
+ #-PO: This is a package/product name. Only translate it if needed:
+ N("X11")) => '',
+ N("Terminals") => 'terminals_section',
+ N("Text tools") => 'text_tools_section',
+ N("Toys") => 'toys_section',
+ N("Video") => 'video_section',
+
+ # for Mandriva Choice:
+ N("Workstation") => 'office_section',
+ join('|', N("Workstation"), N("Configuration")) => 'configuration_section',
+ join('|', N("Workstation"), N("Console Tools")) => 'interpreters_section',
+ join('|', N("Workstation"), N("Documentation")) => 'documentation_section',
+ join('|', N("Workstation"), N("Game station")) => 'amusement_section',
+ join('|', N("Workstation"), N("Internet station")) => 'networking_section',
+ join('|', N("Workstation"), N("Multimedia station")) => 'multimedia_section',
+ join('|', N("Workstation"), N("Network Computer (client)")) => 'other_networking',
+ join('|', N("Workstation"), N("Office Workstation")) => 'office_section',
+ join('|', N("Workstation"), N("Scientific Workstation")) => 'sciences_section',
+ N("Graphical Environment") => 'office_section',
+
+ join('|', N("Graphical Environment"), N("GNOME Workstation")) => 'gnome_section',
+ join('|', N("Graphical Environment"), N("IceWm Desktop")) => 'icewm',
+ join('|', N("Graphical Environment"), N("KDE Workstation")) => 'kde_section',
+ join('|', N("Graphical Environment"), N("Other Graphical Desktops")) => 'more_applications_other_section',
+ N("Development") => 'development_section',
+ join('|', N("Development"), N("Development")) => 'development_section',
+ join('|', N("Development"), N("Documentation")) => 'documentation_section',
+ N("Server") => 'archiving_section',
+ join('|', N("Server"), N("DNS/NIS")) => 'networking_section',
+ join('|', N("Server"), N("Database")) => 'databases_section',
+ join('|', N("Server"), N("Firewall/Router")) => 'networking_section',
+ join('|', N("Server"), N("Mail")) => 'mail_section',
+ join('|', N("Server"), N("Mail/Groupware/News")) => 'mail_section',
+ join('|', N("Server"), N("Network Computer server")) => 'networking_section',
+ join('|', N("Server"), N("Web/FTP")) => 'networking_www_section',
+
+ );
+
+sub get_icon {
+ my ($group, $parent) = @_;
+ my $pixbuf;
+ my $path = $group =~ /\|/ ? '/usr/share/icons/mini/' : '/usr/share/icons/';
+ my $create_pixbuf = sub { gtknew('Pixbuf', file => join('', $path, $_[0], '.png')) };
+ eval { $pixbuf = $create_pixbuf->($group_icons{$group}) };
+ eval { $pixbuf ||= $create_pixbuf->($group_icons{$parent}) } if $parent;
+ $pixbuf ||= $create_pixbuf->('applications_section');
+}
+
+1;