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

   1 /***************************************************************************
   2
   3  TextEditor.mcc - Textediting MUI Custom Class
   4  Copyright (C) 1997-2000 Allan Odgaard
   5  Copyright (C) 2005-2014 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/exec.h>
  24 #include <proto/intuition.h>
  25
  26 #include "private.h"
  27 #include "Debug.h"
  28
  29 /// UpdateStyles()
  30 void UpdateStyles(struct InstData *data)
  31 {
  32   UWORD newStyle;
  33
  34   ENTER();
  35
  36   if(Enabled(data))
  37   {
  38     struct marking newblock;
  39
  40     NiceBlock(&data->blockinfo, &newblock);
  41     if(newblock.startx == data->blockinfo.startx && newblock.startline == data->blockinfo.startline)
  42       newStyle = GetStyle(data->blockinfo.stopx-1, data->blockinfo.stopline);
  43     else
  44       newStyle = GetStyle(data->blockinfo.stopx, data->blockinfo.stopline);
  45   }
  46   else
  47   {
  48     newStyle = GetStyle(data->CPos_X, data->actualline);
  49   }
  50
  51   if(newStyle != data->style)
  52   {
  53     UWORD oldStyle = data->style;
  54
  55     data->style = newStyle;
  56
  57     if(isFlagSet(newStyle, BOLD) && isFlagClear(oldStyle, BOLD))
  58       set(data->object, MUIA_TextEditor_StyleBold, TRUE);
  59     else if(isFlagClear(newStyle, BOLD) && isFlagSet(oldStyle, BOLD))
  60       set(data->object, MUIA_TextEditor_StyleBold, FALSE);
  61
  62     if(isFlagSet(newStyle, ITALIC) && isFlagClear(oldStyle, ITALIC))
  63       set(data->object, MUIA_TextEditor_StyleItalic, TRUE);
  64     else if(isFlagClear(newStyle, ITALIC) && isFlagSet(oldStyle, ITALIC))
  65       set(data->object, MUIA_TextEditor_StyleItalic, FALSE);
  66
  67     if(isFlagSet(newStyle, UNDERLINE) && isFlagClear(oldStyle, UNDERLINE))
  68       set(data->object, MUIA_TextEditor_StyleUnderline, TRUE);
  69     else if(isFlagClear(newStyle, UNDERLINE) && isFlagSet(oldStyle, UNDERLINE))
  70       set(data->object, MUIA_TextEditor_StyleUnderline, FALSE);
  71   }
  72
  73   LEAVE();
  74 }
  75
  76 ///
  77 /// GetStyle()
  78 UWORD GetStyle(LONG x, struct line_node *line)
  79 {
  80   UWORD style = 0;
  81
  82   ENTER();
  83
  84   if(line->line.Styles != NULL && x >= 0)
  85   {
  86     struct LineStyle *styles = line->line.Styles;
  87
  88     while(styles->column != EOS && styles->column <= x+1)
  89     {
  90       if(styles->style > 0xff)
  91         style &= styles->style;
  92       else
  93         style |= styles->style;
  94
  95       styles++;
  96     }
  97   }
  98
  99   RETURN(style);
 100   return(style);
 101 }
 102
 103 ///
 104 /// AddStyleToLine()
 105 void AddStyleToLine(struct InstData *data, LONG x, struct line_node *line, LONG length, UWORD style)
 106 {
 107   struct Grow styleGrow;
 108   struct LineStyle *styles;
 109   UWORD cur_style = 0;
 110   UWORD end_style = GetStyle(x+length, line);
 111
 112   ENTER();
 113
 114   x++;
 115
 116   InitGrow(&styleGrow, data->mypool, sizeof(struct LineStyle));
 117
 118   if((styles = line->line.Styles) != NULL)
 119   {
 120     while(styles->column != EOS && styles->column < x)
 121     {
 122       AddToGrow(&styleGrow, styles);
 123
 124       if(styles->style > 0xff)
 125         cur_style &= styles->style;
 126       else
 127         cur_style |= styles->style;
 128
 129       styles++;
 130     }
 131   }
 132   if(style > 0xff)
 133   {
 134     if(cur_style & ~style)
 135     {
 136       struct LineStyle newStyle;
 137
 138       newStyle.column = x;
 139       newStyle.style = style;
 140       AddToGrow(&styleGrow, &newStyle);
 141     }
 142   }
 143   else
 144   {
 145     if(!(cur_style & style))
 146     {
 147       struct LineStyle newStyle;
 148
 149       newStyle.column = x;
 150       newStyle.style = style;
 151       AddToGrow(&styleGrow, &newStyle);
 152     }
 153   }
 154
 155   if(styles != NULL)
 156   {
 157     while(styles->column != EOS && styles->column <= x+length)
 158     {
 159       UWORD invstyle = ~style;
 160
 161       if(styles->style != style && styles->style != invstyle)
 162       {
 163         AddToGrow(&styleGrow, styles);
 164       }
 165
 166       styles++;
 167     }
 168   }
 169   if(!(((style > 0xff) && (!(end_style & ~style))) ||
 170       ((style < 0xff) && ((end_style & style)))))
 171   {
 172     struct LineStyle newStyle;
 173
 174     newStyle.column = x+length;
 175     newStyle.style = ~style;
 176     AddToGrow(&styleGrow, &newStyle);
 177   }
 178
 179   if(styles != NULL)
 180   {
 181     while(styles->column != EOS)
 182     {
 183       AddToGrow(&styleGrow, styles);
 184
 185       styles++;
 186     }
 187   }
 188
 189   // the old styles are not needed anymore
 190   if(line->line.Styles != NULL)
 191     FreeVecPooled(data->mypool, line->line.Styles);
 192
 193   if(styleGrow.itemCount > 0)
 194   {
 195     struct LineStyle newStyle;
 196
 197     newStyle.column = EOS;
 198     newStyle.style = 0;
 199     AddToGrow(&styleGrow, &newStyle);
 200   }
 201
 202   line->line.Styles = (struct LineStyle *)styleGrow.array;
 203
 204   LEAVE();
 205 }
 206
 207 ///
 208 /// AddStyle()
 209 void AddStyle(struct InstData *data, struct marking *realblock, UWORD style, BOOL set)
 210 {
 211   struct marking newblock;
 212   LONG startx;
 213   LONG stopx;
 214   struct line_node *startline;
 215   struct line_node *stopline;
 216
 217   ENTER();
 218
 219   if(set == FALSE)
 220   {
 221     if((data->style & style) == 0)
 222     {
 223       LEAVE();
 224       return;
 225     }
 226
 227     style = ~style;
 228   }
 229   else
 230   {
 231     if((data->style & style) != 0)
 232     {
 233       LEAVE();
 234       return;
 235     }
 236   }
 237   data->HasChanged = TRUE;
 238
 239   if(realblock->enabled == TRUE && (realblock->startx != realblock->stopx || realblock->startline != realblock->stopline))
 240   {
 241     NiceBlock(realblock, &newblock);
 242     startx    = newblock.startx;
 243     stopx     = newblock.stopx;
 244     startline = newblock.startline;
 245     stopline  = newblock.stopline;
 246   }
 247   else
 248   {
 249     startx    = data->CPos_X;
 250     stopx     = startx+1;
 251     startline = data->actualline;
 252     stopline  = startline;
 253   }
 254
 255   if(startline == stopline)
 256   {
 257     AddStyleToLine(data, startx, startline, stopx-startx, style);
 258   }
 259   else
 260   {
 261     struct line_node *line = GetNextLine(startline);
 262
 263     AddStyleToLine(data, startx, startline, startline->line.Length-startx-1, style);
 264     while(line != stopline)
 265     {
 266       AddStyleToLine(data, 0, line, line->line.Length-1, style);
 267       line = GetNextLine(line);
 268     }
 269     AddStyleToLine(data, 0, line, stopx, style);
 270   }
 271   RedrawArea(data, startx, startline, stopx, stopline);
 272
 273   if(style > 0xff)
 274     data->style &= style;
 275   else
 276     data->style |= style;
 277
 278   LEAVE();
 279 }
 280
 281 ///