/* $Id: plugin.c,v 1.40 2006/02/19 15:42:19 reinelt Exp $ * * plugin handler for the Evaluator * * Copyright (C) 2003 Michael Reinelt * Copyright (C) 2004 The LCD4Linux Team * * This file is part of LCD4Linux. * * LCD4Linux 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. * * LCD4Linux 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: plugin.c,v $ * Revision 1.40 2006/02/19 15:42:19 reinelt * file plugin from Chris Maj * * Revision 1.39 2005/11/04 04:53:10 reinelt * sample plugin activated * * Revision 1.38 2005/05/08 04:32:44 reinelt * CodingStyle added and applied * * Revision 1.37 2005/05/02 10:29:20 reinelt * preparations for python bindings and python plugin * * Revision 1.36 2005/04/03 07:07:51 reinelt * added statfs plugin * * Revision 1.35 2005/01/18 06:30:23 reinelt * added (C) to all copyright statements * * Revision 1.34 2004/06/26 12:04:59 reinelt * * uh-oh... the last CVS log message messed up things a lot... * * Revision 1.33 2004/06/26 09:27:21 reinelt * * added '-W' to CFLAGS * changed all C++ comments to C ones * cleaned up a lot of signed/unsigned mistakes * * Revision 1.32 2004/06/07 06:56:55 reinelt * * added test plugin from Andy Baxter * * Revision 1.31 2004/05/29 00:27:23 reinelt * * added plugin_diskstats.c * * Revision 1.30 2004/05/22 18:30:02 reinelt * * added plugin 'uptime' * * Revision 1.29 2004/05/20 07:47:51 reinelt * added plugin_time * * Revision 1.28 2004/04/12 11:12:26 reinelt * added plugin_isdn, removed old ISDN client * fixed some real bad bugs in the evaluator * * Revision 1.27 2004/04/09 06:09:55 reinelt * big configure rework from Xavier * * Revision 1.25 2004/04/07 08:29:05 hejl * New plugin for wireless info * * Revision 1.24 2004/03/19 06:37:47 reinelt * asynchronous thread handling started * * Revision 1.23 2004/03/14 07:11:42 reinelt * parameter count fixed for plugin_dvb() * plugin_APM (battery status) ported * * Revision 1.22 2004/03/13 06:49:20 reinelt * seti@home plugin ported to NextGeneration * * Revision 1.21 2004/03/10 07:16:15 reinelt * MySQL plugin from Javier added * * Revision 1.20 2004/03/03 03:47:04 reinelt * big patch from Martin Hejl: * - use qprintf() where appropriate * - save CPU cycles on gettimeofday() * - add quit() functions to free allocated memory * - fixed lots of memory leaks * * Revision 1.19 2004/02/18 14:45:42 nicowallmeier * Imon/Telmon plugin ported * * Revision 1.18 2004/02/10 07:42:35 reinelt * cut off all old-style files which are no longer used with NextGeneration * * Revision 1.17 2004/02/10 06:54:39 reinelt * DVB plugin ported * * Revision 1.16 2004/01/29 04:40:02 reinelt * every .c file includes "config.h" now * * Revision 1.15 2004/01/27 08:13:39 reinelt * ported PPP token to plugin_ppp * * Revision 1.14 2004/01/25 05:30:09 reinelt * plugin_netdev for parsing /proc/net/dev added * * Revision 1.13 2004/01/16 05:04:53 reinelt * started plugin proc_stat which should parse /proc/stat * which again is a paint in the a** * thinking over implementation methods of delta functions * (CPU load, ...) * * Revision 1.12 2004/01/15 04:29:45 reinelt * moved lcd4linux.conf.sample to *.old * lcd4linux.conf.sample with new layout * new plugins 'loadavg' and 'meminfo' * text widget have pre- and postfix * * Revision 1.11 2004/01/14 11:33:00 reinelt * new plugin 'uname' which does what it's called * text widget nearly finished * first results displayed on MatrixOrbital * * Revision 1.10 2004/01/13 10:03:01 reinelt * new util 'hash' for associative arrays * new plugin 'cpuinfo' * * Revision 1.9 2004/01/11 18:26:02 reinelt * further widget and layout processing * * Revision 1.8 2004/01/10 20:22:33 reinelt * added new function 'cfg_list()' (not finished yet) * added layout.c (will replace processor.c someday) * added widget_text.c (will be the first and most important widget) * modified lcd4linux.c so that old-style configs should work, too * * Revision 1.7 2004/01/10 17:45:26 reinelt * changed initialization order so cfg() gets initialized before plugins. * This way a plugin's init() can use cfg_get(). * Thanks to Xavier for reporting this one! * * Revision 1.6 2004/01/10 17:36:56 reinelt * * I2C Sensors plugin from Xavier added * * Revision 1.5 2004/01/06 17:33:45 reinelt * * Evaluator: functions with variable argument lists * Evaluator: plugin_sample.c and README.Plugins added * * Revision 1.4 2004/01/06 15:19:16 reinelt * Evaluator rearrangements... * * Revision 1.3 2003/12/19 06:27:33 reinelt * added XMMS plugin from Markus Keil * * Revision 1.2 2003/12/19 05:49:23 reinelt * extracted plugin_math and plugin_string into extra files * * Revision 1.1 2003/12/19 05:35:14 reinelt * renamed 'client' to 'plugin' * * Revision 1.1 2003/10/11 06:01:52 reinelt * * renamed expression.{c,h} to client.{c,h} * added config file client * new functions 'AddNumericVariable()' and 'AddStringVariable()' * new parameter '-i' for interactive mode * * Revision 1.3 2003/10/06 05:51:15 reinelt * functions: min(), max() * * Revision 1.2 2003/10/06 05:47:27 reinelt * operators: ==, \!=, <=, >= * * Revision 1.1 2003/10/06 04:34:06 reinelt * expression evaluator added * */ /* * exported functions: * * int plugin_init (void) * initializes the expression evaluator * adds some handy constants and functions * */ #include "config.h" #include #include #include #include "debug.h" #include "plugin.h" /* Prototypes */ int plugin_init_cfg(void); void plugin_exit_cfg(void); int plugin_init_math(void); void plugin_exit_math(void); int plugin_init_string(void); void plugin_exit_string(void); int plugin_init_test(void); void plugin_exit_test(void); int plugin_init_time(void); void plugin_exit_time(void); int plugin_init_apm(void); void plugin_exit_apm(void); int plugin_init_cpuinfo(void); void plugin_exit_cpuinfo(void); int plugin_init_diskstats(void); void plugin_exit_diskstats(void); int plugin_init_dvb(void); void plugin_exit_dvb(void); int plugin_init_exec(void); void plugin_exit_exec(void); int plugin_init_file(void); void plugin_exit_file(void); int plugin_init_i2c_sensors(void); void plugin_exit_i2c_sensors(void); int plugin_init_imon(void); void plugin_exit_imon(void); int plugin_init_isdn(void); void plugin_exit_isdn(void); int plugin_init_loadavg(void); void plugin_exit_loadavg(void); int plugin_init_meminfo(void); void plugin_exit_meminfo(void); int plugin_init_mysql(void); void plugin_exit_mysql(void); int plugin_init_netdev(void); void plugin_exit_netdev(void); int plugin_init_pop3(void); void plugin_exit_pop3(void); int plugin_init_ppp(void); void plugin_exit_ppp(void); int plugin_init_proc_stat(void); void plugin_exit_proc_stat(void); int plugin_init_python(void); void plugin_exit_python(void); int plugin_init_sample(void); void plugin_exit_sample(void); int plugin_init_seti(void); void plugin_exit_seti(void); int plugin_init_statfs(void); void plugin_exit_statfs(void); int plugin_init_uname(void); void plugin_exit_uname(void); int plugin_init_uptime(void); void plugin_exit_uptime(void); int plugin_init_wireless(void); void plugin_exit_wireless(void); int plugin_init_xmms(void); void plugin_exit_xmms(void); int plugin_init(void) { plugin_init_cfg(); plugin_init_math(); plugin_init_string(); plugin_init_test(); plugin_init_time(); #ifdef PLUGIN_APM plugin_init_apm(); #endif #ifdef PLUGIN_CPUINFO plugin_init_cpuinfo(); #endif #ifdef PLUGIN_DISKSTATS plugin_init_diskstats(); #endif #ifdef PLUGIN_DVB plugin_init_dvb(); #endif #ifdef PLUGIN_EXEC plugin_init_exec(); #endif #ifdef PLUGIN_FILE plugin_init_file(); #endif #ifdef PLUGIN_I2C_SENSORS plugin_init_i2c_sensors(); #endif #ifdef PLUGIN_IMON plugin_init_imon(); #endif #ifdef PLUGIN_ISDN plugin_init_isdn(); #endif #ifdef PLUGIN_LOADAVG plugin_init_loadavg(); #endif #ifdef PLUGIN_MEMINFO plugin_init_meminfo(); #endif #ifdef PLUGIN_MYSQL plugin_init_mysql(); #endif #ifdef PLUGIN_NETDEV plugin_init_netdev(); #endif #ifdef PLUGIN_POP3 plugin_init_pop3(); #endif #ifdef PLUGIN_PPP plugin_init_ppp(); #endif #ifdef PLUGIN_PROC_STAT plugin_init_proc_stat(); #endif #ifdef PLUGIN_PYTHON plugin_init_python(); #endif #ifdef PLUGIN_SAMPLE plugin_init_sample(); #endif #ifdef PLUGIN_SETI plugin_init_seti(); #endif #ifdef PLUGIN_STATFS plugin_init_statfs(); #endif #ifdef PLUGIN_UNAME plugin_init_uname(); #endif #ifdef PLUGIN_UPTIME plugin_init_uptime(); #endif #ifdef PLUGIN_WIRELESS plugin_init_wireless(); #endif #ifdef PLUGIN_XMMS plugin_init_xmms(); #endif return 0; } void plugin_exit(void) { #ifdef PLUGIN_APM plugin_exit_apm(); #endif #ifdef PLUGIN_CPUINFO plugin_exit_cpuinfo(); #endif #ifdef PLUGIN_DISKSTATS plugin_exit_diskstats(); #endif #ifdef PLUGIN_DVB plugin_exit_dvb(); #endif #ifdef PLUGIN_EXEC plugin_exit_exec(); #endif #ifdef PLUGIN_FILE plugin_exit_file(); #endif #ifdef PLUGIN_I2C_SENSORS plugin_exit_i2c_sensors(); #endif #ifdef PLUGIN_IMON plugin_exit_imon(); #endif #ifdef PLUGIN_ISDN plugin_exit_isdn(); #endif #ifdef PLUGIN_LOADAVG plugin_exit_loadavg(); #endif #ifdef PLUGIN_MEMINFO plugin_exit_meminfo(); #endif #ifdef PLUGIN_MYSQL plugin_exit_mysql(); #endif #ifdef PLUGIN_NETDEV plugin_exit_netdev(); #endif #ifdef PLUGIN_POP3 plugin_exit_pop3(); #endif #ifdef PLUGIN_PPP plugin_exit_ppp(); #endif #ifdef PLUGIN_PROC_STAT plugin_exit_proc_stat(); #endif #ifdef PLUGIN_PYTHON plugin_exit_python(); #endif #ifdef PLUGIN_SAMPLE plugin_exit_sample(); #endif #ifdef PLUGIN_SETI plugin_exit_seti(); #endif #ifdef PLUGIN_STATFS plugin_exit_statfs(); #endif #ifdef PLUGIN_UNAME plugin_exit_uname(); #endif #ifdef PLUGIN_UPTIME plugin_exit_uptime(); #endif #ifdef PLUGIN_WIRELESS plugin_exit_wireless(); #endif #ifdef PLUGIN_XMMS plugin_exit_xmms(); #endif plugin_exit_cfg(); plugin_exit_math(); plugin_exit_string(); plugin_exit_test(); plugin_exit_time(); DeleteFunctions(); DeleteVariables(); } n258'>258 259 260 261 262 263 264 265 266 267 268 269 270 271 272 273 274 275 276 277 278 279 280 281 282 283 284 285 286 287 288 289 290 291 292 293 294 295 296 297 298 299 300 301 302 303 304 305 306 307 308 309 310 311 312 313 314 315 316 317 318 319 320 321 322 323 324 325 326 327 328 329 330 331 332 333 334 335 336 337 338 339 340 341 342 343 344 345 346 347 348 349 350 351 352 353 354 355 356 357 358 359 360 361 362 363 364 365 366 367 368 369 370 371 372 373 374 375 376 377 378 379 380 381 382 383 384 385 386 387 388 389 390 391 392 393 394 395 396 397 398 399 400 401 402 403 404 405 406 407 408 409 410 411 412 413 414 415 416 417 418 419 420 421 422 423 424 425 426 427 428 429 430 431 432 433 434 435 436 437 438 439 440 441 442 443 444 445 446 447
/* $Id: bar.c,v 1.9 2003/10/05 17:58:50 reinelt Exp $
 *
 * generic bar handling
 *
 * Copyright 2002 Michael Reinelt <reinelt@eunet.at>
 *
 * This file is part of LCD4Linux.
 *
 * LCD4Linux 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.
 *
 * LCD4Linux 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: bar.c,v $
 * Revision 1.9  2003/10/05 17:58:50  reinelt
 * libtool junk; copyright messages cleaned up
 *
 * Revision 1.8  2003/09/09 05:30:34  reinelt
 * even more icons stuff
 *
 * Revision 1.7  2003/09/01 04:09:34  reinelt
 * icons nearly finished, but MatrixOrbital only
 *
 * Revision 1.6  2003/08/20 05:26:43  reinelt
 * small bug in bar compaction fixed
 *
 * Revision 1.5  2003/08/19 04:28:41  reinelt
 * more Icon stuff, minor glitches fixed
 *
 * Revision 1.4  2003/01/12 06:51:27  reinelt
 * fixed bug in bar compaction
 *
 * Revision 1.3  2002/08/19 07:52:19  reinelt
 * corrected type declaration of (*defchar)()
 *
 * Revision 1.2  2002/08/19 07:36:29  reinelt
 *
 * finished bar.c, USBLCD is the first driver that uses the generic bar functions
 *
 * Revision 1.1  2002/08/19 04:41:20  reinelt
 * introduced bar.c, moved bar stuff from display.h to bar.h
 *
 *
 */

