PEM's stuff

[UltraDiabos]

but, when the weather changes, the dynamicmenu change either? or i have do actualize every day ?

[pem]

Well, to be more precise, the menu is recreated dynamically from the /dev/shm/weather.log. Thus if you manage to poll new values from weather.com via an entry for a call to weather_log.plx in your crontab, for instance, your system will always be up to date. On the other hand, it will create additional request to the server and that’s one of the thing I was willing to avoid As my laptop is not a box that I let powered on for a long time (generally few hours a day), I don’t need an update very often. Every session I open my laptop is fine for me. For a more “desktop” or “server” use, I would suggest an update every 4 hours: the weather forecasts does not change that much

[UltraDiabos]

If you got this ouput and if every bitmap can be accessed in the proper directory can, now it will be time to have some Fvwm checks.

what do you mean with Fvwm checks?

[pem]

I mean checking the file access via the FvwmConsole.

[UltraDiabos]

take a look:

Script log:

[color=green]#!/usr/bin/env perl
use strict;
use LWP::Simple;
my $content = get(“http://www.w3.weather.com/weather/print/POXX0016”);
$content =~ s/.(.)./$1/s;
my @day = split //, $content;
shift @day;
my ($day, $date, $img, $temp, $precip);
my $tomorrow;
foreach $_ (@day) {
($day) = /(\w+)</A>/s;
($date) = /
(.+?)</s;
($img) = /(\d+).gif/s;
$img = $ARGV[0] . $img . ‘.png’;
($temp) = /(.?)</B>/s;
$temp =~ s/°/chr(186)/eg;
$temp =~ s|(\d+)|sprintf “%d”, ($1 - 32) * 5 / 9|eg;
($precip) = /(\d+ %)/;
print $img . “\n” . $temp . “C\n” . $precip . “\n”;
}[/color]

Script Menu (weather):

[color=green]#!/usr/bin/env perl
use strict;
open(FORECASTS, “/dev/shm/weather.log”) or print ‘+ “No forecasts available”’ and exit;
my $index; my $forecast; my $line;
while($line = ) {
chomp($line);
if($index == 0) {
print “+ %$line%”;
$index = 1;
} elsif($index == 1) {
if($forecast == 0) {
print ""Today\tTemp $line Hum ";
} else {
print ""Day $forecast\tTemp $line Hum ";
}
$index = 2;
} else {
print “$line %%"\n”;
$index = 0;
$forecast++;
}
}

[/color]

StartFunction:

[color=green]+ I exec exec $[fvwm_script]/weather_log.plx /home/joao/.fvwm/img/weather/$[fvwm_weather]/ > /dev/shm/weather.log[/color]

Menu:

[color=green]+ “%icons/32x32/tempo.png%Tempo” popup MenuWeather

DestroyMenu MenuWeather
AddToMenu MenuWeather

• DynamicPopupAction Function WeatherCheck[/color]

Function:

[color=green]#####

Weather function

##################
DestroyFunc WeatherCheck
AddToFunc WeatherCheck

• I DestroyMenu recreate MenuWeather
• I AddToMenu MenuWeather
• I PipeRead ‘perl /home/joao/.fvwm/script/weather_menu.plx’[/color]

if you find errors, tell me please… thanks.

[zonk]

@UltraDiabos

Function:

[color=green]#####

Weather function

##################
DestroyFunc WeatherCheck
AddToFunc WeatherCheck

• I DestroyMenu recreate MenuWeather
• I AddToMenu MenuWeather
• I PipeRead ‘perl /home/joao/.fvwm/script/weather_menu.plx’[/color]

if you find errors, tell me please… thanks.

You can’t just call AddToMenu and then let the next command of the function write the menuName/menuItem pairs. The script weather_menu.plx must itself write “AddToMenu MenuWeather” on stdout followed by the pairs if you want it to work.

[zonk]

The example from the man might help

AddToMenu JpgMenu foo title
+ DynamicPopupAction Function MakeJpgMenu

               AddToFunc MakeJpgMenu
               + I DestroyMenu recreate JpgMenu
               + I AddToMenu JpgMenu Pictures Title
               + I PipeRead ’for i in $HOME/Pictures/*.jpg; \
                 do echo [color=red]AddToMenu JpgMenu[/color] "‘basename $i‘" Exec xv $i; done’

[UltraDiabos]

i can’t understand it at all…

Result:
http://pwp.netcabo.pt/sanosuke/Capture.jpg

[zonk]

I’d try

[code]#####

Weather function

##################
DestroyFunc WeatherCheck
AddToFunc WeatherCheck

• I DestroyMenu recreate MenuWeather
• I PipeRead ‘echo AddToMenu MenuWeather ; perl /home/joao/.fvwm/script/weather_menu.plx’[/code]

[UltraDiabos]

nop, doesn’t work, i don’t know why… seems to be a problem to get info of the site… because the image and “title” appears, but the info, no…

[pem]

@UltraDiabos:
Hey Amigo, I think I got an idea In my conf, I’ve redefined the value:

MenuStyle * ItemFormat "%s%|%5.i%5.5l%5.5r%.5>%|"

Could you show me yours? This surely modify the menu behaviour

[UltraDiabos]

my is:

MenuStyle * ItemFormat “%.2|%.5i%.5l%.5i%2.3>%2|”

[UltraDiabos]

thanks pem, i put that line, and it works
thanks for the help

[pem]

That one was tough but I’m glad we have been though it

[UltraDiabos]

pem, when i use stuffit to extract .sit the icons are not in .png or .xpm… how i fix it? if you know and can tell me, i apreciate thanks

[pem]

That’s an issue I’ve already met too. Fortunately, a friend of mine, Karnevil, has provided me with a nice solution. As it’s in french, here’s a translation.

Uncompression is achived via the use of stuffit. You can found it here. There’s a free command line release. So, once installed:

unstuff -m=on 1343_time.sit

As you’ve mentionned it, this provides weird and unreadable files but at least they are no longer empty.

To be able to use these weird files, there’s an old tool really hard to found as it’s free but not open source. It was formely available on chronomancy.free.fr/fvwm/icon2png-0.5.tar.gz

Once installed:

icns2png Clock

Note that there are now some new archive from Mac that nobody seems to be able to expand Dawn close source!

[UltraDiabos]

hmm thanks, but there is anyway to convert every icons on the page at the same time? or i have to convert one by one ?

[pem]

Well, with the help of our good friend find, you should be able to do it in a sigle shot.

[UltraDiabos]

i’m sorry, but i’m newb, how i do that ?

thanks

[pem]

I would do that:

find DirWhereAreYourFileToConvert -type f -exec icns2png {} \;

It means that for every regular file (the type -f) contained in the DirWhereAreYourFileToConvert directory, it will apply the command icns2png on it. Thus, this little thingy will operate also on file that does not need to be converted: no big deal. It will spit a lot of message for nothing