This repository has been archived on 2024-04-08. You can view files and clone it, but cannot push or open issues or pull requests.
deb-goldedplus/goldlib/gall/gprnutil.cpp

89 lines
2.5 KiB
C++
Raw Normal View History

2000-02-25 10:15:17 +00:00
// This may look like C code, but it is really -*- C++ -*-
// ------------------------------------------------------------------
// The Goldware Library
// Copyright (C) 1990-1999 Odinn Sorensen
// ------------------------------------------------------------------
// This library is free software; you can redistribute it and/or
// modify it under the terms of the GNU Library General Public
// License as published by the Free Software Foundation; either
// version 2 of the License, or (at your option) any later version.
//
// This library 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
// Library General Public License for more details.
//
// You should have received a copy of the GNU Library 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
// ------------------------------------------------------------------
// $Id$
// ------------------------------------------------------------------
// GoldED printer definition helper.
// ------------------------------------------------------------------
#include <cstdio>
#include <cstdlib>
#include <gstrall.h>
// ------------------------------------------------------------------
// Convert printer definition string to binary codes
char* CvtPrnstr(char* str, char* prn) {
int value;
byte len=0;
char buf[256];
char* ptr=prn;
while(*ptr) {
switch(*ptr) {
case '$':
ptr++;
do {
sscanf(ptr, "%2x", &value);
buf[len++] = (byte)value;
if(isxdigit(*ptr) and *ptr) // Skip first digit
ptr++;
if(isxdigit(*ptr) and *ptr) // Skip second digit
ptr++;
} while(isxdigit(*ptr) and *ptr);
break;
case '#':
ptr++;
value = atoi(ptr);
buf[len++] = (byte)value;
while(isdigit(*ptr) and *ptr)
ptr++;
break;
case '\"':
ptr++;
while(*ptr != '\"' and *ptr)
buf[len++] = *ptr++;
if(*ptr)
ptr++;
break;
case '\'':
ptr++;
while(*ptr != '\'' and *ptr)
buf[len++] = *ptr++;
if(*ptr)
ptr++;
break;
default:
ptr++;
}
}
*str = len;
memcpy(str+1, buf, len);
return str;
}
// ------------------------------------------------------------------