workbench/utilities/More/misc.c

   1 /*
   2     Copyright © 1995-2019, The AROS Development Team. All rights reserved.
   3     $Id$
   4 */
   5
   6 /*********************************************************************************************/
   7
   8 #include <intuition/intuition.h>
   9 #include <libraries/asl.h>
  10 #include <libraries/gadtools.h>
  11 #include <proto/exec.h>
  12 #include <proto/dos.h>
  13 #include <proto/intuition.h>
  14 #include <proto/gadtools.h>
  15 #include <proto/asl.h>
  16
  17 #define CATCOMP_NUMBERS
  18 #include "strings.h"
  19
  20 #include "global.h"
  21 #include "version.h"
  22
  23 #include <string.h>
  24
  25 const char *versionstring = VERSIONSTR;
  26
  27 /*********************************************************************************************/
  28
  29 struct Library *AslBase;
  30
  31 /*********************************************************************************************/
  32
  33 static struct NewMenu nm[] =
  34 {
  35     {NM_TITLE, (STRPTR)MSG_MEN_PROJECT                  },
  36      {NM_ITEM, (STRPTR)MSG_MEN_PROJECT_OPEN             },
  37      {NM_ITEM, NM_BARLABEL                              },
  38      {NM_ITEM, (STRPTR)MSG_MEN_PROJECT_SAVEAS           },
  39      {NM_ITEM, NM_BARLABEL                              },
  40      {NM_ITEM, (STRPTR)MSG_MEN_PROJECT_PRINT            },
  41      {NM_ITEM, (STRPTR)MSG_MEN_PROJECT_ABOUT            },
  42      {NM_ITEM, NM_BARLABEL                              },
  43      {NM_ITEM, (STRPTR)MSG_MEN_PROJECT_QUIT             },
  44     {NM_TITLE, (STRPTR)MSG_MEN_NAVIGATION               },
  45      {NM_ITEM, (STRPTR)MSG_MEN_NAVIGATION_FIND          },
  46      {NM_ITEM, (STRPTR)MSG_MEN_NAVIGATION_FIND_NEXT     },
  47      {NM_ITEM, (STRPTR)MSG_MEN_NAVIGATION_FIND_PREV     },
  48      {NM_ITEM, NM_BARLABEL                              },
  49      {NM_ITEM, (STRPTR)MSG_MEN_NAVIGATION_JUMP          },
  50     {NM_END}
  51 };
  52
  53 /*********************************************************************************************/
  54
  55 void InitMenus(void)
  56 {
  57     struct NewMenu *actnm = nm;
  58
  59     for(actnm = nm; actnm->nm_Type != NM_END; actnm++)
  60     {
  61         if (actnm->nm_Label != NM_BARLABEL)
  62         {
  63             ULONG  id = (IPTR)actnm->nm_Label;
  64             CONST_STRPTR str = MSG(id);
  65
  66             if (actnm->nm_Type == NM_TITLE)
  67             {
  68                 actnm->nm_Label = str;
  69             } else {
  70                 actnm->nm_Label = str + 2;
  71                 if (str[0] != ' ') actnm->nm_CommKey = str;
  72             }
  73             actnm->nm_UserData = (APTR)(IPTR)id;
  74
  75         } /* if (actnm->nm_Label != NM_BARLABEL) */
  76
  77     } /* for(actnm = nm; nm->nm_Type != NM_END; nm++) */
  78
  79 }
  80
  81 /*********************************************************************************************/
  82
  83 void MakeMenus(void)
  84 {
  85     menus = CreateMenusA(nm, NULL);
  86     if (!menus) Cleanup(MSG(MSG_CANT_CREATE_MENUS));
  87
  88     if (!LayoutMenusA(menus, vi, NULL)) Cleanup(MSG(MSG_CANT_CREATE_MENUS));
  89
  90 }
  91
  92 /*********************************************************************************************/
  93
  94 void KillMenus(void)
  95 {
  96     if (win) ClearMenuStrip(win);
  97     if (menus) FreeMenus(menus);
  98
  99     menus = NULL;
 100 }
 101
 102 /*********************************************************************************************/
 103
 104 STRPTR GetFile(BOOL open)
 105 {
 106     static UBYTE         pathbuffer[300];
 107     static UBYTE         filebuffer[108];
 108     struct FileRequester *req;
 109     STRPTR               retval = NULL;
 110
 111     AslBase = OpenLibrary("asl.library", 39);
 112     if (AslBase)
 113     {
 114         filebuffer[sizeof(filebuffer) - 1] = 0;
 115         pathbuffer[sizeof(pathbuffer) - 1] = 0;
 116
 117         strncpy(filebuffer, FilePart(filenamebuffer), sizeof(filebuffer) - 1);
 118         CopyMem(filenamebuffer, pathbuffer, 300);
 119         *(FilePart(pathbuffer)) = 0;
 120
 121         req = AllocAslRequestTags(ASL_FileRequest, ASLFR_TitleText     , open                          ?
 122                                                                          (IPTR)MSG(MSG_ASL_OPEN_TITLE) :
 123                                                                          (IPTR)MSG(MSG_ASL_SAVE_TITLE)  ,
 124                                                    ASLFR_DoSaveMode    , open        ?
 125                                                                          (IPTR)FALSE :
 126                                                                          (IPTR)TRUE                     ,
 127                                                    ASLFR_RejectIcons   , (IPTR)TRUE                     ,
 128                                                    ASLFR_DoPatterns    , (IPTR)TRUE                     ,
 129                                                    ASLFR_InitialDrawer , (IPTR)pathbuffer               ,
 130                                                    ASLFR_InitialFile   , (IPTR)filebuffer               ,
 131                                                    TAG_DONE);
 132         if (req)
 133         {
 134             if (AslRequest(req, NULL))
 135             {
 136                 strncpy(filebuffer, req->fr_Drawer, sizeof filebuffer - 1);
 137                 AddPart(filebuffer, req->fr_File, sizeof filebuffer - 1);
 138
 139                 retval = filebuffer;
 140
 141             } /* if (AslRequest(req, NULL) */
 142
 143             FreeAslRequest(req);
 144
 145         } /* if (req) */
 146
 147         CloseLibrary(AslBase);
 148
 149     } /* if (AslBase) */
 150
 151     return retval;
 152 }
 153
 154 /*********************************************************************************************/
 155
 156 void About(void)
 157 {
 158     struct EasyStruct   es;
 159
 160     es.es_StructSize   = sizeof(es);
 161     es.es_Flags        = 0;
 162     es.es_Title        = MSG(MSG_ABOUT_TITLE);
 163     es.es_TextFormat   = MSG(MSG_ABOUT);
 164     es.es_GadgetFormat = MSG(MSG_CONTINUE);
 165
 166     EasyRequest(win, &es, NULL, (IPTR)VERSION,
 167                                 (IPTR)REVISION,
 168                                 (IPTR)DATESTR,
 169                                 (IPTR)"2005-2009",
 170                                 (IPTR)"AROS Development Team");
 171
 172 }
 173
 174 /*********************************************************************************************/