From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: David Thompson Newsgroups: gmane.lisp.guile.devel Subject: Re: [ANN] guile-toxcore Date: Fri, 12 Sep 2014 10:49:31 -0400 Message-ID: <877g18uc5g.fsf@izanagi.i-did-not-set--mail-host-address--so-tickle-me> References: <87a965t0i0.fsf@izanagi.i-did-not-set--mail-host-address--so-tickle-me> NNTP-Posting-Host: plane.gmane.org Mime-Version: 1.0 Content-Type: text/plain X-Trace: ger.gmane.org 1410533403 5492 80.91.229.3 (12 Sep 2014 14:50:03 GMT) X-Complaints-To: usenet@ger.gmane.org NNTP-Posting-Date: Fri, 12 Sep 2014 14:50:03 +0000 (UTC) To: guile-devel@gnu.org Original-X-From: guile-devel-bounces+guile-devel=m.gmane.org@gnu.org Fri Sep 12 16:49:57 2014 Return-path: Envelope-to: guile-devel@m.gmane.org Original-Received: from lists.gnu.org ([208.118.235.17]) by plane.gmane.org with esmtp (Exim 4.69) (envelope-from ) id 1XSSAe-0001Kz-7J for guile-devel@m.gmane.org; Fri, 12 Sep 2014 16:49:56 +0200 Original-Received: from localhost ([::1]:45522 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1XSSAd-0005aj-PN for guile-devel@m.gmane.org; Fri, 12 Sep 2014 10:49:55 -0400 Original-Received: from eggs.gnu.org ([2001:4830:134:3::10]:49319) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1XSSAV-0005Yh-JT for guile-devel@gnu.org; Fri, 12 Sep 2014 10:49:53 -0400 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1XSSAP-0002OC-E9 for guile-devel@gnu.org; Fri, 12 Sep 2014 10:49:47 -0400 Original-Received: from na3sys009aog104.obsmtp.com ([74.125.149.73]:36982) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1XSSAP-0002O6-6w for guile-devel@gnu.org; Fri, 12 Sep 2014 10:49:41 -0400 Original-Received: from mail-qg0-f54.google.com ([209.85.192.54]) (using TLSv1) by na3sys009aob104.postini.com ([74.125.148.12]) with SMTP ID DSNKVBMFsE5WAzhKYxhz7INij4KZ7uCFdgtu@postini.com; Fri, 12 Sep 2014 07:39:45 PDT Original-Received: by mail-qg0-f54.google.com with SMTP id z60so810096qgd.41 for ; Fri, 12 Sep 2014 07:49:39 -0700 (PDT) X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=1e100.net; s=20130820; h=x-gm-message-state:from:to:subject:in-reply-to:references :user-agent:date:message-id:mime-version:content-type; bh=Ip6v9ED/iMcOc+l+qmLT9VZiuhg/kOJkVzHDDGQ4naQ=; b=imIbDzsQFC7TYeFLPw3fI/qTUun5m0puTz+dg2HbV8dpq7NBGdFzi2s5yuE6lGhjio gRYZJqwqwFD9p0laekOgLroFleD3SUzSbkeRYb897doFy33ZAu6VE7SqGrKULhbuwSmL FG2itnggHMIM5s83f2DugWaZAKwdqIT9V/ejoBAjlDwuYN19TsgAGZdmMTI4tePyox6E SPjABmTuRJ/5v7pV/RwXTPSJlkAOsG2ZupdI0EJW2x1OEfJQqLGT0VYVVEJCzypOglDv /kh8QIVulWUq8J+eL1RIBy1YtpXgHnbZlhwQ31DQOogAt7eftEW4ZUjcGo9hjVx5I8bO KRIQ== X-Gm-Message-State: ALoCoQkucgHjGyVMJxbfRIAuL6YIjSihXiL5lreEPmlTfcBdjlKm8hI+6b7fllDOjAcQIzgJjUBhAytXYMTf9RoA7ThSH6i4zdqHpjDyu2NTxZ//dXcS4qM+FemMP9eNV5EInXZ8kkjmNz/0YhNZGebEZ7jqAzaMpg== X-Received: by 10.229.38.200 with SMTP id c8mr4561308qce.10.1410533377927; Fri, 12 Sep 2014 07:49:37 -0700 (PDT) X-Received: by 10.229.38.200 with SMTP id c8mr4560834qce.10.1410533374851; Fri, 12 Sep 2014 07:49:34 -0700 (PDT) Original-Received: from izanagi (209-6-40-86.c3-0.smr-ubr1.sbo-smr.ma.cable.rcn.com. [209.6.40.86]) by mx.google.com with ESMTPSA id v47sm3118496qgv.8.2014.09.12.07.49.33 for (version=TLSv1.2 cipher=ECDHE-RSA-AES128-GCM-SHA256 bits=128/128); Fri, 12 Sep 2014 07:49:34 -0700 (PDT) In-Reply-To: <87a965t0i0.fsf@izanagi.i-did-not-set--mail-host-address--so-tickle-me> User-Agent: Notmuch/0.18.1 (http://notmuchmail.org) Emacs/24.3.1 (x86_64-pc-linux-gnu) X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.4.x X-Received-From: 74.125.149.73 X-BeenThere: guile-devel@gnu.org X-Mailman-Version: 2.1.14 Precedence: list List-Id: "Developers list for Guile, the GNU extensibility library" List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: guile-devel-bounces+guile-devel=m.gmane.org@gnu.org Original-Sender: guile-devel-bounces+guile-devel=m.gmane.org@gnu.org Xref: news.gmane.org gmane.lisp.guile.devel:17440 Archived-At: David Thompson writes: > One of my goals with this project is to write a bot that users can add > as a friend and use to test text/audio/video chat. Currently, I have a > working text chat echo bot. Here's the config for the example client (examples/client.scm) that provides the echo bot functionality: (use-modules (tox util)) (define tox-bootstrap-nodes '(((ip . "192.254.75.98") (id . "951C88B7E75C867418ACDB5D273821372BB5BD652740BCDF623A4FA293E75D2F") (port . 33445) (ipv6? . #t)) ((ip . "144.76.60.215") (id . "04119E835DF3E78BACF0F84235B300546AF8B936F035185E2A8E9E0A67C8924F") (port . 33445) (ipv6? . #t)) ((ip . "23.226.230.47") (id . "A09162D68618E742FFBCA1C2C70385E6679604B2D80EA6E84AD0996A1AC8A074") (port . 33445) (ipv6? . #t)) ((ip . "37.187.20.216") (id . "4FD54CFD426A338399767E56FD0F44F5E35FA8C38C8E87C8DC3FEAC0160F8E17") (port . 33445) (ipv6? . #t)) ((ip . "54.199.139.199") (id . "7F9C31FE850E97CEFD4C4591DF93FC757C7C12549DDD55F8EEAECC34FE76C029") (port . 33445) (ipv6? . #f)) ((ip . "37.59.102.176") (id . "B98A2CEAA6C6A2FADC2C3632D284318B60FE5375CCB41EFA081AB67F500C1B0B") (port . 33445) (ipv6? . #t)) ((ip . "192.210.149.121") (id . "F404ABAA1C99A9D37D61AB54898F56793E1DEF8BD46B1038B9D822E8460FAB67") (port . 33445) (ipv6? . #f)) ((ip . "37.187.46.132") (id . "5EB67C51D3FF5A9D528D242B669036ED2A30F8A60E674C45E7D43010CB2E1331") (port . 33445) (ipv6? . #t)))) (define (tox-friend-names tox) (map (lambda (friend-number) (tox-friend-name tox friend-number)) (tox-friend-list tox))) (set-tox-name tox "Tox Test Bot") (set-tox-status-message tox "Hanging around") (add-hook! tox-friend-request-hook (lambda (tox public-key message) (format #t "Friend request:\nClient ID: ~a\nMessage: ~a\n\n" (bytevector->hex-string public-key) message) (tox-add-friend-no-request tox public-key))) (add-hook! tox-message-hook (lambda (tox friend message) (let ((name (tox-friend-name tox friend)) (response (format #f "I received the message: \"~a\"" message))) (format #t "~a says: ~a\n" name message) (tox-send-message tox friend response)))) -- David Thompson Web Developer - Free Software Foundation - http://fsf.org GPG Key: 0FF1D807 Support the FSF: https://fsf.org/donate