Skip to content

Commit cc51f10

Browse files
committed
Релиз
1 parent 1e63bb7 commit cc51f10

29 files changed

Lines changed: 1324 additions & 502 deletions
Lines changed: 88 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,88 @@
1+
using ScriptEngine.Machine.Contexts;
2+
using ScriptEngine.Machine;
3+
4+
namespace oscs
5+
{
6+
public class NumberMessage
7+
{
8+
public CsNumberMessage dll_obj;
9+
public Hik.Communication.Scs.Communication.Messages.ScsNumberMessage M_NumberMessage;
10+
11+
public NumberMessage()
12+
{
13+
M_NumberMessage = new Hik.Communication.Scs.Communication.Messages.ScsNumberMessage();
14+
}
15+
16+
public NumberMessage(decimal p1)
17+
{
18+
M_NumberMessage = new Hik.Communication.Scs.Communication.Messages.ScsNumberMessage(p1);
19+
}
20+
21+
public NumberMessage(Hik.Communication.Scs.Communication.Messages.ScsNumberMessage p1)
22+
{
23+
M_NumberMessage = p1;
24+
}
25+
26+
public Hik.Communication.Scs.Communication.Messages.ScsNumberMessage M_Obj
27+
{
28+
get { return M_NumberMessage; }
29+
}
30+
31+
public string MessageId
32+
{
33+
get { return M_NumberMessage.MessageId; }
34+
}
35+
36+
public decimal Number
37+
{
38+
get { return M_NumberMessage.Number; }
39+
set { M_NumberMessage.Number = value; }
40+
}
41+
42+
public string RepliedMessageId
43+
{
44+
get { return M_NumberMessage.RepliedMessageId; }
45+
}
46+
}
47+
48+
[ContextClass ("КсСообщениеЧисло", "CsNumberMessage")]
49+
public class CsNumberMessage : AutoContext<CsNumberMessage>
50+
{
51+
public CsNumberMessage(IValue p1)
52+
{
53+
NumberMessage NumberMessage1 = new NumberMessage(p1.AsNumber());
54+
NumberMessage1.dll_obj = this;
55+
Base_obj = NumberMessage1;
56+
}
57+
58+
public CsNumberMessage()
59+
{
60+
NumberMessage ByteMessage1 = new NumberMessage();
61+
ByteMessage1.dll_obj = this;
62+
Base_obj = ByteMessage1;
63+
}
64+
65+
public CsNumberMessage(oscs.NumberMessage p1)
66+
{
67+
NumberMessage NumberMessage1 = p1;
68+
NumberMessage1.dll_obj = this;
69+
Base_obj = NumberMessage1;
70+
}
71+
72+
public NumberMessage Base_obj;
73+
74+
[ContextProperty("Идентификатор", "MessageId")]
75+
public string MessageId
76+
{
77+
get { return Base_obj.MessageId; }
78+
}
79+
80+
[ContextProperty("Число", "Number")]
81+
public decimal Number
82+
{
83+
get { return Base_obj.Number; }
84+
set { Base_obj.Number = value; }
85+
}
86+
87+
}
88+
}

OneScriptClientServer/OneScriptClientServer/OneScriptClientServer.cs

Lines changed: 8 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -13,6 +13,8 @@ public class OneScriptClientServer : AutoContext<OneScriptClientServer>
1313
public static ScriptEngine.HostedScript.Library.DelegateAction EventAction = null;
1414
public static System.Collections.ArrayList EventQueue = new System.Collections.ArrayList();
1515
public static bool goOn = true;
16+
public static ScriptEngine.HostedScript.Library.DelegateAction ServerMessageReceived;
17+
public static ScriptEngine.HostedScript.Library.DelegateAction ServerMessageSent;
1618

1719
[ScriptConstructor]
1820
public static IRuntimeContextInstance Constructor()
@@ -96,6 +98,12 @@ public CsTextMessage TextMessage(string p1)
9698
return new CsTextMessage(p1);
9799
}
98100

