gimpbrushpipe.c 10.6 KB
Newer Older
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19
/* The GIMP -- an image manipulation program
 * Copyright (C) 1995 Spencer Kimball and Peter Mattis
 * Copyright (C) 1999 Adrian Likins and Tor Lillqvist
 *
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation; either version 2 of the License, or
 * (at your option) any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program; if not, write to the Free Software
 * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
 */

20 21
#include "config.h"

22
#include <errno.h>
23
#include <stdlib.h>
24
#include <string.h>
25
#include <ctype.h>
26

27 28 29 30 31 32 33 34 35 36 37
#include <sys/types.h>
#include <sys/stat.h>
#ifdef HAVE_UNISTD_H
#include <unistd.h>
#endif
#include <fcntl.h>

#ifndef _O_BINARY
#define _O_BINARY 0
#endif

Sven Neumann's avatar
Sven Neumann committed
38 39
#include <gtk/gtk.h>

40 41 42 43
#ifdef G_OS_WIN32
#include <io.h>
#endif

44 45
#include "libgimpmath/gimpmath.h"

46
#include "apptypes.h"
47

48 49 50 51
#include "appenv.h"
#include "brush_header.h"
#include "pattern_header.h"
#include "gimpbrush.h"
52
#include "gimpbrushpipe.h"
53
#include "gimprc.h"
54

55 56 57
/*  this needs to go away  */
#include "tools/paint_core.h"

58
#include "libgimp/gimpparasiteio.h"
59

60 61
#include "libgimp/gimpintl.h"

62

63 64 65
static GimpBrush * gimp_brush_pipe_select_brush     (PaintCore *paint_core);
static gboolean    gimp_brush_pipe_want_null_motion (PaintCore *paint_core);
static void        gimp_brush_pipe_destroy          (GtkObject *object);
66

67

68 69 70
static GimpBrushClass *parent_class = NULL;


71
static GimpBrush *
72
gimp_brush_pipe_select_brush (PaintCore *paint_core)
73
{
74
  GimpBrushPipe *pipe;
75 76
  gint           i, brushix, ix;
  gdouble        angle;
77

78 79
  g_return_val_if_fail (paint_core != NULL, NULL);
  g_return_val_if_fail (GIMP_IS_BRUSH_PIPE (paint_core->brush), NULL);
80

81
  pipe = GIMP_BRUSH_PIPE (paint_core->brush);
82

83 84
  if (pipe->nbrushes == 1)
    return GIMP_BRUSH (pipe->current);
85

86 87 88 89 90 91
  brushix = 0;
  for (i = 0; i < pipe->dimension; i++)
    {
      switch (pipe->select[i])
	{
	case PIPE_SELECT_INCREMENTAL:
92
	  ix = (pipe->index[i] + 1) % pipe->rank[i];
93 94 95 96
	  break;
	case PIPE_SELECT_ANGULAR:
	  angle = atan2 (paint_core->cury - paint_core->lasty,
			 paint_core->curx - paint_core->lastx);
97 98 99
	  /* Offset angle to be compatible with PSP tubes */
	  angle += G_PI_2;
	  /* Map it to the [0..2*G_PI) interval */
100
	  if (angle < 0)
101 102 103 104
	    angle += 2.0 * G_PI;
	  else if (angle > 2.0 * G_PI)
	    angle -= 2.0 * G_PI;
	  ix = RINT (angle / (2.0 * G_PI) * pipe->rank[i]);
105 106 107
	  break;
	case PIPE_SELECT_RANDOM:
	  /* This probably isn't the right way */
108
	  ix = rand () % pipe->rank[i];
109 110
	  break;
	case PIPE_SELECT_PRESSURE:
111
	  ix = RINT (paint_core->curpressure * (pipe->rank[i] - 1));
112 113
	  break;
	case PIPE_SELECT_TILT_X:
114
	  ix = RINT (paint_core->curxtilt / 2.0 * pipe->rank[i]) + pipe->rank[i]/2;
115 116
	  break;
	case PIPE_SELECT_TILT_Y:
117
	  ix = RINT (paint_core->curytilt / 2.0 * pipe->rank[i]) + pipe->rank[i]/2;
118
	  break;
Adam D. Moss's avatar
Adam D. Moss committed
119 120 121 122
	case PIPE_SELECT_CONSTANT:
	default:
	  ix = pipe->index[i];
	  break;
123
	}
124
      pipe->index[i] = CLAMP (ix, 0, pipe->rank[i]-1);
125
      brushix += pipe->stride[i] * pipe->index[i];
126 127
    }

128
  /* Make sure is inside bounds */
129
  brushix = CLAMP (brushix, 0, pipe->nbrushes-1);
130

131 132 133
  pipe->current = pipe->brushes[brushix];

  return GIMP_BRUSH (pipe->current);
134
}
135

