egghelp/eggheads community Discussion of eggdrop bots, shell accounts and tcl scripts. 2012-04-13T14:55:53-04:00 https://forum.eggheads.org/app.php/feed/topic/18922 2012-04-13T14:55:53-04:00 2012-04-13T14:55:53-04:00 https://forum.eggheads.org/viewtopic.php?p=99185#p99185 <![CDATA[rss synd tinyurl code optimization]]>
Originally I didn't think it was script related so i made the following post.
http://forum.egghelp.org/viewtopic.php?t=18920

but now I noticed the following:
[14:44] (!) timer drift -- spun 3 minutes

I think its due to the tinyurl code I added. Because before that, rss synd worked just fine and i had no ping timeouts. Also, some of the time, the tinyurl does show up when the rss is announced. SO i have two issues, my eggdrop tiems out and sometimes the tiny url does not produce anything.

Here is the tinyurl code I have:

Code: 

#tinyurl expansion for rss-synd.tcl#@see http://forum.egghelp.org/viewtopic.php?p=66327#66327proc ::rss-synd::tinyurl {url} {  #tinyurls are currently 26 chars at most  if {[string length $url] <= 26} { return $url; }  set tinyurl "http://tinyurl.com/api-create.php";  set query [::http::formatQuery "url" $url];  # since this connection is synchronous and blocks  #  the timeout should be relatively small.  set token [::http::geturl "$tinyurl?$query" -timeout 5000];  set url [::http::data $token];  ::http::cleanup $token;  return $url;}
So obviously there is a timeout I can edit. But my question is, do I need to increase or decrease the timeout. And also, why is this a problem, is the tinyurl.com service slow? Should I use a different one?

Statistics: Posted by teegg — Fri Apr 13, 2012 2:55 pm

]]>