Changeset 2683 for trunk/tools

Timestamp:

Oct 8, 2008, 12:01:14 AM (16 years ago)

Author:

plg

Message:

feature 889 added: pwg.images.exist check the existence of a photo in the
database based on its md5sum. (avoid failing on pwg.images.add).

File:

• trunk/tools/piwigo_remote.pl (modified) (1 diff)

trunk/tools/piwigo_remote.pl

@@ -174 +174 @@
 }
 
+if ($opt{action} eq 'pwg.images.exist') {
+    $form = {
+        method => $opt{action},
+    };
+
+    foreach my $key (keys %{ $opt{define} }) {
+        $form->{$key} = $opt{define}{$key};
+    }
+
+    my $response = $ua->post(
+        $conf{base_url}.'/ws.php?format=json',
+        $form
+    );
+
+    use Data::Dumper;
+    print Dumper(from_json($response->content)->{result});
+    # print Dumper($response);
+}
+
 $query = pwg_ws_get_query(
     method => 'pwg.session.logout'