Hack help: Random smug thumb/url on my webpages

Comments

• Options

  tcurtin Registered Users Posts: 5 Big grins

  March 14, 2006 edited March 14, 2006

  Ok, I've solved my own problem after some effort and learning about REST and a few XML tricks... Turns out you don't even need an API key. Here's a perl script that will download a list of all image numbers in public galleries for any nickname, and generates a .js javascript library. Include that library and the tag <script type="text/javascript">smugPhoto();</script> to any webpage, and voila!
  
  There is one hackish thing I do - when creating the links to open the image in its smugmug gallery, I use links of the format http://gmara.smugmug.com/gallery/999/999/58701059. The "999/999" is bogus, after I discovered that it didn't matter what was in those positions, you'd still get the image in its gallery home. I don't know if this is always going to be the case, so caveat emptor!
  
  
  

  #!/usr/local/bin/perl
  
  # Copyright Tim Curtin, GMARA, 2006  tim@gmara.org
  # GMARA.org: Bringing Adventure to the Great Outdoors!
  # Interfaces with REST APIs on smugmug.com to get list of all albums and images for a particular smugmug nickname
  # Once obtained, spit out a .js javascript library.  Sample use in html:
  #<script language="JavaScript" src="smugmugimages.js" type="text/javascript"></script>
  #<script type="text/javascript">smugPhoto();</script><noscript><img src="images/pics/pigtails_rope.jpg"></noscript>
  
  # This solution has been tested on IE 6.0.28, Firefox 1.0.7, Opera 8.02, and Safari 2.0.3
  
  # ToDo:
  # Better error handling
  # Logging?
  
  use XML::Simple;
  use Data::Dumper;
  use LWP::Simple;
  
  my $gProxy = "http://api.smugmug.com/hack/rest/";
  my $gSmugNick = "gmara"; # smugmug nickname to grab images from
  my $jsFile = "/home/greenmt/public_html/smugmugimages.js"; # full local path to output file
  my $gImgSize = "Th"; #Th=thumb, L=large, Ti=Tiny, S=Small - the image size to see on your pages
  
  my $debug = 0;
  
  
  my $now = scalar(localtime());
  
    $ret = getSmugXML("albums.get");
  
    print "ret for albums: ",Dumper($ret),"\n" if ($debug > 0);
  
  # print out header to OUTFILE.  Waited until here because a failed get will die first, preventing us from killing the currently existing .js file
  system("cp $jsFile $jsFile.bak");  # make a backup to be safe!
  open(OUTFILE,">$jsFile") or die "Couldn't open $jsfile for write: $!";
  print OUTFILE <<EOF;
  // Created at $now
  // For smugmug nickname $gSmugNick
  
  var B = new Array();
  
  EOF
  
  
    my $i;
    foreach $i (keys %{${$ret}{'Album'}}) {
      my $title = ${$ret}{'Album'}{$i}{'Title'};
      my $category = ${$ret}{'Album'}{$i}{'Category'};
      my $catid = ${$ret}{'Album'}{$i}{'CategoryID'};
  
      my $ret = getSmugXML("images.get","AlbumID=$i","Heavy=1");
  
      # galleries with more than one image return a list of keys in a hash key "Image" - each key is the image number, but the key values are empty.  Should be filled in by the Heavy=1 param to images.get?
      my @images = keys %{${$ret}{'Image'}};
  
      print "ret for $category album '$title' ($i): " , join(',',@images) , "\n" if ($debug > 0);
      print OUTFILE "//Album Title '$title', AlbumID '$i'\n";
      print OUTFILE "//Category '$category', CategoryID '$catid'\n";
      foreach $img (@images) {
        print OUTFILE "B.push('$img');\n";
      }
      print OUTFILE "\n";
  
    }
  
  
  # Now print out a footer to the .js file
  print OUTFILE <<EOF;
  function choosePhoto(parray)
  {
      inx = Math.floor(Math.random()*parray.length);
      img = "http://${gSmugNick}.smugmug.com/photos/" + parray[inx] + "-${gImgSize}.jpg";
      img2= "http://${gSmugNick}.smugmug.com/gallery/999/999/" + parray[inx];
      document.write('<a href="' + img2 + '" target="_new"><img border="0" src="' + img + '" />');
  }
  
  function smugPhoto()
  {
      choosePhoto(B);
  }
  
  EOF
  
  # Close the output properly
  close(OUTFILE);
  
  # And exit stage left
  exit(0);
  
  
  
  
  
  
  #### Subroutines ####
  
  ## getSmugXML(method[,args])
  # call with string containing method, then sets of "arg=val" for any other args to pass to query
  # example, getSmugXML("login.anonymously","Version=1.1.0");
  # should return hash with parsed xml data
  sub getSmugXML {
    my $meth = shift;
    my @args = @_;
  
    my $url = "${gProxy}?method=smugmug.${meth}&NickName=${gSmugNick}&" . join('&',@args);
  
    print "url:$url\n" if ($debug > 0);
  
    my $content = get($url);
    print "content: $content\n" if ($debug > 1);
  
  # These can happen if the smugmug servers are down...
    if ($content =~ /\<html\>/i) {
      die "Doh - something's not right, got html instead of xml?  --- content:\n$content\n--- end of html content\nDying at $now...";
    }
    if (!$content =~ /xml/i) {
      die "Doh - something's not right, didn't get xml?  --- content:\n$content\n--- end of unknown content\nDying at $now...";
    }
  
  
    my $h = XMLin($content);
  
    my $stat = ${$h}{'stat'};
    if ($stat eq "fail") {
      warn "Error in getSmugXML: code " . ${$h}{'err'}{'code'} . ": " . ${$h}{'err'}{'msg'} . "!\n";
    }
  
    return $h;
  }
  
  
  

  0
• Options

  tcurtin Registered Users Posts: 5 Big grins

  March 14, 2006 edited March 14, 2006

  And here is what the resulting javascript .js file looks like:
  

  // Created at Tue Mar 14 12:09:46 2006
  // For smugmug nickname gmara
  
  var B = new Array();
  
  //Album Title 'EMS', AlbumID '1243440'
  //Category 'Other', CategoryID '0'
  B.push('58283660');
  
  //Album Title '2006-01-13 Petra and Dinner', AlbumID '1243434'
  //Category 'Events', CategoryID '8'
  B.push('58317760');
  B.push('58317736');
  B.push('58283433');
  B.push('58317907');
  B.push('58317843');
  B.push('58317835');
  
  function choosePhoto(parray)
  {
      inx = Math.floor(Math.random()*parray.length);
      img = "http://gmara.smugmug.com/photos/" + parray[inx] + "-Th.jpg";
      img2= "http://gmara.smugmug.com/gallery/999/999/" + parray[inx];
      document.write('<a href="' + img2 + '" target="_new"><img border="0" src="' + img + '" />');
  }
  
  function smugPhoto()
  {
      choosePhoto(B);
  }
  
  
  

  0