/* 
 * exported functions:
 *
 * int bar_init (int rows, int cols, int xres, int yres, int chars)
 *
 * void bar_clear(void)
 *
 * void bar_add_segment(int len1, int len2, int type, int ascii)
 *
 * int bar_draw (int type, int row, int col, int max, int len1, int len2)
 *
 * int bar_process (void(*defchar)(int ascii, char *matrix))
 *
 * int bar_peek (int row, int col)
 *
 */

#include <stdlib.h>

#include "bar.h"
#include "debug.h"


static int ROWS=0;
static int COLS=0;
static int XRES=0;
static int YRES=0;
static int CHARS=0;

static int nSegment=0;
static int fSegment=0;
static SEGMENT Segment[128];

static BAR *Bar=NULL;


int bar_init (int rows, int cols, int xres, int yres, int chars)
{
  if (rows<1 || cols<1) 
    return -1;
  
  ROWS=rows;
  COLS=cols;
  XRES=xres;
  YRES=yres;
  CHARS=chars;

  if (Bar) {
    free (Bar);
  }
  
  if ((Bar=malloc (ROWS*COLS*sizeof(BAR)))==NULL) {
    error ("bar buffer allocation failed: out of memory");
    return -1;
  }

  bar_clear();

  nSegment=0;
  fSegment=0;

  return 0;
}


