static void _halt( obj inst, Boolean poweroff, Boolean shutdown ) {
iODDXData data = Data((iODDX)inst);
stop_voltage(inst);
/* sleep to wait for cycle thread to do the power off */
ThreadOp.sleep(500);
close_comport(inst);
return;
}
void serial_module_shutdown()
{
close_comport();
#ifndef ALLEGRO_WINDOWS
// dzcomm_closedown();
#endif
_remove_exit_func(serial_module_shutdown);
}
int open_comport()
{
#ifdef ALLEGRO_WINDOWS
DCB dcb;
COMMTIMEOUTS timeouts;
DWORD bytes_written;
char temp_str[16];
#endif
if (comport.status == READY) // if the comport is open,
close_comport(); // close it
#ifdef ALLEGRO_WINDOWS
// Naming of serial ports 10 and higher: See
// http://www.connecttech.com/KnowledgeDatabase/kdb227.htm
// http://support.microsoft.com/?id=115831
sprintf(temp_str, "\\\\.\\COM%i", comport.number + 1);
com_port = CreateFile(temp_str, GENERIC_READ | GENERIC_WRITE, 0, 0, OPEN_EXISTING, 0, 0);
if (com_port == INVALID_HANDLE_VALUE)
{
comport.status = NOT_OPEN; //port was not open
return -1; // return error
}
// Setup comport
GetCommState(com_port, &dcb);
dcb.BaudRate = comport.baud_rate;
dcb.ByteSize = 8;
dcb.StopBits = ONESTOPBIT;
dcb.fParity = FALSE;
dcb.Parity = NOPARITY;
dcb.fOutxCtsFlow = FALSE;
dcb.fOutxDsrFlow = FALSE;
dcb.fOutX = FALSE;
dcb.fInX = FALSE;
dcb.fDtrControl = DTR_CONTROL_ENABLE;
dcb.fRtsControl = RTS_CONTROL_ENABLE;
dcb.fDsrSensitivity = FALSE;
dcb.fErrorChar = FALSE;
dcb.fAbortOnError = FALSE;
SetCommState(com_port, &dcb);
// Setup comm timeouts
timeouts.ReadIntervalTimeout = MAXWORD;
timeouts.ReadTotalTimeoutMultiplier = 0;
timeouts.ReadTotalTimeoutConstant = 0;
timeouts.WriteTotalTimeoutMultiplier = TX_TIMEOUT_MULTIPLIER;
timeouts.WriteTotalTimeoutConstant = TX_TIMEOUT_CONSTANT;
SetCommTimeouts(com_port, &timeouts);
// Hack to get around Windows 2000 multiplying timeout values by 15
GetCommTimeouts(com_port, &timeouts);
if (TX_TIMEOUT_MULTIPLIER > 0)
timeouts.WriteTotalTimeoutMultiplier = TX_TIMEOUT_MULTIPLIER * TX_TIMEOUT_MULTIPLIER / timeouts.WriteTotalTimeoutMultiplier;
if (TX_TIMEOUT_CONSTANT > 0)
timeouts.WriteTotalTimeoutConstant = TX_TIMEOUT_CONSTANT * TX_TIMEOUT_CONSTANT / timeouts.WriteTotalTimeoutConstant;
SetCommTimeouts(com_port, &timeouts);
// If the port is Bluetooth, make sure device is active
PurgeComm(com_port, PURGE_TXCLEAR|PURGE_RXCLEAR);
WriteFile(com_port, "?\r", 2, &bytes_written, 0);
if (bytes_written != 2) // If Tx timeout occured
{
PurgeComm(com_port, PURGE_TXCLEAR|PURGE_RXCLEAR);
CloseHandle(com_port);
comport.status = NOT_OPEN; //port was not open
return -1;
}
#elif TERMIOS
char tmp[54];
if( comport.number < 100 )
snprintf(tmp, sizeof(tmp), "/dev/ttyS%d", comport.number);
else
snprintf(tmp, sizeof(tmp), "/dev/ttyUSB%d", comport.number-100);
fdtty = open( tmp, O_RDWR | O_NOCTTY );
if (fdtty <0) { return(-1); }
tcgetattr(fdtty,&oldtio); /* save current port settings */
bzero(&newtio, sizeof(newtio));
cfsetspeed(&newtio, comport.baud_rate);
cfmakeraw(&newtio);
newtio.c_cflag |= (CLOCAL | CREAD);
// No parity (8N1):
newtio.c_cflag &= ~PARENB;
newtio.c_cflag &= ~CSTOPB;
newtio.c_cflag &= ~CSIZE;
newtio.c_cflag |= CS8;
// disable hardware flow control
newtio.c_cflag &= ~CRTSCTS ;
newtio.c_cc[VTIME] = 0; /* inter-character timer unused */
newtio.c_cc[VMIN] = 0; /* blocking read until 5 chars received */
tcflush(fdtty, TCIFLUSH);
tcsetattr(fdtty,TCSANOW,&newtio);
#else
com_port = comm_port_init(comport.number);
if (!com_port) {
write_log(szDZCommErr);
comport.status = NOT_OPEN;
return -1;
}
comm_port_set_baud_rate(com_port, comport.baud_rate);
comm_port_set_parity(com_port, NO_PARITY);
comm_port_set_data_bits(com_port, BITS_8);
comm_port_set_stop_bits(com_port, STOP_1);
comm_port_set_flow_control(com_port, NO_CONTROL);
if (comm_port_install_handler(com_port) != 1)
{
write_log(szDZCommErr);
comport.status = NOT_OPEN; //port was not open
return -1; // return error
}
#endif
serial_time_out = FALSE;
comport.status = READY;
return 0; // everything is okay
}
int open_comport()
{
#ifdef ALLEGRO_WINDOWS
DCB dcb;
COMMTIMEOUTS timeouts;
char temp_str[16];
#endif
if (comport.status == READY) // if the comport is open,
close_comport(); // close it
#ifdef ALLEGRO_WINDOWS
sprintf(temp_str, "COM%i", comport.number + 1);
com_port = CreateFile(temp_str, GENERIC_READ | GENERIC_WRITE, 0, 0, OPEN_EXISTING, 0, 0);
if (com_port == INVALID_HANDLE_VALUE)
{
comport.status = NOT_OPEN; //port was not open
return -1; // return error
}
GetCommState(com_port, &dcb);
dcb.BaudRate = comport.baud_rate;
dcb.ByteSize = 8;
dcb.StopBits = ONESTOPBIT;
dcb.fParity = FALSE;
dcb.Parity = NOPARITY;
dcb.fOutxCtsFlow = FALSE;
dcb.fOutxDsrFlow = FALSE;
dcb.fOutX = FALSE;
dcb.fInX = FALSE;
dcb.fDtrControl = DTR_CONTROL_ENABLE;
dcb.fRtsControl = RTS_CONTROL_ENABLE;
dcb.fDsrSensitivity = FALSE;
dcb.fErrorChar = FALSE;
dcb.fAbortOnError = FALSE;
SetCommState(com_port, &dcb);
timeouts.ReadIntervalTimeout = MAXWORD;
timeouts.ReadTotalTimeoutMultiplier = 0;
timeouts.ReadTotalTimeoutConstant = 0;
timeouts.WriteTotalTimeoutMultiplier = 0;
timeouts.WriteTotalTimeoutConstant = 0;
SetCommTimeouts(com_port, &timeouts);
#else
com_port = comm_port_init(comport.number);
comm_port_set_baud_rate(com_port, comport.baud_rate);
comm_port_set_parity(com_port, NO_PARITY);
comm_port_set_data_bits(com_port, BITS_8);
comm_port_set_stop_bits(com_port, STOP_1);
comm_port_set_flow_control(com_port, NO_CONTROL);
if (comm_port_install_handler(com_port) != 1)
{
comport.status = NOT_OPEN; //port was not open
return -1; // return error
}
#endif
serial_time_out = FALSE;
comport.status = READY;
return 0; // everything is okay
}
int save_options_proc(int msg, DIALOG *d, int c)
{
int ret;
int old_baud_rate;
BITMAP *bmp;
FILE *file;
ret = d_button_proc(msg, d, c);
if (ret == D_CLOSE)
{
old_baud_rate = comport.baud_rate;
broadcast_dialog_message(MSG_SAVE_OPTIONS, 0);
if (comport.baud_rate != old_baud_rate)
{
if (alert("WARNING!", "This operation may cause scan tool to stop responding.", "Are you sure you want to change the baud rate?", "Yes", "No", 0, 0) != 1)
{
comport.baud_rate = old_baud_rate;
broadcast_dialog_message(MSG_REFRESH, 0);
return D_O_K;
}
}
close_comport(); // close current comport
open_comport(); // try reinitializing comport (comport.status will be set)
if ((!(display_mode & WINDOWED_MODE) && (display_mode & WINDOWED_MODE_SET)) || ((display_mode & WINDOWED_MODE) && !(display_mode & WINDOWED_MODE_SET)))
{
bmp = create_bitmap(SCREEN_W, SCREEN_H);
if (bmp)
{
scare_mouse();
blit(screen, bmp, 0, 0, 0, 0, SCREEN_W, SCREEN_H);
unscare_mouse();
if (display_mode & WINDOWED_MODE)
{
if (set_gfx_mode(GFX_AUTODETECT_WINDOWED, 640, 480, 0, 0) == 0)
display_mode |= WINDOWED_MODE_SET;
else
display_mode &= ~WINDOWED_MODE_SUPPORTED;
}
else
{
if (set_gfx_mode(GFX_AUTODETECT_FULLSCREEN, 640, 480, 0, 0) == 0)
display_mode &= ~WINDOWED_MODE_SET;
else
display_mode &= ~FULLSCREEN_MODE_SUPPORTED;
}
set_pallete(datafile[MAIN_PALETTE].dat);
gui_fg_color = C_BLACK; // set the foreground color
gui_bg_color = C_WHITE; // set the background color
gui_mg_color = C_GRAY; // set the disabled color
set_mouse_sprite(NULL); // make mouse use current palette
blit(bmp, screen, 0, 0, 0, 0, SCREEN_W, SCREEN_H);
show_mouse(screen);
destroy_bitmap(bmp);
}
else
alert("Error switching display modes.", "Not enough memory to save screen.", NULL, "OK", NULL, 0, 0);
}
file = fopen(options_file_name, "a");
if (file == NULL)
alert("Options could not be saved, because file", options_file_name, "could not be open for writing", "OK", NULL, 0, 0);
else
{
fclose(file);
save_program_options();
}
}
return ret;
}
int open_comport()
{
#ifdef ALLEGRO_WINDOWS
DCB dcb;
COMMTIMEOUTS timeouts;
DWORD bytes_written;
char temp_str[16];
#endif
if (comport.status == READY) // if the comport is open,
close_comport(); // close it
#ifdef ALLEGRO_WINDOWS
// Naming of serial ports 10 and higher: See
// http://www.connecttech.com/KnowledgeDatabase/kdb227.htm
// http://support.microsoft.com/?id=115831
sprintf(temp_str, "\\\\.\\COM%i", comport.number + 1);
com_port = CreateFile(temp_str, GENERIC_READ | GENERIC_WRITE, 0, 0, OPEN_EXISTING, 0, 0);
if (com_port == INVALID_HANDLE_VALUE)
{
comport.status = NOT_OPEN; //port was not open
return -1; // return error
}
// Setup comport
GetCommState(com_port, &dcb);
dcb.BaudRate = comport.baud_rate;
dcb.ByteSize = 8;
dcb.StopBits = ONESTOPBIT;
dcb.fParity = FALSE;
dcb.Parity = NOPARITY;
dcb.fOutxCtsFlow = FALSE;
dcb.fOutxDsrFlow = FALSE;
dcb.fOutX = FALSE;
dcb.fInX = FALSE;
dcb.fDtrControl = DTR_CONTROL_ENABLE;
dcb.fRtsControl = RTS_CONTROL_ENABLE;
dcb.fDsrSensitivity = FALSE;
dcb.fErrorChar = FALSE;
dcb.fAbortOnError = FALSE;
SetCommState(com_port, &dcb);
// Setup comm timeouts
timeouts.ReadIntervalTimeout = MAXWORD;
timeouts.ReadTotalTimeoutMultiplier = 0;
timeouts.ReadTotalTimeoutConstant = 0;
timeouts.WriteTotalTimeoutMultiplier = TX_TIMEOUT_MULTIPLIER;
timeouts.WriteTotalTimeoutConstant = TX_TIMEOUT_CONSTANT;
SetCommTimeouts(com_port, &timeouts);
// Hack to get around Windows 2000 multiplying timeout values by 15
GetCommTimeouts(com_port, &timeouts);
if (TX_TIMEOUT_MULTIPLIER > 0)
timeouts.WriteTotalTimeoutMultiplier = TX_TIMEOUT_MULTIPLIER * TX_TIMEOUT_MULTIPLIER / timeouts.WriteTotalTimeoutMultiplier;
if (TX_TIMEOUT_CONSTANT > 0)
timeouts.WriteTotalTimeoutConstant = TX_TIMEOUT_CONSTANT * TX_TIMEOUT_CONSTANT / timeouts.WriteTotalTimeoutConstant;
SetCommTimeouts(com_port, &timeouts);
// If the port is Bluetooth, make sure device is active
PurgeComm(com_port, PURGE_TXCLEAR|PURGE_RXCLEAR);
WriteFile(com_port, "?\r", 2, &bytes_written, 0);
if (bytes_written != 2) // If Tx timeout occured
{
PurgeComm(com_port, PURGE_TXCLEAR|PURGE_RXCLEAR);
CloseHandle(com_port);
comport.status = NOT_OPEN; //port was not open
return -1;
}
#else
com_port = comm_port_init(comport.number);
comm_port_set_baud_rate(com_port, comport.baud_rate);
comm_port_set_parity(com_port, NO_PARITY);
comm_port_set_data_bits(com_port, BITS_8);
comm_port_set_stop_bits(com_port, STOP_1);
comm_port_set_flow_control(com_port, NO_CONTROL);
if (comm_port_install_handler(com_port) != 1)
{
comport.status = NOT_OPEN; //port was not open
return -1; // return error
}
#endif
serial_time_out = FALSE;
comport.status = READY;
return 0; // everything is okay
}
