53501_3_MartynovSA_lab3

113hClientThread = CreateThread ( NULL , 0,

114( LPTHREAD_START_ROUTINE ) ClientThread ,

115( LPVOID ) pClientInfo , 0, & dwThreadId );

116if ( hClientThread == NULL ) {

117mylog . loudlog ( _T (" Unable to create client thread "));

118}

119else {

120CloseHandle ( hClientThread );

121}

122}

123}

124

125// удаляем объект синхронизации

126DeleteCriticalSection (& cs С lients );

127closesocket ( hServerSocket );

128WSACleanup () ;

129exit (0) ;

130}

131

132bool InitWinSock2_0 () {

133WSADATA wsaData ;

136if (! WSAStartup ( wVersion , & wsaData ))

137return true ;

138

139return false ;

140}

145EnterCriticalSection (& cs С lients );

146clients . push_front ( pClientInfo ); // Добавить нового клиента в список

147LeaveCriticalSection (& cs С lients );

152int nCntRecv = 0;

153int nCntSend = 0;

154

155// Set username

156nCntRecv = recv ( pClientInfo -> hClientSocket , ( char *) szBuffer , sizeof (

szBuffer ) , 0) ;

121

157if ( nCntRecv <= 0) {

158mylog . loudlog ( _T (" Error reading username from client "));

159return 1;

160}

161

162szBuffer [ nCntRecv ] = ’\0 ’;

163StringCchCopy ( pClientInfo -> username , sizeof ( pClientInfo -> username ) ,

szBuffer );

164 swprintf_s ( szMessage , _T (" System : %s has joined this chat ") , pClientInfo -> username );

165mylog . loudlog ( _T ("%s") , szMessage );

166sendToAll ( szMessage );

167

168// Chat loop :

169while (1) {

170nCntRecv = recv ( pClientInfo -> hClientSocket , ( char *) szBuffer , sizeof (

szBuffer ) , 0) ;

171if ( nCntRecv > 0) {

172// Process message

173szBuffer [ nCntRecv ] = ’\0 ’;

174

175// Check , if its not QUIT

176_wcsdup ( szBuffer );

177if ( wcscmp ( szBuffer , _T (" QUIT ")) == 0) {

178swprintf_s ( szMessage , _T (" System : %s has left this chat ") ,

pClientInfo -> username );

179mylog . loudlog ( _T ("%s") , szMessage );

180sendToAll ( szMessage );

181

182EnterCriticalSection (& cs С lients );

183clients . remove ( pClientInfo ); // Удалить клиента из списка

184LeaveCriticalSection (& cs С lients );

185

186closesocket ( pClientInfo -> hClientSocket );

187delete pClientInfo ;

188return 0;

189}

190

191// Time

192struct tm newtime ;

193__time64_t long_time ;

194// Get time as 64 - bit integer .

195_time64 (& long_time );

196// Convert to local time .

122

198// Create message .

199swprintf_s ( szMessage , _T (" [%02 d /%02 d /%04 d %02 d :%02 d :%02 d] %s: %s") ,

newtime . tm_mday ,

200newtime . tm_mon + 1, newtime . tm_year + 1900 , newtime . tm_hour ,

201newtime . tm_min , newtime . tm_sec , pClientInfo -> username , szBuffer );

202

204

205sendToAll ( szMessage );

206}

207else {

208mylog . loudlog ( _T (" Error reading the data from %s") , pClientInfo ->

username );

209}

210}

211

212return 0;

213}

220int nLength = ( lstrlen ( pBuffer ) + 1) * sizeof ( _TCHAR );

221int nCntSend = 0;

222

223 while (( nCntSend = send ((* client ) -> hClientSocket , ( char *) pBuffer , nLength , 0) != nLength )) {

224if ( nCntSend == -1) {

225mylog . loudlog ( _T (" Error sending the data to %s") , (* client ) ->

username );

226break ;

227}

228if ( nCntSend == nLength )

229break ;

230

231pBuffer += nCntSend ;

232nLength -= nCntSend ;

233}

234}

235LeaveCriticalSection (& cs С lients );

236}

123

Листинг 46: Клиент (src/SynchronizationPrimitives/FullReaderWriterClient/main.cpp)

124

50serverAddr . sin_addr . s_addr = inet_addr ( pMBBuffer );

51delete [] pMBBuffer ;

52serverAddr . sin_port = htons ( nServerPort );

57closesocket ( hClientSocket );

58WSACleanup () ;

59exit (3) ;

60}

61mylog . quietlog ( _T (" Connect "));

62

63 _TCHAR szBuffer [1024] = _T ("");

64

65// Choose username

66_tprintf ( _T (" Enter your username : "));

67wscanf_s ( _T (" %1023 s") , szBuffer , _countof ( szBuffer ));

72int nCntSend = 0;

73_TCHAR * pBuffer = szBuffer ;

74

