[Mailpictures] Envoyer des photos/fichiers par Email avec Nautilus

Ambigua · Le 22/07/2009, à 08:26

Salut !

La commande c'est:

sudo gedit /usr/share/mailpictures/mailpictures.pl

et non sudo gedit /usr/share/mailpictures.pl comme tu as écrit

Je viens de tester, car il est vrai que j'avais plein de zombie mailpictures dans mon PC, on aurait dit le clip de Thriller ..

MisB · Le 22/07/2009, à 16:25

Salut à tous,
effectivement c'est le premier mailpictures qui reste dans l'état de zombie.
Pour Ambigua il est préconisé d'utiliser Alt>F2 gksudo et non sudo pour une application graphique.
Encore une fois longue vie à mailpictures

netsabes · Le 13/08/2009, à 17:51

Bonjour,

j'ai essayé ce script, qui semble correspondre exactement à ce que je cherche, dans sa version 0.9.5 (la dernière)

L'installation se déroule bien, mais quelles que soient les options choisies par la suite, la barre de progression reste désespérément bloquée à 0% (même sans choisir de compression, même en choisissant "répertoire", etc...)

J'utilise Thunderbird (2.0.0.22, c'est peut-être ça le problème...) sous Ubuntu 8.10

Est-ce que ça peut marcher chez moi ?

Merci.

razer · Le 13/08/2009, à 18:01

@netsabes : merci de poster ici le contenu du fichier /tmp/mp_debug-<tonlogin>
Merci par ailleurs de donner un peu plus de détails :
est ce que la fenêtre de configuration s'ouvre normalement via le menu système
est ce que le bug se produit aussi lors de l'envoi de fichiers (pas d'images)

netsabes · Le 13/08/2009, à 23:07

Bonjour,

apparemment c'est la propriété "orientation" qui poserait problème, non ?

Voici le fichier de debug demandé :

--------- Mail Pictures Debug --------
--------------------------------------
Config : mailer = Thunderbird
Config : store = 0
Config : imgsize = 800
Config : datazipdiag = 0
Config : zipname = Pictures
Config : folder = /home/seb
Config : jpgcomp = 1
Config : hidediag = 1
Config : resize = 1
Config : createzip = 0
Config : ctres = 1280
Config : jpegratio = 85
Config : zipfiles = 5
Config : datazip = 0
Config : zipdataname = Datas

(mailpictures.pl:5572): libglade-WARNING **: unknown property `orientation' for class `GtkVBox'

(mailpictures.pl:5572): libglade-WARNING **: unknown property `orientation' for class `GtkVBox'

(mailpictures.pl:5572): libglade-WARNING **: unknown property `orientation' for class `GtkVBox'

(mailpictures.pl:5572): libglade-WARNING **: unknown property `orientation' for class `GtkVBox'

(mailpictures.pl:5572): libglade-WARNING **: unknown property `orientation' for class `GtkVBox'

(mailpictures.pl:5572): libglade-WARNING **: unknown property `orientation' for class `GtkVBox'

(mailpictures.pl:5572): libglade-WARNING **: unknown property `orientation' for class `GtkVBox'

(mailpictures.pl:5572): libglade-WARNING **: unknown property `orientation' for class `GtkVBox'
Etat preliminaire de la config : readed
Mailer : Thunderbird, Select Folder : /home/seb
Resolution change : 1 Resolution : 800
Compress JPEG = 1, Ratio JPEG = 85
Zip Creation : 0, Zip Filename : Pictures, Enregistrer config : 0
Use of uninitialized value in subroutine entry at /usr/share/mailpictures/mailpictures.pl line 100.
Exit required !! PID : 5574

En revanche, j'accède correctement à la fenêtre de configuration via le menu système et il n'y a aucun problème pour envoyer autre chose que des images.

C'est grave, docteur ? ;-)

Merci !

Netsabes

razer · Le 14/08/2009, à 07:04

