workbench/network/stacks/AROSTCP/MUI.MiamiPanel/muimiamipanel_misc.c

   1
   2 #include <proto/exec.h>
   3 #include <proto/intuition.h>
   4 #include <proto/muimaster.h>
   5 #include <proto/utility.h>
   6
   7 #include <mui/Urltext_mcc.h>
   8
   9 #include "muimiamipanel_intern.h"
  10 #include "muimiamipanel_misc.h"
  11 #include "muimiamipanel_locale.h"
  12
  13 /***********************************************************************/
  14
  15 #if !defined(__MORPHOS____) && !defined(__AROS__)
  16 ULONG STDARGS
  17 DoSuperNew(struct IClass *cl, Object *obj, ULONG tag1,...)
  18 {
  19     return DoSuperMethod(cl, obj, OM_NEW, &tag1, NULL);
  20 }
  21 #endif
  22
  23 /***********************************************************************/
  24
  25 Object *
  26 ovfixspace(void)
  27 {
  28     return RectangleObject,
  29         MUIA_FixHeightTxt, "A",
  30     End;
  31 }
  32
  33 /****************************************************************************/
  34
  35 Object *
  36 ohfixspace(void)
  37 {
  38     return RectangleObject,
  39         MUIA_FixWidthTxt, "A",
  40     End;
  41 }
  42
  43 /****************************************************************************/
  44
  45 Object *
  46 otextitem(void)
  47 {
  48     return TextObject,
  49         MUIA_Text_Contents, "-",
  50         MUIA_Text_SetMax,   TRUE,
  51     End;
  52 }
  53
  54 /****************************************************************************/
  55
  56 Object *
  57 obartitle(ULONG id, struct MiamiPanelBase_intern *MiamiPanelBaseIntern)
  58 {
  59     return MUI_MakeObject(MUIO_BarTitle, __(id));
  60 }
  61
  62 /****************************************************************************/
  63
  64 Object *
  65 owspace(ULONG weight)
  66 {
  67     return RectangleObject,
  68             MUIA_Weight, weight,
  69     End;
  70 }
  71
  72 /****************************************************************************/
  73
  74 Object *
  75 olabel(ULONG id, struct MiamiPanelBase_intern *MiamiPanelBaseIntern)
  76 {
  77     return Label(__(id));
  78 }
  79
  80 /****************************************************************************/
  81
  82 Object *
  83 olabel1(ULONG id, struct MiamiPanelBase_intern *MiamiPanelBaseIntern)
  84 {
  85     return Label1(__(id));
  86 }
  87
  88 /****************************************************************************/
  89
  90 Object *
  91 ollabel1(ULONG id, struct MiamiPanelBase_intern *MiamiPanelBaseIntern)
  92 {
  93     return LLabel1(__(id));
  94 }
  95
  96 /***********************************************************************/
  97
  98 Object *
  99 olabel2(ULONG id, struct MiamiPanelBase_intern *MiamiPanelBaseIntern)
 100 {
 101     return Label2(__(id));
 102 }
 103
 104 /***********************************************************************/
 105
 106 Object *
 107 obutton(ULONG label, ULONG help, struct MiamiPanelBase_intern *MiamiPanelBaseIntern)
 108 {
 109     register Object *obj;
 110
 111     if (obj = MUI_MakeObject(MUIO_Button, __(label)))
 112         SetAttrs(obj, MUIA_CycleChain, TRUE,
 113                      MUIA_ShortHelp,  __(help),
 114                      TAG_DONE);
 115
 116     return obj;
 117 }
 118
 119 /***********************************************************************/
 120
 121 Object *
 122 ourlText(UBYTE *url, UBYTE *text, struct MiamiPanelBase_intern *MiamiPanelBaseIntern)
 123 {
 124     return UrltextObject,
 125         MUIA_Urltext_Text,   text,
 126         MUIA_Urltext_Url,    url,
 127         MUIA_Urltext_SetMax, 0,
 128     End;
 129 }
 130
 131 /***********************************************************************/
 132
 133 Object *
 134 ocheck(ULONG key, ULONG help, struct MiamiPanelBase_intern *MiamiPanelBaseIntern)
 135 {
 136     register Object *obj;
 137
 138     if (obj = MUI_MakeObject(MUIO_Checkmark, __(key)))
 139         SetAttrs(obj, MUIA_CycleChain, TRUE, MUIA_ShortHelp, __(help), TAG_DONE);
 140
 141     return obj;
 142 }
 143
 144 /***********************************************************************/
 145
 146 Object *
 147 ocycle(ULONG key, UBYTE **entries, ULONG help, struct MiamiPanelBase_intern *MiamiPanelBaseIntern)
 148 {
 149     register Object *obj;
 150
 151     if (obj = MUI_MakeObject(MUIO_Cycle, __(key), (ULONG)entries))
 152         SetAttrs(obj, MUIA_CycleChain, TRUE, MUIA_ShortHelp,__(help), TAG_DONE);
 153
 154     return obj;
 155 }
 156
 157 /***********************************************************************/
 158
 159 ULONG
 160 openWindow(Object *app, Object *win, struct MiamiPanelBase_intern *MiamiPanelBaseIntern)
 161 {
 162     ULONG v;
 163
 164     if (win)
 165     {
 166         set(win, MUIA_Window_Open, TRUE);
 167         get(win, MUIA_Window_Open, &v);
 168         if (!v) get(app, MUIA_Application_Iconified, &v);
 169     }
 170     else v = FALSE;
 171
 172     if (!v) DisplayBeep(0);
 173
 174     return v;
 175 }
 176
 177 /***********************************************************************/
 178
 179 void
 180 grouping(UBYTE *source, struct MiamiPanelBase_intern *MiamiPanelBaseIntern)
 181 {
 182     UBYTE          buf[256];
 183     register UBYTE *s, *d, c = MiamiPanelBaseIntern->mpb_groupSep[0];
 184     int            j;
 185
 186     for (j = 3, s = source+strlen(source)-1, d = buf; s>=source; j--, d++, s--)
 187     {
 188         if (!j)
 189         {
 190             j = 3;
 191             *d++ = c;
 192         }
 193
 194         *d = *s;
 195     }
 196     *d = 0;
 197
 198     for (s = buf+strlen(buf)-1, d = source; s>=buf; d++, s--) *d = *s;
 199     *d = 0;
 200 }
 201
 202 /***********************************************************************/
 203
 204 #if !defined(__AROS__)
 205 #ifdef __MORPHOS__
 206 void
 207 sprintf(UBYTE *to, UBYTE *fmt,...)
 208 {
 209   va_list args;
 210
 211   va_start(args, fmt);
 212   VNewRawDoFmt(fmt, (APTR)0, to, args);
 213   va_end(args);
 214 }
 215 #else
 216 static UWORD fmtfunc[] = { 0x16c0, 0x4e75 };
 217
 218 void
 219 sprintf(UBYTE *to, UBYTE *fmt,...)
 220 {
 221     RawDoFmt(fmt, &fmt+1, (APTR)fmtfunc, to);
 222 }
 223 #endif
 224 #endif /* !__AROS__ */
 225
 226 /***********************************************************************/
 227
 228 #if !defined(__AROS__)
 229 #ifdef __MORPHOS__
 230 static void
 231 snprintfStuff(void)
 232 {
 233     register struct stream *s = (struct stream *)REG_A3;
 234     register UBYTE         c  = (UBYTE)REG_D0;
 235 #else
 236 static void ASM
 237 snprintfStuff(REG(d0, UBYTE c), REG(a3, struct stream *s))
 238 {
 239 #endif
 240
 241     if (!s->stop)
 242     {
 243         if (++s->counter>=s->size)
 244         {
 245             *(s->buf) = 0;
 246             s->stop   = 1;
 247         }
 248         else *(s->buf++) = c;
 249     }
 250 }
 251
 252 #ifdef __MORPHOS__
 253 static struct EmulLibEntry snprintfStuffTrap = {TRAP_LIB, 0, (void *)&snprintfStuff};
 254 #endif
 255
 256
 257 int STDARGS
 258 snprintf(UBYTE *buf, int size, UBYTE *fmt,...)
 259 {
 260     struct stream s;
 261     #ifdef __MORPHOS__
 262     va_list       va;
 263
 264     va_start(va,fmt);
 265     #endif
 266
 267     s.buf     = buf;
 268     s.size    = size;
 269     s.counter = 0;
 270     s.stop    = 0;
 271
 272     #ifdef __MORPHOS__
 273     RawDoFmt(fmt, va->overflow_arg_area, (APTR)&snprintfStuffTrap, &s);
 274     va_end(va);
 275     #else
 276     RawDoFmt(fmt, &fmt+1, (APTR)snprintfStuff, &s);
 277     #endif
 278
 279     return s.counter-1;
 280 }
 281 #endif
 282
 283 /****************************************************************************/
 284 /*
 285 ** The following functions are used
 286 ** to handle the per interface scale
 287 */
 288
 289 ULONG
 290 IDToValue(Tag tag, struct MiamiPanelBase_intern *MiamiPanelBaseIntern)
 291 {
 292     return GetTagData(tag, 0, scales);
 293 }
 294 /****************************************************************************/
 295
 296 Tag
 297 valueToID(ULONG val)
 298 {
 299     register struct TagItem *t;
 300
 301     for (t = scales; (t->ti_Tag!=TAG_DONE) && (t->ti_Data!=val); t++);
 302
 303     return t->ti_Tag;
 304 }
 305
 306 /****************************************************************************/
 307
 308 struct ifnode *
 309 createIFNode(struct MPS_Prefs *prefs,UBYTE *name,ULONG scale, struct MiamiPanelBase_intern *MiamiPanelBaseIntern)
 310 {
 311     register struct ifnode *ifnode;
 312
 313     ObtainSemaphore(&MiamiPanelBaseIntern->mpb_memSem);
 314
 315     if (ifnode = AllocPooled(MiamiPanelBaseIntern->mpb_pool, sizeof(struct ifnode)))
 316     {
 317         stccpy(ifnode->name,name, sizeof(ifnode->name));
 318         ifnode->scale = scale;
 319
 320         AddHead((struct List *)&prefs->iflist, (struct Node *)ifnode);
 321     }
 322
 323     ReleaseSemaphore(&MiamiPanelBaseIntern->mpb_memSem);
 324
 325     return ifnode;
 326 }
 327
 328 /****************************************************************************/
 329
 330 struct ifnode *
 331 findIFNode(struct MPS_Prefs *prefs,UBYTE *name)
 332 {
 333     register struct ifnode *ifnode;
 334
 335     for (ifnode = (struct ifnode *)prefs->iflist.mlh_Head; ifnode->link.mln_Succ; ifnode = (struct ifnode *)ifnode->link.mln_Succ)
 336         if (!strcmp(ifnode->name,name)) break;
 337
 338     return (ifnode->link.mln_Succ) ? ifnode : NULL;
 339 }
 340
 341 /****************************************************************************/
 342
 343 void
 344 freeIFList(struct MPS_Prefs *prefs, struct MiamiPanelBase_intern *MiamiPanelBaseIntern)
 345 {
 346     register struct Node *node;
 347
 348     ObtainSemaphore(&MiamiPanelBaseIntern->mpb_memSem);
 349
 350     while (node = RemHead((struct List *)&prefs->iflist))
 351         FreePooled(MiamiPanelBaseIntern->mpb_pool, node, sizeof(struct ifnode));
 352
 353     ReleaseSemaphore(&MiamiPanelBaseIntern->mpb_memSem);
 354 }
 355
 356 /****************************************************************************/
 357
 358 void
 359 moveMinList(struct MinList *to,struct MinList *from, struct MiamiPanelBase_intern *MiamiPanelBaseIntern)
 360 {
 361     register struct Node *node;
 362
 363     while (node = RemTail((struct List *)from)) AddTail((struct List *)to, node);
 364 }
 365
 366 /****************************************************************************/
 367
 368 #ifdef __MORPHOS__
 369 void *
 370 memcpy(void *to,const void *from,size_t len)
 371 {
 372     CopyMem((APTR)from, (APTR)to, len);
 373
 374     return to;
 375 }
 376 #endif
 377
 378 /****************************************************************************/
 379