136
static gboolean
137
gimp_brush_pipe_want_null_motion (PaintCore *paint_core)
138 139
{
  GimpBrushPipe *pipe;
140
  gint           i;
141

142 143
  g_return_val_if_fail (paint_core != NULL, TRUE);
  g_return_val_if_fail (GIMP_IS_BRUSH_PIPE (paint_core->brush), TRUE);
144

145
  pipe = GIMP_BRUSH_PIPE (paint_core->brush);
146 147 148 149 150 151 152 153 154 155 156

  if (pipe->nbrushes == 1)
    return TRUE;

  for (i = 0; i < pipe->dimension; i++)
    if (pipe->select[i] == PIPE_SELECT_ANGULAR)
      return FALSE;

  return TRUE;
}

157
static void
Michael Natterer's avatar
Michael Natterer committed
158
gimp_brush_pipe_destroy (GtkObject *object)
159
{
160
  GimpBrushPipe *pipe;
161
  gint           i;
162 163 164 165 166 167 168

  g_return_if_fail (object != NULL);
  g_return_if_fail (GIMP_IS_BRUSH_PIPE (object));

  pipe = GIMP_BRUSH_PIPE (object);

  g_free (pipe->rank);
169
  g_free (pipe->stride);
170 171

  for (i = 1; i < pipe->nbrushes; i++)
172 173
    if (pipe->brushes[i])
      gtk_object_unref (GTK_OBJECT (pipe->brushes[i]));
174 175 176 177 178

  g_free (pipe->brushes);
  g_free (pipe->select);
  g_free (pipe->index);

179 180
  if (GTK_OBJECT_CLASS (parent_class)->destroy)
    GTK_OBJECT_CLASS (parent_class)->destroy (object);
181 182 183 184 185 186
}

static void
gimp_brush_pipe_class_init (GimpBrushPipeClass *klass)
{
  GtkObjectClass *object_class;
187
  GimpBrushClass *brush_class;
Michael Natterer's avatar
Michael Natterer committed
188

189 190
  object_class = (GtkObjectClass *) klass;
  brush_class  = (GimpBrushClass *) klass;
191 192 193 194 195

  parent_class = gtk_type_class (GIMP_TYPE_BRUSH);

  brush_class->select_brush     = gimp_brush_pipe_select_brush;
  brush_class->want_null_motion = gimp_brush_pipe_want_null_motion;
196

Michael Natterer's avatar
Michael Natterer committed
197
  object_class->destroy = gimp_brush_pipe_destroy;
198 199 200
}

void
201
gimp_brush_pipe_init (GimpBrushPipe *pipe)
202
{
203
  pipe->current   = NULL;
204
  pipe->dimension = 0;
Michael Natterer's avatar
Michael Natterer committed
205
  pipe->rank      = NULL;
206
  pipe->stride    = NULL;
Michael Natterer's avatar
Michael Natterer committed
207
  pipe->nbrushes  = 0;
208
  pipe->brushes   = NULL;
Michael Natterer's avatar
Michael Natterer committed
209 210
  pipe->select    = NULL;
  pipe->index     = NULL;
211 212
}

