#include <stdlib.h>
#include <strings.h>
#include <sys/socket.h>

#include "ctype.h"
#include "config.h"
#include "structs.h"

extern LEP_OPS lep_ops_local;
extern LEP_OPS lep_ops_ip;
static LEP_OPS *leps[] = { &lep_ops_local, &lep_ops_ip };

typedef struct sect_listen_priv SECT_LISTEN_PRIV;
struct sect_listen_priv {
  LISTEN *l;
  CONFIG *cfg;
  } ;

static void *sect_listen_start(const char *line, CONFIG *cfg)
{
 int i;
 SECT_LISTEN_PRIV *p;

 i = 0;
 while (line[i] && UCisspace(line[i])) i ++;
 if (strncmp(line+i,"listen",6) || (line[i+6] && !UCisspace(line[i+6]))) return(0);
 i += 6;
 while (line[i] && UCisspace(line[i])) i ++;
 if (line[i]) config_err(cfg,"junk on listen line");
 p = malloc(sizeof(SECT_LISTEN_PRIV));
 p->l = malloc(sizeof(LISTEN));
 p->l->permit = 0;
 p->l->endpoints = 0;
 p->l->mappings = 0;
 p->cfg = cfg;
 return(p);
}

static SPRV sect_listen_parse(void *pv, const char *line)
{
 int i;
 int j;
 int k;
 SECT_LISTEN_PRIV *p;

 p = pv;
 i = 0;
 while (line[i] && UCisspace(line[i])) i ++;
 j = i;
 while (line[i] && !UCisspace(line[i])) i ++;
 k = i;
 while (line[i] && UCisspace(line[i])) i ++;
 if ((k-j == 6) && !bcmp(line+j,"permit",6))
  { while (line[i])
     { j = i;
       while (line[i] && !UCisspace(line[i])) i ++;
       k = i;
       while (line[i] && UCisspace(line[i])) i ++;
       if ((k-j == 8) && !bcmp(line+j,"new-data",8))
	{ p->l->permit |= OP_NEW;
	}
       else if ((k-j == 5) && !bcmp(line+j,"fetch",5))
	{ p->l->permit |= OP_FETCH;
	}
       else if ((k-j == 1) && (line[j] == '*'))
	{ p->l->permit |= OP_NEW | OP_FETCH;
	}
       else
	{ config_err(p->cfg,"invalid operation `%.*s' on `permit' line",k-j,line+j);
	}
     }
    return(SPRV_GOOD);
  }
 else if ((k-j == 3) && !bcmp(line+j,"map",3))
  { j = i;
    while (line[i] && !UCisspace(line[i])) i ++;
    k = i;
    while (line[i] && UCisspace(line[i])) i ++;
    if ((k-j == 7) && !bcmp(line+j,"trivial",7))
     {
     }
    else if ((k-j == 5) && !bcmp(line+j,"error",5))
     {
     }
    else if ((k-j == 6) && !bcmp(line+j,"simple",6))
     {
     }
    else if ((k-j == 5) && !bcmp(line+j,"regex",5))
     {
     }
    /* map trivial
       map error EXTNAME
       map simple EXTNAME INTNAME
       map regex /EXT/INT
       XXX XXX XXX */
    return(SPRV_GOOD);
  }
 else
  { int x;
    for (x=(sizeof(leps)/sizeof(leps[0]))-1;x>=0;x--)
     { if ((*leps[x]->add)(p->cfg,p->l,line+j,k-j,line+i))
	{ return(SPRV_GOOD);
	}
     }
  }
 return(SPRV_UNKNOWN);
}

static void sect_listen_done(void *pv)
{
 /* XXX XXX XXX */
 free(pv);
}

SECT_OPS sectops_listen = SECT_OPS_INIT(listen);