129 lines
3.4 KiB
C
129 lines
3.4 KiB
C
#include <stdio.h>
|
|
#include <stdlib.h>
|
|
#include <sys/file.h>
|
|
#include <sys/types.h>
|
|
#include <fcntl.h>
|
|
#include <unistd.h>
|
|
#include <sys/termios.h>
|
|
#include <string.h>
|
|
#include <math.h>
|
|
#include <ctype.h>
|
|
|
|
#define FLOW_NONE 0
|
|
#define FLOW_SOFTWARE 1
|
|
#define FLOW_HARDWARE 2
|
|
|
|
int die(char *str);
|
|
int openRawSerialLine(char *port,int speed,int flow_control,int wrmode);
|
|
|
|
char gxbits[480];
|
|
|
|
void bset(int x, int y) {
|
|
int index;
|
|
double theBitcom;
|
|
int theBit;
|
|
index = x + 120 * (y / 8);
|
|
theBitcom = pow(2, (y % 8));
|
|
theBit = theBitcom;
|
|
gxbits[index] = 0+gxbits[index] | theBit;
|
|
}
|
|
|
|
int main(int ac,char **av) {
|
|
int fd, idx, j, i, x, y;
|
|
char bmpin[574];
|
|
char str[1024];
|
|
|
|
int filein;
|
|
|
|
if (ac!=5) {
|
|
printf("usage: %s port speed file mode\n",av[0]);
|
|
printf("where...\n");
|
|
printf(" port is the port device name\n");
|
|
printf(" speed is the port speed\n");
|
|
printf(" file is the filename of bitmap image\n");
|
|
printf(" mode is 0 for normal and 1 for reverse\n");
|
|
exit(0);
|
|
}
|
|
|
|
if (! strcmp(av[2], "-" )) {
|
|
fd=open(av[1], O_RDWR|O_APPEND);
|
|
} else {
|
|
fd=openRawSerialLine(av[1],atoi(av[2]),FLOW_NONE,O_RDWR);
|
|
}
|
|
|
|
filein=open(av[3], O_RDWR);
|
|
|
|
read(filein, bmpin, 62);
|
|
|
|
read(filein, bmpin, 512);
|
|
close(filein);
|
|
|
|
idx=0;
|
|
for(j=31;j>-1;j--) {
|
|
for(i=0;i<16;i++) {
|
|
if (bmpin[idx] & 128) bset((i * 8), j);
|
|
if (bmpin[idx] & 64) bset(((i * 8)+ 1), j);
|
|
if (bmpin[idx] & 32) bset(((i * 8)+ 2), j);
|
|
if (bmpin[idx] & 16) bset(((i * 8)+ 3), j);
|
|
if (bmpin[idx] & 8) bset(((i * 8)+ 4), j);
|
|
if (bmpin[idx] & 4) bset(((i * 8)+ 5), j);
|
|
if (bmpin[idx] & 2) bset(((i * 8)+ 6), j);
|
|
if (bmpin[idx] & 1) bset(((i * 8)+ 7), j);
|
|
idx++;
|
|
}
|
|
}
|
|
|
|
sprintf(str,"%cDG", 27);
|
|
|
|
if(atoi(av[4])==0) {
|
|
for (idx=0;idx<480;idx++) {
|
|
gxbits[idx]=gxbits[idx] ^ 255;
|
|
}
|
|
}
|
|
write(fd,str,3);
|
|
write(fd,&gxbits,480);
|
|
close(fd);
|
|
exit(0);
|
|
}
|
|
|
|
int openRawSerialLine(char *port,int speed,int flow_control,int wrmode) {
|
|
struct termios flags;
|
|
speed_t tioc_speed;
|
|
int fd, softwareFlow;
|
|
|
|
softwareFlow= (flow_control==FLOW_SOFTWARE) ? 1 : 0;
|
|
((fd=open(port,wrmode|O_NDELAY))>=0) || die("failed opening serial port");
|
|
|
|
((tcflush(fd, TCIFLUSH))>=0) || die("failed flushing line");
|
|
|
|
flags.c_iflag= IGNBRK | ((flow_control==FLOW_SOFTWARE) ? (IXOFF|IXON) : 0);
|
|
flags.c_cflag= CLOCAL | CS8 | ((flow_control==FLOW_HARDWARE) ? CRTSCTS : 0)
|
|
| ((wrmode==O_WRONLY || wrmode==O_RDWR) ? CREAD : 0);
|
|
flags.c_oflag= flags.c_lflag= 0;
|
|
|
|
flags.c_cc[VMIN] = 1; flags.c_cc[VTIME] = 0;
|
|
|
|
switch(speed) {
|
|
case 50: tioc_speed=B50; break; case 75: tioc_speed=B75; break;
|
|
case 110: tioc_speed=B110; break; case 134: tioc_speed=B134; break;
|
|
case 150: tioc_speed=B150; break; case 200: tioc_speed=B200; break;
|
|
case 300: tioc_speed=B300; break; case 600: tioc_speed=B600; break;
|
|
case 1200: tioc_speed=B1200; break; case 1800: tioc_speed=B1800; break;
|
|
case 2400: tioc_speed=B2400; break; case 4800: tioc_speed=B4800; break;
|
|
case 9600: tioc_speed=B9600; break; case 19200: tioc_speed=B19200; break;
|
|
case 38400: tioc_speed=B38400; break;
|
|
default:
|
|
die("Unknown baud date"); break;
|
|
}
|
|
|
|
((cfsetospeed(&flags,tioc_speed))>=0) || die("failed setting output speed");
|
|
((tcsetattr(fd,TCSANOW,&flags))>=0) || die("failed setting port attribs");
|
|
|
|
return(fd);
|
|
}
|
|
|
|
int die(char *str) {
|
|
perror(str);exit(1);
|
|
}
|
|
|