scalos/Plugins/OOP/TitleClock/prefs/requesters.c

   1 /*
   2  *  requesters.c    Various routines for ASL requester and such like
   3  *
   4  * $Date$
   5  * $Revision$
   6  *
   7  *  0.1
   8  *  20010804    DM  + Created
   9  *
  10  */
  11
  12 #include <exec/types.h>
  13
  14 #include <proto/asl.h>
  15 #include <proto/exec.h>
  16 #include <proto/dos.h>
  17
  18 #include <intuition/intuition.h>
  19 #include <libraries/asl.h>
  20
  21 #include <stdio.h>
  22 #include <string.h>
  23
  24 STRPTR  SaveFileReq(struct Window *win)
  25 {
  26         struct FileRequester    *aslfr;
  27         STRPTR                  fbuf = NULL;
  28         ULONG                   fblen;
  29
  30         if(NULL != (aslfr = AllocAslRequest(ASL_FileRequest, NULL)) )
  31         {
  32                 if(AslRequestTags(aslfr,ASLFR_Window, win,
  33                                                                 ASLFR_SleepWindow, TRUE,
  34                                                                 ASLFR_RejectIcons, TRUE,
  35                                                                 ASLFR_DoSaveMode, TRUE,
  36                                                                 TAG_DONE) )
  37                 {
  38                         //printf("OK\n");
  39                         fblen = 0;
  40                         if(aslfr->fr_Drawer)
  41                         {
  42                                 /* add 1 for any possible / character */
  43                                 fblen += strlen(aslfr->fr_Drawer);
  44                                 if(fblen) fblen++;
  45                                 //printf("Dir='%s'\n", aslfr->fr_Drawer);
  46                         }
  47
  48                         if(aslfr->fr_File)
  49                         {
  50                                 fblen += strlen(aslfr->fr_File);
  51                                 //printf("File='%s'\n", aslfr->fr_File);
  52                         }
  53                         if(fblen) fblen++;
  54                         //printf("length of string name buffer=%lu\n", fblen);
  55
  56                         fbuf = AllocVec(fblen, MEMF_ANY|MEMF_CLEAR);
  57                         if(fbuf)
  58                         {
  59                                 if(aslfr->fr_Drawer)
  60                                 {
  61                                         strcpy(fbuf, aslfr->fr_Drawer);
  62                                 }
  63
  64                                 if(aslfr->fr_File)
  65                                 {
  66                                         AddPart(fbuf, aslfr->fr_File, fblen);
  67                                 }
  68                                 //printf("complete name='%s'\n", fbuf);
  69                         }
  70
  71                         FreeAslRequest(aslfr);
  72                 }
  73                 else
  74                 {
  75                         FreeAslRequest(aslfr);
  76                         aslfr = NULL;
  77                         fbuf = NULL;
  78                 }
  79         }
  80         return(fbuf);
  81 }
  82
  83
  84 STRPTR  OpenFileReq(struct Window *win)
  85 {
  86         struct FileRequester    *aslfr;
  87         STRPTR                  fbuf = NULL;
  88         ULONG                   fblen;
  89
  90         if(NULL != (aslfr = AllocAslRequest(ASL_FileRequest, NULL)) )
  91         {
  92                 if(AslRequestTags(aslfr,ASLFR_Window, win,
  93                                                                 ASLFR_SleepWindow, TRUE,
  94                                                                 ASLFR_RejectIcons, TRUE,
  95                                                                 TAG_DONE) )
  96                 {
  97                         //printf("OK\n");
  98                         fblen = 0;
  99                         if(aslfr->fr_Drawer)
 100                         {
 101                                 /* add 1 for any possible / character */
 102                                 fblen += strlen(aslfr->fr_Drawer);
 103                                 if(fblen) fblen++;
 104                                 //printf("Dir='%s'\n", aslfr->fr_Drawer);
 105                         }
 106
 107                         if(aslfr->fr_File)
 108                         {
 109                                 fblen += strlen(aslfr->fr_File);
 110                                 //printf("File='%s'\n", aslfr->fr_File);
 111                         }
 112                         if(fblen) fblen++;
 113                         //printf("length of string name buffer=%lu\n", fblen);
 114
 115                         fbuf = AllocVec(fblen, MEMF_ANY|MEMF_CLEAR);
 116                         if(fbuf)
 117                         {
 118                                 if(aslfr->fr_Drawer)
 119                                 {
 120                                         strcpy(fbuf, aslfr->fr_Drawer);
 121                                 }
 122
 123                                 if(aslfr->fr_File)
 124                                 {
 125                                         AddPart(fbuf, aslfr->fr_File, fblen);
 126                                 }
 127                                 //printf("complete name='%s'\n", fbuf);
 128                         }
 129
 130                         FreeAslRequest(aslfr);
 131                 }
 132                 else
 133                 {
 134                         FreeAslRequest(aslfr);
 135                         aslfr = NULL;
 136                         fbuf = NULL;
 137                 }
 138         }
 139         return(fbuf);
 140 }
 141
 142 #if 0
 143 // Small test program for the above functions
 144 struct Library  *AslBase;
 145
 146 int main(void)
 147 {
 148         STRPTR  fbuf;
 149
 150         if(NULL != (AslBase = OpenLibrary("asl.library", 38)) )
 151         {
 152                 fbuf = OpenFileReq(NULL);
 153                 if(fbuf)
 154                 {
 155                         printf("File name='%s'\n", fbuf);
 156                         FreeVec(fbuf);
 157                 }
 158
 159
 160                 fbuf = SaveFileReq(NULL);
 161                 if(fbuf)
 162                 {
 163                         printf("File name='%s'\n", fbuf);
 164                         FreeVec(fbuf);
 165                 }
 166
 167                 CloseLibrary(AslBase);
 168         }
 169         return(0);
 170 }
 171 #endif
 172
 173