void bar_clear(void)
{
  int n;

  for (n=0; n<ROWS*COLS; n++) {
    Bar[n].len1=-1;
    Bar[n].len2=-1;
    Bar[n].type=0;
    Bar[n].segment=-1;
  }

}


void bar_add_segment(int len1, int len2, int type, int ascii)
{
  Segment[fSegment].len1=len1;
  Segment[fSegment].len2=len2;
  Segment[fSegment].type=type;
  Segment[fSegment].used=0;
  Segment[fSegment].ascii=ascii;
  
  fSegment++;
  nSegment=fSegment;
}


int bar_draw (int type, int row, int col, int max, int len1, int len2)
{
  int rev=0;
  
  if (len1<1) len1=1;
  else if (len1>max) len1=max;
  
  if (len2<1) len2=1;
  else if (len2>max) len2=max;
  
  switch (type) {
  case BAR_L:
    len1=max-len1;
    len2=max-len2;
    rev=1;
    
  case BAR_R:
    while (max>0 && col<COLS) {
      Bar[row*COLS+col].type=type;
      Bar[row*COLS+col].segment=-1;
      if (len1>=XRES) {
	Bar[row*COLS+col].len1=rev?0:XRES;
	len1-=XRES;
      } else {
	Bar[row*COLS+col].len1=rev?XRES-len1:len1;
	len1=0;
      }
      if (len2>=XRES) {
	Bar[row*COLS+col].len2=rev?0:XRES;
	len2-=XRES;
      } else {
	Bar[row*COLS+col].len2=rev?XRES-len2:len2;
	len2=0;
      }
      max-=XRES;
      col++;
    }
    break;

  case BAR_U:
    len1=max-len1;
    len2=max-len2;
    rev=1;
    
  case BAR_D:
    while (max>0 && row<ROWS) {
      Bar[row*COLS+col].type=type;
      Bar[row*COLS+col].segment=-1;
      if (len1>=YRES) {
	Bar[row*COLS+col].len1=rev?0:YRES;
	len1-=YRES;
      } else {
	Bar[row*COLS+col].len1=rev?YRES-len1:len1;
	len1=0;
      }
      if (len2>=YRES) {
	Bar[row*COLS+col].len2=rev?0:YRES;
	len2-=YRES;
      } else {
	Bar[row*COLS+col].len2=rev?YRES-len2:len2;
	len2=0;
      }
      max-=YRES;
      row++;
    }
    break;

  }
  return 0;
}