@netsabes :
Plusieurs points :
1. le message de la libglade n'est qu'un warning (avertissement), tu as une ancienne version qui ne reconnait pas une propriété récente : cela n'explique pas ton problème, au pire quelque chose ne s'affichera pas ou mal...
2. Il faudrait que tu me confirmes que le contenu du fichier debug est celui après un bug du programme (envoi d'image). A priori, tu arrêtes le processus, donc cela semble être le cas.
3. Peux tu essayer de lancer le programme dans un terminal de me donner la sortie:
/usr/share/mailpictures.pl /<chemin>/<image>
4. Si cela fonctionne avec des fichiers, il y a un problème d'orientation exif ou de redimmensionnement. Peux tu éditer le fichier :

sudo nano /usr/share/mailpictures/CoreFunctions.pm

ligne 136, tu commentes:

rotate_image($current_img);

à remplacer par :

#rotate_image($current_img);

tu essayes

Si çà ne marche toujours pas :
A la ligne 146, juste en dessous de :

$img_height = $current_img->get_height if !($img_height);

Rajouter :

printf "Image size : $img_width x $img_height\n";

puis me poster à nouveau le fichier de debug
Merci

Dernière modification par razer (Le 14/08/2009, à 07:06)

netsabes · Le 14/08/2009, à 20:37

Bonjour,

merci pour cette réponse complète.

1. Ok. La nouvelle version de libglade n'est pas dispo pour 8.10 ?

2. Je confirme que le debug est bien consécutif à un arrêt du programme de ma part.

3. Le terminal donne :

seb@seb-laptop:~$ /usr/share/mailpictures/mailpictures.pl /home/seb/Bureau/Pour\ Benoît/IMG_1848.JPG
^C
seb@seb-laptop:~$

Interruption volontaire au bout d'une minute sans rien.
Le terminal ne donne aucun message.

4. Commenter la ligne 136 ne change rien.
Après ajout de la ligne 146, le debug donne :

--------- Mail Pictures Debug --------
--------------------------------------
Config : mailer = Thunderbird
Config : store = 0
Config : imgsize = 800
Config : datazipdiag = 0
Config : zipname = Pictures
Config : folder = /home/seb
Config : jpgcomp = 1
Config : hidediag = 1
Config : resize = 1
Config : createzip = 0
Config : ctres = 1280
Config : jpegratio = 85
Config : zipfiles = 5
Config : datazip = 0
Config : zipdataname = Datas

(mailpictures.pl:6437): libglade-WARNING **: unknown property `orientation' for class `GtkVBox'

(mailpictures.pl:6437): libglade-WARNING **: unknown property `orientation' for class `GtkVBox'

(mailpictures.pl:6437): libglade-WARNING **: unknown property `orientation' for class `GtkVBox'

(mailpictures.pl:6437): libglade-WARNING **: unknown property `orientation' for class `GtkVBox'

(mailpictures.pl:6437): libglade-WARNING **: unknown property `orientation' for class `GtkVBox'

(mailpictures.pl:6437): libglade-WARNING **: unknown property `orientation' for class `GtkVBox'

(mailpictures.pl:6437): libglade-WARNING **: unknown property `orientation' for class `GtkVBox'

(mailpictures.pl:6437): libglade-WARNING **: unknown property `orientation' for class `GtkVBox'
Etat preliminaire de la config : readed
Mailer : Thunderbird, Select Folder : /home/seb
Resolution change : 1 Resolution : 800
Compress JPEG = 1, Ratio JPEG = 85
Zip Creation : 0, Zip Filename : Pictures, Enregistrer config : 0
Use of uninitialized value in subroutine entry at /usr/share/mailpictures/mailpictures.pl line 100.

Je ne vois pas de trace de "Image size" dans le debug.
Pas de modification de fonctionnement.

Merci pour l'aide.

Netsabes.

razer · Le 14/08/2009, à 23:04

/usr/share/mailpictures/mailpictures.pl /home/seb/Bureau/Pour\ Benoît/IMG_1848.JPG

Est ce que le comportement est identique lorsque le fichier est stocké dans un répertoire sans espaces ni caractères accentués ??
Ton bug est bizarre, car le programme semble planter sans indiquer quoique ce soit...

netsabes · Le 14/08/2009, à 23:38

idem (essayé sur le Bureau)

razer · Le 15/08/2009, à 07:52

@netsabes : comme je ne vois pas du tout d'ou vient ton problème, on va y aller par étape :

On va commencer par voir si Imlib fonctionne correctement :

#!/usr/bin/perl -w
use Image::Imlib2;

if (@ARGV) {
    $img=Image::Imlib2->load(@ARGV);
    print "Width/Height new method :".$img->width."/".$img->height."\n";
    print "Width/Height old method :".$img->get_width."/".$img->get_height."\n";
    }
else {
    print "Please give an image in argument !!!\n";
    }

Tu enregistres ce code dans un fichier, par ex. "imlib_test.pl", à l'intérieur d'un répertoire contenant des images
Tu ouvres un terminal dans ce répertoire
Tu rend le fichier exécutable : chmod +x imlib_test.pl
Tu exécutes et tu me donnes ce que çà t'affiche : ./imlib_test.pl <monimage>

Merci

netsabes · Le 15/08/2009, à 20:11

Bonsoir,

voilà le résultat :

seb@seb-laptop:~/Bureau/de Benoît$ ./imlib_test.pl P1000502.JPG
Width/Height new method :2560/1920
Width/Height old method :2560/1920

Apparemment, cela ne vient pas de là, non ?

Netsabes.

razer · Le 16/08/2009, à 08:20

Ok, continuons l'investigation :

#!/usr/bin/perl -w
use Image::Imlib2;

if (@ARGV) {
    $img=Image::Imlib2->load(@ARGV);
    $scaled_img=$img->create_scaled_image(800,0);
    $scaled_img->set_quality(85);
	$scaled_img->image_set_format("jpeg");
    $scaled_img->save("/tmp/essai.jpg");
    }
else {
    print "Please give an image as argument !!!\n";
    }

Cà doit de créer une image /tmp/essai.jpg, de taille 800 pixels
Désolé, cela va être un peu long, mais comme cela fonctionne à priori pour tout le monde sauf toi, je suis un peu perdu sur la cause de tout çà...

Dis moi aussi :
1. le retour de la commande "ulimit"
2. Si cela fonctionne lorsque tu choisis ni de redimensionner les images, ni de changer la compression jpeg.

Merci

netsabes · Le 16/08/2009, à 11:03

Bonjour docteur,

Le script fonctionne très bien.
à noter : si l'image source est en format paysage, l'image créée l'est aussi.
Mais si l'image source est en format portrait, l'image créée passe en format paysage. Sûrement une donnée exif qui disparaît dans la conversion.

1. ulimit renvoie unlimited.
2. le programme fonctionne si j'envoie sans modifier l'image. MAIS :
il ne fonctionne pas si je choisis seulement de redimensionner
il fonctionne si je choisis seulement de compresser.

On progresse !

Merci.

Netsabes.

razer · Le 16/08/2009, à 12:19

@netsabes :
Toujours le même topo :

#!/usr/bin/perl -w
use Image::Imlib2;
use Image::ExifTool;

# Rotate Pictures
sub rotate_image {
	my $current_img = shift;
	my $exif = new Image::ExifTool;
    my $image_info = $exif->ImageInfo($_,'Orientation');
    my $image_orientation = $image_info->{'Orientation'};
	$image_orientation = "" if ( ! $image_orientation);
    if ($image_orientation eq 'Rotate 90 CW') {
		$current_img->image_orientate(1);
    	} 
	elsif ($image_orientation eq 'Rotate 270 CW') {
    	$current_img->image_orientate(3);
    	} 
	elsif ($image_orientation eq 'Rotate 180') {
    	$current_img->image_orientate(2);
    	}
	}

if (@ARGV) {  
    $img=Image::Imlib2->load(@ARGV);
    my ($exifimg, $null) = split ("\n", `file @ARGV |grep EXIF`);
    printf "Image type : $exifimg\n";
	if ($exifimg) {
        printf "Image have EXIF : using it\n";
	    rotate_image($img);
		}
    my $imgsize=800;
    my $img_width = $img->width;
	my $img_height = $img->height;
    # Case image size smaller than expected : do not resize
	if ($img_width <= $imgsize) {
		$new_width = $img_width;
		$new_height = 0;
		}
	# Reverse width <-> height for portrait image
	elsif ($img_width < $img_height) {
        $new_width = 0;
        $new_height = $imgsize;
		}
    # Other cases
	else {
		$new_width = $imgsize;
		$new_height = 0;
		}
    printf "Creating new image : width $new_width, height $new_height\n";
    $scaled_img=$img->create_scaled_image($new_width,$new_height);
    $scaled_img->set_quality(85);
	$scaled_img->image_set_format("jpeg");
    $scaled_img->save("/tmp/essai.jpg");
    }
else {
    print "Please give an image in argument !!!\n";
    }

Par ailleurs :
Le problème survient avec toutes les images ?
Pourrais tu m'envoyer une de tes images qui pose problème ?
razer -AT- free -POINT- fr

Dernière modification par razer (Le 16/08/2009, à 12:39)

netsabes · Le 16/08/2009, à 13:36

 - These recipients of your message have been processed by the mail server:
razer AT free PT fr; Failed; 5.1.1 (bad destination mailbox address)

    Remote MTA mx1.free.fr: SMTP diagnostic: 550 5.2.1 This mailbox has been blocked due to inactivity

Décidément pas de bol...

voici une image avec laquelle cela ne fonctionne pas : http://pxsqta.bay.livefilestore.com/y1p … G_1933.JPG
Pour l'instant, je n'en ai aucune avec laquelle cela fonctionne.
Mes images proviennent de deux appareils photos de marques différentes.

Je vais essayer sur mon deuxième ordinateur et je te tiendrai au courant.

Netsabes.

[Edit : pour cacher le mail aux robots]

Dernière modification par netsabes (Le 16/08/2009, à 13:37)

razer · Le 16/08/2009, à 14:16

Désolé, je me suis planté dans l'email.
N'importe comment, ton image fonctionne avec mailpictures sur tous les PCs chez moi (9.04)
Merci de tester la dernière version du script

netsabes · Le 16/08/2009, à 14:30

Bonjour,

désolé, je sens bien que je suis lourd...

Bon, j'avais bien la dernière version : 0.95.
Je l'ai réinstallée, mais ça fonctionne pareil.

En revanche, aucun souci sur mon ordi fixe... Sûrement un problème de dépendances sur mon portable.

En tout cas excellent programme.

Netsabes

razer · Le 16/08/2009, à 14:48

netsabes a écrit :

Bonjour,
désolé, je sens bien que je suis lourd...
Sûrement un problème de dépendances sur mon portable.
Netsabes

Crois pas que tu me déranges, au contraire : si tu as un problème, il est fort probable que d'autres puissent l'avoir.
J'aimerais donc qu'on trouve la raison...
Donc merci d'essayer le script

netsabes · Le 16/08/2009, à 14:55

Ben je l'ai bien essayé, mais sur mon portable, ça ne passe toujours pas.
Même version d'Ubuntu, pourtant...

razer · Le 16/08/2009, à 15:37

netsabes a écrit :

Ben je l'ai bien essayé, mais sur mon portable, ça ne passe toujours pas.
Même version d'Ubuntu, pourtant...

Je me suis mal exprimé : teste la dernière version du imlib-test.pl que j'ai joint un peu plus haut

Dernière modification par razer (Le 16/08/2009, à 15:38)

netsabes · Le 16/08/2009, à 15:48

Oups, ce message m'avait échappé...

Voilà le retour :

seb@seb-laptop:~/Bureau$ ./test.pl p.jpg
./test.pl: line 2: sub : commande introuvable
./test.pl: line 3: my : commande introuvable
./test.pl: line 4: my : commande introuvable
./test.pl: line 5: Erreur de syntaxe près du symbole inattendu « ( »
./test.pl: line 5: `    my $image_info = $exif->ImageInfo($_,'Orientation');'

Merci.

razer · Le 16/08/2009, à 19:37

Tu as dû oublier de copier/coller la première ligne : #!/usr/bin/perl -w

netsabes · Le 16/08/2009, à 20:28

Bien vu.
Voilà le retour :

seb@seb-laptop:~/Bureau$ ./test.pl P.JPG
Image type : P.JPG: JPEG image data, EXIF standard 2.2
Image have EXIF : using it
Creating new image : width 800, height 0

En tout cas ça me donne envie de m'essayer aux scripts.

Netsabes.

razer · Le 17/08/2009, à 07:13

L'image réduite est bien crée ? Cela fonctionne t-il de la même manière avec toutes tes images ?
A priori tout fonctionne, c'est à n'y rien comprendre...

Il serait peut-être intéressant que tu testes ce petit programme sur plusieurs images dans un même répertoire :

for file in <cheminversimages>/*; do ./test.pl "$file"; done

Résumons :
Le programme fonctionne normalement sur un de tes Pcs
Sur ton portable avec un système identique, cela ne fonctionne pas si tu choisis de redimensionner
Mais cela fonctionne sans redimensionner, juste en changeant la compression jpeg
Cela fonctionne aussi avec les fichiers qui ne sont pas des images
Au moment ou cela fonctionne pas, le programme se plante au début de processus, en montrant une fenêtre d'avancement qui... n'avance pas.
Un script réalisant les fonctions identiques sur une image unique (dernier testé) fonctionne normalement.

Merci de confirmer/infirmer/préciser tous ces points, car dans l'état je calle...

Dernière modification par razer (Le 17/08/2009, à 07:32)

netsabes · Le 17/08/2009, à 07:51

Bonjour,

je confirme tous les points, sauf peut-être le dernier, qui n'implique pas de transfert vers le logiciel de messagerie...

je m'y perd aussi.

Netsabes

Ubuntu-fr

Navigation

Liens de recherche

Annonce

#226 Le 22/07/2009, à 08:26

Re : [Mailpictures] Envoyer des photos/fichiers par Email avec Nautilus

#227 Le 22/07/2009, à 16:25

Re : [Mailpictures] Envoyer des photos/fichiers par Email avec Nautilus

#228 Le 13/08/2009, à 17:51

Re : [Mailpictures] Envoyer des photos/fichiers par Email avec Nautilus

#229 Le 13/08/2009, à 18:01

Re : [Mailpictures] Envoyer des photos/fichiers par Email avec Nautilus

#230 Le 13/08/2009, à 23:07

Re : [Mailpictures] Envoyer des photos/fichiers par Email avec Nautilus

#231 Le 14/08/2009, à 07:04

Re : [Mailpictures] Envoyer des photos/fichiers par Email avec Nautilus

#232 Le 14/08/2009, à 20:37

Re : [Mailpictures] Envoyer des photos/fichiers par Email avec Nautilus

#233 Le 14/08/2009, à 23:04

Re : [Mailpictures] Envoyer des photos/fichiers par Email avec Nautilus

#234 Le 14/08/2009, à 23:38

Re : [Mailpictures] Envoyer des photos/fichiers par Email avec Nautilus

#235 Le 15/08/2009, à 07:52

Re : [Mailpictures] Envoyer des photos/fichiers par Email avec Nautilus

#236 Le 15/08/2009, à 20:11

Re : [Mailpictures] Envoyer des photos/fichiers par Email avec Nautilus

#237 Le 16/08/2009, à 08:20

Re : [Mailpictures] Envoyer des photos/fichiers par Email avec Nautilus

#238 Le 16/08/2009, à 11:03

Re : [Mailpictures] Envoyer des photos/fichiers par Email avec Nautilus

#239 Le 16/08/2009, à 12:19

Re : [Mailpictures] Envoyer des photos/fichiers par Email avec Nautilus

#240 Le 16/08/2009, à 13:36

Re : [Mailpictures] Envoyer des photos/fichiers par Email avec Nautilus

#241 Le 16/08/2009, à 14:16

Re : [Mailpictures] Envoyer des photos/fichiers par Email avec Nautilus

#242 Le 16/08/2009, à 14:30

Re : [Mailpictures] Envoyer des photos/fichiers par Email avec Nautilus

#243 Le 16/08/2009, à 14:48

Re : [Mailpictures] Envoyer des photos/fichiers par Email avec Nautilus

#244 Le 16/08/2009, à 14:55

Re : [Mailpictures] Envoyer des photos/fichiers par Email avec Nautilus

#245 Le 16/08/2009, à 15:37

Re : [Mailpictures] Envoyer des photos/fichiers par Email avec Nautilus

#246 Le 16/08/2009, à 15:48

Re : [Mailpictures] Envoyer des photos/fichiers par Email avec Nautilus

#247 Le 16/08/2009, à 19:37

Re : [Mailpictures] Envoyer des photos/fichiers par Email avec Nautilus

#248 Le 16/08/2009, à 20:28

Re : [Mailpictures] Envoyer des photos/fichiers par Email avec Nautilus

#249 Le 17/08/2009, à 07:13

Re : [Mailpictures] Envoyer des photos/fichiers par Email avec Nautilus

#250 Le 17/08/2009, à 07:51

Re : [Mailpictures] Envoyer des photos/fichiers par Email avec Nautilus

Pied de page des forums