clockworkpi/DevTerm
1
0
Fork 0
mirror of https://github.com/clockworkpi/DevTerm.git synced 2025-12-12 18:28:50 +01:00
Code Issues Packages Projects Releases Wiki Activity
DevTerm/Code/thermal_printer/devterm_thermal_printer.c

914 lines
20 KiB
C
Raw Blame History

// 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 <fcntl.h>
#include <stdarg.h>
#include <stdint.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <sys/stat.h>
#include <unistd.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 "printer.h"
#include "utils.h"
#include "ftype.h"
#include <math.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;
FT_Face face;
FT_Library ft;
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() {
char *error = NULL;
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 = 16;
current_font.height = 16;
current_font.data = font_ttf_Px437_PS2thin1_8x16;
current_font.file = "NotoSansCJK-Regular.ttf";
current_font.mode = FONT_MODE_1;
ser_cache.idx = 0;
ser_cache.utf8idx = 0;
if (init_ft(current_font.file, &face, &ft, current_font.width,
current_font.height, &error)) {
g_config.face = face;
g_config.ft = ft;
} else {
printf("init_ft error %s\n", error);
g_config.face = NULL;
g_config.ft = NULL;
}
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;
g_config.degree = 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_mode(cfg, FONT_MODE_0);
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_mode(cfg, FONT_MODE_0);
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_mode(cfg, FONT_MODE_0);
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_mode(cfg, FONT_MODE_0);
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_mode(cfg, FONT_MODE_0);
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_mode(cfg, FONT_MODE_0);
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_mode(cfg, FONT_MODE_0);
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_mode(cfg, FONT_MODE_0);
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_mode(CONFIG *cfg, int mode) {
cfg->font->mode = mode;
return;
}
void printer_set_font(CONFIG *cfg, uint8_t fnbits) {
uint8_t ret;
ret = MID(fnbits, 0, 3);
if (cfg->font->mode == 0) {
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;
}
}
if (cfg->font->mode == 1) {
cfg->font->width = 16;
cfg->font->height = 16;
}
}
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;
}
// ESC V n
if (cmd[0] == ASCII_ESC && cmd[1] == 0x56) {
ret = cmd[2];
if (ret == 0x00 || ret == 0x30) {
cfg->degree = 0;
}
if (ret == 0x01 || ret == 0x31) {
cfg->degree = 90;
}
if (ret == 0x02 || ret == 0x32) {
cfg->degree = 180;
}
if (ret == 0x03 || ret == 0x33) {
cfg->degree = 270;
}
printf("set printer degree, %d\n", cfg->degree);
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;
uint8_t bskip;
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:
if (input_ch < 128) {
ser_cache.data[ser_cache.idx] = input_ch;
ser_cache.idx++;
} else { // utf8
// 10xxxxxx bskip == 1
bskip = get_slice_len(input_ch);
if (bskip == 1) {
// append this to int32_t [8:8:8:8] 0xffffffff 4294967295
ser_cache.data[ser_cache.idx] |= input_ch
<< (8 * (ser_cache.utf8idx));
if (ser_cache.utf8idx ==
get_slice_len(ser_cache.data[ser_cache.idx] & 0xff) - 1) {
ser_cache.idx++;
ser_cache.utf8idx = 0; // next character
} else {
ser_cache.utf8idx++;
}
}
if (bskip > 1) {
ser_cache.utf8idx = 1;
ser_cache.data[ser_cache.idx] = input_ch;
}
}
// read utf8 codename
//
if (cfg->font->mode == FONT_MODE_1) {
a = get_serial_cache_font_width(&g_config);
a += (ser_cache.idx) * 0 + g_config.margin.width;
} else {
a = (ser_cache.idx + 1) * current_font.width + (ser_cache.idx) * 0 +
g_config.margin.width;
}
if (a >= MAX_DOTS) // got enough points to print
{
if (cfg->font->mode == FONT_MODE_1) {
print_lines_ft(cfg);
} else {
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();
}
Reference in New Issue View Git Blame Copy Permalink