101+
[ContextMethod("СообщениеЧисло", "NumberMessage")]
102+
public CsNumberMessage NumberMessage(IValue p1 = null)
103+
{
104+
return new CsNumberMessage(p1);
105+
}
106+
99107
[ContextMethod("СообщениеАрг", "MessageEventArgs")]
100108
public CsMessageEventArgs MessageEventArgs()
101109
{

OneScriptClientServer/OneScriptClientServer/OneScriptClientServer.csproj

Lines changed: 1 addition & 17 deletions
Original file line numberDiff line numberDiff line change
@@ -53,6 +53,7 @@
5353
<Compile Include="CommunicationStates.cs" />
5454
<Compile Include="EventArgs.cs" />
5555
<Compile Include="MessageEventArgs.cs" />
56+
<Compile Include="NumberMessage.cs" />
5657
<Compile Include="OneScriptClientServer.cs" />
5758
<Compile Include="PingMessage.cs" />
5859
<Compile Include="Properties\AssemblyInfo.cs" />
@@ -64,23 +65,6 @@
6465
<Compile Include="TcpServer.cs" />
6566
<Compile Include="TextMessage.cs" />
6667
</ItemGroup>
67-
<ItemGroup>
68-
<None Include="Diagrams\ChannelsDiagram.cd" />
69-
<None Include="Diagrams\ConnListenerDiagram.cd" />
70-
<None Include="Diagrams\EndPointsDiagram.cd" />
71-
<None Include="Diagrams\MessageObjectsDiagram.cd" />
72-
<None Include="Diagrams\RequestReplyMessengerDiagram.cd" />
73-
<None Include="Diagrams\RmiMessagesDiagram.cd" />
74-
<None Include="Diagrams\ScsClientDiagram.cd" />
75-
<None Include="Diagrams\ScsServerClientDiagram.cd" />
76-
<None Include="Diagrams\ScsServerDiagram.cd">
77-
<SubType>Designer</SubType>
78-
</None>
79-
<None Include="Diagrams\ScsServiceClientDiagram.cd" />
80-
<None Include="Diagrams\ScsServiceDiagram.cd" />
81-
<None Include="Diagrams\ServiceSideClientDiagram.cd" />
82-
<None Include="Diagrams\WireProtocolsDiagram.cd" />
83-
</ItemGroup>
8468
<ItemGroup />
8569
<Import Project="$(MSBuildToolsPath)\Microsoft.CSharp.targets" />
8670
<!-- To modify your build process, add your task inside one of the targets below and uncomment it.

OneScriptClientServer/OneScriptClientServer/ScsSupport.cs

Lines changed: 46 additions & 12 deletions
Original file line numberDiff line numberDiff line change
@@ -1524,14 +1524,13 @@ public ScsPingMessage()
15241524

15251525
// Создает новый объект ответа PingMessage.
15261526
// "repliedMessageId" - Идентификатор ответившего сообщения, если это ответ на сообщение.
1527-
public ScsPingMessage(string repliedMessageId)
1528-
: this()
1527+
public ScsPingMessage(string repliedMessageId) : this()
15291528
{
15301529
RepliedMessageId = repliedMessageId;
15311530
}
15321531

15331532
// Создает строку, представляющую этот объект.
1534-
// Возврат - Строка to представляет этот объект
1533+
// Возврат - Строка представляющая этот объект
15351534
public override string ToString()
15361535
{
15371536
return string.IsNullOrEmpty(RepliedMessageId)
@@ -1562,14 +1561,13 @@ public ScsMessage()
15621561

15631562
// Создает новый ответ ScsMessage.
15641563
// "repliedMessageId" - Идентификатор ответившего сообщения, если это ответ на сообщение.
1565-
public ScsMessage(string repliedMessageId)
1566-
: this()
1564+
public ScsMessage(string repliedMessageId) : this()
15671565
{
15681566
RepliedMessageId = repliedMessageId;
15691567
}
15701568

15711569
// Создает строку, представляющую этот объект.
1572-
// Возврат - Строка to представляет этот объект
1570+
// Возврат - Строка представляющая этот объект
15731571
public override string ToString()
15741572
{
15751573
return string.IsNullOrEmpty(RepliedMessageId)
@@ -1602,14 +1600,13 @@ public ScsRawDataMessage(byte[] messageData)
16021600
// Создает новый объект копию ScsRawDataMessage со свойством MessageData.
16031601
// "messageData" - Данные сообщения, которые передаются.
16041602
// "repliedMessageId" - Идентификатор ответившего сообщения, если это ответ на сообщение.
1605-
public ScsRawDataMessage(byte[] messageData, string repliedMessageId)
1606-
: this(messageData)
1603+
public ScsRawDataMessage(byte[] messageData, string repliedMessageId) : this(messageData)
16071604
{
16081605
RepliedMessageId = repliedMessageId;
16091606
}
16101607

16111608
// Создает строку, представляющую этот объект.
1612-
// Возврат - Строка to представляет этот объект
1609+
// Возврат - Строка представляющая этот объект
16131610
public override string ToString()
16141611
{
16151612
var messageLength = MessageData == null ? 0 : MessageData.Length;
@@ -1643,14 +1640,13 @@ public ScsTextMessage(string text)
16431640
// Создает новый объект ScsTextMessage со свойством Text.
16441641
// "text" - Текст сообщения, который передается.
16451642
// "repliedMessageId" - Идентификатор ответившего сообщения, если это ответ на сообщение.
1646-
public ScsTextMessage(string text, string repliedMessageId)
1647-
: this(text)
1643+
public ScsTextMessage(string text, string repliedMessageId) : this(text)
16481644
{
16491645
RepliedMessageId = repliedMessageId;
16501646
}
16511647

16521648
// Создает строку, представляющую этот объект.
1653-
// Возврат - Строка to представляет этот объект
1649+
// Возврат - Строка представляющая этот объект
16541650
public override string ToString()
16551651
{
16561652
return string.IsNullOrEmpty(RepliedMessageId)
@@ -1660,6 +1656,44 @@ public override string ToString()
16601656
}
16611657
//=========================================================================================================================================
16621658

1659+
// Это сообщение используется для отправки/получения числа в качестве данных сообщения.
1660+
[Serializable]
1661+
public class ScsNumberMessage : ScsMessage
1662+
{
1663+
// Число сообщения, который передается.
1664+
public decimal Number { get; set; }
1665+
1666+
// Создает новый объект ScsNumberMessage.
1667+
public ScsNumberMessage()
1668+
{
1669+
1670+
}
1671+
1672+
// Создает новый объект ScsNumberMessage со свойством Number.
1673+
// "number" - Число, которое передается.
1674+
public ScsNumberMessage(decimal number)
1675+
{
1676+
Number = number;
1677+
}
1678+
1679+
// Создает новый объект ScsNumberMessage со свойством Number.
1680+
// "number" - Число, которое передается.
1681+
// "repliedMessageId" - Идентификатор ответившего сообщения, если это ответ на сообщение.
1682+
public ScsNumberMessage(decimal number, string repliedMessageId) : this(number)
1683+
{
1684+
RepliedMessageId = repliedMessageId;
1685+
}
1686+
1687+
// Создает строку, представляющую этот объект.
1688+
// Возврат - Строка представляющая этот объект
1689+
public override string ToString()
1690+
{
1691+
return string.IsNullOrEmpty(RepliedMessageId)
1692+
? string.Format("ScsNumberMessage [{0}]: {1}", MessageId, Number)
1693+
: string.Format("ScsNumberMessage [{0}] Replied To [{1}]: {2}", MessageId, RepliedMessageId, Number);
1694+
}
1695+
}
1696+
//=========================================================================================================================================
16631697
}
16641698

16651699
namespace Hik.Communication.Scs.Communication.Messengers

OneScriptClientServer/OneScriptClientServer/ServerClient.cs

Lines changed: 4 additions & 7 deletions
Original file line numberDiff line numberDiff line change
@@ -85,7 +85,6 @@ private void M_ServerClient_MessageSent(object sender, Hik.Communication.Scs.Com
8585
public void SendMessage(Hik.Communication.Scs.Communication.Messages.IScsMessage p1)
8686
{
8787
M_ServerClient.SendMessage(p1);
88-
M_ServerClient.SendMessage(new Hik.Communication.Scs.Communication.Messages.ScsPingMessage());
8988
}
9089
}
9190

@@ -98,6 +97,10 @@ public CsServerClient(Hik.Communication.Scs.Server.IScsServerClient p1)
9897
ServerClient1.dll_obj = this;
9998
Base_obj = ServerClient1;
10099
}
100+
101+
public ScriptEngine.HostedScript.Library.DelegateAction MessageSent { get; set; }
102+
103+
public ScriptEngine.HostedScript.Library.DelegateAction MessageReceived { get; set; }
101104

102105
public oscs.ServerClient Base_obj;
103106

@@ -110,12 +113,6 @@ public decimal ClientId
110113
[ContextProperty("ПриОтключении", "Disconnected")]
111114
public ScriptEngine.HostedScript.Library.DelegateAction Disconnected { get; set; }
112115

113-
[ContextProperty("ПриОтправкеСообщения", "MessageSent")]
114-
public ScriptEngine.HostedScript.Library.DelegateAction MessageSent { get; set; }
115-
116-
[ContextProperty("ПриПолученииСообщения", "MessageReceived")]
117-
public ScriptEngine.HostedScript.Library.DelegateAction MessageReceived { get; set; }
118-
119116
[ContextProperty("СостояниеСоединения", "CommunicationState")]
120117
public int CommunicationState
121118
{

OneScriptClientServer/OneScriptClientServer/ServerClientEventArgs.cs

Lines changed: 2 additions & 5 deletions
Original file line numberDiff line numberDiff line change
@@ -36,10 +36,7 @@ public ServerClientEventArgs(Hik.Communication.Scs.Server.ServerClientEventArgs
3636
client = args.Client;
3737
}
3838

39-
public Hik.Communication.Scs.Server.IScsServerClient Client
40-
{
41-
get { return client; }
42-
}
39+
public CsServerClient Client { get; set; }
4340
}
4441

4542
[ContextClass("КсСерверКлиентАрг", "CsServerClientEventArgs")]
@@ -65,7 +62,7 @@ public ScriptEngine.HostedScript.Library.DelegateAction EventAction
6562
[ContextProperty("Клиент", "Client")]
6663
public CsServerClient Client
6764
{
68-
get { return new CsServerClient(Base_obj.Client); }
65+
get { return Base_obj.Client; }
6966
}
7067

7168
[ContextProperty("Отправитель", "Sender")]

OneScriptClientServer/OneScriptClientServer/TcpClient.cs

Lines changed: 0 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -95,7 +95,6 @@ private void M_TcpClient_MessageSent(object sender, Hik.Communication.Scs.Commun
9595
public void SendMessage(Hik.Communication.Scs.Communication.Messages.IScsMessage p1)
9696
{
9797
M_TcpClient.SendMessage(p1);
98-
M_TcpClient.SendMessage(new Hik.Communication.Scs.Communication.Messages.ScsPingMessage());
9998
}
10099
}
101100

OneScriptClientServer/OneScriptClientServer/TcpServer.cs

Lines changed: 19 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -56,6 +56,7 @@ private void M_TcpServer_ClientDisconnected(object sender, Hik.Communication.Scs
5656
oscs.ServerClientEventArgs ServerClientEventArgs1 = new ServerClientEventArgs(e);
5757
ServerClientEventArgs1.EventAction = dll_obj.ClientDisconnected;
5858
ServerClientEventArgs1.Sender = this;
59+
ServerClientEventArgs1.Client = new CsServerClient(e.Client);
5960
CsServerClientEventArgs CsServerClientEventArgs1 = new CsServerClientEventArgs(ServerClientEventArgs1);
6061
OneScriptClientServer.EventQueue.Add(ServerClientEventArgs1);
6162
}
@@ -68,6 +69,10 @@ private void M_TcpServer_ClientConnected(object sender, Hik.Communication.Scs.Se
6869
oscs.ServerClientEventArgs ServerClientEventArgs1 = new oscs.ServerClientEventArgs(e);
6970
ServerClientEventArgs1.EventAction = dll_obj.ClientConnected;
7071
ServerClientEventArgs1.Sender = this;
72+
oscs.CsServerClient CsServerClient1 = new CsServerClient(e.Client);
73+
CsServerClient1.MessageReceived = OneScriptClientServer.ServerMessageReceived;
74+
CsServerClient1.MessageSent = OneScriptClientServer.ServerMessageSent;
75+
ServerClientEventArgs1.Client = CsServerClient1;
7176
CsServerClientEventArgs CsServerClientEventArgs1 = new CsServerClientEventArgs(ServerClientEventArgs1);
7277
OneScriptClientServer.EventQueue.Add(ServerClientEventArgs1);
7378
}
@@ -125,9 +130,23 @@ public ScriptEngine.HostedScript.Library.ArrayImpl Clients
125130
[ContextProperty("ПриОтключенииКлиента", "ClientDisconnected")]
126131
public ScriptEngine.HostedScript.Library.DelegateAction ClientDisconnected { get; set; }
127132

133+
[ContextProperty("ПриОтправкеСообщения", "MessageSent")]
134+
public ScriptEngine.HostedScript.Library.DelegateAction MessageSent
135+
{
136+
get { return OneScriptClientServer.ServerMessageSent; }
137+
set { OneScriptClientServer.ServerMessageSent = value; }
138+
}
139+
128140
[ContextProperty("ПриПодключенииКлиента", "ClientConnected")]
129141
public ScriptEngine.HostedScript.Library.DelegateAction ClientConnected { get; set; }
130142

143+
[ContextProperty("ПриПолученииСообщения", "MessageReceived")]
144+
public ScriptEngine.HostedScript.Library.DelegateAction MessageReceived
145+
{
146+
get { return OneScriptClientServer.ServerMessageReceived; }
147+
set { OneScriptClientServer.ServerMessageReceived = value; }
148+
}
149+
131150

132151
[ContextMethod("Начать", "Start")]
133152
public void Start()

docs/OSClientServerRu/Hierarchy.html

Lines changed: 1 addition & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -41,6 +41,7 @@ <H4 class=dtH4>Иерархия&nbsp;пространства&nbsp;имен</H4>
4141
<li><A href="OSClientServer.ServerClient.html">СерверКлиент (ServerClient)</A></li>
4242
<li><A href="OSClientServer.ByteMessage.html">СообщениеБайты (ByteMessage)</A></li>
4343
<li><A href="OSClientServer.TextMessage.html">СообщениеТекст (TextMessage)</A></li>
44+
<li><A href="OSClientServer.NumberMessage.html">СообщениеЧисло (NumberMessage)</A></li>
4445
</ul>
4546
</DIV>
4647
<H4 class=dtH4>Смотрите также</H4>

0 commit comments

Comments
 (0)