ezmlm-list.c

Go to the documentation of this file.

#include <unistd.h>
#include "readwrite.h"
#include "buffer.h"
#include "subscribe.h"
#include "exit.h"
#include "fmt.h"
#include "getoptb.h"
#include "errtxt.h"
#include "idx.h"
#include "auto_version.h"
#include "logmsg.h"
 
#define WHO "ezmlm-list"

 
int flagnumber = 0;            /* default list subscribers, not number of */
 
static char strnum[FMT_ULONG];
 
static void die_nomem(void) { logmsg(WHO,111,FATAL,ERR_NOMEM); }
static void die_write(void) { logmsg(WHO,111,FATAL,B(ERR_WRITE,"stdout")); }
static void die_usage(void) { logmsg(WHO,100,USAGE,"ezmlm-list [-mMnNvV] dir"); }
 
int subwrite(char *s,unsigned int l) 
{
  return (buffer_put(buffer_1,s,l) | buffer_putflush(buffer_1,"\n",1));
}
 
int dummywrite(char *s,unsigned int l) { return (int) l; }
 
int main(int argc,char **argv)
{
  char *dir;
  int flagmysql = 1;                     /* use if supported */
  unsigned long n;
  int opt;
 
  while ((opt = getoptb(argc,argv,"mMnNvV")) != opteof)
    switch(opt) {
      case 'm': flagmysql = 1; break;
      case 'M': flagmysql = 0; break;
      case 'n': flagnumber = 1; break;
      case 'N': flagnumber = 0; break;
      case 'v':
      case 'V': logmsg(WHO,0,VERSION,auto_version);
      default:  die_usage();
    }
 
  dir = argv[optind++];
  if (!dir) die_usage();
 
  if (chdir(dir) == -1)
    logmsg(WHO,111,FATAL,B(ERR_SWITCH,dir));
 
  if (dir[0] != '/')
    logmsg(WHO,100,FATAL,B(ERR_SLASH,dir));
 
  if (flagnumber) {
    n = putsubs(dir,0L,52L,dummywrite,flagmysql);
    if (buffer_put(buffer_1,strnum,fmt_ulong(strnum,n)) == -1) die_write();
    if (buffer_put(buffer_1,"\n",1) == -1) die_write();
  } else
    putsubs(dir,0L,52L,subwrite,flagmysql);  // FIXME
  if (buffer_flush(buffer_1) == -1) die_write();
  closesql();
  _exit(0);
 
  return 0;
}