static void create_segments (void)
{
  int RES;
  int i, j, n;
  int l1, l2;

  /* find first unused segment */
  for (i=fSegment; i<nSegment && Segment[i].used; i++);

  /* pack unused segments */
  for (j=i+1; j<nSegment; j++) {
    if (Segment[j].used)
      Segment[i++]=Segment[j];
  }
  nSegment=i;
  
  /* create needed segments */
  for (n=0; n<ROWS*COLS; n++) {
    if (Bar[n].type==0) continue;
    RES=Bar[n].type & BAR_H ? XRES:YRES;
    for (i=0; i<nSegment; i++) {
      if (Segment[i].type & Bar[n].type) {
	l1=Segment[i].len1; if (l1>RES) l1=RES;
	l2=Segment[i].len2; if (l2>RES) l2=RES;
	if (l1 == Bar[n].len1 && l2 == Bar[n].len2) break;
      }
    }
    if (i==nSegment) {
      nSegment++;
      Segment[i].len1=Bar[n].len1;
      Segment[i].len2=Bar[n].len2;
      Segment[i].type=Bar[n].type;
      Segment[i].used=0;
      Segment[i].ascii=-1;
    }
    Bar[n].segment=i;
  }
}


static int segment_deviation (int i, int j)
{
  int RES;
  int i1, i2, j1, j2;
  
  if (i==j) return 65535;
  if (!(Segment[i].type & Segment[j].type)) return 65535;

  RES=Segment[i].type & BAR_H ? XRES:YRES;

  i1=Segment[i].len1; if (i1>RES) i1=RES;
  i2=Segment[i].len2; if (i2>RES) i2=RES;
  j1=Segment[j].len1; if (j1>RES) j1=RES;
  j2=Segment[j].len2; if (j2>RES) j2=RES;
  
  if (i1==0   && j1!=0)  return 65535;
  if (i2==0   && j2!=0)  return 65535;
  if (i1==RES && j1<RES) return 65535;
  if (i2==RES && j2<RES) return 65535;
  if (i1==1   && j1!=1 && i2 > 0)  return 65535;
  if (i2==1   && j2!=1 && j1 > 0)  return 65535;
  if (i1==i2  && j1!=j2) return 65535;

  return (i1-j1)*(i1-j1)+(i2-j2)*(i2-j2);
}


