From root@cakebox.homeunix.net  Sat Jun 26 18:45:17 2010
Return-Path: <root@cakebox.homeunix.net>
Received: from mx1.freebsd.org (mx1.freebsd.org [IPv6:2001:4f8:fff6::34])
	by hub.freebsd.org (Postfix) with ESMTP id B044D1065672
	for <FreeBSD-gnats-submit@freebsd.org>; Sat, 26 Jun 2010 18:45:17 +0000 (UTC)
	(envelope-from root@cakebox.homeunix.net)
Received: from moutng.kundenserver.de (moutng.kundenserver.de [212.227.126.187])
	by mx1.freebsd.org (Postfix) with ESMTP id 2AAA58FC14
	for <FreeBSD-gnats-submit@freebsd.org>; Sat, 26 Jun 2010 18:45:16 +0000 (UTC)
Received: from cakebox.homeunix.net (p50812F1E.dip0.t-ipconnect.de [80.129.47.30])
	by mrelayeu.kundenserver.de (node=mrbap2) with ESMTP (Nemesis)
	id 0MTveb-1Obcvf0lJB-00R3es; Sat, 26 Jun 2010 20:44:54 +0200
Received: from cakebox.homeunix.net (localhost [127.0.0.1])
	by cakebox.homeunix.net (Postfix) with ESMTP id 9383B67A56;
	Sat, 26 Jun 2010 20:44:44 +0200 (CEST)
Received: by cakebox.homeunix.net (Postfix, from userid 0)
	id EA27F67D03; Sat, 26 Jun 2010 20:44:43 +0200 (CEST)
Message-Id: <20100626184443.EA27F67D03@cakebox.homeunix.net>
Date: Sat, 26 Jun 2010 20:44:43 +0200 (CEST)
From: freebsd@nagilum.org
To: FreeBSD-gnats-submit@freebsd.org
Cc: anderfdez@yahoo.es,karma@ez.pereslavl.ru
Subject: ipupdate script doesn't work
X-Send-Pr-Version: 3.113
X-GNATS-Notify:

>Number:         148169
>Category:       ports
>Synopsis:       irc/irssi: ipupdate script doesn't work
>Confidential:   no
>Severity:       non-critical
>Priority:       low
>Responsible:    vanilla
>State:          closed
>Quarter:        
>Keywords:       
>Date-Required:  
>Class:          sw-bug
>Submitter-Id:   current-users
>Arrival-Date:   Sat Jun 26 18:50:01 UTC 2010
>Closed-Date:    Wed Jun 30 01:13:03 UTC 2010
>Last-Modified:  Wed Jun 30 01:13:03 UTC 2010
>Originator:     freebsd@nagilum.org
>Release:        FreeBSD 8.1-PRERELEASE i386
>Organization:
>Environment:
System: FreeBSD cakebox.tis 8.1-PRERELEASE FreeBSD 8.1-PRERELEASE #0: Wed May 19 23:31:37 CEST 2010 root@cakebox.tis:/usr/obj/export/src/sys/net5501 i386


	machine, os, target, libraries irrelevant
>Description:
	The URL used to determine the external IP (http://stuff.xergio.net/ip.php) is no longer working.
>How-To-Repeat:
	start irssi then "/run /usr/local/share/irssi/scripts/ipupdate.pl"
>Fix:

	Apply attached patch to the port which introduced a patch that replaces the old URL with http://checkip.dyndns.com/ and adjusts the regexp to match properly.

--- irssi-scripts.patch begins here ---
diff -Naur irssi-scripts.orig/files/patch-scripts__ipupdate.pl irssi-scripts/files/patch-scripts__ipupdate.pl
--- irssi-scripts.orig/files/patch-scripts__ipupdate.pl	1970-01-01 01:00:00.000000000 +0100
+++ irssi-scripts/files/patch-scripts__ipupdate.pl	2010-06-26 20:28:57.000000000 +0200
@@ -0,0 +1,15 @@
+--- scripts/ipupdate.pl	2010-05-12 09:09:48.000000000 +0200
++++ scripts/ipupdate.pl	2009-08-24 15:33:20.000000000 +0200
+@@ -24,10 +24,10 @@
+ 
+ sub ipset {
+ 	my $user = LWP::UserAgent->new(timeout => 30);
+-	my $get = GET "http://stuff.xergio.net/ip.php";
++	my $get = GET "http://checkip.dyndns.com/";
+ 	my $req = $user->request($get);
+ 	my $out = $req->content();
+-	$out =~ s/.*IP real: ([0-9][0-9]?[0-9]?\.[0-9][0-9]?[0-9]?\.[0-9][0-9]?[0-9]?\.[0-9][0-9]?[0-9]?).*/$1/s;
++	$out =~ s/.*IP Address: ([0-9][0-9]?[0-9]?\.[0-9][0-9]?[0-9]?\.[0-9][0-9]?[0-9]?\.[0-9][0-9]?[0-9]?).*/$1/s;
+ 
+ 	Irssi::print("%9IP update%_:", MSGLEVEL_CRAP);
+ 	Irssi::command("set dcc_own_ip $out");
--- irssi-scripts.patch ends here ---
>Release-Note:
>Audit-Trail:
Responsible-Changed-From-To: freebsd-ports-bugs->vanilla 
Responsible-Changed-By: linimon 
Responsible-Changed-When: Sun Jun 27 04:09:55 UTC 2010 
Responsible-Changed-Why:  
Fix synopsis and assign. 

http://www.freebsd.org/cgi/query-pr.cgi?pr=148169 
State-Changed-From-To: open->closed 
State-Changed-By: vanilla 
State-Changed-When: Wed Jun 30 01:13:01 UTC 2010 
State-Changed-Why:  
Committed, thanks. 

http://www.freebsd.org/cgi/query-pr.cgi?pr=148169 
>Unformatted:
