home *** CD-ROM | disk | FTP | other *** search
/ Magazyn Exec 5 / CD_Magazyn_EXEC_nr_5.iso / Programy / Internet / Poczta / YAM22src.lha / YAM_rexx_rxcl.c < prev    next >
Encoding:
C/C++ Source or Header  |  2000-11-04  |  13.8 KB  |  204 lines
  1. /*
  2.  * Source generated with ARexxBox 1.12 (May 18 1993)
  3.  * which is Copyright (c) 1992,1993 Michael Balzer
  4.  */
  5.  
  6. #include <exec/types.h>
  7. #include <dos/dos.h>
  8. #include <rexx/storage.h>
  9.  
  10. #define NO_GLOBALS
  11. #include "YAM_rexx.h"
  12.  
  13. #define RESINDEX(stype) (((long) &((struct stype *)0)->res) / sizeof(long))
  14.  
  15. char    RexxPortBaseName[80] = "YAM";
  16. char    *rexx_extension = "YAM";
  17.  
  18. struct rxs_command rxs_commandlist[] =
  19. {
  20.     { "ADDRDELETE", "ALIAS", NULL, 0, (void (*)(struct RexxHost *,void **,long,struct RexxMsg *)) rx_addrdelete, 1 },
  21.     { "ADDREDIT", "ALIAS,NAME,EMAIL,PGP,HOMEPAGE,STREET,CITY,COUNTRY,PHONE,COMMENT,BIRTHDATE/N,IMAGE,MEMBER/M,ADD/S", NULL, 0, (void (*)(struct RexxHost *,void **,long,struct RexxMsg *)) rx_addredit, 1 },
  22.     { "ADDRFIND", "PATTERN/A,NAMEONLY/S,EMAILONLY/S", "ALIAS/M", RESINDEX(rxd_addrfind), (void (*)(struct RexxHost *,void **,long,struct RexxMsg *)) rx_addrfind, 1 },
  23.     { "ADDRGOTO", "ALIAS/A", NULL, 0, (void (*)(struct RexxHost *,void **,long,struct RexxMsg *)) rx_addrgoto, 1 },
  24.     { "ADDRINFO", "ALIAS/A", "TYPE,NAME,EMAIL,PGP,HOMEPAGE,STREET,CITY,COUNTRY,PHONE,COMMENT,BIRTHDATE/N,IMAGE,MEMBERS/M", RESINDEX(rxd_addrinfo), (void (*)(struct RexxHost *,void **,long,struct RexxMsg *)) rx_addrinfo, 1 },
  25.     { "ADDRLOAD", "FILENAME/A", NULL, 0, (void (*)(struct RexxHost *,void **,long,struct RexxMsg *)) rx_addrload, 1 },
  26.     { "ADDRNEW", "TYPE,ALIAS,NAME,EMAIL", "ALIAS", RESINDEX(rxd_addrnew), (void (*)(struct RexxHost *,void **,long,struct RexxMsg *)) rx_addrnew, 1 },
  27.     { "ADDRRESOLVE", "ALIAS/A", "RECPT", RESINDEX(rxd_addrresolve), (void (*)(struct RexxHost *,void **,long,struct RexxMsg *)) rx_addrresolve, 1 },
  28.     { "ADDRSAVE", "FILENAME", NULL, 0, (void (*)(struct RexxHost *,void **,long,struct RexxMsg *)) rx_addrsave, 1 },
  29.     { "APPBUSY", "TEXT", NULL, 0, (void (*)(struct RexxHost *,void **,long,struct RexxMsg *)) rx_appbusy, 1 },
  30.     { "APPNOBUSY", NULL, NULL, 0, (void (*)(struct RexxHost *,void **,long,struct RexxMsg *)) rx_appnobusy, 1 },
  31.     { "FOLDERINFO", "FOLDER", "NUMBER/N,NAME,PATH,TOTAL/N,NEW/N,UNREAD/N,SIZE/N", RESINDEX(rxd_folderinfo), (void (*)(struct RexxHost *,void **,long,struct RexxMsg *)) rx_folderinfo, 1 },
  32.     { "GETCONFIGINFO", "ITEM/A", "VALUE", RESINDEX(rxd_getconfiginfo), (void (*)(struct RexxHost *,void **,long,struct RexxMsg *)) rx_getconfiginfo, 1 },
  33.     { "GETFOLDERINFO", "ITEM/A", "VALUE", RESINDEX(rxd_getfolderinfo), (void (*)(struct RexxHost *,void **,long,struct RexxMsg *)) rx_getfolderinfo, 1 },
  34.     { "GETMAILINFO", "ITEM/A", "VALUE", RESINDEX(rxd_getmailinfo), (void (*)(struct RexxHost *,void **,long,struct RexxMsg *)) rx_getmailinfo, 1 },
  35.     { "GETSELECTED", NULL, "NUM/N/M", RESINDEX(rxd_getselected), (void (*)(struct RexxHost *,void **,long,struct RexxMsg *)) rx_getselected, 1 },
  36.     { "GETURL", "URL/A,FILENAME/A", NULL, 0, (void (*)(struct RexxHost *,void **,long,struct RexxMsg *)) rx_geturl, 1 },
  37.     { "HELP", "FILE", NULL, 0, (void (*)(struct RexxHost *,void **,long,struct RexxMsg *)) rx_help, 1 },
  38.     { "HIDE", NULL, NULL, 0, (void (*)(struct RexxHost *,void **,long,struct RexxMsg *)) rx_hide, 1 },
  39.     { "INFO", "ITEM", "VALUE", RESINDEX(rxd_info), (void (*)(struct RexxHost *,void **,long,struct RexxMsg *)) rx_info, 1 },
  40.     { "ISONLINE", NULL, NULL, 0, (void (*)(struct RexxHost *,void **,long,struct RexxMsg *)) rx_isonline, 1 },
  41.     { "LISTSELECT", "MODE/A", NULL, 0, (void (*)(struct RexxHost *,void **,long,struct RexxMsg *)) rx_listselect, 1 },
  42.     { "MAILARCHIVE", "FOLDER/A", NULL, 0, (void (*)(struct RexxHost *,void **,long,struct RexxMsg *)) rx_mailarchive, 1 },
  43.     { "MAILBOUNCE", "QUIET/S", "WINDOW/N", RESINDEX(rxd_mailbounce), (void (*)(struct RexxHost *,void **,long,struct RexxMsg *)) rx_mailbounce, 1 },
  44.     { "MAILCHANGESUBJECT", "SUBJECT/A", NULL, 0, (void (*)(struct RexxHost *,void **,long,struct RexxMsg *)) rx_mailchangesubject, 1 },
  45.     { "MAILCHECK", "POP/K/N,MANUAL/S", "DOWNLOADED/N,ONSERVER/N,DUPSKIPPED/N,DELETED/N", RESINDEX(rxd_mailcheck), (void (*)(struct RexxHost *,void **,long,struct RexxMsg *)) rx_mailcheck, 1 },
  46.     { "MAILCOPY", "FOLDER/A", NULL, 0, (void (*)(struct RexxHost *,void **,long,struct RexxMsg *)) rx_mailcopy, 1 },
  47.     { "MAILDELETE", "ATONCE/S,FORCE/S", NULL, 0, (void (*)(struct RexxHost *,void **,long,struct RexxMsg *)) rx_maildelete, 1 },
  48.     { "MAILEDIT", "QUIET/S", "WINDOW/N", RESINDEX(rxd_mailedit), (void (*)(struct RexxHost *,void **,long,struct RexxMsg *)) rx_mailedit, 1 },
  49.     { "MAILEXPORT", "FILENAME/A,ALL/S,APPEND/S", NULL, 0, (void (*)(struct RexxHost *,void **,long,struct RexxMsg *)) rx_mailexport, 1 },
  50.     { "MAILFILTER", "ALL/S", "CHECKED/N,BOUNCED/N,FORWARDED/N,REPLIED/N,EXECUTED/N,MOVED/N,DELETED/N", RESINDEX(rxd_mailfilter), (void (*)(struct RexxHost *,void **,long,struct RexxMsg *)) rx_mailfilter, 1 },
  51.     { "MAILFORWARD", "QUIET/S", "WINDOW/N", RESINDEX(rxd_mailforward), (void (*)(struct RexxHost *,void **,long,struct RexxMsg *)) rx_mailforward, 1 },
  52.     { "MAILIMPORT", "FILENAME/A,WAIT/S", NULL, 0, (void (*)(struct RexxHost *,void **,long,struct RexxMsg *)) rx_mailimport, 1 },
  53.     { "MAILINFO", "INDEX/N", "INDEX/N,STATUS,FROM,TO,REPLYTO,SUBJECT,FILENAME,SIZE/N,DATE,FLAGS,MSGID/N", RESINDEX(rxd_mailinfo), (void (*)(struct RexxHost *,void **,long,struct RexxMsg *)) rx_mailinfo, 1 },
  54.     { "MAILMOVE", "FOLDER/A", NULL, 0, (void (*)(struct RexxHost *,void **,long,struct RexxMsg *)) rx_mailmove, 1 },
  55.     { "MAILREAD", "WINDOW/N,QUIET/S", "WINDOW/N", RESINDEX(rxd_mailread), (void (*)(struct RexxHost *,void **,long,struct RexxMsg *)) rx_mailread, 1 },
  56.     { "MAILREPLY", "QUIET/S", "WINDOW/N", RESINDEX(rxd_mailreply), (void (*)(struct RexxHost *,void **,long,struct RexxMsg *)) rx_mailreply, 1 },
  57.     { "MAILSEND", "ALL/S", NULL, 0, (void (*)(struct RexxHost *,void **,long,struct RexxMsg *)) rx_mailsend, 1 },
  58.     { "MAILSENDALL", NULL, NULL, 0, (void (*)(struct RexxHost *,void **,long,struct RexxMsg *)) rx_mailsendall, 1 },
  59.     { "MAILSTATUS", "STATUS/A", NULL, 0, (void (*)(struct RexxHost *,void **,long,struct RexxMsg *)) rx_mailstatus, 1 },
  60.     { "MAILUPDATE", NULL, NULL, 0, (void (*)(struct RexxHost *,void **,long,struct RexxMsg *)) rx_mailupdate, 1 },
  61.     { "MAILWRITE", "WINDOW/N,QUIET/S", "WINDOW/N", RESINDEX(rxd_mailwrite), (void (*)(struct RexxHost *,void **,long,struct RexxMsg *)) rx_mailwrite, 1 },
  62.     { "NEWMAILFILE", "FOLDER", "FILENAME", RESINDEX(rxd_newmailfile), (void (*)(struct RexxHost *,void **,long,struct RexxMsg *)) rx_newmailfile, 1 },
  63.     { "QUIT", "FORCE/S", NULL, 0, (void (*)(struct RexxHost *,void **,long,struct RexxMsg *)) rx_quit, 1 },
  64.     { "READCLOSE", NULL, NULL, 0, (void (*)(struct RexxHost *,void **,long,struct RexxMsg *)) rx_readclose, 1 },
  65.     { "READINFO", NULL, "FILENAME/M,FILETYPE/M,FILESIZE/N/M,TEMPFILE/M", RESINDEX(rxd_readinfo), (void (*)(struct RexxHost *,void **,long,struct RexxMsg *)) rx_readinfo, 1 },
  66.     { "READPRINT", "PART/N", NULL, 0, (void (*)(struct RexxHost *,void **,long,struct RexxMsg *)) rx_readprint, 1 },
  67.     { "READSAVE", "PART/N,FILENAME/K,OVERWRITE/S", NULL, 0, (void (*)(struct RexxHost *,void **,long,struct RexxMsg *)) rx_readsave, 1 },
  68.     { "REQUEST", "BODY/A,GADGETS/A", "RESULT/N", RESINDEX(rxd_request), (void (*)(struct RexxHost *,void **,long,struct RexxMsg *)) rx_request, 1 },
  69.     { "REQUESTFOLDER", "BODY/A,EXCLUDEACTIVE/S", "FOLDER", RESINDEX(rxd_requestfolder), (void (*)(struct RexxHost *,void **,long,struct RexxMsg *)) rx_requestfolder, 1 },
  70.     { "REQUESTSTRING", "BODY/A,STRING/K,SECRET/S", "STRING", RESINDEX(rxd_requeststring), (void (*)(struct RexxHost *,void **,long,struct RexxMsg *)) rx_requeststring, 1 },
  71.     { "SCREENTOBACK", NULL, NULL, 0, (void (*)(struct RexxHost *,void **,long,struct RexxMsg *)) rx_screentoback, 1 },
  72.     { "SCREENTOFRONT", NULL, NULL, 0, (void (*)(struct RexxHost *,void **,long,struct RexxMsg *)) rx_screentofront, 1 },
  73.     { "SETFLAG", "VOL/K/N,PER/K/N", NULL, 0, (void (*)(struct RexxHost *,void **,long,struct RexxMsg *)) rx_setflag, 1 },
  74.     { "SETFOLDER", "FOLDER/A", NULL, 0, (void (*)(struct RexxHost *,void **,long,struct RexxMsg *)) rx_setfolder, 1 },
  75.     { "SETMAIL", "NUM/N/A", NULL, 0, (void (*)(struct RexxHost *,void **,long,struct RexxMsg *)) rx_setmail, 1 },
  76.     { "SETMAILFILE", "MAILFILE/A", NULL, 0, (void (*)(struct RexxHost *,void **,long,struct RexxMsg *)) rx_setmailfile, 1 },
  77.     { "SHOW", NULL, NULL, 0, (void (*)(struct RexxHost *,void **,long,struct RexxMsg *)) rx_show, 1 },
  78.     { "USERINFO", NULL, "USERNAME,EMAIL,REALNAME,CONFIG,MAILDIR,FOLDERS/N", RESINDEX(rxd_userinfo), (void (*)(struct RexxHost *,void **,long,struct RexxMsg *)) rx_userinfo, 1 },
  79.     { "WRITEATTACH", "FILE/A,DESC,ENCMODE,CTYPE", NULL, 0, (void (*)(struct RexxHost *,void **,long,struct RexxMsg *)) rx_writeattach, 1 },
  80.     { "WRITEBCC", "ADDRESS/A/M,ADD/S", NULL, 0, (void (*)(struct RexxHost *,void **,long,struct RexxMsg *)) rx_writebcc, 1 },
  81.     { "WRITECC", "ADDRESS/A/M,ADD/S", NULL, 0, (void (*)(struct RexxHost *,void **,long,struct RexxMsg *)) rx_writecc, 1 },
  82.     { "WRITEEDITOR", "COMMAND/A", "RESULT", RESINDEX(rxd_writeeditor), (void (*)(struct RexxHost *,void **,long,struct RexxMsg *)) rx_writeeditor, 1 },
  83.     { "WRITEFROM", "ADDRESS/A", NULL, 0, (void (*)(struct RexxHost *,void **,long,struct RexxMsg *)) rx_writefrom, 1 },
  84.     { "WRITELETTER", "FILE/A,NOSIG/S", NULL, 0, (void (*)(struct RexxHost *,void **,long,struct RexxMsg *)) rx_writeletter, 1 },
  85.     { "WRITEMAILTO", "ADDRESS/A/M", NULL, 0, (void (*)(struct RexxHost *,void **,long,struct RexxMsg *)) rx_writemailto, 1 },
  86.     { "WRITEOPTIONS", "DELETE/S,RECEIPT/S,NOTIF/S,ADDINFO/S,IMPORTANCE/N,SIG/N,SECURITY/N", NULL, 0, (void (*)(struct RexxHost *,void **,long,struct RexxMsg *)) rx_writeoptions, 1 },
  87.     { "WRITEQUEUE", "HOLD/S", NULL, 0, (void (*)(struct RexxHost *,void **,long,struct RexxMsg *)) rx_writequeue, 1 },
  88.     { "WRITEREPLYTO", "ADDRESS/A", NULL, 0, (void (*)(struct RexxHost *,void **,long,struct RexxMsg *)) rx_writereplyto, 1 },
  89.     { "WRITESEND", NULL, NULL, 0, (void (*)(struct RexxHost *,void **,long,struct RexxMsg *)) rx_writesend, 1 },
  90.     { "WRITESUBJECT", "SUBJECT/A", NULL, 0, (void (*)(struct RexxHost *,void **,long,struct RexxMsg *)) rx_writesubject, 1 },
  91.     { "WRITETO", "ADDRESS/A/M,ADD/S", NULL, 0, (void (*)(struct RexxHost *,void **,long,struct RexxMsg *)) rx_writeto, 1 },
  92.     { NULL, NULL, NULL, NULL, NULL }
  93. };
  94.  
  95. int        command_cnt = 72;
  96.  
  97. static struct arb_p_link link0[] = {
  98.     {"WRITE", 1}, {"USERINFO", 16}, {"S", 17}, {"RE", 28}, {"QUIT", 37}, {"NEWMAILFILE", 38},
  99.     {"MAIL", 39}, {"LISTSELECT", 67}, {"I", 68}, {"H", 71}, {"GET", 74}, {"FOLDERINFO", 80},
  100.     {"A", 81}, {NULL, 0} };
  101.  
  102. static struct arb_p_link link1[] = {
  103.     {"TO", 2}, {"S", 3}, {"REPLYTO", 6}, {"QUEUE", 7}, {"OPTIONS", 8}, {"MAILTO", 9},
  104.     {"LETTER", 10}, {"FROM", 11}, {"EDITOR", 12}, {"CC", 13}, {"BCC", 14}, {"ATTACH", 15},
  105.     {NULL, 0} };
  106.  
  107. static struct arb_p_link link3[] = {
  108.     {"UBJECT", 4}, {"END", 5}, {NULL, 0} };
  109.  
  110. static struct arb_p_link link17[] = {
  111.     {"HOW", 18}, {"ET", 19}, {"CREENTO", 25}, {NULL, 0} };
  112.  
  113. static struct arb_p_link link19[] = {
  114.     {"MAIL", 20}, {"F", 22}, {NULL, 0} };
  115.  
  116. static struct arb_p_link link20[] = {
  117.     {"FILE", 21}, {NULL, 0} };
  118.  
  119. static struct arb_p_link link22[] = {
  120.     {"OLDER", 23}, {"LAG", 24}, {NULL, 0} };
  121.  
  122. static struct arb_p_link link25[] = {
  123.     {"FRONT", 26}, {"BACK", 27}, {NULL, 0} };
  124.  
  125. static struct arb_p_link link28[] = {
  126.     {"QUEST", 29}, {"AD", 32}, {NULL, 0} };
  127.  
  128. static struct arb_p_link link29[] = {
  129.     {"STRING", 30}, {"FOLDER", 31}, {NULL, 0} };
  130.  
  131. static struct arb_p_link link32[] = {
  132.     {"SAVE", 33}, {"PRINT", 34}, {"INFO", 35}, {"CLOSE", 36}, {NULL, 0} };
  133.  
  134. static struct arb_p_link link39[] = {
  135.     {"WRITE", 40}, {"UPDATE", 41}, {"S", 42}, {"RE", 46}, {"MOVE", 49}, {"I", 50},
  136.     {"F", 53}, {"E", 56}, {"DELETE", 59}, {"C", 60}, {"BOUNCE", 65}, {"ARCHIVE", 66},
  137.     {NULL, 0} };
  138.  
  139. static struct arb_p_link link42[] = {
  140.     {"TATUS", 43}, {"END", 44}, {NULL, 0} };
  141.  
  142. static struct arb_p_link link44[] = {
  143.     {"ALL", 45}, {NULL, 0} };
  144.  
  145. static struct arb_p_link link46[] = {
  146.     {"PLY", 47}, {"AD", 48}, {NULL, 0} };
  147.  
  148. static struct arb_p_link link50[] = {
  149.     {"NFO", 51}, {"MPORT", 52}, {NULL, 0} };
  150.  
  151. static struct arb_p_link link53[] = {
  152.     {"ORWARD", 54}, {"ILTER", 55}, {NULL, 0} };
  153.  
  154. static struct arb_p_link link56[] = {
  155.     {"XPORT", 57}, {"DIT", 58}, {NULL, 0} };
  156.  
  157. static struct arb_p_link link60[] = {
  158.     {"OPY", 61}, {"H", 62}, {NULL, 0} };
  159.  
  160. static struct arb_p_link link62[] = {
  161.     {"ECK", 63}, {"ANGESUBJECT", 64}, {NULL, 0} };
  162.  
  163. static struct arb_p_link link68[] = {
  164.     {"SONLINE", 69}, {"NFO", 70}, {NULL, 0} };
  165.  
  166. static struct arb_p_link link71[] = {
  167.     {"IDE", 72}, {"ELP", 73}, {NULL, 0} };
  168.  
  169. static struct arb_p_link link74[] = {
  170.     {"URL", 75}, {"SELECTED", 76}, {"MAILINFO", 77}, {"FOLDERINFO", 78}, {"CONFIGINFO", 79}, {NULL, 0} };
  171.  
  172. static struct arb_p_link link81[] = {
  173.     {"PP", 82}, {"DDR", 85}, {NULL, 0} };
  174.  
  175. static struct arb_p_link link82[] = {
  176.     {"NOBUSY", 83}, {"BUSY", 84}, {NULL, 0} };
  177.  
  178. static struct arb_p_link link85[] = {
  179.     {"SAVE", 86}, {"RESOLVE", 87}, {"NEW", 88}, {"LOAD", 89}, {"INFO", 90}, {"GOTO", 91},
  180.     {"FIND", 92}, {"EDIT", 93}, {"DELETE", 94}, {NULL, 0} };
  181.  
  182. struct arb_p_state arb_p_state[] = {
  183.     {-1, link0}, {59, link1}, {71, NULL}, {69, link3}, {70, NULL},
  184.     {69, NULL}, {68, NULL}, {67, NULL}, {66, NULL}, {65, NULL},
  185.     {64, NULL}, {63, NULL}, {62, NULL}, {61, NULL}, {60, NULL},
  186.     {59, NULL}, {58, NULL}, {51, link17}, {57, NULL}, {53, link19},
  187.     {55, link20}, {56, NULL}, {53, link22}, {54, NULL}, {53, NULL},
  188.     {51, link25}, {52, NULL}, {51, NULL}, {44, link28}, {48, link29},
  189.     {50, NULL}, {49, NULL}, {44, link32}, {47, NULL}, {46, NULL},
  190.     {45, NULL}, {44, NULL}, {43, NULL}, {42, NULL}, {22, link39},
  191.     {41, NULL}, {40, NULL}, {37, link42}, {39, NULL}, {37, link44},
  192.     {38, NULL}, {35, link46}, {36, NULL}, {35, NULL}, {34, NULL},
  193.     {32, link50}, {33, NULL}, {32, NULL}, {30, link53}, {31, NULL},
  194.     {30, NULL}, {28, link56}, {29, NULL}, {28, NULL}, {27, NULL},
  195.     {24, link60}, {26, NULL}, {24, link62}, {25, NULL}, {24, NULL},
  196.     {23, NULL}, {22, NULL}, {21, NULL}, {19, link68}, {20, NULL},
  197.     {19, NULL}, {17, link71}, {18, NULL}, {17, NULL}, {12, link74},
  198.     {16, NULL}, {15, NULL}, {14, NULL}, {13, NULL}, {12, NULL},
  199.     {11, NULL}, {0, link81}, {9, link82}, {10, NULL}, {9, NULL},
  200.     {0, link85}, {8, NULL}, {7, NULL}, {6, NULL}, {5, NULL},
  201.     {4, NULL}, {3, NULL}, {2, NULL}, {1, NULL}, {0, NULL} 
  202.     };
  203.  
  204.