/* $Id: mail2.c,v 1.13 2004/03/03 03:47:04 reinelt Exp $ * * mail: pop3, imap, news functions * * Copyright 2001 Leopold Tötsch * * This file is part of LCD4Linux. * * LCD4Linux 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. * * LCD4Linux 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 this program; if not, write to the Free Software * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. * * * $Log: mail2.c,v $ * Revision 1.13 2004/03/03 03:47:04 reinelt * big patch from Martin Hejl: * - use qprintf() where appropriate * - save CPU cycles on gettimeofday() * - add quit() functions to free allocated memory * - fixed lots of memory leaks * * Revision 1.12 2004/01/30 20:57:56 reinelt * HD44780 patch from Martin Hejl * dmalloc integrated * * Revision 1.11 2004/01/29 04:40:02 reinelt * every .c file includes "config.h" now * * Revision 1.10 2004/01/09 04:16:06 reinelt * added 'section' argument to cfg_get(), but NULLed it on all calls by now. * * Revision 1.9 2003/10/05 17:58:50 reinelt * libtool junk; copyright messages cleaned up * * Revision 1.8 2003/02/22 07:53:10 reinelt * cfg_get(key,defval) * * Revision 1.7 2002/12/05 19:23:01 reinelt * fixed undefined operations found by gcc3 * * Revision 1.6 2001/09/12 06:17:22 reinelt * *** empty log message *** * * Revision 1.5 2001/09/12 05:58:16 reinelt * fixed bug in mail2.c * * Revision 1.4 2001/03/16 09:28:08 ltoetsch * bugfixes * * Revision 1.3 2001/03/15 14:25:05 ltoetsch * added unread/total news * * Revision 1.2 2001/03/15 11:10:53 ltoetsch * added quit/logout to pop/imap * * Revision 1.1 2001/03/14 13:19:29 ltoetsch * Added pop3/imap4 mail support * * * Exported Functions: * * int Mail_pop_imap_news(char *mbox, int *total_mails, int *unseen); * returns -1 on error, 0 on success * */ #include "config.h" #include #include #include #include #include #include #include "debug.h" #include "cfg.h" #include "socket.h" #ifdef WITH_DMALLOC #include #endif #define PROTO_UNKNOWN -1 #define PROTO_POP3 110 #define PROTO_NNTP 119 #define PROTO_IMAP4 143 /* * parse_proto() * * parse a MailboxN entry in 's' as * * proto:[user[:pass]@]machine[:port][/dir] * * 's' get's destroyed * returns 0 on success, -1 on error * */ static int parse_proto(char *s, int *proto, char **user, char **pass, char **machine, int *port, char **dir) { struct { char *prefix; int proto; } protos[] = { { "pop3:", PROTO_POP3 }, { "nntp:", PROTO_NNTP }, { "imap4:", PROTO_IMAP4 }, }; int i; char *p, *q; static char empty[] = ""; static char INBOX[] = "INBOX"; *proto = *port = PROTO_UNKNOWN; for (i=0; i< sizeof(protos)/sizeof(protos[0]); i++) { if (memcmp(s, protos[i].prefix, strlen(protos[i].prefix)) == 0) { *proto = *port = protos[i].proto; break; } } if (*proto == PROTO_UNKNOWN) return -1; p = s + strlen(protos[i].prefix); /* * this might fail if user or pass contains a '/' * */ if ((q = strchr(p, '/')) != NULL) { /* /dir */ *dir = q + 1; *q = '\0'; } else *dir = empty; if ((q = strchr(p, '@')) != NULL) { /* user, pass is present */ *machine = q + 1; *q = '\0'; *user = p; if ((q = strchr(p, ':')) != NULL) { /* user[:pass] */ *q = '\0'; *pass = q+1; } else *pass = empty; } else { *machine = p; *user = *pass = empty; } if ((q = strchr(*machine, ':')) != NULL) { /* machine[:pass] */ *q = '\0'; *port = atoi(q+1); if (*port <= 0 || *port >= 0xffff) return -1; } if (!**machine) return -1; if (*proto == PROTO_POP3 && **dir) return -1; if (*proto == PROTO_IMAP4 && !**dir) *dir = INBOX; return 0; } /* write buffer, compare with match */ #define BUFLEN 256 static int wr_rd(int fd, char *buf, char *match, char *err, char *machine, int port) { int n; n = write_socket(fd, buf); if (n <= 0) { error("Couldn't write to %s:%d (%s)", machine, port, strerror(errno)); close(fd); return -1; } n = read_socket_match(fd, buf, BUFLEN-1, match); if (n <= 0) { error("%s %s:%d (%s)", err, machine, port, strerror(errno)); close(fd); return -1; } return n; } static int check_nntp(char *user, char *pass, char *machine, int port, char *dir, int *total, int *unseen) { int fd; int n; char buf[BUFLEN]; char line[BUFLEN]; FILE *fp; int groups; int err; int totg, unsg; int first; char *s; *total = 0; *unseen = 0; strcpy(buf, (s=cfg_get(NULL, "Newsrc", ".newsrc"))); if (*buf == 0 || ((fp = fopen(buf, "r")) == NULL)) { error("Couldn't open .newsrc-file '%s'", buf); free(s); return -1; } free(s); fd = open_socket(machine, port); if (fd < 0) { error("Couldn't connect to %s:%d (%s)", machine, port, strerror(errno)); fclose(fp); return -1; } n = read_socket_match(fd, buf, BUFLEN-1, "20"); /* server ready */ if (n <= 0) { error("Server doesn't respond %s:%d (%s)", machine, port, strerror(errno)); close(fd); return -1; } /* do auth if necessary, this is NOT TESTED */ if (*user) { sprintf(buf, "AUTHINFO USER %s\r\n", user); if (wr_rd(fd, buf, "381", "No AUTH required?", machine, port) <= 0) return -1; if (*pass) { sprintf(buf, "AUTHINFO PASS %s\r\n", pass); if (wr_rd(fd, buf, "281", "Wrong PASS?", machine, port) <= 0) return -1; } } // Fixme: this is badbadbadbad sleep(2); /* wait for newsserver to read groupinfo */ groups = 0; err = 0; totg = unsg = 0; /* total, unseen */ while (fgets(line, sizeof(line)-1, fp) && err < 5) { char group[256]; char *p; int smin, smax, lmin, lmax; if (sscanf(line, "%255[^:]:", group) != 1) { error("Couldn't read group in '%s'", line); err++; continue; } if ((p=strchr(group,':')) != NULL) *p='\0'; /* check dir if it matches group */ if (*dir && strcmp(dir, group)) continue; sprintf(buf, "GROUP %s\r\n", group); if (wr_rd(fd, buf, "211", "Wrong Group", machine, port) <= 0) { err++; continue; } /* answer 211 total smin smax group: */ sscanf(buf, "211 %*d %d %d", &smin, &smax); debug("nntp: %s: smin=%d smax=%d", group, smin, smax); totg += smax-smin-1; p = strchr(line, ':'); p++; first = 1; while 
/* $Id: battery.c,v 1.3 2001/08/05 17:13:29 reinelt Exp $
 *
 * APM and ACPI specific functions
 *
 * Copyright 2001 by Leo T�tsch (lt@toetsch.at)
 *
 * This program 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.
 *
 * This program 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 this program; if not, write to the Free Software
 * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
 *
 *
 * $Log: battery.c,v $
 * Revision 1.3  2001/08/05 17:13:29  reinelt
 *
 * cleaned up inlude of sys/time.h and time.h
 *
 * Revision 1.2  2001/03/02 11:04:08  reinelt
 *
 * cosmetic cleanups (comment headers)
 *
 */

