[Affelio-cvs 814] CVS update: affelio/lib/Affelio/SNS

Back to archive index

Tadashi Okoshi slash****@users*****
2005年 12月 10日 (土) 05:50:51 JST


Index: affelio/lib/Affelio/SNS/Handshaker_s.pm
diff -u affelio/lib/Affelio/SNS/Handshaker_s.pm:1.25 affelio/lib/Affelio/SNS/Handshaker_s.pm:1.26
--- affelio/lib/Affelio/SNS/Handshaker_s.pm:1.25	Wed Nov 23 13:00:20 2005
+++ affelio/lib/Affelio/SNS/Handshaker_s.pm	Sat Dec 10 05:50:51 2005
@@ -14,7 +14,7 @@
 # along with this program; if not, write to the Free Software
 # Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
 #
-# $Id: Handshaker_s.pm,v 1.25 2005/11/23 04:00:20 slash5234 Exp $
+# $Id: Handshaker_s.pm,v 1.26 2005/12/09 20:50:51 slash5234 Exp $
 
 ########################################################################
 #package Affelio::SNS::Handshaker_s::Util;
@@ -67,11 +67,53 @@
 
 	use Exporter;
 	@Affelio::SNS::Handshaker_s::ISA = "Exporter";
-	@Affelio::SNS::Handshaker_s::EXPORT = qw (HandShake HandShakeReply F2List post_Message get_services request_AFlink);
+	@Affelio::SNS::Handshaker_s::EXPORT = qw (HandShake HandShakeReply F2List post_Message get_services request_AFlink get_news);
 	use vars qw( $AF_DIR);
     }
 
     ##################################################################
+    #server.get_news
+    # proto_ver: 1
+    ##################################################################
+    sub get_news{
+	my $self = shift;
+	my ($proto_ver,  $xwsse_mesg,  $format) = @_;
+
+	if($proto_ver > 1.0){
+	    return {
+		flerror => XMLRPC::Data->type('boolean', 1),
+		message => "ERR:102 UnsupportedProtoVer 1.0"
+		};
+	}
+
+	#################################
+	#authenticate
+
+	#distill username
+
+	#get password
+
+	#auth
+	
+	#################################
+	#get what's new contents
+
+
+	#################################
+	#send back return message
+	
+	#FORMAT
+	#   datetime appname title description creator
+	#   datetime appname title link
+	my $ret="20051201123456\ndiary\ntitle\nhttp://www.asahi.com"; 
+
+	return {
+	    flerror => XMLRPC::Data->type('boolean', 0),
+	    message => $ret
+	    };
+    }
+
+    ##################################################################
     #server.request_AFlink
     # proto_ver: 1
     ##################################################################
@@ -138,6 +180,9 @@
 <service name="AffelioFriendList">
 <version>1.0</version>
 </service>
+<service name="AffelioNews">
+<version>1.0</version>
+</service>
 </services>
 EOT
 


Affelio-cvs メーリングリストの案内
Back to archive index