static void pack_segments (void)
{
  int i, j, n, min;
  int pack_i, pack_j;
  int pass1=1;
  int deviation[nSegment][nSegment];

  if (nSegment<=fSegment+CHARS) {
    return;
  }

  for (i=0; i<nSegment; i++) {
    for (j=0; j<nSegment; j++) {
      deviation[i][j]=segment_deviation(i,j);
    }
  }
    
  while (nSegment>fSegment+CHARS) {
    min=65535;
    pack_i=-1;
    pack_j=-1;
    for (i=fSegment; i<nSegment; i++) {
      if (pass1 && Segment[i].used) continue;
      for (j=0; j<nSegment; j++) {
	if (deviation[i][j]<min) {
	  min=deviation[i][j];
	  pack_i=i;
	  pack_j=j;
	}
      }
    }
    if (pack_i==-1) {
      if (pass1) {
	pass1=0;
	continue;
      } else {
	error ("unable to compact bar characters");
	nSegment=CHARS;
	break;
      }
    } 

#if 0
    debug ("pack_segment: n=%d i=%d j=%d min=%d", nSegment, pack_i, pack_j, min);
    debug ("Pack_segment: i1=%d i2=%d j1=%d j2=%d\n", 
	   Segment[pack_i].len1, Segment[pack_i].len2, 
	   Segment[pack_j].len1, Segment[pack_j].len2);
#endif
    
    nSegment--;
    Segment[pack_i]=Segment[nSegment];
      
    for (i=0; i<nSegment; i++) {
      deviation[pack_i][i]=deviation[nSegment][i];
      deviation[i][pack_i]=deviation[i][nSegment];
    }
      
    for (n=0; n<ROWS*COLS; n++) {
      if (Bar[n].segment==pack_i)   Bar[n].segment=pack_j;
      if (Bar[n].segment==nSegment) Bar[n].segment=pack_i;
    }
  }
}