75while (( nCntSend = send ( hClientSocket , ( char *) pBuffer , nLength , 0) != nLength )) {

76if ( nCntSend == -1) {

77mylog . loudlog ( _T (" Error sending the data to server "));

78break ;

79}

80if ( nCntSend == nLength )

81break ;

82

83pBuffer += nCntSend ;

84nLength -= nCntSend ;

125

85 }

86

87// Запуск читающего треда

88HANDLE haReader = CreateThread ( NULL , 0,

89( LPTHREAD_START_ROUTINE ) aReader ,

90( LPVOID )& hClientSocket , 0, 0) ;

91if ( haReader == NULL ) {

92mylog . loudlog ( _T (" Unable to create Reader thread "));

93}

97while ( wcscmp ( szBuffer , _T (" QUIT ")) != 0) {

98_tprintf ( _T (" >> "));

99wscanf_s ( _T (" %1023 s") , szBuffer , _countof ( szBuffer ));

100

101 nLength = ( wcslen ( szBuffer ) + 1) * sizeof ( _TCHAR );

102

103 // send ( ) may not be able to send the complete data in one go .

104// So try sending the data in multiple requests

105nCntSend = 0;

106pBuffer = szBuffer ;

107

108 while (( nCntSend = send ( hClientSocket , ( char *) pBuffer , nLength , 0) != nLength )) {

109if ( nCntSend == -1) {

110mylog . loudlog ( _T (" Error sending the data to server "));

111break ;

112}

113if ( nCntSend == nLength )

114break ;

115

116pBuffer += nCntSend ;

117nLength -= nCntSend ;

118}

119

120_wcsdup ( szBuffer );

121if ( wcscmp ( szBuffer , _T (" QUIT ")) == 0) {

122TerminateThread ( haReader , 0) ;

123break ;

124}

125}

126

127closesocket ( hClientSocket );

128WSACleanup () ;

126

129exit (0) ;

130}

131

132bool InitWinSock2_0 () {

133WSADATA wsaData ;

136if (! WSAStartup ( wVersion , & wsaData ))

137return true ;

138

139return false ;

140}

141

142 BOOL WINAPI aReader ( LPVOID lpData ) {

143 SOCKET * hClientSocket = ( SOCKET *) lpData ;

144_TCHAR szBuffer [1024];

145int nLength = 0;

150if ( nLength > 0) {

151szBuffer [ nLength ] = ’\0 ’;

152mylog . loudlog ( _T ("%s") , szBuffer );

153_tprintf ( _T (" >> "));

154}

155}

156

157return 0;

158}

Рисунок 16 показывает сервер (левый верхний угол) и трёх клиентов, которые общаются между собой. Особенность реализованного протокола в том, что каждый клиент должен ввести своё имя, перед началом общения.

127

Рис. 16: Полноценный чат на Win-сокетах.

7Задача обедающие философы

Классическая задача про обедающих философов[6]. Она имеет несколько классических решений. В данном решении (листинг 47) упор сделан на то, что вовсе не обязательно вешать объект-синхронизацию на вилку, т.к. её состояние можно вывести из состояния другого философа (если он обедает, то, очевидно, вилка занята). В качестве механизма синхронизации была выбрана критическая сессия, как наиболее простая и легковесная.

Листинг 47: Клиент (src/SynchronizationPrimitives/DiningPhilosophersProblem/main.cpp)

1 # include < windows .h >

2 # include < conio .h >

3 # include < tchar .h >

4

5 # include " Logger .h"

128

18DWORD WINAPI philosopherThread ( LPVOID prm );

19void take_forks ( int id );

20void put_forks ( int id );

21void think () ;

22void eat () ;

23void wait () ;

28// Размышления

29void think () {

33// Еда

34void eat () {

38// Голодное ожидание

39void wait () {

43// симуляция жизни философа

44DWORD WINAPI philosopherThread ( LPVOID prm ) {

45int phil_id = ( int ) prm ;

46while ( true ) {

47think () ;

48// Либо обе вилки , либо блокировка

49take_forks ( phil_id );

50eat () ;

51// Вернуть вилки на стол

52put_forks ( phil_id );

53}

129

54 }

55

56void take_forks ( int id ) {

57bool done = false ;

58while (! done ){

59 if ( rand () % 2) { // left hand first

60mylog . quietlog ( _T (" Waining for Critical Section "));

61EnterCriticalSection (& crs [ id ]) ;

62mylog . quietlog ( _T (" Get Critical Section "));

63

64philosopher_state [ id ] = HUNGRY ;

65mylog . loudlog ( _T (" Philosopher %d status HUNGRY ") , id );

77}

78LeaveCriticalSection (& crs [ LEFT ]) ;

79}

80mylog . quietlog ( _T (" Leave Critical Section "));

81LeaveCriticalSection (& crs [ id ]) ;

82}

83else { // right hand first

84mylog . quietlog ( _T (" Waining for Critical Section "));

85EnterCriticalSection (& crs [ id ]) ;

86mylog . quietlog ( _T (" Get Critical Section "));

87

88philosopher_state [ id ] = HUNGRY ;

89mylog . loudlog ( _T (" Philosopher %d status HUNGRY ") , id );

130