workbench/classes/gadgets/texteditor/mcc/StyleOperators.c

   1 /***************************************************************************
   2
   3  TextEditor.mcc - Textediting MUI Custom Class
   4  Copyright (C) 1997-2000 Allan Odgaard
   5  Copyright (C) 2005-2009 by TextEditor.mcc Open Source Team
   6
   7  This library is free software; you can redistribute it and/or
   8  modify it under the terms of the GNU Lesser General Public
   9  License as published by the Free Software Foundation; either
  10  version 2.1 of the License, or (at your option) any later version.
  11
  12  This library is distributed in the hope that it will be useful,
  13  but WITHOUT ANY WARRANTY; without even the implied warranty of
  14  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  15  Lesser General Public License for more details.
  16
  17  TextEditor class Support Site:  http://www.sf.net/projects/texteditor-mcc
  18
  19  $Id$
  20
  21 ***************************************************************************/
  22
  23 #include <proto/intuition.h>
  24
  25 #include "private.h"
  26
  27 void  UpdateStyles (struct InstData *data)
  28 {
  29   UWORD style;
  30
  31   ENTER();
  32
  33   if(Enabled(data))
  34   {
  35       struct marking newblock;
  36
  37     NiceBlock(&data->blockinfo, &newblock);
  38     style = GetStyle(data->blockinfo.stopx - ((newblock.startx == data->blockinfo.startx && newblock.startline == data->blockinfo.startline) ? 1 : 0), data->blockinfo.stopline);
  39   }
  40   else
  41   {
  42     style = GetStyle(data->CPos_X, data->actualline);
  43   }
  44
  45   if(style != data->style)
  46   {
  47       UWORD oldstyle = data->style;
  48
  49     data->style = style;
  50
  51     if(style & BOLD)
  52     {
  53       if(!(oldstyle & BOLD))
  54         set(data->object, MUIA_TextEditor_StyleBold, TRUE);
  55     }
  56     else
  57     {
  58       if(oldstyle & BOLD)
  59         set(data->object, MUIA_TextEditor_StyleBold, FALSE);
  60     }
  61     if(style & ITALIC)
  62     {
  63       if(!(oldstyle & ITALIC))
  64         set(data->object, MUIA_TextEditor_StyleItalic, TRUE);
  65     }
  66     else
  67     {
  68       if(oldstyle & ITALIC)
  69         set(data->object, MUIA_TextEditor_StyleItalic, FALSE);
  70     }
  71     if(style & UNDERLINE)
  72     {
  73       if(!(oldstyle & UNDERLINE))
  74         set(data->object, MUIA_TextEditor_StyleUnderline, TRUE);
  75     }
  76     else
  77     {
  78       if(oldstyle & UNDERLINE)
  79         set(data->object, MUIA_TextEditor_StyleUnderline, FALSE);
  80     }
  81   }
  82
  83   LEAVE();
  84 }
  85
  86 LONG  GetStyle (LONG x, struct line_node *line)
  87 {
  88   LONG  style = 0;
  89
  90   ENTER();
  91
  92   if(line->line.Styles)
  93   {
  94       unsigned short *styles = line->line.Styles;
  95
  96     while(*styles <= x+1)
  97     {
  98       if(*++styles > 0xff)
  99           style &= *styles++;
 100       else  style |= *styles++;
 101     }
 102   }
 103
 104   RETURN(style);
 105   return(style);
 106 }
 107
 108 void  AddStyleToLine  (LONG x, struct line_node *line, LONG length, unsigned short style, struct InstData *data)
 109 {
 110   unsigned short *styles    = line->line.Styles;
 111   unsigned short *oldstyles = styles;
 112   unsigned short *newstyles;
 113   unsigned short cur_style = 0;
 114   unsigned short end_style = GetStyle(x+length, line);
 115
 116   ENTER();
 117
 118   x++;
 119
 120   if(styles)
 121       newstyles = MyAllocPooled(data->mypool, (*((long *)styles-1))+8);
 122   else  newstyles = MyAllocPooled(data->mypool, 32);
 123
 124   if(newstyles)
 125   {
 126     line->line.Styles = newstyles;
 127     if(styles)
 128     {
 129       while(*styles != EOS && *styles < x)
 130       {
 131         *newstyles++ = *styles++;
 132         if(*styles > 0xff)
 133             cur_style &= *styles;
 134         else  cur_style |= *styles;
 135         *newstyles++ = *styles++;
 136       }
 137     }
 138     if(style > 0xff)
 139     {
 140       if(cur_style & ~style)
 141       {
 142         *newstyles++ = x;
 143         *newstyles++ = style;
 144       }
 145     }
 146     else
 147     {
 148       if(!(cur_style & style))
 149       {
 150         *newstyles++ = x;
 151         *newstyles++ = style;
 152       }
 153     }
 154     if(styles)
 155     {
 156       while(*styles != EOS && *styles <= x+length)
 157       {
 158         if((*(styles+1) != style) && (*(styles+1) != (unsigned short)~style))
 159         {
 160           *newstyles++ = *styles++;
 161           *newstyles++ = *styles++;
 162         }
 163         else  styles += 2;
 164       }
 165     }
 166     if(!(((style > 0xff) && (!(end_style & ~style))) ||
 167         ((style < 0xff) && ((end_style & style)))))
 168     {
 169       *newstyles++ = x+length;
 170       *newstyles++ = ~style;
 171     }
 172
 173     if(styles)
 174     {
 175       while(*styles != EOS)
 176       {
 177         *newstyles++ = *styles++;
 178         *newstyles++ = *styles++;
 179       }
 180     }
 181     *newstyles = EOS;
 182     if(oldstyles)
 183     {
 184       MyFreePooled(data->mypool, oldstyles);
 185     }
 186   }
 187
 188   LEAVE();
 189 }
 190
 191 void  AddStyle (struct marking *realblock, unsigned short style, long Set, struct InstData *data)
 192 {
 193   struct  marking newblock;
 194   LONG  startx, stopx;
 195   struct  line_node *startline, *stopline;
 196
 197   ENTER();
 198
 199   if(!Set)
 200   {
 201     if(!(data->style & style))
 202     {
 203       LEAVE();
 204       return;
 205     }
 206
 207     style = ~style;
 208   }
 209   else
 210   {
 211     if(data->style & style)
 212     {
 213       LEAVE();
 214       return;
 215     }
 216   }
 217   data->HasChanged = TRUE;
 218
 219   if(realblock->enabled && (realblock->startx != realblock->stopx || realblock->startline != realblock->stopline))
 220   {
 221     NiceBlock(realblock, &newblock);
 222     startx    = newblock.startx;
 223     stopx     = newblock.stopx;
 224     startline = newblock.startline;
 225     stopline  = newblock.stopline;
 226   }
 227   else
 228   {
 229     startx    = data->CPos_X;
 230     stopx     = startx+1;
 231     startline = data->actualline;
 232     stopline  = startline;
 233   }
 234
 235   if(startline == stopline)
 236   {
 237     AddStyleToLine(startx, startline, stopx-startx, style, data);
 238   }
 239   else
 240   {
 241     struct line_node *line = startline->next;
 242
 243     AddStyleToLine(startx, startline, startline->line.Length-startx-1, style, data);
 244     while(line != stopline)
 245     {
 246       AddStyleToLine(0, line, line->line.Length-1, style, data);
 247       line = line->next;
 248     }
 249     AddStyleToLine(0, line, stopx, style, data);
 250   }
 251   RedrawArea(startx, startline, stopx, stopline, data);
 252
 253   if(style > 0xff)
 254       data->style &= style;
 255   else  data->style |= style;
 256
 257   LEAVE();
 258 }