gbackground-1.3/0000755000175000017500000000000011443175642013134 5ustar mogaalmogaalgbackground-1.3/gbackground0000755000175000017500000001412611443175602015350 0ustar mogaalmogaal#!/usr/bin/perl use strict; use Gtk2 -init; use Gtk2::GladeXML; use UI::Dialog; use UI::Dialog::Backend::Zenity; use Switch; use YAML; ## Variables Declaration my($config, $program, $main_window, $exit_button, $label_number_of_seconds, $label_status, $about_window, $about, $preferences_window, $filechooserbutton, $file_choose); my(@status, $path, $last_background); my $path = "$ENV{HOME}/.gbackground"; my $configfile = "$path/gbackground.yml"; ## From Preferences window my($return_value_widget, $type_of_change_widget); load_config(); &trash; ## Loading from UI::Dialog my $window_dialogs = new UI::Dialog::Backend::Zenity(title => "Gbackground", height => 45, width => 50, listheight => 5, order => [ 'zenity', 'xdialog', 'gdialog'] ); # Loading a window if (-e 'glade/gbackground.glade'){ $program = Gtk2::GladeXML->new('glade/gbackground.glade'); } else { $program = Gtk2::GladeXML->new('/usr/share/gbackground/gbackground.glade'); } # Window loading &load_widgets; # Signals $program->signal_autoconnect_from_package('main'); ## Changes check &check_status; Gtk2->main; END { save_config(); } ## Subroutines ## sub config_defaults { return { seconds => 5, bg_dir => '/usr/share/backgrounds', keep_last_bg => 1, # bg_options: # 0 => scaled, 1 => stretched, 2 => wallpaper, 3 => centered # (hard-coded in gbackground.glade) bg_options => 1, pid => "$path/gbackground.pid" }; } sub load_config { my ($defaults); mkdir($path, 0755) unless -d $path; $defaults = &config_defaults; if (-e $configfile) { $config = YAML::LoadFile($configfile); # Use default values for whatever has not been specified map( { $config->{$_} = $defaults->{$_} unless defined $config->{$_} } keys(%$defaults) ); } else { $config = $defaults; } } sub save_config { my $file; return undef unless $config; mkdir($path, 0755) unless -d $path; YAML::DumpFile($configfile, $config); } sub trash { @status = ("Running", "Stopped"); } sub load_widgets { $main_window = $program->get_widget('main_window'); $preferences_window = $program->get_widget('preferences_window'); $label_number_of_seconds = $program->get_widget('select_seconds'); $label_status = $program->get_widget('label_program_status'); $about_window = $program->get_widget('about_window'); $about = $program->get_widget('about_window'); $return_value_widget = $program->get_widget('keep_last_bground_combobox'); $type_of_change_widget = $program->get_widget('background_options_select'); $filechooserbutton = $program->get_widget('filechooserbutton'); # Set values from configuration $label_number_of_seconds->set_text($config->{seconds}); $filechooserbutton->set_current_folder($config->{bg_dir}); $return_value_widget->set_active($config->{keep_last_bg}); $type_of_change_widget->set_active($config->{bg_options}); } # Returns the PID if it is running, undef otherwise sub is_running { my ($fh, $pid); return undef if ! -e $config->{pid}; open($fh, '<', $config->{pid}); $pid = $fh->getline; chomp $pid; # We assume to have a working /proc return (-d "/proc/$pid") ? $pid : undef; } sub check_status { if(is_running()){ $label_status->set_markup("@status[0]"); }else{ $label_status->set_markup("@status[1]"); } } sub on_start_button_event { $config->{bg_dir} = $filechooserbutton->get_filename; $last_background = `gconftool-2 --get /desktop/gnome/background/picture_filename`; $last_background =~ s/\s/\\ /g; if(is_running()){ $window_dialogs->error(title => 'Error!!', text => 'Gbackground is already working'); } else{ if(-e $config->{bg_dir}){ $config->{seconds} = $label_number_of_seconds->get_text(); $config->{bg_dir} =~ s/\s/\\ /g; if(-e './gbackgroundD'){ system("perl ./gbackgroundD \"$config->{bg_dir}\" $config->{seconds} $config->{bg_options} \&"); } else { system("perl /usr/share/gbackground/gbackgroundD \"$config->{bg_dir}\" $config->{seconds} $config->{bg_options} \&"); } sleep 1; # Esto es por que muchas veces tarda en crear el gbackground.pid $label_status->set_markup("@status[0]") if(is_running()); $window_dialogs->msgbox(title => "Daemon Gbackground", text => 'Gbackground has started successfully'); } else{ $window_dialogs->error(title => "Error, dir doesn't exist", text => 'The directory that you introduced is not valid, please verify it and try again'); } } save_config(); } sub on_stop_button_event { if(my $pid = is_running()){ system("kill -9 $pid"); unlink($config->{pid}); if($config->{keep_last_bg} == 1){ system("gconftool-2 -t str -s /desktop/gnome/background/picture_filename $last_background"); } $window_dialogs->msgbox(title => "Daemon Gbackground", text => 'Gbackground has been stopped successfully'); $window_dialogs->error(title => 'Error!!', text => 'Error, it was not possible to stop Gbackground. Probably because it is not running') if(is_running()); }else{ $window_dialogs->error(title => 'Error!!', text => 'Gbackground is not running'); } &check_status; } sub on_preferences_accept_button_event { $config->{keep_last_bg} = $return_value_widget->get_active; $config->{bg_options} = $type_of_change_widget->get_active_text(); $preferences_window->hide; } ## Para que cuando cierren las ventanas y las vuelvan a abrir no desaparezcan?? sub on_about_delete_event { my $w = shift; $w->hide; 1; } sub on_preferences_delete_event { my $w = shift; $w->hide; 1; } sub on_main_window_delete_event {Gtk2->main_quit;} sub on_exit_menu_event {Gtk2->main_quit;} sub on_quit_event {Gtk2->main_quit;} sub on_quit_button_event {Gtk2->main_quit;} sub on_about_menu_event {$about->present;} sub on_preferences_event { my $value = $type_of_change_widget->set_active($config->{bg_options}); $preferences_window->show_all; } sub on_preferences_cancel_button_event {$preferences_window->hide;} sub on_about_close_button_event {$about->hide;} sub on_about_response_event { $about->hide;} gbackground-1.3/AUTHORS0000644000175000017500000000005711245072232014175 0ustar mogaalmogaalAlejandro Garrido Mota gbackground-1.3/icon/0000755000175000017500000000000011030247426014054 5ustar mogaalmogaalgbackground-1.3/icon/config-xfree.xpm0000644000175000017500000002563411030247427017171 0ustar mogaalmogaal/* XPM */ static char * config_xfree_xpm[] = { "32 32 558 2", " c None", ". c #000000", "+ c #E6E4E1", "@ c #E6E4E0", "# c #E9E7E3", "$ c #EAE8E5", "% c #EAE9E4", "& c #EBEAE5", "* c #EBEBE6", "= c #EBEAE6", "- c #E8E6E1", "; c #E5E3DE", "> c #E2E1DB", ", c #E0DED9", "' c #DDDBD5", ") c #D6D4CE", "! c #D0CDC6", "~ c #CCC8C2", "{ c #C5C2BC", "] c #C1BDB7", "^ c #BBB8B2", "/ c #B5B3AB", "( c #B1ADA6", "_ c #ACA7A0", ": c #85827A", "< c #E7E5E1", "[ c #D7D5CC", "} c #DAD7CF", "| c #DCD9D1", "1 c #DDDBD3", "2 c #DEDCD4", "3 c #DFDDD5", "4 c #DFDCD5", "5 c #DFDCD4", "6 c #DDDAD3", "7 c #DAD7D0", "8 c #D8D4CD", "9 c #D5D1C9", "0 c #D2CEC6", "a c #CECAC2", "b c #CBC6BE", "c c #C4C1B9", "d c #C0BBB3", "e c #B9B5AD", "f c #B4B0A7", "g c #ADA9A0", "h c #A7A39A", "i c #A19C94", "j c #97928A", "k c #5E5B54", "l c #E8E6E2", "m c #D9D6CE", "n c #A2A19A", "o c #666661", "p c #666761", "q c #686862", "r c #686963", "s c #686964", "t c #696A64", "u c #696963", "v c #686863", "w c #676861", "x c #666660", "y c #64645E", "z c #63625D", "A c #60605B", "B c #5E5E58", "C c #5A5A54", "D c #565651", "E c #52524D", "F c #50504A", "G c #4C4B46", "H c #494843", "I c #A09C93", "J c #98948B", "K c #524F46", "L c #64635E", "M c #1F211E", "N c #2E312D", "O c #30342E", "P c #323630", "Q c #343834", "R c #363A34", "S c #363A36", "T c #383B37", "U c #373A36", "V c #353934", "W c #343833", "X c #333632", "Y c #323431", "Z c #2F322F", "` c #2E302C", " . c #2A2D29", ".. c #262825", "+. c #222522", "@. c #1E201C", "#. c #080908", "$. c #A8A49A", "%. c #949087", "&. c #504E46", "*. c #62625D", "=. c #E9EAE9", "-. c #EAEAEA", ";. c #EAEBEA", ">. c #EBEBEB", ",. c #E9E9E9", "'. c #E8E8E8", "). c #E6E7E6", "!. c #E5E6E5", "~. c #E3E4E3", "{. c #E1E2E1", "]. c #DFE0DF", "^. c #DDDEDD", "/. c #DBDCDB", "(. c #D9DAD9", "_. c #D5D6D5", ":. c #D8D9D8", "<. c #BABBBA", "[. c #10110F", "}. c #A6A197", "|. c #8E8A81", "1. c #504D45", "2. c #E4E2DE", "3. c #D4D1C9", "4. c #61615C", "5. c #282A27", "6. c #E7E7E7", "7. c #E6E6E6", "8. c #E6E4E4", "9. c #ECDFDE", "0. c #F0DBDB", "a. c #EBD9D9", "b. c #E3DADA", "c. c #DADCDA", "d. c #D8DDD8", "e. c #D2E6D2", "f. c #C9E9C9", "g. c #C3E1C3", "h. c #C1D0C1", "i. c #C2C2C2", "j. c #C0C1C0", "k. c #BCBDBC", "l. c #9D9D9D", "m. c #111211", "n. c #A29D93", "o. c #89847C", "p. c #4F4C45", "q. c #E2DFDB", "r. c #D0CCC4", "s. c #605F5A", "t. c #2A2C28", "u. c #E2E2E2", "v. c #E7DCDB", "w. c #F9D1D1", "x. c #FFCECE", "y. c #FFC8C8", "z. c #FFC3C3", "A. c #FFC0C0", "B. c #E1D7C3", "C. c #C4F8C1", "D. c #B2FFB2", "E. c #ABFFAB", "F. c #A5FFA5", "G. c #A0FFA0", "H. c #9CCC9C", "I. c #A1A7A1", "J. c #A3A5A3", "K. c #6A6D6A", "L. c #121312", "M. c #9C988D", "N. c #837F76", "O. c #4E4C43", "P. c #DFDDD8", "Q. c #CBC7BF", "R. c #5E5E59", "S. c #2D2F2C", "T. c #D8D5D4", "U. c #F7C2C2", "V. c #FFBBBB", "W. c #FFB6B6", "X. c #FFB1B1", "Y. c #FFACAC", "Z. c #FFAFA5", "`. c #FAF5A0", " + c #C1FF99", ".+ c #93FF93", "++ c #8AFF8A", "@+ c #84FF84", "#+ c #75FF75", "$+ c #6CF76C", "%+ c #639D63", "&+ c #6C6E6C", "*+ c #515451", "=+ c #131412", "-+ c #989389", ";+ c #7D7A71", ">+ c #4E4B43", ",+ c #D8D6D1", "'+ c #C5C1B8", ")+ c #5B5A56", "!+ c #2E312E", "~+ c #D0D1D0", "{+ c #CFD1CF", "]+ c #DDC2C2", "^+ c #FFAFAF", "/+ c #FFA8A8", "(+ c #FFA2A2", "_+ c #FF9D9D", ":+ c #FF9696", "<+ c #FFC88F", "[+ c #FFFF84", "}+ c #E7FF66", "|+ c #4EFF4E", "1+ c #3BFF3B", "2+ c #28FF28", "3+ c #1FFF1F", "4+ c #17FF17", "5+ c #12D312", "6+ c #191A19", "7+ c #242624", "8+ c #928D82", "9+ c #77736A", "0+ c #4C4B42", "a+ c #D2D0CA", "b+ c #C0BBB2", "c+ c #595853", "d+ c #30322F", "e+ c #C6C7C6", "f+ c #C3C4C3", "g+ c #DEADAD", "h+ c #FF9191", "i+ c #FF7878", "j+ c #FF6464", "k+ c #FF4863", "l+ c #FF2BA1", "m+ c #FFB9B9", "n+ c #FFFF9E", "o+ c #FAFF53", "p+ c #00FF00", "q+ c #00F900", "r+ c #080808", "s+ c #252825", "t+ c #131413", "u+ c #8D887E", "v+ c #726E65", "w+ c #4B4941", "x+ c #CCCAC5", "y+ c #B8B4AB", "z+ c #565650", "A+ c #313430", "B+ c #BDBFBD", "C+ c #ADAFAD", "D+ c #B76A67", "E+ c #FF2727", "F+ c #FF1313", "G+ c #FF046F", "H+ c #FF00EE", "I+ c #FF00FF", "J+ c #FFA7FF", "K+ c #FFFFFF", "L+ c #ECFFFF", "M+ c #00FFA3", "N+ c #00FF15", "O+ c #00E300", "P+ c #0B0B0B", "Q+ c #252925", "R+ c #141513", "S+ c #888378", "T+ c #6C675F", "U+ c #4B4841", "V+ c #C8C6C1", "W+ c #B2AEA4", "X+ c #53524D", "Y+ c #5D625D", "Z+ c #525752", "`+ c #744541", " @ c #FF0303", ".@ c #FF0026", "+@ c #FF61FF", "@@ c #B9FFFF", "#@ c #00FFF9", "$@ c #00FF83", "%@ c #00A000", "&@ c #191B19", "*@ c #141413", "=@ c #847F74", "-@ c #67635A", ";@ c #4A4740", ">@ c #C3C0BA", ",@ c #ABA69C", "'@ c #504F4A", ")@ c #484E48", "!@ c #505550", "~@ c #575D57", "{@ c #A22B29", "]@ c #F6038F", "^@ c #D2B0FF", "/@ c #31F9FF", "(@ c #00FFFF", "_@ c #00FFE5", ":@ c #00C000", "<@ c #103410", "[@ c #313431", "}@ c #262A26", "|@ c #7F7B6F", "1@ c #625E55", "2@ c #3D3B34", "3@ c #BDBBB5", "4@ c #A39F95", "5@ c #4C4C46", "6@ c #484C48", "7@ c #4D534D", "8@ c #645F59", "9@ c #933DC1", "0@ c #E005FF", "a@ c #FC00FF", "b@ c #EF00FF", "c@ c #BB00FF", "d@ c #3119FF", "e@ c #008AFF", "f@ c #00E6FF", "g@ c #00FCFC", "h@ c #00EC00", "i@ c #09B109", "j@ c #1E431E", "k@ c #343934", "l@ c #333733", "m@ c #7C776C", "n@ c #5D5A51", "o@ c #3D3B33", "p@ c #B4B1AA", "q@ c #9A968C", "r@ c #484641", "s@ c #2C2E2A", "t@ c #444944", "u@ c #494E49", "v@ c #525852", "w@ c #5A605A", "x@ c #6066BC", "y@ c #090BFF", "z@ c #0000FF", "A@ c #0000EC", "B@ c #0E0F0E", "C@ c #454A45", "D@ c #424742", "E@ c #393E39", "F@ c #2F332F", "G@ c #242724", "H@ c #777367", "I@ c #58554C", "J@ c #3C3A33", "K@ c #ACA8A1", "L@ c #949086", "M@ c #44433E", "N@ c #2A2C2A", "O@ c #404540", "P@ c #454945", "Q@ c #4B514B", "R@ c #595F88", "S@ c #1516FF", "T@ c #0000AB", "U@ c #3D433D", "V@ c #333833", "W@ c #2B2F2B", "X@ c #121211", "Y@ c #746F63", "Z@ c #545148", "`@ c #3C3933", " # c #A39F99", ".# c #8C877D", "+# c #403F3A", "@# c #262925", "## c #3A3E3A", "$# c #3E423E", "%# c #434843", "&# c #4D524D", "*# c #2D30A4", "=# c #0202F5", "-# c #0000BD", ";# c #020227", "># c #292B29", ",# c #383B38", "'# c #1E211E", ")# c #111210", "!# c #706B5F", "~# c #4F4B42", "{# c #3B3932", "]# c #9D9A93", "^# c #858177", "/# c #3C3B36", "(# c #232422", "_# c #363C36", ":# c #3A3F3A", "<# c #3F433F", "[# c #424642", "}# c #3E414A", "|# c #1B1E7B", "1# c #0101D6", "2# c #0000FA", "3# c #0000E4", "4# c #00009F", "5# c #020225", "6# c #181A18", "7# c #2D302D", "8# c #2A2E2A", "9# c #232723", "0# c #202320", "a# c #1A1E1A", "b# c #0B0C0B", "c# c #6D685B", "d# c #4B483F", "e# c #95928A", "f# c #7D786E", "g# c #525148", "h# c #181915", "i# c #1F211D", "j# c #21221F", "k# c #222320", "l# c #232421", "m# c #242521", "n# c #222220", "o# c #151614", "p# c #0A0A09", "q# c #050605", "r# c #1F1F1D", "s# c #20211E", "t# c #1F201D", "u# c #1E1F1C", "v# c #1D1D1A", "w# c #1B1C19", "x# c #171814", "y# c #161713", "z# c #6A6658", "A# c #4B483E", "B# c #908D85", "C# c #767268", "D# c #827E73", "E# c #898478", "F# c #898579", "G# c #898479", "H# c #878377", "I# c #858175", "J# c #837E73", "K# c #807B70", "L# c #7E796D", "M# c #7A7569", "N# c #767266", "O# c #736E63", "P# c #706C60", "Q# c #6D695D", "R# c #6B675A", "S# c #686457", "T# c #666155", "U# c #646053", "V# c #625E51", "W# c #605C4F", "X# c #5F5B4E", "Y# c #555146", "Z# c #87847C", "`# c #6F6B61", " $ c #706B61", ".$ c #706C61", "+$ c #716B61", "@$ c #6F6A60", "#$ c #6E695F", "$$ c #6B675C", "%$ c #696459", "&$ c #666257", "*$ c #635F54", "=$ c #605C52", "-$ c #5E5A4F", ";$ c #5B574C", ">$ c #59554A", ",$ c #565348", "'$ c #555247", ")$ c #534F45", "!$ c #514E43", "~$ c #4F4C42", "{$ c #635F57", "]$ c #827F76", "^$ c #6A665C", "/$ c #6B675D", "($ c #6A665B", "_$ c #69645A", ":$ c #676358", "<$ c #646056", "[$ c #625E53", "}$ c #5F5B50", "|$ c #5D594E", "1$ c #5B574D", "2$ c #575449", "3$ c #545045", "4$ c #524E44", "5$ c #504D43", "6$ c #4F4B40", "7$ c #575349", "8$ c #434037", "9$ c #464339", "0$ c #312E28", "a$ c #4B4943", "b$ c #4E4B44", "c$ c #4E4D46", "d$ c #504E49", "e$ c #53504A", "f$ c #53514C", "g$ c #55534D", "h$ c #54524D", "i$ c #53514B", "j$ c #514E49", "k$ c #4E4C47", "l$ c #4E4A45", "m$ c #4A4843", "n$ c #494641", "o$ c #47443F", "p$ c #44433D", "q$ c #434039", "r$ c #403E39", "s$ c #3F3D37", "t$ c #3E3C37", "u$ c #3E3C36", "v$ c #43413A", "w$ c #010101", "x$ c #070707", "y$ c #63625F", "z$ c #595750", "A$ c #5E5D56", "B$ c #65635D", "C$ c #6C6A65", "D$ c #73706B", "E$ c #797773", "F$ c #7B7975", "G$ c #797772", "H$ c #76746F", "I$ c #73716C", "J$ c #706E69", "K$ c #686760", "L$ c #63625C", "M$ c #5E5D57", "N$ c #585650", "O$ c #514F48", "P$ c #514E46", "Q$ c #060606", "R$ c #050504", "S$ c #090908", "T$ c #0B0B0A", "U$ c #0C0C0B", "V$ c #0D0D0C", "W$ c #0E0E0D", "X$ c #0F0E0D", "Y$ c #0E0D0C", "Z$ c #0D0C0B", "`$ c #0C0B0B", " % c #0A0909", ".% c #0A0908", "+% c #090907", "@% c #090807", "#% c #050505", "$% c #030303", " ", " ", " . . . . . . . . . . . . . . . . . . . . . . . . . . . . . ", " . + @ # $ % & * = * = % - @ ; > , ' ) ! ~ { ] ^ / ( _ : . ", " . < [ } | 1 2 3 4 3 5 6 | 7 8 9 0 a b c d e f g h i j k . ", " . l m n o p q r s t s u v w x y z A B C D E F G H I J K . ", " . # } L M N O P Q R S T U S V W X Y Z ` ...+.@.#.$.%.&.. ", " . < 8 *...=.-.;.>.;.=.,.'.).!.~.{.].^./.(._.:.<.[.}.|.1.. ", " . 2.3.4.5.6.).7.).8.9.0.a.b.c.d.e.f.g.h.i.j.k.l.m.n.o.p.. ", " . q.r.s.t.u.u.{.v.w.x.y.z.A.B.C.D.E.F.G.H.I.J.K.L.M.N.O.. ", " . P.Q.R.S.:.:.T.U.V.W.X.Y.Z.`. +.+++@+#+$+%+&+*+=+-+;+>+. ", " . ,+'+)+!+~+{+]+^+/+(+_+:+<+[+}+|+1+2+3+4+5+6+7+=+8+9+0+. ", " . a+b+c+d+e+f+g+h+i+j+k+l+m+n+o+p+p+p+p+p+q+r+s+t+u+v+w+. ", " . x+y+z+A+B+C+D+E+F+G+H+I+J+K+L+M+N+p+p+p+O+P+Q+R+S+T+U+. ", " . V+W+X+A+Y+Z+`+ @.@H+I+I++@K+@@#@$@p+p+p+%@&@Q+*@=@-@;@. ", " . >@,@'@d+)@!@~@{@]@I+I+I+I+^@/@(@_@p+p+:@<@[@}@t+|@1@2@. ", " . 3@4@5@N 6@7@~@8@9@0@a@b@c@d@e@f@g@h@i@j@k@l@s+t+m@n@o@. ", " . p@q@r@s@t@u@v@w@x@y@z@z@z@z@z@z@A@B@C@D@E@F@G@L.H@I@J@. ", " . K@L@M@N@O@P@Q@v@R@S@z@z@z@z@z@z@T@6+t@U@V@W@+.X@Y@Z@`@. ", " . #.#+#@###$#%#u@&#*#=#z@z@z@z@-#;#>#,#l@W@}@'#)#!#~#{#. ", " . ]#^#/#(#k@_#:#<#[#}#|#1#2#3#4#5#6#!+7#8#9#0#a#b#c#d#{#. ", " . e#f#g#h#@.i#j#k#l#m#n#o#p#q#p#o#r#s#t#u#v#w#x#y#z#A#{#. ", " . B#C#D#E#F#G#E#H#I#J#K#L#M#N#O#P#Q#R#S#T#U#V#W#X#Y#A#{#. ", " . Z#`# $ $.$+$@$#$$$%$&$*$=$-$;$>$,$'$)$!$~$n@{$Z@A#A#{#. ", " . ]$^$/$/$/$/$($_$:$<$[$}$|$1$>$2$'$3$4$5$6$7$8$9$A#A#0$. ", " . . . a$b$c$d$e$f$g$h$i$j$k$l$m$n$o$p$q$r$s$t$t$u$v$. . w$ ", " x$. y$z$A$B$C$D$E$F$G$H$I$J$C$K$L$M$N$i$O$P$P$P$p.Q$ ", " . R$S$p#T$U$V$W$W$X$W$W$Y$V$Z$`$T$ %.%+%@%@%@%#%$% ", " ", " ", " ", " "}; gbackground-1.3/README0000644000175000017500000000031711255060344014006 0ustar mogaalmogaal GBACKGROUND How use? If you want to use gbackground you should run gbackground script. For this exist two ways: $ ./gbackground or: $ perl gbackground This program was developed in Perl using Gtk2 gbackground-1.3/LICENSE0000644000175000017500000000144511254777301014145 0ustar mogaalmogaalGBACKGROUND program. change the gnome background Copyright (C) 2006-2009, Alejandro Garrido Mota www.mogaal.com/gbackground This program is free software: you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation, either version 3 of the License, or (at your option) any later version. This package 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, see . Alejandro Garrido Mota, VE www.mogaal.com gbackground-1.3/gbackgroundD0000755000175000017500000000202411443174372015451 0ustar mogaalmogaal#!/usr/bin/perl use strict; use Proc::PID::File; my ($fondo_path, $segundos , @archivos_png, @archivos_jpg, @TODOS_ARCHIVOS, $background, $configurando_pid, $tipo_de_cambio); my $home_directory = $ENV{HOME}; my $path = $home_directory . '/.gbackground'; sub crear_demonio { $configurando_pid = Proc::PID::File->running(dir => "$path", name => "gbackground" ); while(1){ system("gconftool-2 -t str -s /desktop/gnome/background/picture_options $tipo_de_cambio"); $background = $TODOS_ARCHIVOS[rand(scalar(@TODOS_ARCHIVOS))]; system("gconftool-2 -t str -s /desktop/gnome/background/picture_filename \"$background\""); sleep($segundos); } } $fondo_path = "$ARGV[0]"; $segundos = $ARGV[1]; $tipo_de_cambio = $ARGV[2]; $segundos = '2' if $segundos eq ''; foreach (@archivos_jpg = glob("$fondo_path/*\.jpg")){ push @TODOS_ARCHIVOS, $_; } foreach (@archivos_png = glob("$fondo_path/*\.png")) { push @TODOS_ARCHIVOS, $_; } if(-e "$path") { &crear_demonio; } else { mkdir("$path", 0755); chmod(0755, "$path"); &crear_demonio; } gbackground-1.3/glade/0000755000175000017500000000000011125503724014201 5ustar mogaalmogaalgbackground-1.3/glade/config-xfree.xpm0000644000175000017500000002563411125503724017315 0ustar mogaalmogaal/* XPM */ static char * config_xfree_xpm[] = { "32 32 558 2", " c None", ". c #000000", "+ c #E6E4E1", "@ c #E6E4E0", "# c #E9E7E3", "$ c #EAE8E5", "% c #EAE9E4", "& c #EBEAE5", "* c #EBEBE6", "= c #EBEAE6", "- c #E8E6E1", "; c #E5E3DE", "> c #E2E1DB", ", c #E0DED9", "' c #DDDBD5", ") c #D6D4CE", "! c #D0CDC6", "~ c #CCC8C2", "{ c #C5C2BC", "] c #C1BDB7", "^ c #BBB8B2", "/ c #B5B3AB", "( c #B1ADA6", "_ c #ACA7A0", ": c #85827A", "< c #E7E5E1", "[ c #D7D5CC", "} c #DAD7CF", "| c #DCD9D1", "1 c #DDDBD3", "2 c #DEDCD4", "3 c #DFDDD5", "4 c #DFDCD5", "5 c #DFDCD4", "6 c #DDDAD3", "7 c #DAD7D0", "8 c #D8D4CD", "9 c #D5D1C9", "0 c #D2CEC6", "a c #CECAC2", "b c #CBC6BE", "c c #C4C1B9", "d c #C0BBB3", "e c #B9B5AD", "f c #B4B0A7", "g c #ADA9A0", "h c #A7A39A", "i c #A19C94", "j c #97928A", "k c #5E5B54", "l c #E8E6E2", "m c #D9D6CE", "n c #A2A19A", "o c #666661", "p c #666761", "q c #686862", "r c #686963", "s c #686964", "t c #696A64", "u c #696963", "v c #686863", "w c #676861", "x c #666660", "y c #64645E", "z c #63625D", "A c #60605B", "B c #5E5E58", "C c #5A5A54", "D c #565651", "E c #52524D", "F c #50504A", "G c #4C4B46", "H c #494843", "I c #A09C93", "J c #98948B", "K c #524F46", "L c #64635E", "M c #1F211E", "N c #2E312D", "O c #30342E", "P c #323630", "Q c #343834", "R c #363A34", "S c #363A36", "T c #383B37", "U c #373A36", "V c #353934", "W c #343833", "X c #333632", "Y c #323431", "Z c #2F322F", "` c #2E302C", " . c #2A2D29", ".. c #262825", "+. c #222522", "@. c #1E201C", "#. c #080908", "$. c #A8A49A", "%. c #949087", "&. c #504E46", "*. c #62625D", "=. c #E9EAE9", "-. c #EAEAEA", ";. c #EAEBEA", ">. c #EBEBEB", ",. c #E9E9E9", "'. c #E8E8E8", "). c #E6E7E6", "!. c #E5E6E5", "~. c #E3E4E3", "{. c #E1E2E1", "]. c #DFE0DF", "^. c #DDDEDD", "/. c #DBDCDB", "(. c #D9DAD9", "_. c #D5D6D5", ":. c #D8D9D8", "<. c #BABBBA", "[. c #10110F", "}. c #A6A197", "|. c #8E8A81", "1. c #504D45", "2. c #E4E2DE", "3. c #D4D1C9", "4. c #61615C", "5. c #282A27", "6. c #E7E7E7", "7. c #E6E6E6", "8. c #E6E4E4", "9. c #ECDFDE", "0. c #F0DBDB", "a. c #EBD9D9", "b. c #E3DADA", "c. c #DADCDA", "d. c #D8DDD8", "e. c #D2E6D2", "f. c #C9E9C9", "g. c #C3E1C3", "h. c #C1D0C1", "i. c #C2C2C2", "j. c #C0C1C0", "k. c #BCBDBC", "l. c #9D9D9D", "m. c #111211", "n. c #A29D93", "o. c #89847C", "p. c #4F4C45", "q. c #E2DFDB", "r. c #D0CCC4", "s. c #605F5A", "t. c #2A2C28", "u. c #E2E2E2", "v. c #E7DCDB", "w. c #F9D1D1", "x. c #FFCECE", "y. c #FFC8C8", "z. c #FFC3C3", "A. c #FFC0C0", "B. c #E1D7C3", "C. c #C4F8C1", "D. c #B2FFB2", "E. c #ABFFAB", "F. c #A5FFA5", "G. c #A0FFA0", "H. c #9CCC9C", "I. c #A1A7A1", "J. c #A3A5A3", "K. c #6A6D6A", "L. c #121312", "M. c #9C988D", "N. c #837F76", "O. c #4E4C43", "P. c #DFDDD8", "Q. c #CBC7BF", "R. c #5E5E59", "S. c #2D2F2C", "T. c #D8D5D4", "U. c #F7C2C2", "V. c #FFBBBB", "W. c #FFB6B6", "X. c #FFB1B1", "Y. c #FFACAC", "Z. c #FFAFA5", "`. c #FAF5A0", " + c #C1FF99", ".+ c #93FF93", "++ c #8AFF8A", "@+ c #84FF84", "#+ c #75FF75", "$+ c #6CF76C", "%+ c #639D63", "&+ c #6C6E6C", "*+ c #515451", "=+ c #131412", "-+ c #989389", ";+ c #7D7A71", ">+ c #4E4B43", ",+ c #D8D6D1", "'+ c #C5C1B8", ")+ c #5B5A56", "!+ c #2E312E", "~+ c #D0D1D0", "{+ c #CFD1CF", "]+ c #DDC2C2", "^+ c #FFAFAF", "/+ c #FFA8A8", "(+ c #FFA2A2", "_+ c #FF9D9D", ":+ c #FF9696", "<+ c #FFC88F", "[+ c #FFFF84", "}+ c #E7FF66", "|+ c #4EFF4E", "1+ c #3BFF3B", "2+ c #28FF28", "3+ c #1FFF1F", "4+ c #17FF17", "5+ c #12D312", "6+ c #191A19", "7+ c #242624", "8+ c #928D82", "9+ c #77736A", "0+ c #4C4B42", "a+ c #D2D0CA", "b+ c #C0BBB2", "c+ c #595853", "d+ c #30322F", "e+ c #C6C7C6", "f+ c #C3C4C3", "g+ c #DEADAD", "h+ c #FF9191", "i+ c #FF7878", "j+ c #FF6464", "k+ c #FF4863", "l+ c #FF2BA1", "m+ c #FFB9B9", "n+ c #FFFF9E", "o+ c #FAFF53", "p+ c #00FF00", "q+ c #00F900", "r+ c #080808", "s+ c #252825", "t+ c #131413", "u+ c #8D887E", "v+ c #726E65", "w+ c #4B4941", "x+ c #CCCAC5", "y+ c #B8B4AB", "z+ c #565650", "A+ c #313430", "B+ c #BDBFBD", "C+ c #ADAFAD", "D+ c #B76A67", "E+ c #FF2727", "F+ c #FF1313", "G+ c #FF046F", "H+ c #FF00EE", "I+ c #FF00FF", "J+ c #FFA7FF", "K+ c #FFFFFF", "L+ c #ECFFFF", "M+ c #00FFA3", "N+ c #00FF15", "O+ c #00E300", "P+ c #0B0B0B", "Q+ c #252925", "R+ c #141513", "S+ c #888378", "T+ c #6C675F", "U+ c #4B4841", "V+ c #C8C6C1", "W+ c #B2AEA4", "X+ c #53524D", "Y+ c #5D625D", "Z+ c #525752", "`+ c #744541", " @ c #FF0303", ".@ c #FF0026", "+@ c #FF61FF", "@@ c #B9FFFF", "#@ c #00FFF9", "$@ c #00FF83", "%@ c #00A000", "&@ c #191B19", "*@ c #141413", "=@ c #847F74", "-@ c #67635A", ";@ c #4A4740", ">@ c #C3C0BA", ",@ c #ABA69C", "'@ c #504F4A", ")@ c #484E48", "!@ c #505550", "~@ c #575D57", "{@ c #A22B29", "]@ c #F6038F", "^@ c #D2B0FF", "/@ c #31F9FF", "(@ c #00FFFF", "_@ c #00FFE5", ":@ c #00C000", "<@ c #103410", "[@ c #313431", "}@ c #262A26", "|@ c #7F7B6F", "1@ c #625E55", "2@ c #3D3B34", "3@ c #BDBBB5", "4@ c #A39F95", "5@ c #4C4C46", "6@ c #484C48", "7@ c #4D534D", "8@ c #645F59", "9@ c #933DC1", "0@ c #E005FF", "a@ c #FC00FF", "b@ c #EF00FF", "c@ c #BB00FF", "d@ c #3119FF", "e@ c #008AFF", "f@ c #00E6FF", "g@ c #00FCFC", "h@ c #00EC00", "i@ c #09B109", "j@ c #1E431E", "k@ c #343934", "l@ c #333733", "m@ c #7C776C", "n@ c #5D5A51", "o@ c #3D3B33", "p@ c #B4B1AA", "q@ c #9A968C", "r@ c #484641", "s@ c #2C2E2A", "t@ c #444944", "u@ c #494E49", "v@ c #525852", "w@ c #5A605A", "x@ c #6066BC", "y@ c #090BFF", "z@ c #0000FF", "A@ c #0000EC", "B@ c #0E0F0E", "C@ c #454A45", "D@ c #424742", "E@ c #393E39", "F@ c #2F332F", "G@ c #242724", "H@ c #777367", "I@ c #58554C", "J@ c #3C3A33", "K@ c #ACA8A1", "L@ c #949086", "M@ c #44433E", "N@ c #2A2C2A", "O@ c #404540", "P@ c #454945", "Q@ c #4B514B", "R@ c #595F88", "S@ c #1516FF", "T@ c #0000AB", "U@ c #3D433D", "V@ c #333833", "W@ c #2B2F2B", "X@ c #121211", "Y@ c #746F63", "Z@ c #545148", "`@ c #3C3933", " # c #A39F99", ".# c #8C877D", "+# c #403F3A", "@# c #262925", "## c #3A3E3A", "$# c #3E423E", "%# c #434843", "&# c #4D524D", "*# c #2D30A4", "=# c #0202F5", "-# c #0000BD", ";# c #020227", "># c #292B29", ",# c #383B38", "'# c #1E211E", ")# c #111210", "!# c #706B5F", "~# c #4F4B42", "{# c #3B3932", "]# c #9D9A93", "^# c #858177", "/# c #3C3B36", "(# c #232422", "_# c #363C36", ":# c #3A3F3A", "<# c #3F433F", "[# c #424642", "}# c #3E414A", "|# c #1B1E7B", "1# c #0101D6", "2# c #0000FA", "3# c #0000E4", "4# c #00009F", "5# c #020225", "6# c #181A18", "7# c #2D302D", "8# c #2A2E2A", "9# c #232723", "0# c #202320", "a# c #1A1E1A", "b# c #0B0C0B", "c# c #6D685B", "d# c #4B483F", "e# c #95928A", "f# c #7D786E", "g# c #525148", "h# c #181915", "i# c #1F211D", "j# c #21221F", "k# c #222320", "l# c #232421", "m# c #242521", "n# c #222220", "o# c #151614", "p# c #0A0A09", "q# c #050605", "r# c #1F1F1D", "s# c #20211E", "t# c #1F201D", "u# c #1E1F1C", "v# c #1D1D1A", "w# c #1B1C19", "x# c #171814", "y# c #161713", "z# c #6A6658", "A# c #4B483E", "B# c #908D85", "C# c #767268", "D# c #827E73", "E# c #898478", "F# c #898579", "G# c #898479", "H# c #878377", "I# c #858175", "J# c #837E73", "K# c #807B70", "L# c #7E796D", "M# c #7A7569", "N# c #767266", "O# c #736E63", "P# c #706C60", "Q# c #6D695D", "R# c #6B675A", "S# c #686457", "T# c #666155", "U# c #646053", "V# c #625E51", "W# c #605C4F", "X# c #5F5B4E", "Y# c #555146", "Z# c #87847C", "`# c #6F6B61", " $ c #706B61", ".$ c #706C61", "+$ c #716B61", "@$ c #6F6A60", "#$ c #6E695F", "$$ c #6B675C", "%$ c #696459", "&$ c #666257", "*$ c #635F54", "=$ c #605C52", "-$ c #5E5A4F", ";$ c #5B574C", ">$ c #59554A", ",$ c #565348", "'$ c #555247", ")$ c #534F45", "!$ c #514E43", "~$ c #4F4C42", "{$ c #635F57", "]$ c #827F76", "^$ c #6A665C", "/$ c #6B675D", "($ c #6A665B", "_$ c #69645A", ":$ c #676358", "<$ c #646056", "[$ c #625E53", "}$ c #5F5B50", "|$ c #5D594E", "1$ c #5B574D", "2$ c #575449", "3$ c #545045", "4$ c #524E44", "5$ c #504D43", "6$ c #4F4B40", "7$ c #575349", "8$ c #434037", "9$ c #464339", "0$ c #312E28", "a$ c #4B4943", "b$ c #4E4B44", "c$ c #4E4D46", "d$ c #504E49", "e$ c #53504A", "f$ c #53514C", "g$ c #55534D", "h$ c #54524D", "i$ c #53514B", "j$ c #514E49", "k$ c #4E4C47", "l$ c #4E4A45", "m$ c #4A4843", "n$ c #494641", "o$ c #47443F", "p$ c #44433D", "q$ c #434039", "r$ c #403E39", "s$ c #3F3D37", "t$ c #3E3C37", "u$ c #3E3C36", "v$ c #43413A", "w$ c #010101", "x$ c #070707", "y$ c #63625F", "z$ c #595750", "A$ c #5E5D56", "B$ c #65635D", "C$ c #6C6A65", "D$ c #73706B", "E$ c #797773", "F$ c #7B7975", "G$ c #797772", "H$ c #76746F", "I$ c #73716C", "J$ c #706E69", "K$ c #686760", "L$ c #63625C", "M$ c #5E5D57", "N$ c #585650", "O$ c #514F48", "P$ c #514E46", "Q$ c #060606", "R$ c #050504", "S$ c #090908", "T$ c #0B0B0A", "U$ c #0C0C0B", "V$ c #0D0D0C", "W$ c #0E0E0D", "X$ c #0F0E0D", "Y$ c #0E0D0C", "Z$ c #0D0C0B", "`$ c #0C0B0B", " % c #0A0909", ".% c #0A0908", "+% c #090907", "@% c #090807", "#% c #050505", "$% c #030303", " ", " ", " . . . . . . . . . . . . . . . . . . . . . . . . . . . . . ", " . + @ # $ % & * = * = % - @ ; > , ' ) ! ~ { ] ^ / ( _ : . ", " . < [ } | 1 2 3 4 3 5 6 | 7 8 9 0 a b c d e f g h i j k . ", " . l m n o p q r s t s u v w x y z A B C D E F G H I J K . ", " . # } L M N O P Q R S T U S V W X Y Z ` ...+.@.#.$.%.&.. ", " . < 8 *...=.-.;.>.;.=.,.'.).!.~.{.].^./.(._.:.<.[.}.|.1.. ", " . 2.3.4.5.6.).7.).8.9.0.a.b.c.d.e.f.g.h.i.j.k.l.m.n.o.p.. ", " . q.r.s.t.u.u.{.v.w.x.y.z.A.B.C.D.E.F.G.H.I.J.K.L.M.N.O.. ", " . P.Q.R.S.:.:.T.U.V.W.X.Y.Z.`. +.+++@+#+$+%+&+*+=+-+;+>+. ", " . ,+'+)+!+~+{+]+^+/+(+_+:+<+[+}+|+1+2+3+4+5+6+7+=+8+9+0+. ", " . a+b+c+d+e+f+g+h+i+j+k+l+m+n+o+p+p+p+p+p+q+r+s+t+u+v+w+. ", " . x+y+z+A+B+C+D+E+F+G+H+I+J+K+L+M+N+p+p+p+O+P+Q+R+S+T+U+. ", " . V+W+X+A+Y+Z+`+ @.@H+I+I++@K+@@#@$@p+p+p+%@&@Q+*@=@-@;@. ", " . >@,@'@d+)@!@~@{@]@I+I+I+I+^@/@(@_@p+p+:@<@[@}@t+|@1@2@. ", " . 3@4@5@N 6@7@~@8@9@0@a@b@c@d@e@f@g@h@i@j@k@l@s+t+m@n@o@. ", " . p@q@r@s@t@u@v@w@x@y@z@z@z@z@z@z@A@B@C@D@E@F@G@L.H@I@J@. ", " . K@L@M@N@O@P@Q@v@R@S@z@z@z@z@z@z@T@6+t@U@V@W@+.X@Y@Z@`@. ", " . #.#+#@###$#%#u@&#*#=#z@z@z@z@-#;#>#,#l@W@}@'#)#!#~#{#. ", " . ]#^#/#(#k@_#:#<#[#}#|#1#2#3#4#5#6#!+7#8#9#0#a#b#c#d#{#. ", " . e#f#g#h#@.i#j#k#l#m#n#o#p#q#p#o#r#s#t#u#v#w#x#y#z#A#{#. ", " . B#C#D#E#F#G#E#H#I#J#K#L#M#N#O#P#Q#R#S#T#U#V#W#X#Y#A#{#. ", " . Z#`# $ $.$+$@$#$$$%$&$*$=$-$;$>$,$'$)$!$~$n@{$Z@A#A#{#. ", " . ]$^$/$/$/$/$($_$:$<$[$}$|$1$>$2$'$3$4$5$6$7$8$9$A#A#0$. ", " . . . a$b$c$d$e$f$g$h$i$j$k$l$m$n$o$p$q$r$s$t$t$u$v$. . w$ ", " x$. y$z$A$B$C$D$E$F$G$H$I$J$C$K$L$M$N$i$O$P$P$P$p.Q$ ", " . R$S$p#T$U$V$W$W$X$W$W$Y$V$Z$`$T$ %.%+%@%@%@%#%$% ", " ", " ", " ", " "}; gbackground-1.3/glade/gbackground.glade0000644000175000017500000006761211245072473017506 0ustar mogaalmogaal 552 True Gbackground False center config-xfree.xpm True True True _File True _Exit True True True Setting True True True True Help True About True True True False False 0 145 True 80 26 True True 5 2 43200 5 10 10 5 104 55 0 0 True 262 59 172 24 True Backgrounds directory 11 16 88 24 True Time Loop 8 56 80 24 True second(s) 192 56 144 24 True Program status 96 123 24 True 150 97 291 31 True select-folder Select Directory 190 13 1 True True True True True False True 0 0 True 2 True gtk-ok False False 0 True Start Gbackground True False False 1 False False 0 True True True False True 0 0 True 2 True gtk-dialog-error False False 0 True Stop Gbackground True False False 1 False False 1 True True True False True 0 0 True 2 True gtk-quit False False 0 True Quit True False False 1 False False 2 2 True False False 3 352 177 Settings False True 276 97 True 172 24 True Background Options 6 59 Keep the last background 227 24 True True False True True True 17 23 132 31 True scaled stretched wallpaper centered 178 56 0 True spread True True True False True 0 0 True 2 True gtk-ok False False 0 True Accept True False False 1 False False 0 True True True False True 0 0 True 2 True gtk-cancel False False 0 True Cancel True False False 1 False False 1 1 5 Acerca de Glade False True center dialog gbackground 1.2 Copyriht 2006 Program to change the gnome background periodically(in a time loop) http://mogaal.com/gbackground GBACKGROUND program. A program to periodicly change the gnome background Copyright (C) 2006, Alejandro Garrido Mota www.mogaal.com/gbackground This program is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 2 of the License, or (at your option) any later version. 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., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. Alejandro Garrido Mota, VE <garridomota@gmail.com> <mogaal@chaslug.org.ve> www.mogaal.com Alejandro Garrido Mota <garridomota@gmail.com> True 2 True end False end 0 647 403 5 Select Directory center-on-parent dialog False select-folder True 2 True end False end 0 gbackground-1.3/ChangeLog0000644000175000017500000000113611443175642014707 0ustar mogaalmogaal2010-09-12 Alejandro Garrido Mota * Add a configuration file using YAML (Thanks to Gunnar Wolf ) * Fix permissions over hidden world-writable directory in user's home 2009-08-25 Alejandro Garrido Mota * English translation in source code, Thanks Jakub Lucký 2005-12-18 Alejandro Garrido Mota * Add a 'keep the last background' function * Add 'Background Options' property * Released 1.1.0 2005-08-22 Alejandro Garrido Mota * Released 1.0.0: Initial version