package Rpmdrake::icon; #***************************************************************************** # # Copyright (c) 2002 Guillaume Cottenceau # Copyright (c) 2002-2007 Thierry Vignaud # 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: icon.pm 237459 2008-02-26 14:20:47Z tv $ 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("All") => 'system_section', 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("Communications") => 'communications_section', join('|', N("Communications"), N("Bluetooth")) => 'communications_section', join('|', N("Communications"), N("Bluetooth")) => 'communications_section', join('|', N("Communications"), N("Dial-Up")) => 'communications_section', join('|', N("Communications"), N("Fax")) => 'communications_section', join('|', N("Communications"), N("Mobile")) => 'communications_section', join('|', N("Communications"), N("Radio")) => 'communications_section', join('|', N("Communications"), N("Serial")) => 'communications_section', join('|', N("Communications"), N("Telephony")) => 'communications_section', N("Databases") => 'databases_section', N("Development") => 'development_section', join('|', N("Development"), N("Basic")) => '', join('|', N("Development"), N("C")) => '', join('|', N("Development"), N("C++")) => '', join('|', N("Development"), N("C#")) => '', join('|', N("Development"), N("Databases")) => 'databases_section', join('|', N("Development"), N("Erlang")) => '', 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("OCaml")) => '', join('|', N("Development"), N("Other")) => 'development_tools_section', join('|', N("Development"), N("Perl")) => '', join('|', N("Development"), N("PHP")) => '', join('|', N("Development"), N("Python")) => '', join('|', N("Development"), N("Tools")) => '', join('|', N("Development"), N("X11")) => 'office_section', N("Documentation") => 'documentation_section', 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("Shooter")) => 'other_amusement', join('|', N("Games"), N("Sports")) => 'sport_section', join('|', N("Games"), N("Strategy")) => 'strategy_section', N("Geography") => 'geosciences_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', join('|', N("Graphics"), N("3D")) => '', join('|', N("Graphics"), N("Editors")) => '', join('|', N("Graphics"), N("Other")) => '', join('|', N("Graphics"), N("Photography")) => '', join('|', N("Graphics"), N("Scanning")) => '', join('|', N("Graphics"), N("Viewers")) => '', 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', join('|', N("Office"), N("Dictionary")) => '', join('|', N("Office"), N("Finance")) => '', join('|', N("Office"), N("Management")) => '', join('|', N("Office"), N("Organizer")) => '', join('|', N("Office"), N("Other")) => '', join('|', N("Office"), N("Spreadsheet")) => '', join('|', N("Office"), N("Suite")) => '', join('|', N("Office"), N("Word processor")) => '', N("Public Keys") => 'packaging_section', N("Publishing") => 'publishing_section', N("Security") => 'packaging_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', join('|', N("Sound"), N("Editors and Converters")) => '', join('|', N("Sound"), N("Midi")) => '', join('|', N("Sound"), N("Mixers")) => '', join('|', N("Sound"), N("Players")) => '', join('|', N("Sound"), N("Utilities")) => '', join('|', N("Sound"), N("Visualization")) => '', N("System") => 'system_section', join('|', N("System"), N("Base")) => 'system_section', join('|', N("System"), N("Cluster")) => 'parallel_computing_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("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("Printing")) => 'printing_section', join('|', N("System"), N("Servers")) => '', join('|', N("System"), #-PO: This is a package/product name. Only translate it if needed: N("X11")) => 'office_section', N("Terminals") => 'terminals_section', N("Text tools") => 'text_tools_section', N("Toys") => 'toys_section', N("Video") => 'video_section', join('|', N("Video"), N("Editors and Converters")) => '', join('|', N("Video"), N("Players")) => '', join('|', N("Video"), N("Utilities")) => '', # for Mageia 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, $o_parent) = @_; my $pixbuf; my $path = $group =~ /\|/ ? '/usr/share/icons/mini/' : '/usr/share/icons/'; my $create_pixbuf = sub { eval { gtknew('Pixbuf', file => join('', $path, $_[0], '.png')) } }; $pixbuf = $create_pixbuf->($group_icons{$group}); $pixbuf ||= $create_pixbuf->($group_icons{$o_parent}) if $o_parent; $pixbuf ||= $create_pixbuf->('applications_section'); } 1;