/**
Read a string array from socket
*/
int streadstrarr(int sfd, char ***str, int *nstr){
int ans=streadint(sfd, nstr);
if(ans) return ans;
*str=calloc(*nstr, sizeof(char*));
for(int istr=0; istr<*nstr && !ans; istr++){
ans=streadstr(sfd, &(*str)[istr]);
}
return ans;
}
//respond to scheduler
static int respond(int sock){
int cmd[3];
//read fixed length header info.
if(streadintarr(sock, cmd, 3)){
return -1;//failed
}
int ihost=host_from_sock(sock);
if(ihost>=0){
htime[ihost]=myclockd();
}
int pid=cmd[2];
switch(cmd[0]){
case -1:{//server request shutdown
info("disconnect from %s\n", hosts[ihost]);
return -1;
}
break;
case MON_VERSION:
break;
case MON_STATUS:
{
if(ihost<0){
warning("Host not found\n");
return -1;
}
PROC_T *p=proc_get(ihost,pid);
if(!p){
p=proc_add(ihost,pid);
}
if(stread(sock, &p->status, sizeof(STATUS_T))){
return -1;
}
if(p->status.info==S_REMOVE){
proc_remove(ihost, pid);
}else{
if(cmd[1]!=ihost && cmd[1]!=cmd[2]){
/*A new mean to replace the ID of a job.*/
p->pid=cmd[1];
}
gdk_threads_add_idle((GSourceFunc)refresh, p);
}
}
break;
case MON_PATH:
{
if(ihost<0){
warning("Host not found\n");
return -1;
}
PROC_T *p=proc_get(ihost,pid);
if(!p){
p=proc_add(ihost,pid);
}
if(streadstr(sock, &p->path)){
return -1;
}
char *tmp=NULL;
while((tmp=strchr(p->path, '\n'))){
tmp[0]=' ';
}
}
break;
case MON_LOAD:
{
if(ihost<0){
warning("Host not found\n");
return -1;
}
usage_cpu[ihost]=(double)((pid>>16) & 0xFFFF)/100.;
usage_mem[ihost]=(double)(pid & 0xFFFF)/100.;
usage_cpu[ihost]=MAX(MIN(1,usage_cpu[ihost]),0);
usage_mem[ihost]=MAX(MIN(1,usage_mem[ihost]),0);
gdk_threads_add_idle((GSourceFunc)update_progress, GINT_TO_POINTER(ihost));
}
break;
case MON_ADDHOST:
if(cmd[1]>-1 && cmd[1]<nhost){
pthread_t tmp;
pthread_create(&tmp, NULL, (void*(*)(void*))add_host, GINT_TO_POINTER(cmd[1]));
}else if(cmd[1]==-2){
return -2;
}
break;
default:
warning_time("Invalid cmd %d\n",cmd[0]);
return -1;
}
return 0;
}
