/* $Id: pixmap.c,v 1.2 2000/03/23 07:24:48 reinelt Exp $
 *
 * generic pixmap driver
 *
 * Copyright 1999, 2000 by Michael Reinelt (reinelt@eunet.at)
 *
 * 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, 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., 675 Mass Ave, Cambridge, MA 02139, USA.
 *
 *
 * $Log: pixmap.c,v $
 * Revision 1.2  2000/03/23 07:24:48  reinelt
 *
 * PPM driver up and running (but slow!)
 *
 * Revision 1.1  2000/03/22 15:36:21  reinelt
 *
 * added '-l' switch (list drivers)
 * generic pixmap driver added
 * X11 Framework done
 *
 */

/* 
 * exported functions:
 *
 * int pix_clear(void);
 *   clears the pixmap
 *
 * int pix_init (int r, int c);
 *   allocates & clear pixmap wit r rows and c columns
 *
 * int pix_put (int row, int col, char *text);
 *   draws text into the pixmap
 *
 * int pix_bar (int type, int row, int col, int max, int len1, int len2);
 *   draws a bar into the pixmap
 *
 */

#include <stdlib.h>
#include <stdio.h>

#include "display.h"
#include "pixmap.h"
#include "fontmap.h"

static int rows=0;
static int cols=0;
unsigned char *Pixmap=NULL;

int pix_clear(void)
{
  int i;

  for (i=0; i<rows*cols; i++) {
    Pixmap[i]=0;
  }

  return 0;
}

int pix_init (int r, int c)
{
  if (r<1 || c<1) 
    return -1;
  
  if (Pixmap) 
    free (Pixmap);

  rows=r*YRES;
  cols=c*XRES;

  if ((Pixmap=malloc (rows*cols*sizeof(unsigned char)))==NULL)
    return -1;
    
  return pix_clear();
}

int pix_put (int row, int col, char *text)
{
  int c, x, y, mask;

  row*=YRES;
  col*=XRES;
  
  while (*text && col<cols) {
    c=*text;
    for (y=0; y<YRES; y++) {
      mask=1<<XRES;
      for (x=0; x<XRES; x++) {
	mask>>=1;
	Pixmap[(row+y)*cols+col+x]=Fontmap[c][y]&mask?1:0;
      }
    }
    col+=XRES;
    text++;
  }
  return 0;
}

int pix_bar (int type, int row, int col, int max, int len1, int len2)
{
  int x, y, len, rev;
  
  row*=YRES;
  col*=XRES;

  if (type & BAR_H) {
    if (max>cols-col)
      max=cols-col;
  } else {
    if (max>rows-row)
      max=rows-row;
  }
  
  if (len1<1) len1=1;
  else if (len1>max) len1=max;
  
  if (len2<1) len2=1;
  else if (len2>max) len2=max;
  
  rev=0;
  
  switch (type) {
  case BAR_L:
    len1=max-len1;
    len2=max-len2;
    rev=1;
    
  case BAR_R:
    for (y=0; y<YRES; y++) {
      len=y<YRES/2?len1:len2;
      for (x=0; x<max; x++) {
	Pixmap[(row+y)*cols+col+x]=x<len?!rev:rev;
      }
    }
    break;

  case BAR_U:
    len1=max-len1;
    len2=max-len2;
    rev=1;
    
  case BAR_D:
    for (y=0; y<max; y++) {
      for (x=0; x<XRES; x++) {
	len=x<XRES/2?len1:len2;
  	Pixmap[(row+y)*cols+col+x]=y<len?!rev:rev;
      }
    }
    break;

  }
  return 0;
}