Stat::Stat(QWidget *parent) :
QDialog(parent)
{
setupUi(this);
getStat();
connect(pushButton_2, SIGNAL(clicked()), this, SLOT(clearstat()));
}
int MODULEMAINFUNC (int argc, char** argv){
SOCKET sock = INVALID_SOCKET;
int i=0;
SASIZETYPE size;
pthread_t thread;
struct clientparam defparam;
int demon=0;
struct clientparam * newparam;
char *s;
int error = 0;
unsigned sleeptime;
struct extparam myconf;
unsigned char buf[256];
struct pollfd fds;
int opt = 1;
PROXYFUNC pf;
FILE *fp = NULL;
int maxchild;
int silent = 0;
int nlog = 5000;
char loghelp[] =
#ifdef STDMAIN
" -d go to background (daemon)\n"
#endif
" -fFORMAT logging format (see documentation)\n"
" -l log to stderr\n"
" -lFILENAME log to FILENAME\n"
" -bBUFSIZE size of network buffer (default 4096 for TCP, 16384 for UDP)\n"
" -l@IDENT log to syslog IDENT\n"
" -t be silenT (do not log service start/stop)\n"
" -iIP ip address or internal interface (clients are expected to connect)\n"
" -eIP ip address or external interface (outgoing connection will have this)\n";
int childcount=0;
pthread_mutex_t counter_mutex;
int new_sock = INVALID_SOCKET;
struct linger lg;
#ifdef STDMAIN
signal(SIGPIPE, SIG_IGN);
pthread_attr_init(&pa);
pthread_attr_setstacksize(&pa,PTHREAD_STACK_MIN + 16384);
pthread_attr_setdetachstate(&pa,PTHREAD_CREATE_DETACHED);
#endif
pf = childdef.pf;
memcpy(&myconf, &conf, sizeof(myconf));
memset(&defparam, 0, sizeof(struct clientparam));
defparam.version = paused;
defparam.childcount = &childcount;
defparam.logfunc = myconf.logfunc;
defparam.authfunc = myconf.authfunc;
defparam.aclnum = myconf.aclnum;
defparam.service = childdef.service;
defparam.usentlm = 1;
defparam.stdlog = NULL;
defparam.time_start = time(NULL);
maxchild = myconf.maxchild;
#ifndef STDMAIN
if(!conf.services){
conf.services = &defparam;
}
else {
defparam.next = conf.services;
conf.services = conf.services->prev = &defparam;
}
#endif
pthread_mutex_init(defparam.counter_mutex = &counter_mutex, NULL);
for (i=1; i<argc; i++) {
if(*argv[i]=='-') {
switch(argv[i][1]) {
case 'd':
if(!demon)daemonize();
demon = 1;
break;
case 'l':
defparam.logfunc = logstdout;
defparam.logtarget = (unsigned char*)mystrdup(argv[i]);
if(argv[i][2]) {
#ifdef STDMAIN
if(argv[i][2]=='@'){
openlog(argv[i]+3, LOG_PID, LOG_DAEMON);
defparam.logfunc = logsyslog;
}
else
#endif
{
fp = fopen(argv[i] + 2, "a");
if (fp) {
defparam.stdlog = fp;
fseek(fp, 0L, SEEK_END);
}
}
}
break;
case 'i':
myconf.intip = getip((unsigned char *)argv[i]+2);
break;
case 'e':
myconf.extip = getip((unsigned char *)argv[i]+2);
break;
case 'p':
myconf.intport = atoi(argv[i]+2);
break;
case 'b':
myconf.bufsize = atoi(argv[i]+2);
break;
case 'n':
defparam.usentlm = 0;
break;
case 'f':
defparam.logformat = (unsigned char *)argv[i] + 2;
break;
case 't':
silent = 1;
break;
case 's':
case 'a':
myconf.singlepacket = 1 + atoi(argv[i]+2);
break;
default:
error = 1;
break;
}
}
else break;
}
#ifndef STDMAIN
if(childdef.port) {
#endif
#ifndef PORTMAP
if (error || i!=argc) {
#ifndef STDMAIN
haveerror = 1;
conf.threadinit = 0;
#endif
fprintf(stderr, "Usage: %s options\n"
"Available options are:\n"
"%s"
" -pPORT - service port to accept connections\n"
"%s"
"\tExample: %s -i127.0.0.1\n\n"
"%s",
argv[0], loghelp, childdef.helpmessage, argv[0],
#ifdef STDMAIN
copyright
#else
""
#endif
);
return (1);
}
#endif
#ifndef STDMAIN
}
else {
#endif
#ifndef NOPORTMAP
if (error || argc != i+3 || *argv[i]=='-'|| (myconf.intport = atoi(argv[i]))==0 || (defparam.targetport = htons((unsigned short)atoi(argv[i+2])))==0) {
#ifndef STDMAIN
haveerror = 1;
conf.threadinit = 0;
#endif
fprintf(stderr, "Usage: %s options"
" [-e<external_ip>] <port_to_bind>"
" <target_hostname> <target_port>\n"
"Available options are:\n"
"%s"
"%s"
"\tExample: %s -d -i127.0.0.1 6666 serv.somehost.ru 6666\n\n"
"%s",
argv[0], loghelp, childdef.helpmessage, argv[0],
#ifdef STDMAIN
copyright
#else
""
#endif
);
return (1);
}
defparam.target = (unsigned char *)mystrdup(argv[i+1]);
#endif
#ifndef STDMAIN
}
#endif
if(!defparam.logformat){
defparam.logformat = myconf.logformat;
}
if(defparam.logformat){
if(*defparam.logformat == '-' && (s = strchr((char *)defparam.logformat + 1, '+')) && s[1]){
*s = 0;
defparam.nonprintable = (unsigned char *)mystrdup((char *)defparam.logformat + 1);
defparam.replace = s[1];
defparam.logformat = (unsigned char *)mystrdup(s + 2);
*s = '+';
}
else defparam.logformat = (unsigned char *)mystrdup((char *)defparam.logformat);
}
defparam.sinc.sin_addr.s_addr = defparam.intip = myconf.intip;
if(!myconf.intport)myconf.intport = childdef.port;
defparam.sinc.sin_port = defparam.intport = htons(myconf.intport);
defparam.sins.sin_addr.s_addr = defparam.extip = myconf.extip;
defparam.sins.sin_port = defparam.extport = htons(myconf.extport);
defparam.remsock = defparam.clisock = defparam.ctrlsock = INVALID_SOCKET;
defparam.sins.sin_family = defparam.sinc.sin_family = AF_INET;
defparam.singlepacket = myconf.singlepacket;
defparam.bufsize = myconf.bufsize;
#ifndef STDMAIN
conf.threadinit = 0;
#endif
lg.l_onoff = 1;
lg.l_linger = conf.timeouts[STRING_L];
if( (sock=socket(PF_INET, SOCK_STREAM, IPPROTO_TCP)) == INVALID_SOCKET) {
perror("socket()");
return -2;
}
fcntl(sock,F_SETFL,O_NONBLOCK);
defparam.srvsock = sock;
if(setsockopt(sock, SOL_SOCKET, SO_REUSEADDR, (unsigned char *)&opt, sizeof(int)))perror("setsockopt()");
size = sizeof(defparam.sinc);
for(sleeptime = SLEEPTIME * 100; bind(sock, (struct sockaddr*)&defparam.sinc, size)==-1; usleep(sleeptime)) {
sprintf((char *)buf, "bind(): %s", strerror(errno));
(*defparam.logfunc)(&defparam, buf);
sleeptime = (sleeptime<<1);
if(!sleeptime) {
closesocket(sock);
return -3;
}
}
if(listen (sock, 1 + (maxchild>>4))==-1) {
sprintf((char *)buf, "listen(): %s", strerror(errno));
(*defparam.logfunc)(&defparam, buf);
return -4;
}
defparam.threadid = (unsigned)pthread_self();
if(!silent){
sprintf((char *)buf, "Accepting connections [%u/%u]", (unsigned)getpid(), (unsigned)pthread_self());
(*defparam.logfunc)(&defparam, buf);
}
defparam.sinc.sin_addr.s_addr = defparam.sins.sin_addr.s_addr = 0;
defparam.sinc.sin_port = defparam.sins.sin_port = 0;
fds.fd = sock;
fds.events = POLLIN;
for (;;) {
for(;;){
while((paused == defparam.version && childcount >= myconf.maxchild)){
nlog++;
if(nlog > 5000) {
sprintf((char *)buf, "Warning: too many connected clients (%d/%d)", childcount, myconf.maxchild);
(*defparam.logfunc)(&defparam, buf);
nlog = 0;
}
usleep(SLEEPTIME);
}
if (paused != defparam.version) break;
if (fds.events & POLLIN) {
error = poll(&fds, 1, 1000);
}
else {
usleep(SLEEPTIME);
continue;
}
if (error >= 1) break;
if (error == 0) continue;
sprintf((char *)buf, "poll(): %s/%d", strerror(errno), errno);
(*defparam.logfunc)(&defparam, buf);
if(errno != EAGAIN) break;
continue;
}
if(paused != defparam.version) break;
size = sizeof(defparam.sinc);
new_sock = accept(sock, (struct sockaddr*)&defparam.sinc, &size);
if(new_sock == INVALID_SOCKET){
sprintf((char *)buf, "accept(): %s", strerror(errno));
(*defparam.logfunc)(&defparam, buf);
continue;
}
fcntl(new_sock,F_SETFL,O_NONBLOCK);
setsockopt(new_sock, SOL_SOCKET, SO_LINGER, (unsigned char *)&lg, sizeof(lg));
setsockopt(new_sock, SOL_SOCKET, SO_OOBINLINE, (unsigned char *)&opt, sizeof(int));
if(! (newparam = myalloc (sizeof(defparam)))){
closesocket(new_sock);
defparam.res = 21;
(*defparam.logfunc)(&defparam, (unsigned char *)"Memory Allocation Failed");
usleep(SLEEPTIME);
continue;
};
memcpy(newparam, &defparam, sizeof(defparam));
clearstat(newparam);
newparam->clisock = new_sock;
newparam->child = newparam->prev = newparam->next = NULL;
newparam->parent = &defparam;
pthread_mutex_lock(&counter_mutex);
if(!defparam.child)defparam.child = newparam;
else {
newparam->next = defparam.child;
defparam.child = defparam.child->prev = newparam;
}
if((error = pthread_create(&thread, &pa, pf, (void *)newparam))){
sprintf((char *)buf, "pthread_create(): %s", strerror(error));
(*defparam.logfunc)(&defparam, buf);
freeparam(newparam);
}
else {
childcount++;
newparam->threadid = (unsigned)thread;
}
pthread_mutex_unlock(&counter_mutex);
memset(&defparam.sinc, 0, sizeof(defparam.sinc));
while(!fds.events)usleep(SLEEPTIME);
}
if(defparam.srvsock != INVALID_SOCKET) closesocket(defparam.srvsock);
if(!silent) defparam.logfunc(&defparam, (unsigned char *)"Exiting thread");
defparam.service = S_ZOMBIE;
while(defparam.child) usleep(SLEEPTIME * 100);
defparam.threadid = 0;
if(fp) fclose(fp);
if(defparam.target) myfree(defparam.target);
if(defparam.logtarget) myfree(defparam.logtarget);
if(defparam.logformat) myfree(defparam.logformat);
if(defparam.nonprintable) myfree(defparam.nonprintable);
#ifndef STDMAIN
if(defparam.next)defparam.next->prev = defparam.prev;
if(defparam.prev)defparam.prev->next = defparam.next;
else conf.services = defparam.next;
#endif
pthread_mutex_destroy(&counter_mutex);
return 0;
}
int main(int anz,char *paramstring[]) {
satz = (char *)calloc(1,300);
teil = (char *)calloc(1,12);
dateinameein = (char *)calloc(1,255);
dateinameaus = (char *)calloc(1,255);
printf("Umwandeln einer Ascii-Datei in ein Festformat\r\n");
if (anz<2) {
printf("\n");
printf("usage: ascigrid <Ascii-Datei> <festformatdatei>\r\n");
printf("\n");
printf(" Ascii-Datei: Dateikopf mit : \r\n");
printf(" ncols,nrows,xll,yll,cs,nodata jeweils ein Wert pro Zeile\r\n");
printf(" alle weiteren Werte von links oben nach rechts unten zeilenweise\r\n");
printf("\n");
printf("Eingabedatei : ");
dateinameein=gets(dateinameein);
printf("\r\nAusgabedatei : ");
dateinameaus=gets(dateinameaus);
printf("\r\n");
} else {
if (paramstring[1]!=NULL) strcpy(dateinameein,paramstring[1]);
if (anz>1) if (paramstring[2]!=NULL) strcpy(dateinameaus,paramstring[2]);
}
while ((dateiein=fopen((char *)dateinameein,"r"))==NULL) {
printf("Kann Eingabedatei %s nicht finden bzw ÷ffnen!\r\n",dateinameein);
printf("Bitte neuen Namen angeben : ");
dateinameein=gets((char *)dateinameein);
if (*(char *)dateinameein=='\0') exit(1);
printf("\r\n");
}
while ((dateiaus=fopen(dateinameaus,"wb"))==NULL) {
printf("Kann Ausgabedatei %s nicht finden bzw ÷ffnen!\r\n",dateinameaus);
printf("Bitte neuen Namen angeben : ");
dateinameaus=gets(dateinameaus);
if (*dateinameaus=='\0') exit(1);
printf("\r\n");
}
fscanf(dateiein,"%12s%d",teil,&ncols);
fscanf(dateiein,"%12s%d",teil,&nrows);
fscanf(dateiein,"%12s%f",teil,&xll);
fscanf(dateiein,"%12s%f",teil,&yll);
fscanf(dateiein,"%12s%f",teil,&cs);
fscanf(dateiein,"%12s%f",teil,&nodata);
x[1]=ncols;
x[2]=nrows;
x[3]=xll;
x[4]=yll;
x[5]=cs;
x[6]=nodata;
groesse=sizeof(x[1]);
clearstat(nodata);
fwrite(&x[1],sizeof(float),12,dateiaus);
for (j=1; j<=nrows; j++) {
for (i=1; i<=ncols; i++) {
fscanf(dateiein,"%f",&x[1]);
fwrite(&x[1],groesse,1,dateiaus);
addstat(x[1]);
}
fgets(satz,300,dateiein);
printf(".");
}
printf("\n");
statistics(&x[6],&x[7],&x[8],&x[9],&x[10],&x[11]);
fseek(dateiaus,6*sizeof(float),0);
fwrite(&x[6],sizeof(float),6,dateiaus);
fclose(dateiein);
fclose(dateiaus);
free(satz);
free(teil);
free(dateinameein);
free(dateinameaus);
}
