DevTerm/Code/thermal_printer/devterm_thermal_printer.c
2021-12-01 11:06:26 +00:00

845 lines
18 KiB
C

// for ltp02-245
// 203 dpi, 384dots in 48mm(1.88976inch) every dots == 0.125mm, 1byte==8dots==1mm
// make clean && make && ./*.elf
//#include <SPI.h>
#include <stdio.h>
#include <stdlib.h>
#include <stdint.h>
#include <string.h>
#include <fcntl.h>
#include <sys/stat.h>
#include <unistd.h>
#include <stdarg.h>
#include <wiringPi.h>
#include "logo.h"
#include "pcf_5x7-ISO8859-1_5x7.h"
#include "pcf_6x12-ISO8859-1_6x12.h"
#include "pcf_7x14-ISO8859-1_7x14.h"
#include "ttf_Px437_PS2thin1_8x16.h"
#include "ttf_Px437_PS2thin2_8x16.h"
#include "config.h"
#include "utils.h"
#include "printer.h"
SerialCache ser_cache;
uint8_t cmd[10];
uint8_t cmd_idx;
uint8_t newline;
char buf[2];
unsigned long time;
ImageCache img_cache;
FONT current_font;
CONFIG g_config;
TimeRec battery_chk_tm;
int printf_out(CONFIG*cfg, char *format, ...) {
va_list args;
int rv;
va_start(args, format);
if(cfg->fp != NULL)
rv = vfprintf(cfg->fp, format, args);
else {
rv = -1;
}
va_end(args);
return rv;
}
//void printer_set_font(CONFIG*cfg,uint8_t fnbits);
//void parse_serial_stream(CONFIG*cfg,uint8_t input_ch);
void reset_cmd(){
cmd_idx = 0;
ser_cache.idx=0;
g_config.state = PRINT_STATE;
}
void init_printer(){
memset(cmd,0,10);
newline = 0;
cmd_idx = 0;
img_cache.idx=0;
img_cache.num=0;
img_cache.width=0;
img_cache.need_print=0;
img_cache.revert_bits = 0;
/*
current_font.width=5; current_font.height=7; current_font.data = font_pcf_5x7_ISO8859_1_5x7;
current_font.width=6;current_font.height=12; current_font.data = font_pcf_6x12_ISO8859_1_6x12;
current_font.width=7; current_font.height=14; current_font.data = font_pcf_7x14_ISO8859_1_7x14;
//current_font.width=8;current_font.height=16; current_font.data= font_ttf_Px437_ISO8_8x16;
//current_font.width=8;current_font.height=16; current_font.data= font_ttf_Px437_ISO9_8x16;
current_font.width=8;current_font.height=16; current_font.data= font_ttf_Px437_PS2thin2_8x16;
*/
current_font.width=8;current_font.height=16; current_font.data= font_ttf_Px437_PS2thin1_8x16;
ser_cache.idx=0;
g_config.line_space=0;
g_config.align = ALIGN_LEFT;
g_config.reverse = 0;
g_config.margin.width = 0;
g_config.margin.esgs = 0;
g_config.orient = FORWARD;
g_config.wordgap = 0;
g_config.font = &current_font;
g_config.under_line = 0;
g_config.state = PRINT_STATE;
g_config.img = &img_cache;
g_config.density = 6;
g_config.feed_pitch = 2;
g_config.max_pts = 2;
g_config.lock = 0;
battery_chk_tm.time = millis();
battery_chk_tm.last_status = 0;
battery_chk_tm.check = 0;
}
const char url[] ={"Powered by clockworkpi.com"};
void label_print_f(CONFIG*cfg,char*label,float m,char*last){
char buf[48];
uint8_t i,j;
if(m == -1.0)
sprintf(buf,"%s",last);
else
sprintf(buf,"%0.2f%s",m,last);
j = strlen(buf);
i = 48-strlen(label)-j-1;
if(m == -1.0)
sprintf(buf,"%s%*s%s",label,i,"",last);
else
sprintf(buf,"%s%*s%0.2f%s",label,i,"",m,last);
printer_set_font(cfg,4);
reset_cmd();
for(i=0;i<strlen(buf);i++){
parse_serial_stream(cfg,buf[i]);
}
parse_serial_stream(cfg,10);
reset_cmd();
}
void label_print_i(CONFIG*cfg,char*label,int m,char*last){
char buf[MAXPIXELS];
uint8_t i,j;
if(m == -1)
sprintf(buf,"%s",last);
else
sprintf(buf,"%d%s",m,last);
j = strlen(buf);
i = MAXPIXELS-strlen(label)-j-1;
if(m == -1)
sprintf(buf,"%s%*s%s",label,i,"",last);
else
sprintf(buf,"%s%*s%d%s",label,i,"",m,last);
printer_set_font(cfg,4);
reset_cmd();
for(i=0;i<strlen(buf);i++){
parse_serial_stream(cfg,buf[i]);
}
parse_serial_stream(cfg,10);
reset_cmd();
}
void printer_test(CONFIG*cfg){
uint8_t i,j;
uint8_t ch;
uint16_t k;
char buf[MAXPIXELS];
char *font_names[]={"8x16thin_1","5x7_ISO8859_1","6x12_ISO8859_1","7x14_ISO8859_1","8x16thin_2",NULL};
/*
char *selftest1[] = {
" _ __ _ _ ",
" ___ ___| |/ _| | |_ ___ ___| |_ ",
"/ __|/ _ \\ | |_ | __/ _ \\/ __| __|",
"\\__ \\ __/ | _| | || __/\\__ \\ |_ ",
"|___/\\___|_|_| \\__\\___||___/\\__|",
NULL
};
*/
char *selftest2[] = {
" #### ###### # ###### ##### ###### #### #####",
"# # # # # # # # ",
" #### ##### # ##### # ##### #### # ",
" # # # # # # # # ",
"# # # # # # # # # # ",
" #### ###### ###### # # ###### #### # ",
NULL
};
cfg->density = 6;
k = (os120_width/8)*os120_height;
memcpy(cfg->img->cache,os120_bits,k);
cfg->img->width = os120_width/8;
cfg->img->num = k;
cfg->img->revert_bits=1;
cfg->align = ALIGN_CENTER;
print_image8(cfg);
cfg->img->revert_bits=0;
cfg->align = ALIGN_LEFT;
feed_pitch1(15,cfg->orient);
cfg->align = ALIGN_CENTER;
/* //selftest1
for(i=0;i<5;i++){
printer_set_font(cfg,0);
reset_cmd();
for(j=0;j<strlen(selftest1[i]);j++){
parse_serial_stream(cfg,selftest1[i][j]);
}
parse_serial_stream(cfg,10);
}
*/
for(i=0;i<6;i++){
printer_set_font(cfg,1);
reset_cmd();
for(j=0;j<strlen(selftest2[i]);j++){
parse_serial_stream(cfg,selftest2[i][j]);
}
parse_serial_stream(cfg,10);
}
cfg->align = ALIGN_LEFT;
feed_pitch1(32,cfg->orient);
//---------------------------------------------
for(i=1;i<4;i++){
printer_set_font(cfg,0);
reset_cmd();
for(j=0;j<strlen(font_names[i]);j++){
parse_serial_stream(cfg,font_names[i][j]);
}
parse_serial_stream(cfg,10);
printer_set_font(cfg,i);
reset_cmd();
for(ch = 33;ch<127;ch++){
parse_serial_stream(cfg,ch);
//Serial.print(ch,DEC);
}
parse_serial_stream(cfg,10);
//Serial.println();
feed_pitch1(48,cfg->orient);
}
printer_set_font(cfg,0);
reset_cmd();
for(j=0;j<strlen(font_names[0]);j++){
parse_serial_stream(cfg,font_names[0][j]);
}
parse_serial_stream(cfg,10);
printer_set_font(cfg,0);
reset_cmd();
for(ch = 33;ch<127;ch++){
parse_serial_stream(cfg,ch);
//Serial.print(ch,DEC);
}
parse_serial_stream(cfg,10);
//Serial.println();
feed_pitch1(48,cfg->orient);
printer_set_font(cfg,0);
reset_cmd();
for(j=0;j<strlen(font_names[0]);j++){
parse_serial_stream(cfg,font_names[4][j]);
}
parse_serial_stream(cfg,10);
printer_set_font(cfg,4);
reset_cmd();
for(ch = 33;ch<127;ch++){
parse_serial_stream(cfg,ch);
//Serial.print(ch,DEC);
}
parse_serial_stream(cfg,10);
//Serial.println();
feed_pitch1(28,cfg->orient);
//-------------------------------------------
k = temperature();
label_print_i(cfg,"Temperature:",k," C");
//--------------------------------------------------------
label_print_i(cfg,"Darkness setting:",cfg->density," (Light 0-15 Dark)");
label_print_i(cfg,"Paper width:",-1,"58mm");
label_print_i(cfg,"Print width:",-1,"48mm");
label_print_i(cfg,"Baudrate:",115200,"");
label_print_i(cfg,"Data bits:",8,"");
label_print_i(cfg,"Stop bits:",1,"");
//------------------------------------------
//------------------------------------------
label_print_f(cfg,"Firmware version:",0.1,"");
feed_pitch1(cfg->font->height,cfg->orient);
//--------------------------------------------------------------
printer_set_font(cfg,0);
reset_cmd();
//Serial.println(strlen(url),DEC);
for(i=0;i<strlen(url);i++){
parse_serial_stream(cfg,url[i]);
}
parse_serial_stream(cfg,10);
reset_cmd();
//-----------------------------------
//grid
/*
for(ch = 0;ch <16;ch++){
if(ch%2==0)
j = 0xff;
else
j = 0x00;
for(k=0;k<8;k++){
for(i=0;i<48;i++){
if(i % 2==0) {
buf[i]=j;
}else{
buf[i]=0xff-j;
}
}
print_dots_8bit_split(cfg,(uint8_t*)buf,48);
}
}
*/
//--------------------------------------------------------
feed_pitch1(cfg->font->height*2,cfg->orient);
}
void printer_set_font(CONFIG*cfg,uint8_t fnbits){
uint8_t ret;
ret = MID(fnbits,0,3);
if(ret==0) {
cfg->font->width = 8 ;
cfg->font->height = 16;
cfg->font->data = font_ttf_Px437_PS2thin1_8x16;
}
if(ret==1){
cfg->font->width = 5;
cfg->font->height = 7;
cfg->font->data = font_pcf_5x7_ISO8859_1_5x7;
}
if(ret==2){
cfg->font->width = 6;
cfg->font->height = 12;
cfg->font->data = font_pcf_6x12_ISO8859_1_6x12;
}
if(ret==3){
cfg->font->width = 7;
cfg->font->height = 14;
cfg->font->data = font_pcf_7x14_ISO8859_1_7x14;
}
if(ret == 4){
cfg->font->width = 8 ;
cfg->font->height = 16;
cfg->font->data = font_ttf_Px437_PS2thin2_8x16;
}
}
void parse_cmd(CONFIG*cfg,uint8_t *cmd, uint8_t cmdidx){
uint8_t ret;
if(cmdidx >1){
//ESC 2
if(cmd[0] == ASCII_ESC && cmd[1] == 0x32){
cfg->line_space = cfg->font->height+8;
reset_cmd();
}
//ESC @
if(cmd[0] == ASCII_ESC && cmd[1] == 0x40){
init_printer();
reset_cmd();
}
//DC2 T printer test page
if(cmd[0] == ASCII_DC2 && cmd[1] == 0x54){
reset_cmd();
printer_test(cfg);
}
}
if(cmdidx > 2){
//ESC j n
if(cmd[0] == ASCII_ESC && cmd[1] == 0x4a){
if( print_lines8(cfg) == 0) { feed_pitch1(cmd[2],cfg->orient); }
reset_cmd();
}
//ESC d n
if(cmd[0] == ASCII_ESC && cmd[1] == 0x64){
if( print_lines8(cfg) == 0) { feed_pitch1(cmd[2]*cfg->font->height,cfg->orient); }
reset_cmd();
}
//ESC ! n
if(cmd[0] == ASCII_ESC && cmd[1] == 0x21){
printer_set_font(cfg,cmd[2]);
reset_cmd();
}
//ESC 3 n
if(cmd[0] == ASCII_ESC && cmd[1] == 0x33){
cfg->line_space = cmd[2];
reset_cmd();
}
// ESC v n
if(cmd[0] == ASCII_ESC && cmd[1] == 0x76){
if(temperature() > 70){
ret |= 1 << 6;
}
if ( (IsPaper() & NO_PAPER) > 0 ) {
ret |= 1 << 2;
}
// 1<< 3 == power error
cfg->printf(cfg,"%d",ret);
reset_cmd();
return;
}
//ESC a n
if(cmd[0] == ASCII_ESC && cmd[1] == 0x61){
ret = cmd[2];
if(ret == 0 || ret == 48){
cfg->align = ALIGN_LEFT;
}
if(ret == 1 || ret == 49){
cfg->align = ALIGN_CENTER;
}
if(ret == 2 || ret == 50){
cfg->align = ALIGN_RIGHT;
}
reset_cmd();
}
//ESC - n
if(cmd[0] == ASCII_ESC && cmd[1] == 0x2d){
ret = cmd[2];
if(ret == 0 || ret == 48){
cfg->under_line =0;
}
if(ret == 1 || ret == 49){
cfg->under_line = 1;
}
if(ret == 2 || ret == 50){
cfg->under_line = 2;
}
reset_cmd();
}
//ESC SP n
if(cmd[0] == ASCII_ESC && cmd[1] == 0x20){
ret = cmd[2];
if( ret + cfg->margin.width <MAX_DOTS){
cfg->wordgap = ret;
}
reset_cmd();
return;
}
//DC2 # n
if(cmd[0] == ASCII_DC2 && cmd[1] == 0x23){
ret = cmd[2];
cfg->density = ret;
reset_cmd();
}
//GS V \0 or GS V \1
if(cmd[0] == ASCII_GS && cmd[1] == 0x56){
ret = cmd[2];
reset_cmd();//When using parse_serial_stream function internally, reset_cmd() first
print_cut_line(cfg);
return;
}
}
if(cmdidx > 3){
//GS L nL nH
if(cmd[0] == ASCII_GS && cmd[1] == 0x4c){
uint16_t k;
k = cmd[2]+cmd[3]*256;
if (k < MAX_DOTS - cfg->font->width){
cfg->margin.width = k;
}
reset_cmd();
}
}
if(cmdidx > 4){
/*
if(cmd[0] == ASCII_ESC && cmd[1] == 0x2a){
if( cmd[2] == 0 || cmd[2] == 1){
uint16_t k;
k = cmd[3] + 256*cmd[4];
if(k<= IMAGE_MAX){
cfg->state = GET_IMAGE;
cfg->img->num = k;
cfg->img->idx = 0;
}
}
reset_cmd();
}
*/
}
if(cmdidx > 7){
// GS v 0 p wL wH hL hH d1…dk
if(cmd[0] == ASCII_GS && cmd[1] == 118 && cmd[2] == 48 ) {
uint16_t width = cmd[4] + cmd[5]*256;
uint16_t height = cmd[6]+cmd[7]*256;
uint16_t k;
k = width * height;
if(k<= IMAGE_MAX){
cfg->state = GET_IMAGE;
cfg->img->num = k;
cfg->img->idx = 0;
cfg->img->width = width;
cfg->img->need_print=1;
}
// do not reset_cmd()
cmd_idx = 0;
ser_cache.idx=0;
}
}
}
void parse_serial_stream(CONFIG*cfg,uint8_t input_ch){
uint16_t a;
if(cfg->state == GET_IMAGE){
cfg->img->cache[cfg->img->idx] = input_ch;
cfg->img->idx++;
if(cfg->img->idx >= cfg->img->num){//image full
if(cfg->img->need_print==1){
print_image8(cfg);
}
reset_cmd();
cfg->state = PRINT_STATE;
}
}else if(cfg->state == ESC_STATE) {
cmd[cmd_idx] = input_ch;
cmd_idx++;
if(cmd_idx < 10){
parse_cmd(cfg,cmd,cmd_idx);
}else{
reset_cmd();
}
}else{ //PRINT_STATE
switch(input_ch){
case ASCII_LF:
if(ser_cache.idx == 0){
feed_pitch1(cfg->font->height,cfg->orient);
}
print_lines8(cfg);
reset_cmd();
break;
case ASCII_FF:
print_lines8(cfg);
reset_cmd();
break;
case ASCII_DC2:
cmd[cmd_idx] = input_ch;
cfg->state = ESC_STATE;
cmd_idx++;
break;
case ASCII_GS:
cmd[cmd_idx] = input_ch;
cfg->state = ESC_STATE;
cmd_idx++;
break;
case ASCII_ESC:
cmd[cmd_idx] = input_ch;
cfg->state = ESC_STATE;
cmd_idx++;
break;
default:
ser_cache.data[ser_cache.idx]=input_ch;
ser_cache.idx++;
a = (ser_cache.idx+1)*current_font.width+(ser_cache.idx)*0+ g_config.margin.width;
if( a >= MAX_DOTS)
{
print_lines8(cfg);
reset_cmd();
}
break;
}
}
}
/* Virtual serial port created by socat
socat -d -d pty,link=/tmp/DEVTERM_PRINTER_OUT,raw,echo=0 pty,link=/tmp/DEVTERM_PRINTER_IN,raw,echo=0
*/
int read_bat_cap(CONFIG*cfg) {
long ret;
char c[12];
FILE *fptr;
if ((fptr = fopen(BAT_CAP, "r")) == NULL) {
PRINTF("Error! Battery File cannot be opened\n");
// Program exits if the file pointer returns NULL.
return -1;
}
fscanf(fptr, "%[^\n]", c);
//printf("Data from the file:%s\n", c);
fclose(fptr);
ret = strtol(c, NULL, 10);
return (int)ret;
}
int bat_cap_to_pts(CONFIG*cfg,int bat) {
int pts;
pts = (int)round( (float)bat/10.0 ) + 1;
return pts;
}
void print_lowpower(CONFIG*cfg) {
int i;
char*msg = "Low Power,please charge";
reset_cmd();
printer_set_font(cfg,4);
for(i=0;i<strlen(msg);i++) {
parse_serial_stream(cfg,msg[i]);
}
parse_serial_stream(cfg,10);
reset_cmd();
for(i=0;i<strlen(msg);i++) {
parse_serial_stream(cfg,msg[i]);
}
parse_serial_stream(cfg,10);
reset_cmd();
feed_pitch1(128,cfg->orient);
printer_set_font(cfg,0);
PRINTF("%s\n",msg);
}
int check_battery(CONFIG*cfg){
int bat_cap;
bat_cap = 0;
if( millis() - battery_chk_tm.time > 200) {
bat_cap = read_bat_cap(cfg);
if( bat_cap < 0){
cfg->max_pts = 1;//no battery ,so set to the slowest
cfg->lock = 0;// unlock printer anyway
PRINTF("no battery,slowest printing\n");
}
if(bat_cap >=0 && bat_cap <= BAT_THRESHOLD) {
if(cfg->lock == 0) {
print_lowpower(cfg);
}
cfg->lock =1;
PRINTF("printer locked\n");
reset_cmd(); // clear all serial_cache
}else {
cfg->max_pts = bat_cap_to_pts(cfg,bat_cap);
cfg->lock = 0;
}
battery_chk_tm.time = millis();
}
if(cfg->lock == 1) {
reset_cmd();
}
return 0;
}
#define FIFO_FILE "/tmp/DEVTERM_PRINTER_OUT"
void loop() {
/*
if (Serial.available() > 0) {
// read the incoming byte
Serial.readBytes(buf,1);
parse_serial_stream(&g_config,buf[0]);
}
*/
FILE*fp=NULL;
char readbuf[2];
while(1) {
fp = NULL;
fp = fopen(FIFO_FILE,"r+b");
if (fp != NULL) {
g_config.fp = fp;
while(1)
{
fread(readbuf,1, 1,fp);
check_battery(&g_config);
if(g_config.lock ==0) {
//printf("read %x",readbuf[0]);
if(g_config.state == PRINT_STATE) {
if(readbuf[0] == ASCII_TAB) {
readbuf[0] = ' ';
parse_serial_stream(&g_config,readbuf[0]);
parse_serial_stream(&g_config,readbuf[0]);
} else {//not a tab
parse_serial_stream(&g_config,readbuf[0]);
}
} else { //g_config.state == PRINT_STATE
parse_serial_stream(&g_config,readbuf[0]);
}
}
}
fclose(fp);
g_config.fp = NULL;
}
sleep(1);
}
//------------------------------------------
//printer_test(&g_config);
}
void setup() {
wiringPiSetupGpio();
header_init();
header_init1();
clear_printer_buffer();
//Serial.begin(115200);
init_printer();
g_config.printf = &printf_out;
}
int main(int argc,char**argv) {
setup();
loop();
}