/* exported functions:
 *
 * int Battery (double *perc, int *status, double *lasting);
 *   returns:
 *     perc ... percentage of battery (0..100)
 *     status .. 0 (online), 1 (charging), 2 (discharging)
 *     lasting ... seconds, how long battery will last
 * 
 */

#include <stdlib.h>
#include <stdio.h>
#include <fcntl.h>
#include <ctype.h>
#include <string.h>
#include <unistd.h>
#include <errno.h>
#include <time.h>
#include <sys/stat.h>
#include <sys/types.h>

#include "debug.h"


int Battery (int *perc, int *status, double *dur) 
{
  static int fd = -2;
  static int apm = 0;

  if (fd==-1) return -1;

  if (fd==-2) {
    fd = open("/proc/apm", O_RDONLY | O_NDELAY);
    if (fd==-1) {
      error ("open(/proc/apm) failed: %s", strerror(errno));
      fd = open("/proc/acpi", O_RDONLY | O_NDELAY); /* FIXME */
      if (fd==-1) {
        error ("open(/proc/acpi) failed: %s", strerror(errno));
        return -1;
      }
      debug ("open(/proc/acpi)=%d", fd);
    }
    else {
      debug ("open(/proc/apm)=%d", fd);
      apm = 1;
    }
  }
  if (lseek(fd, 0L, SEEK_SET)!=0) {
    error ("lseek(/proc/apm|acpi) failed: %s", strerror(errno));
    fd=-1;
    return -1;
  }
  if (apm) {
    int f3, f4;
    char eh[4];
    char buffer[128];
    /* /usr/src/linux/arch/i386/kernel/apm.c :
      	p += sprintf(p, "%s %d.%d 0x%02x 0x%02x 0x%02x 0x%02x %d%% %d %s\n",
		     driver_version,
		     (apm_bios_info.version >> 8) & 0xff,
		     apm_bios_info.version & 0xff,
		     apm_bios_info.flags,
		     ac_line_status,
		     battery_status,
		     battery_flag,
		     percentage,
		     time_units,
		     units);
	   3) AC line status
	      0x00: Off-line
	      0x01: On-line
	      0x02: On backup power (BIOS >= 1.1 only)
	      0xff: Unknown
	   4) Battery status
	      0x00: High
	      0x01: Low
	      0x02: Critical
	      0x03: Charging
	      0x04: Selected battery not present (BIOS >= 1.2 only)
	      0xff: Unknown
    */
    
    if (read (fd, &buffer, sizeof(buffer)-1)==-1) {
      error ("read(/proc/apm) failed: %s", strerror(errno));
      fd=-1;
      return -1;
    }
    /*              Ver v.v fl  as bs bf perc tu u*/
    sscanf(buffer, "%*s %*s %*s %x %x %*s %d%% %lf %3s", &f3, &f4, perc, dur, eh);
    if (f3 == 0x1) 
      *status = 0; /* Online */
    else
      *status = 2; /* Offline = discharging */
    if (f4 == 0x3)
      *status = 1; /* charging */
    eh[1] = '\0'; /* m | s */
    if (*eh == 'm')
      *dur *= 60;
#ifdef DEBUG_BATT    
    info("perc=%d, f3=%x, f4=%x, stat=%d, dur=%lf", *perc,f3,f4, *status, *dur);
#endif    
  }
  else {
    /* FIXME: parse ACPI */
  }
  return 0;
}
generated by cgit v1.2.3 (git 2.25.1) at 2024-07-04 23:56:24 +0000