home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD2.iso / Misc / JOE_SOUR.LHA / Sources.lha / Amiexpress / Joinconf / joinconf2.c < prev    next >
Encoding:
C/C++ Source or Header  |  1995-08-03  |  4.3 KB  |  211 lines
  1.  
  2. #include <AE.Includes/doorheader.h>
  3. #include <AE.Includes/glue.h>
  4.  
  5. #include <string.h>
  6. #include <proto/exec.h>
  7. #include <dos/dos.h>
  8. #include <ctype.h>
  9. #include <time.h>
  10. #include <clib/dos_protos.h>
  11. #include <stdio.h>
  12. #include <proto/icon.h>
  13. #include <dos.h>
  14. #include <stdlib.h>
  15.  
  16.  
  17.  
  18. #define Ver "$VER: sTATUS 1.0 (21-07-94) - ©1994 jOE cOOl/mOTION"
  19.  
  20. #define sm sendmessage
  21. #define pm prompt
  22. #define gu getuserstring
  23. #define pu putuserstring
  24.  
  25. #define Beep 0x07
  26.  
  27. /***[ SubRoutines ]**********************************************************/
  28.  
  29. void start(int);
  30. void GetAEinfo(void);
  31. void GetDate(char);
  32. void end(void);
  33. void DExit(void);
  34. void LastCommand(void);
  35. BOOL GetIconTooltype(char *text, char *buffer);
  36.  
  37. /***[ Global Variables ]*****************************************************/
  38.  
  39. int  Node,num;
  40. struct Library *IconBase;
  41. struct DiskObject *dobj;
  42. BYTE *tooltype;
  43.  
  44.  
  45.  
  46.  
  47. /***[ Main ]*****************************************************************/
  48.  
  49. void main (int argc,char *argv[]) 
  50. {
  51.   if(argc!=2)
  52.   { printf("\n %s \n",Ver);
  53.     exit(0);
  54.   }
  55.   Node=atoi(argv[1]);
  56.   Register(argv[1][0]-'0');
  57.   IconBase=(struct Library *) OpenLibrary("icon.library", 33);
  58.   if (IconBase == NULL)
  59.     {
  60.      sm("",1);
  61.      sm("System Error - Unable to open Icon.library",1);
  62.      sm("",1);
  63.      DExit();
  64.     }
  65.   start(Node);
  66.   CloseLibrary((struct Library *)IconBase);
  67.   DExit();
  68. }
  69. /****************************************************************************/
  70.  
  71. void start(int node)
  72. { 
  73.     char buffer[400],buffer2[400];
  74.     int confs=0,i=0,j,k=0,bytes=0,relative=NULL,*axx=NULL;
  75.     char *p=NULL,*s=NULL,**ap=NULL;
  76.     ULONG nr=0;
  77.  
  78.     dobj = GetDiskObject("bbs:confconfig");
  79.     if (dobj==NULL) DExit();
  80.  
  81.    GetIconTooltype("NCONFS",buffer);
  82.    confs=atoi(buffer);
  83.    strcpy(buffer,"RELATIVE_CONFERENCES");
  84.    relative=GetIconTooltype(buffer, buffer2);
  85.     while (k<confs)
  86.     {       p=s;
  87.  
  88.         sprintf(buffer,"NAME.%d",k+1);
  89.         GetIconTooltype(buffer, buffer2);
  90.                 if ((s=realloc(s,(bytes+strlen(buffer2)+1)))!=NULL)
  91.                    {if (s!=p)
  92.                     for (j=0;j<i;j++)
  93.                     ap[j]+=s-p;
  94.                     strcpy(s+bytes,buffer2);
  95.                     if ((ap=realloc(ap, ((i+1)*sizeof(char *))))==NULL)
  96.                     DExit();
  97.                     ap[i]=s+bytes;
  98.                     bytes += strlen(buffer2)+1;
  99.                     i++;
  100.                     } else DExit();
  101.                 k++;
  102.        }
  103.     
  104.    FreeDiskObject(dobj);
  105. gu (buffer,DT_CONFACCESS);
  106. sprintf (buffer2,"bbs:access/area.%s",buffer);
  107.  
  108. dobj = GetDiskObject(buffer2);
  109. if (dobj==NULL) {sm(buffer2,0);sm(" not found!",1);DExit();}
  110. if ((axx=realloc(axx,((confs)*sizeof(int))))==NULL)
  111. DExit();
  112.                     
  113. k=0;
  114.     while (k<confs)
  115.                {
  116.         sprintf(buffer,"conf.%d",k+1);
  117.                 axx[k]=GetIconTooltype(buffer, buffer2);
  118.                 k++;
  119.        }
  120.   FreeDiskObject(dobj);
  121. j=0;
  122.  
  123. gu (buffer,BB_MAINLINE);
  124. p=strchr(buffer,32);
  125. if (p!=NULL) {strcpy(buffer2,p);
  126.               nr=atoi(buffer2);
  127.               if ((nr!=0) && (nr<=confs) && (axx[nr-1])) 
  128.                 {sprintf(buffer,"j %d",nr); 
  129.                  pu (buffer,PRV_COMMAND);
  130.                  DExit();
  131.                 }
  132.              }
  133.  
  134. //sm("c",0);
  135. for (i=0;i<confs;i++)
  136. if (axx[i]) {if (!(relative)) {sprintf (buffer,"%2d  ",(i+1));
  137.                                sm (buffer,0);sm (ap[i],1);}
  138.                        else   {sprintf (buffer,"%2d  ",(j+1));
  139.                                j++;sm (buffer,0);sm (ap[i],1);}
  140.             }
  141.  
  142.  
  143. sm ("",1);
  144.  
  145. gu(buffer,JH_HK);
  146. i=0;
  147. while (buffer[0]!=13)
  148. {
  149. buffer2[i]=buffer[0];
  150. buffer2[i+1]='\0';
  151. sm ("A",0);
  152. sm (buffer2,1);
  153. gu(buffer,JH_HK);
  154. i++;
  155. }
  156.   
  157.  
  158. nr=atoi(buffer2);
  159. if ((nr!=0) && (nr<=confs) && (axx[nr-1])) 
  160. {sprintf(buffer,"j %d",nr); 
  161. pu (buffer,PRV_COMMAND);
  162. DExit();
  163. }              
  164.  
  165.  
  166. //gu (buffer,BB_MAINLINE);
  167. //p=strchr(buffer,32);
  168. //if (p!=NULL) ce",1);
  169. //sm (buffer,1);
  170. //pu ("j 8",PRV_COMMAND);
  171.  
  172.  
  173. //RETURNCOMMAND
  174. //PRV_COMMAND
  175. }  
  176.  
  177.  
  178. /****************************************************************************/
  179.  
  180.  
  181. void DExit(void)
  182. {
  183.   ShutDown();
  184.   end();
  185. }
  186.  
  187. void end (void)
  188. {
  189.   exit(0);
  190. }
  191.  
  192. void LastCommand (void)
  193. {
  194. }
  195. BOOL GetIconTooltype(char *text, char *buffer)
  196. {
  197.     UBYTE **toolarray;
  198.  
  199.    toolarray = (char **)dobj->do_ToolTypes;
  200.    if (tooltype=FindToolType(toolarray, text))
  201.    {
  202.      strcpy(buffer,tooltype);
  203.      return(1);
  204.    }
  205.    else
  206.    {
  207.      buffer=NULL;
  208.      return(0);
  209.    }
  210. }
  211.