Exemple #1
0
void handleRexxCommand(char *cmdName, struct RexxMsg *mess) {
      if(!strnicmp(cmdName,"sendstring",10)) rexxsendstring(mess);
      else if(!strnicmp(cmdName,"sendserstring",13)) rexxsendserstring(mess);
      else if(!strnicmp(cmdName,"getstring",9)) rexxgetstring(mess);
      else if(!strnicmp(cmdName,"sendtextfile",12)) rexxsendtextfile(mess);
      // sendfile(rexxargs1=hittaefter(cmdName));
      else if(!strnicmp(cmdName,"showtext",8)) rxvisatext(mess);
      else if(!strnicmp(cmdName,"showletter",10)) rexxvisabrev(mess);
      else if(!strnicmp(cmdName,"lasttext",8)) senastread(mess);
      else if(!strnicmp(cmdName,"nikcommand",10)) kommando(mess);
      else if(!strnicmp(cmdName,"niknrcommand",12)) niknrcommand(mess);
      else if(!strnicmp(cmdName,"edit",4)) rxedit(mess);
      else if(!strnicmp(cmdName,"sendbinfile",11)) rexxsendbinfile(mess);
      else if(!strnicmp(cmdName,"recbinfile",10)) rexxrecbinfile(mess);
      else if(!strnicmp(cmdName,"getchar",7)) rexxgetchar(mess);
      else if(!strnicmp(cmdName,"chkbuffer",9)) rexxchkbuffer(mess);
      else if(!strnicmp(cmdName,"yesno",5)) rexxyesno(mess);
      else if(!strnicmp(cmdName,"whicharea",9)) whicharea(mess);
      else if(!strnicmp(cmdName,"whichmeet",9)) whichmeet(mess);
      else if(!strnicmp(cmdName,"logout",6)) rxlogout(mess);
      else if(!strnicmp(cmdName,"runfifo",7)) rxrunfifo(mess);
      else if(!strnicmp(cmdName,"runrawfifo",10)) rxrunrawfifo(mess);
      else if(!strnicmp(cmdName,"entermeet",9)) rxentermeet(mess);
      else if(!strnicmp(cmdName,"setlinecount",12)) rxsetlinecount(mess);
      else if(!strnicmp(cmdName,"extratime",9)) rxextratime(mess);
      else if(!strnicmp(cmdName,"gettime",7)) rxgettime(mess);
      else if(!strnicmp(cmdName,"sendchar",8)) rxsendchar(mess);
      else if(!strnicmp(cmdName,"sendserchar",11)) rxsendserchar(mess);
      else if(!strnicmp(cmdName,"setnodeaction",13)) rxsetnodeaction(mess);
      else if(!strnicmp(cmdName,"sendrawfile",11)) rxsendrawfile(mess);
      else if(!strnicmp(cmdName,"changelatestinfo",16)) rxchglatestinfo(mess);
      else if(!strnicmp(cmdName,"getnumber",9)) rxgetnumber(mess);
      else {
        LogEvent(SYSTEM_LOG, WARN,
                 "Unknown command from ARexx script: '%s'", cmdName);
        SetRexxErrorResult(mess, 10);
      }
}
Exemple #2
0
int commonsendrexx(int komnr,int hasarg) {
        char macronamn[1081],*rexxargs1;
        int going = TRUE;
        struct RexxMsg *nikrexxmess,*tempmess;
        struct MsgPort *rexxmastport;

        sendrexxrc=-5;
        if(!hasarg)
                sprintf(macronamn,"NiKom:rexx/ExtKom%d %d %d",komnr,nodnr,inloggad);
        else
                sprintf(macronamn,"NiKom:rexx/ExtKom%d %d %d %s",komnr,nodnr,inloggad,argument);

        if(!(nikrexxmess=(struct RexxMsg *)CreateRexxMsg(rexxport,"nik",rexxport->mp_Node.ln_Name))) {
                puttekn("\r\n\nKunde inte allokera ett RexxMsg!\r\n\n",-1);
                return(-5);
        }
        if(!(nikrexxmess->rm_Args[0]=(STRPTR)CreateArgstring(macronamn,strlen(macronamn)))) {
                DeleteRexxMsg(nikrexxmess);
                puttekn("\r\n\nKunde inte allokera en ArgString1\r\n\n",-1);
                return(-5);
        }
        nikrexxmess->rm_Action=RXCOMM | RXFB_TOKEN;
        Forbid();
        if(!(rexxmastport=(struct MsgPort *)FindPort("REXX"))) {
                Permit();
                puttekn("\r\n\nRexxMast är inte igång!\r\n\n",-1);
                return(-5);
        }
        PutMsg(rexxmastport,(struct Message *)nikrexxmess);
        Permit();
        while(going) {
                tempmess = (struct RexxMsg *)WaitPort(rexxport);
                if(!tempmess) printf("*** Something's fishy around here... ***\n");
                while(tempmess=(struct RexxMsg *)GetMsg(rexxport)) {
                        if(tempmess->rm_Node.mn_Node.ln_Type==NT_REPLYMSG) {
                                DeleteArgstring(nikrexxmess->rm_Args[0]);
                                if(nikrexxmess->rm_Result1) {
                                        sprintf(outbuffer,"\r\n\nRexx: Return-code %d\r\n\n",nikrexxmess->rm_Result1);
                                        puttekn(outbuffer,-1);
                                }
                                DeleteRexxMsg(nikrexxmess);
                                if(!rxlinecount)
                                {
	                                rxlinecount=TRUE;
	                                radcnt = 0;
								}
                                return(sendrexxrc);
                        }
                        if(!strnicmp(tempmess->rm_Args[0],"sendstring",10)) rexxsendstring(tempmess);
                        else if(!strnicmp(tempmess->rm_Args[0],"sendserstring",13)) rexxsendserstring(tempmess);
                        else if(!strnicmp(tempmess->rm_Args[0],"getstring",9)) rexxgetstring(tempmess);
                        else if(!strnicmp(tempmess->rm_Args[0],"sendtextfile",12)) sendfile(rexxargs1=hittaefter(tempmess->rm_Args[0]));
                        else if(!strnicmp(tempmess->rm_Args[0],"showtext",8)) rxvisatext(tempmess);
                        else if(!strnicmp(tempmess->rm_Args[0],"showletter",10)) rexxvisabrev(tempmess);
                        else if(!strnicmp(tempmess->rm_Args[0],"lasttext",8)) senastread(tempmess);
                        else if(!strnicmp(tempmess->rm_Args[0],"nikcommand",10)) kommando(tempmess);
                        else if(!strnicmp(tempmess->rm_Args[0],"niknrcommand",12)) niknrcommand(tempmess);
                        else if(!strnicmp(tempmess->rm_Args[0],"edit",4)) rxedit(tempmess);
                        else if(!strnicmp(tempmess->rm_Args[0],"sendbinfile",11)) rexxsendbinfile(tempmess);
                        else if(!strnicmp(tempmess->rm_Args[0],"recbinfile",10)) rexxrecbinfile(tempmess);
                        else if(!strnicmp(tempmess->rm_Args[0],"getchar",7)) rexxgettekn(tempmess);
                        else if(!strnicmp(tempmess->rm_Args[0],"chkbuffer",9)) rexxchkbuffer(tempmess);
                        else if(!strnicmp(tempmess->rm_Args[0],"yesno",5)) rexxyesno(tempmess);
                        else if(!strnicmp(tempmess->rm_Args[0],"whicharea",9)) whicharea(tempmess);
                        else if(!strnicmp(tempmess->rm_Args[0],"whichmeet",9)) whichmeet(tempmess);
                        else if(!strnicmp(tempmess->rm_Args[0],"logout",6)) rxlogout(tempmess);
                        else if(!strnicmp(tempmess->rm_Args[0],"runfifo",7)) rxrunfifo(tempmess);
                        else if(!strnicmp(tempmess->rm_Args[0],"runrawfifo",10)) rxrunrawfifo(tempmess);
                        else if(!strnicmp(tempmess->rm_Args[0],"entermeet",9)) rxentermeet(tempmess);
                        else if(!strnicmp(tempmess->rm_Args[0],"setlinecount",12)) rxsetlinecount(tempmess);
                        else if(!strnicmp(tempmess->rm_Args[0],"extratime",9)) rxextratime(tempmess);
                        else if(!strnicmp(tempmess->rm_Args[0],"gettime",7)) rxgettime(tempmess);
                        else if(!strnicmp(tempmess->rm_Args[0],"sendchar",8)) rxsendchar(tempmess);
                        else if(!strnicmp(tempmess->rm_Args[0],"sendserchar",11)) rxsendserchar(tempmess);
                        else if(!strnicmp(tempmess->rm_Args[0],"setnodeaction",13)) rxsetnodeaction(tempmess);
                        else if(!strnicmp(tempmess->rm_Args[0],"sendrawfile",11)) rxsendrawfile(tempmess);
                        else if(!strnicmp(tempmess->rm_Args[0],"changelatestinfo",16)) rxchglatestinfo(tempmess);
                        else if(!strnicmp(tempmess->rm_Args[0],"getnumber",9)) rxgetnumber(tempmess);
                        else {
                                sprintf(outbuffer,"\r\n\nKan inte hantera: %s\r\n",tempmess->rm_Args[0]);
                                puttekn(outbuffer,-1);
                                tempmess->rm_Result1=5;
                                tempmess->rm_Result2=NULL;
                        }
                        ReplyMsg((struct Message *)tempmess);
                }
        }
        if(carrierdropped()) return(-8);
        return(sendrexxrc);
}