/***************************************************************************** * * Purpose ...............: MBSE BBS Internet Library * ***************************************************************************** * Copyright (C) 1997-2011 * * Michiel Broek FIDO: 2:280/2802 * Beekmansbos 10 * 1971 BV IJmuiden * the Netherlands * * This file is part of MBSE BBS. * * This BBS is free software; you can redistribute it and/or modify it * under the terms of the GNU General Public License as published by the * Free Software Foundation; either version 2, or (at your option) any * later version. * * MBSE BBS is distributed in the hope that it will be useful, but * WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU * General Public License for more details. * * You should have received a copy of the GNU General Public License * along with MBSE BBS; see the file COPYING. If not, write to the Free * Software Foundation, 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA. *****************************************************************************/ #include "../config.h" #include "mbselib.h" #include "mbinet.h" static int nntpsock = -1; /* TCP/IP socket */ int nntp_connect(void) { char *q, *ipver = NULL, ipstr[INET6_ADDRSTRLEN], servport[10]; struct addrinfo hints, *res = NULL, *p; int rc; if (nntpsock != -1) return nntpsock; if (!strlen(CFG.nntpnode)) { WriteError("NNTP: host not configured"); return -1; } snprintf(servport, 9, "%d", CFG.nntpport); Syslog('+', "NNTP: connecting host: %s port %s", CFG.nntpnode, servport); memset(&hints, 0, sizeof(hints)); hints.ai_family = AF_UNSPEC; hints.ai_socktype = SOCK_STREAM; if ((rc = getaddrinfo(CFG.popnode, servport, &hints, &res)) != 0) { WriteError("getaddrinfo %s:%s %s\n", CFG.popnode, servport, gai_strerror(rc)); return -1; } for (p = res; p != NULL; p = p->ai_next) { void *addr; if (p->ai_family == AF_INET) { struct sockaddr_in *ipv4 = (struct sockaddr_in *)p->ai_addr; addr = &(ipv4->sin_addr); ipver = (char *)"IPv4"; } else { struct sockaddr_in6 *ipv6 = (struct sockaddr_in6 *)p->ai_addr; addr = &(ipv6->sin6_addr); ipver = (char *)"IPv6"; } inet_ntop(p->ai_family, addr, ipstr, sizeof ipstr); Syslog('+', "Trying %s %s port %s", ipver, ipstr, servport); if ((nntpsock = socket(p->ai_family, p->ai_socktype, p->ai_protocol)) == -1) { WriteError("$socket()"); return -1; } else { if (connect(nntpsock, p->ai_addr, p->ai_addrlen) == -1) { WriteError("$connect %s port %s", ipstr, servport); close(nntpsock); } else { break; } } } if (p == NULL) { return -1; /* Not connected */ } q = nntp_receive(); if (strlen(q) == 0) { WriteError("NNTP: no response"); nntp_close(); return -1; } Syslog('+', "NNTP: %s", q); if ((strncmp(q, "480", 3) == 0) || CFG.nntpforceauth) { /* * Must login with username and password */ if (nntp_auth() == FALSE) { WriteError("Authorisation failure"); nntp_close(); return -1; } } else if (strncmp(q, "200", 3)) { WriteError("NNTP: bad response: %s", q); // nntp_close(); FIXME: Don't close, the other end might have done that already // If we do also, this program hangs. Must be fixed! return -1; } if (CFG.modereader) { Syslog('+', "NNTP: setting mode reader"); nntp_send((char *)"MODE READER\r\n"); q = nntp_receive(); Syslog('+', "NNTP: %s", q); if (strncmp(q, "480", 3) == 0) { /* * Must login with username and password */ Syslog('+', "NNTP: %s", q); if (nntp_auth() == FALSE) { WriteError("NNTP: authorisation failure"); nntp_close(); return -1; } } else if (strncmp(q, "200", 3)) { WriteError("NNTP: bad response: %s", q); nntp_close(); return -1; } } return nntpsock; } int nntp_send(char *buf) { if (nntpsock == -1) return -1; if (send(nntpsock, buf, strlen(buf), 0) != strlen(buf)) { WriteError("$NNTP: socket send failed"); if (errno == ENOTCONN || errno == EPIPE) { WriteError("NNTP: closing local side"); nntpsock = -1; } return -1; } return 0; } /* * Return empty buffer if something went wrong, else the complete * dataline is returned */ char *nntp_receive(void) { static char buf[SS_BUFSIZE]; int i = 0, j; if (nntpsock == -1) return NULL; memset((char *)&buf, 0, SS_BUFSIZE); while (TRUE) { j = recv(nntpsock, &buf[i], 1, 0); if (j == -1) { WriteError("$NNTP: error reading socket"); memset((char *)&buf, 0, SS_BUFSIZE); if (errno == ENOTCONN || errno == EPIPE) { WriteError("NNTP: closing local side"); nntpsock = -1; } return buf; } if (buf[i] == '\n') break; i += j; } for (i = 0; i < strlen(buf); i++) { if (buf[i] == '\n') buf[i] = '\0'; if (buf[i] == '\r') buf[i] = '\0'; } return buf; } int nntp_close(void) { if (nntpsock == -1) return 0; nntp_cmd((char *)"QUIT\r\n", 205); if (shutdown(nntpsock, 1) == -1) { WriteError("$NNTP: can't close socket"); return -1; } nntpsock = -1; Syslog('+', "NNTP: closed"); return 0; } /* * Send NNTP command, check response code. * If the code doesn't match, the value is returned, else zero. */ int nntp_cmd(char *cmd, int resp) { char *p, rsp[6]; if (nntp_send(cmd) == -1) return -1; snprintf(rsp, 6, "%d", resp); p = nntp_receive(); if (strncmp(p, "480", 3) == 0) { /* * Must login with username and password */ Syslog('+', "NNTP: %s", p); if (nntp_auth() == FALSE) { WriteError("Authorisation failure"); nntp_close(); return -1; } /* * Now send command again, we are now authorized. */ if (nntp_send(cmd) == -1) return -1; p = nntp_receive(); } if (strncmp(p, rsp, strlen(rsp))) { WriteError("NNTP> %s", cmd); WriteError("NNTP< %s", p); memset(rsp, 0, sizeof(rsp)); strncpy(rsp, p, 3); return atoi(rsp); } return 0; } int nntp_auth(void) { char *cmd; if (!(strlen(CFG.nntpuser) && strlen(CFG.nntppass))) { WriteError("NNTP: password required but not configured"); return FALSE; } cmd = calloc(128, sizeof(char)); snprintf(cmd, 128, "AUTHINFO USER %s\r\n", CFG.nntpuser); if (nntp_cmd(cmd, 381)) return FALSE; snprintf(cmd, 128, "AUTHINFO PASS %s\r\n", CFG.nntppass); if (nntp_cmd(cmd, 281) == 0) { free(cmd); Syslog('+', "NNTP: logged in"); return TRUE; } else { free(cmd); return FALSE; } }