blob: 7ed31acb2d3029aaac5fe7acb3355e2d1fb1cc80 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
|
#include <XSControl_SignTransferStatus.ixx>
#include <Transfer_Binder.hxx>
#include <TCollection_AsciiString.hxx>
#include <Interface_Check.hxx>
//#include <stdio.h>
static TCollection_AsciiString& themes()
{
static TCollection_AsciiString tm;
return tm;
}
// si resultat avec type: a exploiter tout de suite !
XSControl_SignTransferStatus::XSControl_SignTransferStatus ()
: IFSelect_Signature("Transfer Status") { }
XSControl_SignTransferStatus::XSControl_SignTransferStatus
(const Handle(XSControl_TransferReader)& TR)
: IFSelect_Signature("Transfer Status") ,
theTR (TR) { }
void XSControl_SignTransferStatus::SetReader
(const Handle(XSControl_TransferReader)& TR)
{ theTR = TR; }
void XSControl_SignTransferStatus::SetMap
(const Handle(Transfer_TransientProcess)& TP)
{ theTP = TP; }
Handle(Transfer_TransientProcess) XSControl_SignTransferStatus::Map () const
{ return theTP; }
Handle(XSControl_TransferReader) XSControl_SignTransferStatus::Reader () const
{ return theTR; }
// BinderStatus retourne une valeur :
// 0 Binder Null. 1 void 2 Warning seul 3 Fail seul
// 11 Resultat OK. 12 Resultat+Warning. 13 Resultat+Fail
// 20 Abnormal (Interrupted)
static Standard_Integer BinderStatus (const Handle(Transfer_Binder)& binder)
{
Standard_Integer stat = 0;
if (binder.IsNull()) return 0;
Interface_CheckStatus cst = binder->Check()->Status();
Transfer_StatusExec est = binder->StatusExec ();
Standard_Boolean res = binder->HasResult();
if (est == Transfer_StatusRun || est == Transfer_StatusLoop) return 20;
if (cst == Interface_CheckOK) stat = (res ? 11 : 1);
else if (cst == Interface_CheckWarning) stat = (res ? 12 : 2);
else if (cst == Interface_CheckFail) stat = (res ? 13 : 3);
return stat;
}
Standard_CString XSControl_SignTransferStatus::Value
(const Handle(Standard_Transient)& ent,
const Handle(Interface_InterfaceModel)& /*model*/) const
{
if (ent.IsNull()) return "";
Handle(Transfer_TransientProcess) TP = theTP;
if (TP.IsNull() && !theTR.IsNull()) TP = theTR->TransientProcess();
if (TP.IsNull()) return "";
Handle(Transfer_Binder) binder = TP->Find(ent);
Standard_Integer stat = BinderStatus (binder);
if (stat <= 1) return "";
if (stat == 2) return "Warning";
if (stat == 3) return "Fail";
if (stat == 20) return "Fail on run";
themes().Clear();
if (stat > 10) {
// Y a un resultat : donner son type
Handle(Transfer_Binder) bnd = binder;
Standard_Integer hasres = Standard_False;
while (!bnd.IsNull()) {
if (bnd->Status() != Transfer_StatusVoid) {
if (!hasres) themes().AssignCat("Result:");
else themes().AssignCat(",");
themes().AssignCat(bnd->ResultTypeName());
hasres = Standard_True;
}
bnd = bnd->NextResult();
}
// if (stat == 11) sprintf(themes,"Result:%s",binder->ResultTypeName());
if (stat == 12) themes().AssignCat("/Warning");
if (stat == 13) themes().AssignCat("/Fail");
}
return themes().ToCString();
}
|
