//------------------------------------------------------------------------------
//deleteData() -- delete member data
//------------------------------------------------------------------------------
void KeithleyDeviceImp::deleteData()
{
if (driverInstance != 0) {
// stop all active tasks and unload the DriverLINUX driver
CloseDriverLINX(driverInstance);
driverInstance = 0;
}
if (analogServReq != 0) {
// see if buffer list has been created
if (analogServReq->lpBuffers != 0) {
// if the buffer list exists, is there actually a pointer to a buffer?
if (analogServReq->lpBuffers->BufferAddr[0] != 0) {
// de-allocate the buffer, and clear its pointer
BufFree(analogServReq->lpBuffers->BufferAddr[0]);
analogServReq->lpBuffers->BufferAddr[0] = 0;
}
// delete the buffer list, we don't need it anymore
delete(analogServReq->lpBuffers);
analogServReq->lpBuffers = 0;
}
delete analogServReq;
analogServReq = 0;
}
if (analogValues != 0) {
delete [] analogValues;
analogValues = 0;
}
if (digitalServReq != 0) {
// see if buffer list has been created
if(digitalServReq->lpBuffers != 0) {
// if the buffer list exists, is there actually a pointer to a buffer?
if(digitalServReq->lpBuffers->BufferAddr[0] != 0) {
// de-allocate the buffer, and clear its pointer
BufFree(digitalServReq->lpBuffers->BufferAddr[0]);
digitalServReq->lpBuffers->BufferAddr[0] = 0;
}
// delete the buffer list, we don't need it anymore
delete(digitalServReq->lpBuffers);
digitalServReq->lpBuffers = 0;
}
delete digitalServReq;
digitalServReq = 0;
}
digitalValues = 0;
driverOpen = false;
openFailed = false;
}
void
TTinyTP::TTPHandleAcceptComplete(IrDAErr result, TTPBuf *userdata)
{
check(userdata);
BufFree(userdata); // free buffer alloc'd by ttp.c in accept routine
TTPAcceptDoneIndication(result); // just result, no buffer, since we copied clients during accept
}
/*
** Complete a block text drag operation
*/
void FinishBlockDrag(TextWidget tw)
{
dragEndCBStruct endStruct;
int modRangeStart = -1, origModRangeEnd, bufModRangeEnd;
char *deletedText;
/* Find the changed region of the buffer, covering both the deletion
of the selected text at the drag start position, and insertion at
the drag destination */
trackModifyRange(&modRangeStart, &bufModRangeEnd, &origModRangeEnd,
tw->text.dragSourceDeletePos, tw->text.dragSourceInserted,
tw->text.dragSourceDeleted);
trackModifyRange(&modRangeStart, &bufModRangeEnd, &origModRangeEnd,
tw->text.dragInsertPos, tw->text.dragInserted,
tw->text.dragDeleted);
/* Get the original (pre-modified) range of text from saved backup buffer */
deletedText = BufGetRange(tw->text.dragOrigBuf, modRangeStart,
origModRangeEnd);
/* Free the backup buffer */
BufFree(tw->text.dragOrigBuf);
/* Return to normal drag state */
tw->text.dragState = NOT_CLICKED;
/* Call finish-drag calback */
endStruct.startPos = modRangeStart;
endStruct.nCharsDeleted = origModRangeEnd - modRangeStart;
endStruct.nCharsInserted = bufModRangeEnd - modRangeStart;
endStruct.deletedText = deletedText;
XtCallCallbacks((Widget)tw, textNdragEndCallback, (XtPointer)&endStruct);
XtFree(deletedText);
}
/*
** Cancel a block drag operation
*/
void CancelBlockDrag(TextWidget tw)
{
textBuffer *buf = tw->text.textD->buffer;
textBuffer *origBuf = tw->text.dragOrigBuf;
selection *origSel = &origBuf->primary;
int modRangeStart = -1, origModRangeEnd, bufModRangeEnd;
char *repText;
dragEndCBStruct endStruct;
/* If the operation was a move, make the modify range reflect the
removal of the text from the starting position */
if (tw->text.dragSourceDeleted != 0)
trackModifyRange(&modRangeStart, &bufModRangeEnd, &origModRangeEnd,
tw->text.dragSourceDeletePos, tw->text.dragSourceInserted,
tw->text.dragSourceDeleted);
/* Include the insert being undone from the last step in the modified
range. */
trackModifyRange(&modRangeStart, &bufModRangeEnd, &origModRangeEnd,
tw->text.dragInsertPos, tw->text.dragInserted, tw->text.dragDeleted);
/* Make the changes in the buffer */
repText = BufGetRange(origBuf, modRangeStart, origModRangeEnd);
BufReplace(buf, modRangeStart, bufModRangeEnd, repText);
XtFree(repText);
/* Reset the selection and cursor position */
if (origSel->rectangular)
BufRectSelect(buf, origSel->start, origSel->end, origSel->rectStart,
origSel->rectEnd);
else
BufSelect(buf, origSel->start, origSel->end);
TextDSetInsertPosition(tw->text.textD, buf->cursorPosHint);
XtCallCallbacks((Widget)tw, textNcursorMovementCallback, NULL);
tw->text.emTabsBeforeCursor = 0;
/* Free the backup buffer */
BufFree(origBuf);
/* Indicate end of drag */
tw->text.dragState = DRAG_CANCELED;
/* Call finish-drag calback */
endStruct.startPos = 0;
endStruct.nCharsDeleted = 0;
endStruct.nCharsInserted = 0;
endStruct.deletedText = NULL;
XtCallCallbacks((Widget)tw, textNdragEndCallback, (XtPointer)&endStruct);
}
void
TTinyTP::TTPHandleDataIndication (
TTPBuf *userData) // data read
{
int credit;
Boolean m;
check(userData);
{ int position, bufsize;
position = BufUsed(userData); // should be zero
bufsize = BufSize(userData); // amount read
XTRACE(kHandleDataIndication, position, bufsize);
}
ttp_pdu_data_parse(userData, &m, &credit); // strips out ttp overhead byte
this->SendCredit += credit;
if (SendCredit > 30) SendCredit = 30; // FIXME: temp workaround for HP runaway credits
// WARNING: HP tells us that Microsoft believes in
// extending lots and lots of credits, and relies on
// lap-layer flow control to survive.
if (credit > 0) // if we've been given more credits from IrLan box
TTPBackEnable(); // then tell clients flow-control state has changed
if (BufSize(userData) > 0) {
XTRACE(kHandleDataIndication, m, credit); // log what we parsed
this->RemoteCredit--;
if (m == false) // if no More data
this->AppendTail(&(this->RxQueue), TTP_Segment_Last, 0, userData);
else // else have More data
this->AppendTail(&(this->RxQueue), TTP_Segment, 0, userData);
}
else {
XTRACE(kDataLessPacket, m, credit); // log we received a dataless packet
BufFree(userData); // we're done with it now...
}
// Make sure a read is pending at all times .... this could
// use a better model. Only post if connected.
if( this->Connected )
{ CBufferSegment *getBuf;
getBuf = BufAlloc(2048+5); // need up to max lap size
require(getBuf, NoMem);
this->DataGet(getBuf);
}
NoMem:
return;
}
/*
** Callbacks for window controls
*/
static void closeCB(Widget w, XtPointer clientData, XtPointer callData)
{
int topic;
if ((topic = findTopicFromShellWidget((Widget)clientData)) == -1)
return;
/* I don't understand the mechanism by which this can be called with
HelpWindows[topic] as NULL, but it has happened */
XtDestroyWidget(HelpWindows[topic]);
HelpWindows[topic] = NULL;
if (HelpStyleBuffers[topic] != NULL)
{
BufFree(HelpStyleBuffers[topic]);
HelpStyleBuffers[topic] = NULL;
}
}
void
TTinyTP::TTPHandleConnectConfirm (
TTPSAP sap, // calling TTP SAP
TIrQOS *ourQOS, // our QoS
TIrQOS *peerQOS, // peer QoS
TTPBuf *userData) // calling UserData
{
unsigned char plist[100]; // enough for me ...
int p; // parameters?
int n; // initial credit
XTRACE(kHandleConnectConfirm, 0, 0);
ttp_pdu_connect_parse(userData, &p, &n, &plist[0]); // strips out ttp pdu params
this->SendCredit = n;
this->TxMaxSduSize = 0;
//this->MaxSegSize = MaxTxIrLapDataSize - 3;
this->MaxSegSize = peerQOS->GetDataSize() - 3; // get max send pkt size
if (p == 1) {
UInt32 value;
if (ttp_pdu_connect_get_max_sdu_size(plist, &value))
this->TxMaxSduSize = value;
XTRACE(kHandleConnectConfirm, 1, value);
}
this->Connected = true; // change state before my callback does more work!
// this is a rather different ... as soon as the TTP session is open, hang a read
// on the connection. every time a read completes, pass the buffer up, allocate
// a new one, and hang another read out. TTP Client is responsible for eventually
// freeing the buffers passed to it via DataIndication().
{ CBufferSegment *getBuf;
getBuf = BufAlloc(2048+5); // need up to max lap size
require(getBuf, NoMem); // not a lot I can do w/out a read buffer
this->DataGet(getBuf); // start the read
}
// Now that the read is pending, tell the client .... (was in other order)
TTPConnectConfirm(sap, ourQOS, peerQOS, this->TxMaxSduSize, userData); // virtual callback to ttp client
BufFree(userData); // free the connect buffer allocated by PDU Connect
NoMem:
return;
}
/*
** Start the process of dragging the current primary-selected text across
** the window (move by dragging, as opposed to dragging to create the
** selection)
*/
void BeginBlockDrag(TextWidget tw)
{
textDisp *textD = tw->text.textD;
textBuffer *buf = textD->buffer;
int fontHeight = textD->fontStruct->ascent + textD->fontStruct->descent;
int fontWidth = textD->fontStruct->max_bounds.width;
selection *sel = &buf->primary;
int nLines, mousePos, lineStart;
int x, y, lineEnd;
char *text;
/* Save a copy of the whole text buffer as a backup, and for
deriving changes */
tw->text.dragOrigBuf = BufCreate();
BufSetTabDistance(tw->text.dragOrigBuf, buf->tabDist);
tw->text.dragOrigBuf->useTabs = buf->useTabs;
text = BufGetAll(buf);
BufSetAll(tw->text.dragOrigBuf, text);
XtFree(text);
if (sel->rectangular)
BufRectSelect(tw->text.dragOrigBuf, sel->start, sel->end, sel->rectStart,
sel->rectEnd);
else
BufSelect(tw->text.dragOrigBuf, sel->start, sel->end);
/* Record the mouse pointer offsets from the top left corner of the
selection (the position where text will actually be inserted In dragging
non-rectangular selections) */
if (sel->rectangular) {
tw->text.dragXOffset = tw->text.btnDownX + textD->horizOffset -
textD->left - sel->rectStart * fontWidth;
} else {
if (!TextDPositionToXY(textD, sel->start, &x, &y))
x = BufCountDispChars(buf, TextDStartOfLine(textD, sel->start),
sel->start) * fontWidth + textD->left -
textD->horizOffset;
tw->text.dragXOffset = tw->text.btnDownX - x;
}
mousePos = TextDXYToPosition(textD, tw->text.btnDownX, tw->text.btnDownY);
nLines = BufCountLines(buf, sel->start, mousePos);
tw->text.dragYOffset = nLines * fontHeight + (((tw->text.btnDownY -
tw->text.marginHeight) % fontHeight) - fontHeight/2);
tw->text.dragNLines = BufCountLines(buf, sel->start, sel->end);
/* Record the current drag insert position and the information for
undoing the fictional insert of the selection in its new position */
tw->text.dragInsertPos = sel->start;
tw->text.dragInserted = sel->end - sel->start;
if (sel->rectangular) {
textBuffer *testBuf = BufCreate();
char *testText = BufGetRange(buf, sel->start, sel->end);
BufSetTabDistance(testBuf, buf->tabDist);
testBuf->useTabs = buf->useTabs;
BufSetAll(testBuf, testText);
XtFree(testText);
BufRemoveRect(testBuf, 0, sel->end - sel->start, sel->rectStart,
sel->rectEnd);
tw->text.dragDeleted = testBuf->length;
BufFree(testBuf);
tw->text.dragRectStart = sel->rectStart;
} else {
tw->text.dragDeleted = 0;
tw->text.dragRectStart = 0;
}
tw->text.dragType = DRAG_MOVE;
tw->text.dragSourceDeletePos = sel->start;
tw->text.dragSourceInserted = tw->text.dragDeleted;
tw->text.dragSourceDeleted = tw->text.dragInserted;
/* For non-rectangular selections, fill in the rectangular information in
the selection for overlay mode drags which are done rectangularly */
if (!sel->rectangular) {
lineStart = BufStartOfLine(buf, sel->start);
if (tw->text.dragNLines == 0) {
tw->text.dragOrigBuf->primary.rectStart =
BufCountDispChars(buf, lineStart, sel->start);
tw->text.dragOrigBuf->primary.rectEnd =
BufCountDispChars(buf, lineStart, sel->end);
} else {
lineEnd = BufGetCharacter(buf, sel->end - 1) == '\n' ?
sel->end - 1 : sel->end;
findTextMargins(buf, lineStart, lineEnd,
&tw->text.dragOrigBuf->primary.rectStart,
&tw->text.dragOrigBuf->primary.rectEnd);
}
}
/* Set the drag state to announce an ongoing block-drag */
tw->text.dragState = PRIMARY_BLOCK_DRAG;
/* Call the callback announcing the start of a block drag */
XtCallCallbacks((Widget)tw, textNdragStartCallback, (XtPointer)NULL);
}
/*
** Reposition the primary-selected text that is being dragged as a block
** for a new mouse position of (x, y)
*/
void BlockDragSelection(TextWidget tw, int x, int y, int dragType)
{
textDisp *textD = tw->text.textD;
textBuffer *buf = textD->buffer;
int fontHeight = textD->fontStruct->ascent + textD->fontStruct->descent;
int fontWidth = textD->fontStruct->max_bounds.width;
textBuffer *origBuf = tw->text.dragOrigBuf;
int dragXOffset = tw->text.dragXOffset;
textBuffer *tempBuf;
selection *origSel = &origBuf->primary;
int rectangular = origSel->rectangular;
int overlay, oldDragType = tw->text.dragType;
int nLines = tw->text.dragNLines;
int insLineNum, insLineStart, insRectStart, insRectEnd, insStart;
char *repText, *text, *insText;
int modRangeStart = -1, tempModRangeEnd = -1, bufModRangeEnd = -1;
int referenceLine, referencePos, tempStart, tempEnd, origSelLen;
int insertInserted, insertDeleted, row, column;
int origSelLineStart, origSelLineEnd;
int sourceInserted, sourceDeleted, sourceDeletePos;
if (tw->text.dragState != PRIMARY_BLOCK_DRAG)
return;
/* The operation of block dragging is simple in theory, but not so simple
in practice. There is a backup buffer (tw->text.dragOrigBuf) which
holds a copy of the buffer as it existed before the drag. When the
user drags the mouse to a new location, this routine is called, and
a temporary buffer is created and loaded with the local part of the
buffer (from the backup) which might be changed by the drag. The
changes are all made to this temporary buffer, and the parts of this
buffer which then differ from the real (displayed) buffer are used to
replace those parts, thus one replace operation serves as both undo
and modify. This double-buffering of the operation prevents excessive
redrawing (though there is still plenty of needless redrawing due to
re-selection and rectangular operations).
The hard part is keeping track of the changes such that a single replace
operation will do everyting. This is done using a routine called
trackModifyRange which tracks expanding ranges of changes in the two
buffers in modRangeStart, tempModRangeEnd, and bufModRangeEnd. */
/* Create a temporary buffer for accumulating changes which will
eventually be replaced in the real buffer. Load the buffer with the
range of characters which might be modified in this drag step
(this could be tighter, but hopefully it's not too slow) */
tempBuf = BufCreate();
tempBuf->tabDist = buf->tabDist;
tempBuf->useTabs = buf->useTabs;
tempStart = min3(tw->text.dragInsertPos, origSel->start,
BufCountBackwardNLines(buf, textD->firstChar, nLines+2));
tempEnd = BufCountForwardNLines(buf, max3(tw->text.dragInsertPos,
origSel->start, textD->lastChar), nLines+2) +
origSel->end - origSel->start;
text = BufGetRange(origBuf, tempStart, tempEnd);
BufSetAll(tempBuf, text);
XtFree(text);
/* If the drag type is USE_LAST, use the last dragType applied */
if (dragType == USE_LAST)
dragType = tw->text.dragType;
overlay = dragType == DRAG_OVERLAY_MOVE || dragType == DRAG_OVERLAY_COPY;
/* Overlay mode uses rectangular selections whether or not the original
was rectangular. To use a plain selection as if it were rectangular,
the start and end positions need to be moved to the line boundaries
and trailing newlines must be excluded */
origSelLineStart = BufStartOfLine(origBuf, origSel->start);
if (!rectangular && BufGetCharacter(origBuf, origSel->end - 1) == '\n')
origSelLineEnd = origSel->end - 1;
else
origSelLineEnd = BufEndOfLine(origBuf, origSel->end);
if (!rectangular && overlay && nLines != 0)
dragXOffset -= fontWidth * (origSel->rectStart -
(origSel->start - origSelLineStart));
/* If the drag operation is of a different type than the last one, and the
operation is a move, expand the modified-range to include undoing the
text-removal at the site from which the text was dragged. */
if (dragType != oldDragType && tw->text.dragSourceDeleted != 0)
trackModifyRange(&modRangeStart, &bufModRangeEnd, &tempModRangeEnd,
tw->text.dragSourceDeletePos, tw->text.dragSourceInserted,
tw->text.dragSourceDeleted);
/* Do, or re-do the original text removal at the site where a move began.
If this part has not changed from the last call, do it silently to
bring the temporary buffer in sync with the real (displayed)
buffer. If it's being re-done, track the changes to complete the
redo operation begun above */
if (dragType == DRAG_MOVE || dragType == DRAG_OVERLAY_MOVE) {
if (rectangular || overlay) {
int prevLen = tempBuf->length;
origSelLen = origSelLineEnd - origSelLineStart;
if (overlay)
BufClearRect(tempBuf, origSelLineStart-tempStart,
origSelLineEnd-tempStart, origSel->rectStart,
origSel->rectEnd);
else
BufRemoveRect(tempBuf, origSelLineStart-tempStart,
origSelLineEnd-tempStart, origSel->rectStart,
origSel->rectEnd);
sourceDeletePos = origSelLineStart;
sourceInserted = origSelLen - prevLen + tempBuf->length;
sourceDeleted = origSelLen;
} else {
BufRemove(tempBuf, origSel->start - tempStart,
origSel->end - tempStart);
sourceDeletePos = origSel->start;
sourceInserted = 0;
sourceDeleted = origSel->end - origSel->start;
}
if (dragType != oldDragType)
trackModifyRange(&modRangeStart, &tempModRangeEnd, &bufModRangeEnd,
sourceDeletePos, sourceInserted, sourceDeleted);
} else {
sourceDeletePos = 0;
sourceInserted = 0;
sourceDeleted = 0;
}
/* Expand the modified-range to include undoing the insert from the last
call. */
trackModifyRange(&modRangeStart, &bufModRangeEnd, &tempModRangeEnd,
tw->text.dragInsertPos, tw->text.dragInserted, tw->text.dragDeleted);
/* Find the line number and column of the insert position. Note that in
continuous wrap mode, these must be calculated as if the text were
not wrapped */
TextDXYToUnconstrainedPosition(textD, max(0, x - dragXOffset),
max(0, y - (tw->text.dragYOffset % fontHeight)), &row, &column);
column = TextDOffsetWrappedColumn(textD, row, column);
row = TextDOffsetWrappedRow(textD, row);
insLineNum = row + textD->topLineNum - tw->text.dragYOffset / fontHeight;
/* find a common point of reference between the two buffers, from which
the insert position line number can be translated to a position */
if (textD->firstChar > modRangeStart) {
referenceLine = textD->topLineNum -
BufCountLines(buf, modRangeStart, textD->firstChar);
referencePos = modRangeStart;
} else {
referencePos = textD->firstChar;
referenceLine = textD->topLineNum;
}
/* find the position associated with the start of the new line in the
temporary buffer */
insLineStart = findRelativeLineStart(tempBuf, referencePos - tempStart,
referenceLine, insLineNum) + tempStart;
if (insLineStart - tempStart == tempBuf->length)
insLineStart = BufStartOfLine(tempBuf, insLineStart - tempStart) +
tempStart;
/* Find the actual insert position */
if (rectangular || overlay) {
insStart = insLineStart;
insRectStart = column;
} else { /* note, this will fail with proportional fonts */
insStart = BufCountForwardDispChars(tempBuf, insLineStart - tempStart,
column) + tempStart;
insRectStart = 0;
}
/* If the position is the same as last time, don't bother drawing (it
would be nice if this decision could be made earlier) */
if (insStart == tw->text.dragInsertPos &&
insRectStart == tw->text.dragRectStart && dragType == oldDragType) {
BufFree(tempBuf);
return;
}
/* Do the insert in the temporary buffer */
if (rectangular || overlay) {
insText = BufGetTextInRect(origBuf, origSelLineStart, origSelLineEnd,
origSel->rectStart, origSel->rectEnd);
if (overlay)
BufOverlayRect(tempBuf, insStart - tempStart, insRectStart,
insRectStart + origSel->rectEnd - origSel->rectStart,
insText, &insertInserted, &insertDeleted);
else
BufInsertCol(tempBuf, insRectStart, insStart - tempStart, insText,
&insertInserted, &insertDeleted);
trackModifyRange(&modRangeStart, &tempModRangeEnd, &bufModRangeEnd,
insStart, insertInserted, insertDeleted);
XtFree(insText);
} else {
insText = BufGetSelectionText(origBuf);
BufInsert(tempBuf, insStart - tempStart, insText);
trackModifyRange(&modRangeStart, &tempModRangeEnd, &bufModRangeEnd,
insStart, origSel->end - origSel->start, 0);
insertInserted = origSel->end - origSel->start;
insertDeleted = 0;
XtFree(insText);
}
/* Make the changes in the real buffer */
repText = BufGetRange(tempBuf, modRangeStart - tempStart,
tempModRangeEnd - tempStart);
BufFree(tempBuf);
TextDBlankCursor(textD);
BufReplace(buf, modRangeStart, bufModRangeEnd, repText);
XtFree(repText);
/* Store the necessary information for undoing this step */
tw->text.dragInsertPos = insStart;
tw->text.dragRectStart = insRectStart;
tw->text.dragInserted = insertInserted;
tw->text.dragDeleted = insertDeleted;
tw->text.dragSourceDeletePos = sourceDeletePos;
tw->text.dragSourceInserted = sourceInserted;
tw->text.dragSourceDeleted = sourceDeleted;
tw->text.dragType = dragType;
/* Reset the selection and cursor position */
if (rectangular || overlay) {
insRectEnd = insRectStart + origSel->rectEnd - origSel->rectStart;
BufRectSelect(buf, insStart, insStart + insertInserted, insRectStart,
insRectEnd);
TextDSetInsertPosition(textD, BufCountForwardDispChars(buf,
BufCountForwardNLines(buf, insStart, tw->text.dragNLines),
insRectEnd));
} else {
BufSelect(buf, insStart, insStart + origSel->end - origSel->start);
TextDSetInsertPosition(textD, insStart + origSel->end - origSel->start);
}
TextDUnblankCursor(textD);
XtCallCallbacks((Widget)tw, textNcursorMovementCallback, (XtPointer)NULL);
tw->text.emTabsBeforeCursor = 0;
}
