Inial population of repository.
This commit is contained in:
Andras Tantos
217
simulator/sim_lib/iop_console.cpp
Normal file
217
simulator/sim_lib/iop_console.cpp
Normal file
@@ -0,0 +1,217 @@
|
||||
#include "iop_console.h"
|
||||
#include "cray_mainframe.h"
|
||||
#include <algorithm>
|
||||
#include <time.h>
|
||||
|
||||
#if defined(PARTIAL_DEBUG) && defined(_MSC_VER)
|
||||
#pragma optimize ("", off)
|
||||
#endif
|
||||
|
||||
// IopConsole_c
|
||||
//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
|
||||
|
||||
void IopConsole_c::GetStatus(StatusReport_c &aStatus, PeripheralType_e aFilter, bool aLongFormat) const {
|
||||
aStatus.put("State", mAccepted ? "Conn" : "----");
|
||||
}
|
||||
|
||||
|
||||
// ChannelTO_c
|
||||
//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
|
||||
|
||||
IopInt_t IopConsole_c::ChannelTO_c::DoIo(IopIoFunction_t aFunction, IopInt_t aData) {
|
||||
switch (aFunction) {
|
||||
case 000:
|
||||
mBusy = false;
|
||||
mDone = false;
|
||||
return 0;
|
||||
case 006:
|
||||
mInterruptEnabled = false;
|
||||
return 0;
|
||||
case 007:
|
||||
mInterruptEnabled = true;
|
||||
return 0;
|
||||
case 014:
|
||||
if (mBusy) {
|
||||
mParent.mLogger << setloglevel(LogLevel_Warning) << SideEffectIndent << "WARNING: channel TOx fn14 is called while busy" << std::endl;
|
||||
} else {
|
||||
char Ch = aData & 0x7f;
|
||||
switch (mEscSequence.size()) {
|
||||
case 0:
|
||||
switch (Ch) {
|
||||
case 0x1b:
|
||||
mEscSequence += Ch;
|
||||
SetDone();
|
||||
break;
|
||||
case 0x0c: // Right arrow: 0x0c
|
||||
Send("\x1b[1C");
|
||||
break;
|
||||
case 0x7f: // back-space these days generate a 0x7f ^H ' ' ^H sequence. Let's eat the first 0x7f
|
||||
SetDone();
|
||||
break;
|
||||
default:
|
||||
Send(Ch);
|
||||
}
|
||||
break;
|
||||
case 1:
|
||||
switch (Ch) {
|
||||
case 'T': mEscSequence.clear(); Send("\x1b[0K"); break; // Erase to end of line
|
||||
case '*': mEscSequence.clear(); Send("\x1b[2J"); break; // Clear screen
|
||||
case 'R': mEscSequence.clear(); Send("\x1b[1M"); break; // Delete a line and scroll up
|
||||
case 'j': mEscSequence.clear(); Send("\x1b[7m"); break; // Reverse video
|
||||
case 'k': mEscSequence.clear(); Send("\x1b[27m"); break; // Reverse video off
|
||||
case 'n': mEscSequence.clear(); Send("\x1b[5m"); break; // Flashing mode on
|
||||
case 'o': mEscSequence.clear(); Send("\x1b[25m"); break; // Flashing mode off
|
||||
case '=': // Load cursor address
|
||||
case 'G': // Graphical characters
|
||||
mEscSequence += Ch;
|
||||
SetDone();
|
||||
break;
|
||||
default:
|
||||
mEscSequence += Ch;
|
||||
Send(mEscSequence);
|
||||
mEscSequence.clear();
|
||||
break;
|
||||
}
|
||||
break;
|
||||
case 2:
|
||||
switch (mEscSequence[1]) {
|
||||
case 'G':
|
||||
switch (Ch) {
|
||||
case 'A': mEscSequence.clear(); Send("\x1b(0\x6c\x1b(B"); break; // Top left corner: ESC G A
|
||||
case 'B': mEscSequence.clear(); Send("\x1b(0\x6b\x1b(B"); break; // Top right corner: ESC G B
|
||||
case 'C': mEscSequence.clear(); Send("\x1b(0\x6d\x1b(B"); break; // Bottom left corner: ESC G C
|
||||
case 'D': mEscSequence.clear(); Send("\x1b(0\x6a\x1b(B"); break; // Bottom right corner: ESC G D
|
||||
case 'E': mEscSequence.clear(); Send("\x1b(0\x77\x1b(B"); break; // Top intersect: ESC G E
|
||||
case 'F': mEscSequence.clear(); Send("\x1b(0\x75\x1b(B"); break; // Right intersect: ESC G F
|
||||
case 'G': mEscSequence.clear(); Send("\x1b(0\x74\x1b(B"); break; // Left intersect: ESC G G
|
||||
case 'H': mEscSequence.clear(); Send("\x1b(0\x76\x1b(B"); break; // Bottom intersect: ESC G H
|
||||
case 'I': mEscSequence.clear(); Send("\x1b(0\x71\x1b(B"); break; // Horizontal line: ESC G I
|
||||
case 'J': mEscSequence.clear(); Send("\x1b(0\x78\x1b(B"); break; // Vertical line: ESC G J
|
||||
case 'K': mEscSequence.clear(); Send("\x1b(0\x6e\x1b(B"); break; // Crossed lines: ESC G K
|
||||
default:
|
||||
mEscSequence += Ch;
|
||||
Send(mEscSequence);
|
||||
mEscSequence.clear();
|
||||
break;
|
||||
}
|
||||
break;
|
||||
case '=':
|
||||
mEscSequence += Ch;
|
||||
SetDone();
|
||||
break;
|
||||
default:
|
||||
mEscSequence += Ch;
|
||||
Send(mEscSequence);
|
||||
mEscSequence.clear();
|
||||
break;
|
||||
}
|
||||
break;
|
||||
case 3: {
|
||||
mEscSequence += Ch;
|
||||
int Row = mEscSequence[2] - ' ' + 1;
|
||||
int Col = mEscSequence[3] - ' ' + 1;
|
||||
std::stringstream Str;
|
||||
Str << "\x1b[" << Row << ";" << Col << "H";
|
||||
Send(Str.str());
|
||||
mEscSequence.clear();
|
||||
break;
|
||||
}
|
||||
break;
|
||||
default:
|
||||
mEscSequence += Ch;
|
||||
Send(mEscSequence);
|
||||
mEscSequence.clear();
|
||||
break;
|
||||
}
|
||||
}
|
||||
return 0;
|
||||
default:
|
||||
mParent.mLogger << setloglevel(LogLevel_Error) << SideEffectIndent << "ERROR: Invalid function code for channel" << std::endl;
|
||||
return 0;
|
||||
}
|
||||
}
|
||||
|
||||
void IopConsole_c::ChannelTO_c::Send(char aCh) {
|
||||
mBusy = true;
|
||||
mDone = false;
|
||||
mParent.SendChar(aCh);
|
||||
}
|
||||
|
||||
void IopConsole_c::ChannelTO_c::Send(std::string aStr) {
|
||||
mBusy = true;
|
||||
mDone = false;
|
||||
mParent.SendString(aStr);
|
||||
}
|
||||
|
||||
void IopConsole_c::ChannelTO_c::SetDone() {
|
||||
// CRAY_ASSERT(mBusy);
|
||||
// CRAY_ASSERT(!mDone);
|
||||
mBusy = false;
|
||||
mDone = true;
|
||||
}
|
||||
|
||||
|
||||
// ChannelTI_c
|
||||
//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
|
||||
|
||||
IopInt_t IopConsole_c::ChannelTI_c::DoIo(IopIoFunction_t aFunction, IopInt_t aData) {
|
||||
char Data = 0;
|
||||
switch (aFunction) {
|
||||
case 000:
|
||||
mDone = false;
|
||||
return 0;
|
||||
case 006:
|
||||
mInterruptEnabled = false;
|
||||
return 0;
|
||||
case 007:
|
||||
mInterruptEnabled = true;
|
||||
return 0;
|
||||
case 010:
|
||||
if (!mDone) {
|
||||
mParent.mLogger << setloglevel(LogLevel_Warning) << SideEffectIndent << "WARNING: channel TIx fn10 is called while not done" << std::endl;
|
||||
} else {
|
||||
Data = mParent.GetChar();
|
||||
mDone = false;
|
||||
}
|
||||
return Data & 0x7f;
|
||||
default:
|
||||
mParent.mLogger << setloglevel(LogLevel_Error) << SideEffectIndent << "ERROR: Invalid function code for channel" << std::endl;
|
||||
return 0;
|
||||
}
|
||||
}
|
||||
|
||||
void IopConsole_c::ChannelTI_c::Tick() {
|
||||
mParent.Tick();
|
||||
}
|
||||
|
||||
// IopConsole_c
|
||||
//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
|
||||
|
||||
void IopConsole_c::Tick() {
|
||||
Console_c::Tick();
|
||||
}
|
||||
|
||||
bool IopConsole_c::ReceiveHandlerDetail() {
|
||||
mTI.SetDone();
|
||||
return false; // Don't loop for input
|
||||
}
|
||||
|
||||
void IopConsole_c::SendHandlerDetail() {
|
||||
mTO.SetDone();
|
||||
}
|
||||
|
||||
void IopConsole_c::ResetDetail() {
|
||||
}
|
||||
|
||||
void IopConsole_c::ConnectDetail() {
|
||||
// if (mTitle.length() > 0) {
|
||||
// SendStringInternal(std::string("\x1b]0;"), false, false);
|
||||
// SendStringInternal(mTitle, false, false);
|
||||
// SendStringInternal(std::string("\x0b"), false, false);
|
||||
// }
|
||||
}
|
||||
|
||||
|
||||
#if defined(PARTIAL_DEBUG) && defined(_MSC_VER)
|
||||
#pragma optimize ("", on)
|
||||
#endif
|
||||
Reference in New Issue
Block a user