void
GPMProcessEntry::ReadStat()
{
const JSize uTime = itsUTime, sTime = itsSTime;
JString str = JCombinePathAndName(itsProcPath, "stat");
std::ifstream is(str);
if (is.good())
{
is >> itsPID;
is >> std::ws;
itsCommand = JReadUntilws(is);
if (itsCommand.GetLength() > 2)
{
itsCommand = itsCommand.GetSubstring(2, itsCommand.GetLength() - 1);
}
JString state = JReadUntilws(is);
if (state.Contains("S"))
{
itsState = kSleep;
}
else if (state.Contains("D"))
{
itsState = kUnIntSleep;
}
else if (state.Contains("Z"))
{
itsState = kZombie;
}
else if (state.Contains("T"))
{
itsState = kStopped;
}
else
{
itsState = kRun;
}
is >> itsPPID;
is >> std::ws;
int toss;
is >> toss;
is >> toss;
is >> toss;
is >> toss;
is >> toss;
is >> toss;
is >> toss;
is >> toss;
is >> toss;
is >> itsUTime;
is >> itsSTime;
is >> toss;
is >> toss;
is >> itsPriority;
is >> itsNice;
}
JBoolean
GetConstructor
(
const JString& flClass,
const JString& flType,
JString* label,
JString* className,
JString* argList
)
{
if (flClass == "FL_BOX" && flType == "NO_BOX" && !label->IsEmpty())
{
const JBoolean ok = SplitClassNameAndArgs(*label, className, argList);
label->Clear();
return ok;
}
ifstream classMap(classMapFile);
classMap >> ws;
while (1)
{
if (classMap.peek() == '#')
{
JIgnoreLine(classMap);
}
else
{
const JString aClass = JReadUntilws(classMap);
if (classMap.eof() || classMap.fail())
{
break;
}
const JString aType = JReadUntilws(classMap);
if (aClass == flClass && (aType == "*" || aType == flType))
{
const JString s = JReadUntilws(classMap);
return SplitClassNameAndArgs(s, className, argList);
}
else
{
JIgnoreLine(classMap);
}
}
classMap >> ws;
}
// falling through means that nothing matched
return kJFalse;
}
GVarList::GVarList
(
istream& input
)
:
JVariableList()
{
GVarListX();
input >> ws;
while (input.peek() != '*')
{
JCharacter type;
input >> type >> ws;
if (type == 'N')
{
JString name = JReadUntilws(input);
if (name.GetLastCharacter() != ']')
{
JFloat value;
input >> value;
AddVariable(name, value);
}
else
{
void
JStringManager::MergeFile
(
istream& input,
const JBoolean debug
)
{
JUInt format;
input >> format;
if (format != kASCIIFormat)
{
return;
}
JString id;
while (1)
{
input >> ws;
while (!input.eof() && input.peek() == '#') // peek() at eof sets fail()
{
JIgnoreLine(input);
input >> ws;
}
if (input.eof() || input.fail())
{
break;
}
id = JReadUntilws(input);
if (debug)
{
cout << id << endl;
}
if (input.eof() || input.fail())
{
break;
}
JString* s = new JString;
assert( s != NULL );
input >> *s;
if (input.eof() || input.fail())
{
delete s;
break;
}
if (CanOverride(id))
{
SetElement(id, s, JPtrArrayT::kDelete);
}
else if (!SetNewElement(id, s))
{
delete s;
}
}
}
SCLinearComp::SCLinearComp
(
istream& input,
const SCComponentType type,
SCCircuit* theCircuit
)
:
SCComponent(input, type, theCircuit)
{
SCLinearCompX();
SetValueSymbol(GetName());
const JString posNodeName = JReadUntilws(input);
itsPosNode = theCircuit->FindAddNode(posNodeName);
const JString negNodeName = JReadUntilws(input);
itsNegNode = theCircuit->FindAddNode(negNodeName);
}
SCACSource::SCACSource
(
std::istream& input,
const SCComponentType type,
SCCircuit* theCircuit
)
:
SCLinearComp(input, type, theCircuit)
{
const JString subType = JReadUntilws(input);
input >> itsMagnitude;
const JString multStr = JReadUntilws(input);
itsMagnitude *= GetSpiceMultiplier(multStr);
if (subType == "AC")
{
input >> itsPhase;
}
SCVdepSource::SCVdepSource
(
std::istream& input,
const SCComponentType type,
SCCircuit* theCircuit
)
:
SCDepSource(input, type, theCircuit)
{
SCVdepSourceX();
const JString posNodeName = JReadUntilws(input);
itsPosDepNode = theCircuit->FindAddNode(posNodeName);
const JString negNodeName = JReadUntilws(input);
itsNegDepNode = theCircuit->FindAddNode(negNodeName);
JFloat coeff;
input >> coeff;
const JString multStr = JReadUntilws(input);
coeff *= GetSpiceMultiplier(multStr);
SetCoeffValue(coeff);
}
void
GFGLink::ParseInterface
(
GFGMemberFunction* fn,
const JIndex line
)
{
std::ifstream is(itsCurrentFile);
if (!is.good())
{
return;
}
// skip to the function's line
JString str;
for (JIndex i = 1; i < line; i++)
{
str = JReadLine(is);
}
JSize p1 = JTellg(is);
is >> std::ws;
str = JReadUntilws(is);
if (str != "virtual")
{
return;
}
is >> std::ws;
// return type
str = JReadUntilws(is);
if (str == "const")
{
str += " " + JReadUntilws(is);
}
fn->SetReturnType(str);
is >> std::ws;
// this should be the function name
str = JReadUntil(is, '(');
str.TrimWhitespace();
if (str != fn->GetFnName())
{
return;
}
// get arguments
JCharacter delim = ',';
while (delim == ',')
{
JBoolean ok = JReadUntil(is, 2, ",)", &str, &delim);
if (!ok)
{
return;
}
JIndex findex;
if (str.LocateSubstring("//", &findex))
{
JIndex eindex;
if (str.LocateSubstring("\n", &eindex) &&
eindex >= findex)
{
str.RemoveSubstring(findex, eindex);
}
}
str.TrimWhitespace();
if (!str.IsEmpty())
{
fn->AddArg(str);
}
}
is >> std::ws;
// is it const;
str = JReadUntil(is, ';');
if (str.Contains("const"))
{
fn->ShouldBeConst(kJTrue);
}
JSize p2 = JTellg(is);
JSeekg(is, p1);
str = JRead(is, p2 - p1);
fn->SetInterface(str);
}
void
GenerateCode
(
istream& input,
ostream& output,
const JString& stringPath,
const JString& formName,
const JString& tagName,
const JString& userTopEnclVarName,
JPtrArray<JString>* objTypes,
JPtrArray<JString>* objNames
)
{
JIndex i;
// width
input >> ws;
JString line = JReadUntilws(input);
assert( line == kFormWidthMarker );
JSize formWidth;
input >> formWidth;
// height
input >> ws;
line = JReadUntilws(input);
assert( line == kFormHeightMarker );
JSize formHeight;
input >> formHeight;
// object count (marker contains whitespace)
input >> ws;
line = JReadUntil(input, ':') + ":";
assert( line == kFormObjCountMarker );
JSize itemCount;
input >> itemCount;
// create window
const JString topEnclFrameName = tagName + "_Frame";
const JString topEnclApName = tagName + "_Aperture";
JString topEnclVarName;
if (tagName == kDefaultDelimTag)
{
topEnclVarName = kDefTopEnclVarName;
output << " JXWindow* window = new JXWindow(this, ";
output << formWidth << ',' << formHeight;
output << ", \"\");" << endl;
output << " assert( window != NULL );" << endl;
output << endl;
}
else
{
assert( !userTopEnclVarName.IsEmpty() );
topEnclVarName = userTopEnclVarName;
output << " const JRect ";
topEnclFrameName.Print(output);
output << " = ";
topEnclVarName.Print(output);
output << "->GetFrame();" << endl;
output << " const JRect ";
topEnclApName.Print(output);
output << " = ";
topEnclVarName.Print(output);
output << "->GetAperture();" << endl;
output << " ";
topEnclVarName.Print(output);
output << "->AdjustSize(" << formWidth << " - ";
topEnclApName.Print(output);
output << ".width(), " << formHeight << " - ";
topEnclApName.Print(output);
output << ".height());" << endl;
output << endl;
}
// We need to calculate the enclosure for each object. Since objects
// are drawn in the order added, an object must come after its enclosure
// in the list in order to be visible.
JArray<JRect> rectList(10);
JArray<JBoolean> isInstanceVar(10);
// This array is used to send the options to ApplyOptions.
// It does not own the pointers that it contains.
JPtrArray<JString> optionValues(JPtrArrayT::kForgetAll, kOptionCount);
for (i=1; i<=kOptionCount; i++)
{
optionValues.Append(NULL);
}
// generate code for each object
JStringManager stringMgr;
JIndex objCount = 1;
for (i=1; i<=itemCount; i++)
{
// check for start-of-object
input >> ws;
line = JReadLine(input);
assert( line == kBeginObjLine );
// object class
JString flClass = JReadLine(input);
RemoveIdentifier(kObjClassMarker, &flClass);
// object type
JString flType = JReadLine(input);
RemoveIdentifier(kObjTypeMarker, &flType);
// object frame
input >> ws;
line = JReadUntilws(input);
assert( line == kObjRectMarker );
JCoordinate x,y,w,h;
input >> x >> y >> w >> h >> ws;
const JRect frame(y, x, y+h, x+w);
rectList.AppendElement(frame);
// box type
JString boxType = JReadLine(input);
RemoveIdentifier(kObjBoxTypeMarker, &boxType);
// colors
input >> ws;
line = JReadUntilws(input);
assert( line == kObjColorsMarker );
JString col1 = JReadUntilws(input);
optionValues.SetElement(kCol1Index, &col1, JPtrArrayT::kForget);
JString col2 = JReadUntilws(input);
optionValues.SetElement(kCol2Index, &col2, JPtrArrayT::kForget);
// label info
JString lAlign = JReadLine(input);
RemoveIdentifier(kObjLAlignMarker, &lAlign);
JString lStyle = JReadLine(input);
RemoveIdentifier(kObjLStyleMarker, &lStyle);
JString lSize = JReadLine(input);
RemoveIdentifier(kObjLSizeMarker, &lSize);
JString lColor = JReadLine(input);
RemoveIdentifier(kObjLColorMarker, &lColor);
JString label = JReadLine(input);
RemoveIdentifier(kObjLabelMarker, &label);
// shortcuts
JString shortcuts = JReadLine(input);
RemoveIdentifier(kObjShortcutMarker, &shortcuts);
optionValues.SetElement(kShortcutsIndex, &shortcuts, JPtrArrayT::kForget);
// resizing (ignored)
JIgnoreLine(input);
// gravity
input >> ws;
line = JReadUntilws(input);
assert( line == kObjGravityMarker );
const JString nwGravity = JReadUntilws(input);
const JString seGravity = JReadUntilws(input);
// variable name
JBoolean isLocal = kJFalse;
JString* varName = new JString(JReadLine(input));
assert( varName != NULL );
RemoveIdentifier(kObjNameMarker, varName);
if (varName->IsEmpty())
{
isInstanceVar.AppendElement(kJFalse);
GetTempVarName(tagName, varName, *objNames);
isLocal = kJTrue;
}
else if (varName->GetFirstCharacter() == '(' &&
varName->GetLastCharacter() == ')')
{
isInstanceVar.AppendElement(kJFalse);
isLocal = kJTrue;
*varName = varName->GetSubstring(2, varName->GetLength()-1);
}
else if (varName->GetFirstCharacter() == '<' &&
varName->GetLastCharacter() == '>')
{
isInstanceVar.AppendElement(kJFalse);
*varName = varName->GetSubstring(2, varName->GetLength()-1);
}
else
{
isInstanceVar.AppendElement(kJTrue);
}
objNames->Append(varName);
// callback (ignored)
JIgnoreLine(input);
// callback argument
JString cbArg = JReadLine(input);
RemoveIdentifier(kObjCBArgMarker, &cbArg);
JString cbArgExtra;
do
{
cbArgExtra = JReadLine(input);
cbArgExtra.TrimWhitespace();
}
while (!cbArgExtra.IsEmpty());
// don't bother to generate code for initial box
// if it is FL_BOX, FLAT_BOX, FL_COL1
if (i==1 && flClass == "FL_BOX" && flType == "FLAT_BOX" && col1 == "FL_COL1")
{
rectList.RemoveElement(objCount);
isInstanceVar.RemoveElement(objCount);
objNames->DeleteElement(objCount);
continue;
}
// check for errors -- safe since we have read in entire object
JString hSizing, vSizing;
if (!ParseGravity(nwGravity, &hSizing, &vSizing))
{
cerr << "Illegal sizing specification ";
cerr << nwGravity << ',' << seGravity;
cerr << " for '" << *varName << '\'' << endl;
rectList.RemoveElement(objCount);
isInstanceVar.RemoveElement(objCount);
objNames->DeleteElement(objCount);
continue;
}
if (*varName == topEnclVarName)
{
cerr << "Cannot use reserved name '" << topEnclVarName << '\'' << endl;
rectList.RemoveElement(objCount);
isInstanceVar.RemoveElement(objCount);
objNames->DeleteElement(objCount);
continue;
}
// get the object's enclosure
JIndex enclIndex;
JString enclName;
JRect localFrame = frame;
if (GetEnclosure(rectList, objCount, &enclIndex))
{
enclName = *(objNames->NthElement(enclIndex));
const JRect enclFrame = rectList.GetElement(enclIndex);
localFrame.Shift(-enclFrame.topLeft());
}
else
{
enclName = topEnclVarName;
}
// get the class name and additional arguments
JString* className = new JString;
assert( className != NULL );
objTypes->Append(className);
JString argList;
if (!GetConstructor(flClass, flType, &label, className, &argList))
{
cerr << "Unsupported class: " << flClass << ", " << flType << endl;
rectList.RemoveElement(objCount);
isInstanceVar.RemoveElement(objCount);
objNames->DeleteElement(objCount);
objTypes->DeleteElement(objCount);
continue;
}
// generate the actual code
const JBoolean needCreate = NeedsCreateFunction(*className);
output << " ";
if (isLocal)
{
className->Print(output);
output << "* ";
}
varName->Print(output);
output << " =" << endl;
output << " ";
if (!needCreate)
{
output << "new ";
}
className->Print(output);
if (needCreate)
{
output << "::Create";
}
output << '(';
if (!argList.IsEmpty())
{
argList.Print(output);
if (argList.GetLastCharacter() != ',')
{
output << ',';
}
output << ' ';
}
if (!cbArg.IsEmpty())
{
cbArg.Print(output);
if (cbArg.GetLastCharacter() != ',')
{
output << ',';
}
output << ' ';
}
if ((*className == "JXStaticText" && cbArg.IsEmpty()) ||
NeedsStringArg(*className))
{
JString id = *varName;
id += "::";
id += formName;
id += "::";
id += tagName; // last since it is almost always the same
output << "JGetString(\"";
id.Print(output);
output << "\"), ";
stringMgr.SetElement(id, label, JPtrArrayT::kDelete);
}
enclName.Print(output);
output << ',' << endl;
output << " JXWidget::";
hSizing.Print(output);
output << ", JXWidget::";
vSizing.Print(output);
output << ", " << localFrame.left << ',' << localFrame.top << ", ";
output << localFrame.width() << ',' << localFrame.height() << ");" << endl;
output << " assert( ";
varName->Print(output);
output << " != NULL );" << endl;
ApplyOptions(output, *className, formName, tagName, *varName, optionValues,
lSize, lStyle, lColor, &stringMgr);
if (*className == "JXStaticText" && cbArg.IsEmpty() &&
!lAlign.Contains("FL_ALIGN_TOP") && localFrame.height() <= 20)
{
output << " ";
varName->Print(output);
output << "->SetToLabel();" << endl;
}
output << endl;
// now we know the object is valid
objCount++;
}
// write string database
JString dbFileName = stringPath + formName;
if (tagName != kDefaultDelimTag)
{
dbFileName += kCustomTagMarker + tagName;
}
dbFileName += "_layout";
if (stringMgr.GetElementCount() > 0)
{
JEditVCS(dbFileName);
ofstream dbOutput(dbFileName);
stringMgr.WriteFile(dbOutput);
}
else
{
JRemoveVCS(dbFileName);
JRemoveFile(dbFileName);
}
// reset enclosure size
if (tagName != kDefaultDelimTag)
{
output << " ";
topEnclVarName.Print(output);
output << "->SetSize(";
topEnclFrameName.Print(output);
output << ".width(), ";
topEnclFrameName.Print(output);
output << ".height());" << endl;
output << endl;
}
// throw away temporary variables
objCount--;
assert( objCount == isInstanceVar.GetElementCount() );
assert( objCount == objTypes->GetElementCount() );
assert( objCount == objNames->GetElementCount() );
for (i=objCount; i>=1; i--)
{
if (!isInstanceVar.GetElement(i))
{
objTypes->DeleteElement(i);
objNames->DeleteElement(i);
}
}
}
void
ApplyOptions
(
ostream& output,
const JString& className,
const JString& formName,
const JString& tagName,
const JString& varName,
const JPtrArray<JString>& values,
const JString& flSize,
const JString& flStyle,
const JString& flColor,
JStringManager* stringMgr
)
{
ifstream optionMap(optionMapFile);
optionMap >> ws;
while (1)
{
if (optionMap.peek() == '#')
{
JIgnoreLine(optionMap);
}
else
{
const JString aClassName = JReadUntilws(optionMap);
if (optionMap.eof() || optionMap.fail())
{
break;
}
else if (aClassName != className)
{
for (JIndex i=1; i<=kOptionCount; i++)
{
JIgnoreLine(optionMap);
}
}
else
{
JIndex i;
JBoolean supported;
// shortcuts
optionMap >> ws >> supported;
if (supported)
{
optionMap >> ws;
const JString function = JReadUntilws(optionMap);
const JString* value = values.NthElement(kShortcutsIndex);
if (!value->IsEmpty())
{
JString id = varName;
id += "::";
id += formName;
id += "::shortcuts::";
id += tagName; // last since it is almost always the same
output << " ";
varName.Print(output);
output << "->";
function.Print(output);
output << "(JGetString(\"";
id.Print(output);
output << "\"));" << endl;
JString* s = new JString(*value);
assert( s != NULL );
stringMgr->SetElement(id, s, JPtrArrayT::kDelete);
}
}
else
{
JIgnoreLine(optionMap);
}
// colors
for (i=2; i<=kOptionCount; i++)
{
optionMap >> ws >> supported;
if (supported)
{
optionMap >> ws;
const JString defValue = JReadUntilws(optionMap);
const JString function = JReadUntilws(optionMap);
const JString* value = values.NthElement(i);
if (*value != defValue)
{
JString jxColor;
if (ConvertXFormsColor(*value, &jxColor))
{
output << " ";
varName.Print(output);
output << "->";
function.Print(output);
output << '(';
jxColor.Print(output);
output << ");" << endl;
}
else
{
cerr << "Unknown color: " << *value << endl;
}
}
}
else
{
JIgnoreLine(optionMap);
}
}
}
}
void
SMTPMessage::Send()
{
HandleAddresses();
AppendToOutbox("From ");
AppendToOutbox(*itsFrom);
AppendToOutbox(" ");
struct timeb tp;
ftime(&tp);
JString date(ctime(&(tp.time)));
AppendToOutbox(date);
std::istrstream is(date.GetCString(), date.GetLength());
JString dow;
JString mon;
JString day;
JString rest;
dow = JReadUntilws(is);
mon = JReadUntilws(is);
day = JReadUntilws(is);
JReadAll(is, &rest);
AppendToOutbox("Date: ");
AppendToOutbox(dow);
AppendToOutbox(", ");
AppendToOutbox(day);
AppendToOutbox(" ");
AppendToOutbox(mon);
AppendToOutbox(" ");
AppendToOutbox(rest);
JString addrStr = itsSMTPServer;
if (!addrStr.Contains(":"))
{
addrStr += ":25";
}
ACE_INET_Addr addr(addrStr);
itsLink = new InetLink;
assert(itsLink != NULL);
itsConnector = new INETConnector;
assert( itsConnector != NULL );
ACE_Synch_Options options(ACE_Synch_Options::USE_REACTOR, ACE_Time_Value(kMaxWaitSeconds));
if (itsConnector->connect(itsLink, addr, options) == -1 &&
jerrno() != EAGAIN)
{
JString notice = "No response from sendmail : Error number ";
int errNumber = jerrno();
notice += JString(errNumber);
JGetUserNotification()->ReportError(notice);
itsDeleteTask = new JXTimerTask(1000,kJTrue);
assert( itsDeleteTask != NULL );
itsDeleteTask->Start();
ListenTo(itsDeleteTask);
Broadcast(SendFailure());
// itsLink = NULL;
return;
}
itsTimeoutTask = new JXTimerTask(kMaxWaitSeconds * 1000,kJTrue);
assert( itsTimeoutTask != NULL );
itsTimeoutTask->Start();
ListenTo(itsTimeoutTask);
ClearWhenGoingAway(itsLink, &itsLink);
}
