From mboxrd@z Thu Jan 1 00:00:00 1970 X-Msuck: nntp://news.gmane.io/gmane.emacs.gnus.general/57605 Path: main.gmane.org!not-for-mail From: Magnus Henoch Newsgroups: gmane.emacs.gnus.general Subject: SRV support for dns.el Date: Sat, 15 May 2004 22:25:45 +0200 Sender: ding-owner@lists.math.uh.edu Message-ID: <8765axfnee.fsf@freemail.hu> NNTP-Posting-Host: deer.gmane.org Mime-Version: 1.0 Content-Type: multipart/mixed; boundary="=-=-=" X-Trace: sea.gmane.org 1085089421 6966 80.91.224.253 (20 May 2004 21:43:41 GMT) X-Complaints-To: usenet@sea.gmane.org NNTP-Posting-Date: Thu, 20 May 2004 21:43:41 +0000 (UTC) Original-X-From: ding-owner+M6145@lists.math.uh.edu Thu May 20 23:43:31 2004 Return-path: Original-Received: from malifon.math.uh.edu ([129.7.128.13]) by deer.gmane.org with esmtp (Exim 3.35 #1 (Debian)) id 1BQvK6-0004ky-00 for ; Thu, 20 May 2004 23:43:31 +0200 Original-Received: from localhost ([127.0.0.1] helo=lists.math.uh.edu) by malifon.math.uh.edu with smtp (Exim 3.20 #1) id 1BQvJy-0001UL-00; Thu, 20 May 2004 16:43:23 -0500 Original-Received: from util2.math.uh.edu ([129.7.128.23]) by malifon.math.uh.edu with esmtp (Exim 3.20 #1) id 1BP5xd-0005Ou-00 for ding@lists.math.uh.edu; Sat, 15 May 2004 15:40:45 -0500 Original-Received: from justine.libertine.org ([66.139.78.221] ident=postfix) by util2.math.uh.edu with esmtp (Exim 4.30) id 1BP5xc-0004m7-Fz for ding@lists.math.uh.edu; Sat, 15 May 2004 15:40:44 -0500 Original-Received: from main.gmane.org (main.gmane.org [80.91.224.249]) by justine.libertine.org (Postfix) with ESMTP id B7ACA3A0027 for ; Sat, 15 May 2004 15:40:42 -0500 (CDT) Original-Received: from root by main.gmane.org with local (Exim 3.35 #1 (Debian)) id 1BP5xZ-0000iM-00 for ; Sat, 15 May 2004 22:40:41 +0200 Original-Received: from h170n1fls23o1074.bredband.comhem.se ([213.67.239.170]) by main.gmane.org with esmtp (Gmexim 0.1 (Debian)) id 1AlnuQ-0007hv-00 for ; Sat, 15 May 2004 22:40:41 +0200 Original-Received: from mange by h170n1fls23o1074.bredband.comhem.se with local (Gmexim 0.1 (Debian)) id 1AlnuQ-0007hv-00 for ; Sat, 15 May 2004 22:40:41 +0200 X-Injected-Via-Gmane: http://gmane.org/ Original-To: ding@gnus.org Original-Lines: 45 Original-X-Complaints-To: usenet@sea.gmane.org X-Gmane-NNTP-Posting-Host: h170n1fls23o1074.bredband.comhem.se User-Agent: Gnus/5.1006 (Gnus v5.10.6) Emacs/21.3 (gnu/linux) Cancel-Lock: sha1:X5QrXdN+OTH1B79gTM58478GREA= Precedence: bulk Xref: main.gmane.org gmane.emacs.gnus.general:57605 X-Report-Spam: http://spam.gmane.org/gmane.emacs.gnus.general:57605 --=-=-= The included patch enables dns.el to make SRV queries and parse the results. Can it be included in Gnus? (SRV records are defined in RFC 2782. In short, querying for _foo._tcp.example.com returns the hostname and port number of the server(s) providing service foo at example.com over TCP.) Regards, Magnus --=-=-= Content-Type: text/x-patch Content-Disposition: attachment; filename=dns.el.patch Index: lisp/dns.el =================================================================== RCS file: /usr/local/cvsroot/gnus/lisp/dns.el,v retrieving revision 7.4 diff -u -r7.4 dns.el --- lisp/dns.el 18 Mar 2004 22:56:09 -0000 7.4 +++ lisp/dns.el 15 May 2004 20:21:11 -0000 @@ -56,6 +56,7 @@ (MX 15) (TXT 16) (AAAA 28) ; RFC3596 + (SRV 33) ; RFC2782 (AXFR 252) (MAILB 253) (MAILA 254) @@ -284,6 +285,11 @@ (list 'retry (dns-read-int32)) (list 'expire (dns-read-int32)) (list 'minimum (dns-read-int32)))) + ((eq type 'SRV) + (list (list 'priority (dns-read-bytes 2)) + (list 'weight (dns-read-bytes 2)) + (list 'port (dns-read-bytes 2)) + (list 'target (dns-read-name buffer)))) ((eq type 'MX) (cons (dns-read-bytes 2) (dns-read-name buffer))) ((or (eq type 'CNAME) (eq type 'NS) (eq type 'PTR)) --=-=-=--