213 214
GtkType
gimp_brush_pipe_get_type (void)
215
{
Michael Natterer's avatar
Michael Natterer committed
216 217 218 219 220 221 222 223 224 225 226 227 228 229 230 231
  static GtkType type = 0;

  if (!type)
    {
      GtkTypeInfo info =
      {
	"GimpBrushPipe",
	sizeof (GimpBrushPipe),
	sizeof (GimpBrushPipeClass),
	(GtkClassInitFunc) gimp_brush_pipe_class_init,
	(GtkObjectInitFunc) gimp_brush_pipe_init,
	/* reserved_1 */ NULL,
	/* reserved_2 */ NULL,
	(GtkClassInitFunc) NULL
      };

232
      type = gtk_type_unique (GIMP_TYPE_BRUSH, &info);
Michael Natterer's avatar
Michael Natterer committed
233 234
    }

235 236 237
  return type;
}

238
GimpData *
239
gimp_brush_pipe_load (const gchar *filename)
240
{
241
  GimpBrushPipe     *pipe = NULL;
242
  GimpPixPipeParams  params;
243 244 245 246 247 248 249
  gint               i;
  gint               num_of_brushes = 0;
  gint               totalcells;
  gchar             *paramstring;
  GString           *buffer;
  gchar              c;
  gint               fd;
250 251 252 253 254

  g_return_val_if_fail (filename != NULL, NULL);

  fd = open (filename, O_RDONLY | _O_BINARY);
  if (fd == -1)
255
    {
256
      g_message ("Couldn't open file '%s'", filename);
257 258
      return NULL;
    }
259

260
  /* The file format starts with a painfully simple text header */
261

262 263 264 265 266 267
  /*  get the name  */
  buffer = g_string_new (NULL);
  while (read (fd, &c, 1) == 1 && c != '\n' && buffer->len < 1024)
    g_string_append_c (buffer, c);
    
  if (buffer->len > 0 && buffer->len < 1024)
268
    {
269
      pipe = GIMP_BRUSH_PIPE (gtk_type_new (GIMP_TYPE_BRUSH_PIPE));      
270
      gimp_object_set_name (GIMP_OBJECT (pipe), buffer->str);
271
    }
272
  g_string_free (buffer, TRUE);
273 274 275 276 277 278

  if (!pipe)
    {
      g_message ("Couldn't read name for brush pipe from file '%s'\n", 
		 filename);
      close (fd);
279 280
      return NULL;
    }
281 282 283 284 285 286 287 288 289 290 291

  /*  get the number of brushes  */
  buffer = g_string_new (NULL);
  while (read (fd, &c, 1) == 1 && c != '\n' && buffer->len < 1024)
    g_string_append_c (buffer, c);

  if (buffer->len > 0 && buffer->len < 1024)
    {
      num_of_brushes = strtol (buffer->str, &paramstring, 10);
    }

292 293
  if (num_of_brushes < 1)
    {
294 295 296
      g_message (_("Brush pipes should have at least one brush:\n\"%s\""), 
		 filename);
      close (fd);
297
      gtk_object_sink (GTK_OBJECT (pipe));
298
      g_string_free (buffer, TRUE);
299 300
      return NULL;
    }
301

Michael Natterer's avatar
Michael Natterer committed
302
  while (*paramstring && isspace (*paramstring))
303
    paramstring++;
304

305
  if (*paramstring)
306
    {
307 308
      gimp_pixpipe_params_init (&params);
      gimp_pixpipe_params_parse (paramstring, &params);
309

310
      pipe->dimension = params.dim;
311 312 313 314
      pipe->rank      = g_new0 (gint, pipe->dimension);
      pipe->select    = g_new0 (PipeSelectModes, pipe->dimension);
      pipe->index     = g_new0 (gint, pipe->dimension);

Sven Neumann's avatar
Sven Neumann committed
315 316 317
      /* placement is not used at all ?? */
      if (params.free_placement_string)
	g_free (params.placement);
318

319 320
      for (i = 0; i < pipe->dimension; i++)
	{
321 322
	  pipe->rank[i] = params.rank[i];
	  if (strcmp (params.selection[i], "incremental") == 0)
323
	    pipe->select[i] = PIPE_SELECT_INCREMENTAL;
324
	  else if (strcmp (params.selection[i], "angular") == 0)
325
	    pipe->select[i] = PIPE_SELECT_ANGULAR;
326
	  else if (strcmp (params.selection[i], "velocity") == 0)
327
	    pipe->select[i] = PIPE_SELECT_VELOCITY;
328
	  else if (strcmp (params.selection[i], "random") == 0)
329
	    pipe->select[i] = PIPE_SELECT_RANDOM;
330
	  else if (strcmp (params.selection[i], "pressure") == 0)
331
	    pipe->select[i] = PIPE_SELECT_PRESSURE;
332
	  else if (strcmp (params.selection[i], "xtilt") == 0)
333
	    pipe->select[i] = PIPE_SELECT_TILT_X;
334
	  else if (strcmp (params.selection[i], "ytilt") == 0)
335 336 337
	    pipe->select[i] = PIPE_SELECT_TILT_Y;
	  else
	    pipe->select[i] = PIPE_SELECT_CONSTANT;
Sven Neumann's avatar
Sven Neumann committed
338 339
	  if (params.free_selection_string)
	    g_free (params.selection[i]);
340 341 342 343 344 345
	  pipe->index[i] = 0;
	}
    }
  else
    {
      pipe->dimension = 1;
Michael Natterer's avatar
Michael Natterer committed
346 347 348
      pipe->rank      = g_new (gint, 1);
      pipe->rank[0]   = num_of_brushes;
      pipe->select    = g_new (PipeSelectModes, 1);
349
      pipe->select[0] = PIPE_SELECT_INCREMENTAL;
Michael Natterer's avatar
Michael Natterer committed
350 351
      pipe->index     = g_new (gint, 1);
      pipe->index[0]  = 0;
352 353
    }

354 355
  g_string_free (buffer, TRUE);

356 357 358
  totalcells = 1;		/* Not all necessarily present, maybe */
  for (i = 0; i < pipe->dimension; i++)
    totalcells *= pipe->rank[i];
359
  pipe->stride = g_new0 (gint, pipe->dimension);
360 361 362 363 364 365 366 367
  for (i = 0; i < pipe->dimension; i++)
    {
      if (i == 0)
	pipe->stride[i] = totalcells / pipe->rank[i];
      else
	pipe->stride[i] = pipe->stride[i-1] / pipe->rank[i];
    }
  g_assert (pipe->stride[pipe->dimension-1] == 1);
368

369
  pipe->brushes = g_new0 (GimpBrush *, num_of_brushes);
370 371 372

  while (pipe->nbrushes < num_of_brushes)
    {
373
      pipe->brushes[pipe->nbrushes] = gimp_brush_load_brush (fd, filename);
374

375 376
      if (pipe->brushes[pipe->nbrushes])
	{
377 378
	  gtk_object_ref (GTK_OBJECT (pipe->brushes[pipe->nbrushes]));
	  gtk_object_sink (GTK_OBJECT (pipe->brushes[pipe->nbrushes]));
379 380 381

	  gimp_object_set_name (GIMP_OBJECT (pipe->brushes[pipe->nbrushes]),
				NULL);
382
	}
383
      else
384
	{
385 386 387
	  g_message (_("Failed to load one of the brushes in the brush pipe\n\"%s\""), 
		       filename);
	  close (fd);
388 389 390
	  gtk_object_sink (GTK_OBJECT (pipe));
	  return NULL;
	}
391
  
392
      pipe->nbrushes++;
393
    }
394

395 396
  /* Current brush is the first one. */
  pipe->current = pipe->brushes[0];
397

398 399
  gimp_data_set_filename (GIMP_DATA (pipe), filename);

400
  /*  just to satisfy the code that relies on this crap  */
401 402 403 404 405
  GIMP_BRUSH (pipe)->spacing  = pipe->current->spacing;
  GIMP_BRUSH (pipe)->x_axis   = pipe->current->x_axis;
  GIMP_BRUSH (pipe)->y_axis   = pipe->current->y_axis;
  GIMP_BRUSH (pipe)->mask     = pipe->current->mask;
  GIMP_BRUSH (pipe)->pixmap   = pipe->current->pixmap;
406

407
  close (fd);
408

409
  return GIMP_DATA (pipe);
410
}