static void define_chars (void(*defchar)(int ascii, char *matrix))
{
  int c, i, j;
  char buffer[8];

  for (i=fSegment; i<nSegment; i++) {
    if (Segment[i].used) continue;
    if (Segment[i].ascii!=-1) continue;
    for (c=0; c<CHARS; c++) {
      for (j=fSegment; j<nSegment; j++) {
	if (Segment[j].ascii==c) break;
      }
      if (j==nSegment) break;
    }
    Segment[i].ascii=c;
    switch (Segment[i].type) {
    case BAR_L:
      for (j=0; j<4; j++) {
#if 0
	char Pixel[] = { 0, 1, 3, 7, 15, 31 };
	buffer[j  ]=Pixel[Segment[i].len1];
	buffer[j+4]=Pixel[Segment[i].len2];
#else
	buffer[j  ]=(1<<Segment[i].len1)-1;
	buffer[j+4]=(1<<Segment[i].len2)-1;
#endif
      }
      break;
    case BAR_R:
      for (j=0; j<4; j++) {
#if 0
	char Pixel[] = { 0, 16, 24, 28, 30, 31 };
	buffer[j  ]=Pixel[Segment[i].len1];
	buffer[j+4]=Pixel[Segment[i].len2];
#else
	buffer[j  ]=255<<(XRES-Segment[i].len1);
	buffer[j+4]=255<<(XRES-Segment[i].len2);
#endif
      }
      break;
    case BAR_U:
      for (j=0; j<Segment[i].len1; j++) {
	buffer[7-j]=(1<<XRES)-1;
      }
      for (; j<YRES; j++) {
	buffer[7-j]=0;
      }
      break;
    case BAR_D:
      for (j=0; j<Segment[i].len1; j++) {
	buffer[j]=(1<<XRES)-1;
      }
      for (; j<YRES; j++) {
	buffer[j]=0;
      }
      break;
    }
    defchar(c, buffer);
  }
}


int bar_process (void(*defchar)(int ascii, char *matrix))
{
  int n, s;
  
  create_segments();
  pack_segments();
  define_chars(defchar);
  
  for (s=0; s<nSegment; s++) {
    Segment[s].used=0;
  }

  for (n=0; n<ROWS*COLS; n++) {
    s=Bar[n].segment;
    if (s!=-1) {
      Segment[s].used=1;
    }
  }
  
  return 0;
}


int bar_peek (int row, int col)
{
  int s;

  s=Bar[row*COLS+col].segment;
  if (s==-1) {
    return -1;
  } else {
    return Segment[s].ascii;
  }
}