Форум программистов, компьютерный форум, киберфорум
C++/CLI Windows Forms
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.83/6: Рейтинг темы: голосов - 6, средняя оценка - 4.83
0 / 0 / 0
Регистрация: 30.08.2014
Сообщений: 4

Изменение используемого сокета в процессе работы программы

06.09.2014, 19:40. Показов 1209. Ответов 3
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Написала программу

C++
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
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
 #include <iostream>
#include <string>
 
#include <WinSock2.h>
#include <Windows.h>
 
#pragma comment (lib, "ws2_32.lib")
#pragma once
 
 
 
namespace WinServer {
 
    using namespace System;
    using namespace System::ComponentModel;
    using namespace System::Collections;
    using namespace System::Windows::Forms;
    using namespace System::Data;
    using namespace System::Drawing;
    using namespace System::Runtime::InteropServices;
    using namespace System::Threading;
 
    char* bufferOne;
    DWORD WINAPI Clients(LPVOID clientSocket);
    DWORD WINAPI ServerThr(LPVOID clientSocket);
 
    char * and_SysStringToChar(System::String^ string) {
        return (char*)(void*)Marshal::StringToHGlobalAnsi(string);
    }
 
 
    System::String^  and_CharToSysString(char* ch) {
        char * chr=new char[]=ch;
        System::String^ str;
        for(int i=0;chr[i]!='\0';i++) {
            str+=wchar_t(ch[i]);
        }
        return str;
    }
    void addToLog(System::String^ two) {
        System::String^ one = and_CharToSysString(bufferOne);
        bufferOne = and_SysStringToChar(one->Concat(one,two));
    }
    int usersCount;             // Количество активных 
    int MAX_USERS;          //Максимальное количество
    SOCKET usersList[101];
 
    public ref class Form1 : public System::Windows::Forms::Form {
    public:
         
 
        Form1(void) {
            InitializeComponent();
            bufferOne = " ";
        }
 
    protected:
        ~Form1()
        {
            if (components)
            {
                delete components;
            }
        }
    
    private: System::Windows::Forms::RichTextBox^  richTextBox1;
    private: System::Windows::Forms::Button^  button1;
 
    private: System::Windows::Forms::Button^  button2;
            
    protected: 
 
    private:    System::ComponentModel::Container ^components;
 
#pragma region Windows Form Designer generated code
        
        void InitializeComponent(void)
        {
            this->richTextBox1 = (gcnew System::Windows::Forms::RichTextBox());
            this->button1 = (gcnew System::Windows::Forms::Button());
            this->button2 = (gcnew System::Windows::Forms::Button());
            this->SuspendLayout();
            // 
            // richTextBox1
            // 
            this->richTextBox1->Location = System::Drawing::Point(12, 12);
            this->richTextBox1->Name = L"richTextBox1";
            this->richTextBox1->Size = System::Drawing::Size(324, 270);
            this->richTextBox1->TabIndex = 0;
            this->richTextBox1->Text = L"";
            this->richTextBox1->TextChanged += gcnew System::EventHandler(this, &Form1::richTextBox1_TextChanged);
            // 
            // button1
            // 
            this->button1->Location = System::Drawing::Point(128, 317);
            this->button1->Name = L"button1";
            this->button1->Size = System::Drawing::Size(75, 23);
            this->button1->TabIndex = 1;
            this->button1->Text = L"Start";
            this->button1->UseVisualStyleBackColor = true;
            this->button1->Click += gcnew System::EventHandler(this, &Form1::button1_Click);
            // 
            // button2
            // 
            this->button2->Location = System::Drawing::Point(128, 288);
            this->button2->Name = L"button2";
            this->button2->Size = System::Drawing::Size(75, 23);
            this->button2->TabIndex = 3;
            this->button2->Text = L"Refrash";
            this->button2->UseVisualStyleBackColor = true;
            this->button2->Click += gcnew System::EventHandler(this, &Form1::button2_Click);
            // 
            // Form1
            // 
            this->AutoScaleDimensions = System::Drawing::SizeF(6, 13);
            this->AutoScaleMode = System::Windows::Forms::AutoScaleMode::Font;
            this->ClientSize = System::Drawing::Size(348, 352);
            this->Controls->Add(this->button2);
            this->Controls->Add(this->button1);
            this->Controls->Add(this->richTextBox1);
            this->Name = L"Form1";
            this->Text = L"Form1";
            this->ResumeLayout(false);
 
        }
#pragma endregion
    private: System::Void richTextBox1_TextChanged(System::Object^  sender, System::EventArgs^  e) {
 
             }
    private: System::Void button1_Click(System::Object^  sender, System::EventArgs^  e) {
            MAX_USERS = 101;
            usersCount = 0;
 
            
            for (int i = 0; i < MAX_USERS; i++)
                usersList[i] = INVALID_SOCKET; //Заполняем массив значениями INVALID_SOCKET, которое говорит, что свободно место
 
            WSADATA wsaData;
            if (WSAStartup(MAKEWORD(2,2), &wsaData) != 0) {
                addToLog( "\nError WSAStartup " + WSAGetLastError());
            }
 
            SOCKET serverSocket;
            
            serverSocket = socket(AF_INET, SOCK_STREAM, 0);
            if( serverSocket < 0 ) {
                // Ошибка. Выводим сообщение об ошибке, деинициализируем библиотеку WinSock и завершаем программу
                addToLog( "\nError socket " + WSAGetLastError());
                WSACleanup(); // Деинициализация библиотеки WinSock
                //return -1;
            }
            MAX_USERS = 101;
            usersCount = 0;
 
            sockaddr_in serverAddr;
            serverAddr.sin_family = AF_INET;
            serverAddr.sin_port = htons(1339); // ntons() -  переводит в сетевой порядок
            serverAddr.sin_addr.s_addr = inet_addr("127.0.0.1");    // сервер принимает подключения на все свои IP-адреса
 
            // Связваем socket с адресом
            int errorInt = bind(serverSocket, (sockaddr*) &serverAddr, sizeof(serverAddr) );
            if (  errorInt != 0 ) {
                // Ошибка. Выводим сообщение об ошибке и завершаем программу
                addToLog( "\nError bind " + WSAGetLastError() );
                closesocket(serverSocket); //очищаем socket
                WSACleanup();
                //return -1;
            }
            errorInt = listen(serverSocket, WinServer::MAX_USERS);
            if(errorInt != 0) {
                // Ошибка. Выводим сообщение об ошибке и завершаем программу
                addToLog( "\nError listen " + WSAGetLastError() );
                closesocket(serverSocket);
                WSACleanup();
                //return -1;
            }
 
            addToLog( "\nWaiting for incoming connections..." );
            
            
            DWORD threadID2;
            richTextBox1->Text = serverSocket.ToString();
            CreateThread(NULL,NULL,ServerThr,&serverSocket,NULL,&threadID2);
            //unsigned int thID;
            //_beginthreadex(NULL,NULL,ServerThr,&serverSocket,NULL,&thID);
            
            /*
            SOCKET clientSocket;     // сокет для клиента
            sockaddr_in clientAddr; // адрес клиента (заполняется системой)
            int clientAddrSize = sizeof(clientAddr); // функции accept необходимо передать размер структуры по ссылке
            clientSocket = accept(serverSocket,(sockaddr *) &clientAddr, &clientAddrSize);
            DWORD threadID;
            CreateThread(NULL,NULL,Clients,&clientSocket,NULL,&threadID);
            int er = send(clientSocket,"TEST!!!", sizeof("TEST!!!"), 0);
            System::String^ cs = serverSocket.ToString();
            richTextBox1->Text = ( "\nserverSocket.ToString = " +cs);*/
            
        }
             
            
             
private: System::Void button2_Click(System::Object^  sender, System::EventArgs^  e) {
             System::String^ stri = and_CharToSysString(bufferOne);
             richTextBox1->Text = stri;
         }
};
}
 
DWORD WINAPI WinServer::Clients(LPVOID clientSocket) {
            SOCKET socket = *((SOCKET *) clientSocket);
            char buffer[20 * 81];
            #define greed "SERVER: connection established...\r\n"
            
            int er = send(socket,greed, sizeof(greed), 0);
            System::String^ cs = socket.ToString();
            addToLog( "\nClients : try send " + er + " " + cs);
            while (true) {
                try {
            
                    int bytesRecv = recv(socket, buffer, sizeof(buffer)-1, 0);
                    addToLog( "\n" + bytesRecv + " ; " + sizeof(buffer) );
                    if (bytesRecv == 0) //соединение прервано
                        break;
                    if (bytesRecv == SOCKET_ERROR) {
                        throw 123; //генерировать целое число 123
                        addToLog(  "\nError recv" + WSAGetLastError() );
                        closesocket(socket);
                        WSACleanup();
                        break;//return -1;
                    }
                    if(bytesRecv > 0) {
                        buffer[bytesRecv] = '\0';
                        send(socket, buffer, bytesRecv, 0);
                        send(socket, buffer, bytesRecv, 0);
                        send(socket, buffer, bytesRecv, 0);
                    }
                }
                catch(int i){ break;}
            }
 
            usersList[usersCount]=INVALID_SOCKET;
            usersCount--;
            
            
            addToLog("\nDisc");// "client disconnected" );
 
            closesocket(socket);
 
            return 0;
        }
 
DWORD WINAPI WinServer::ServerThr(LPVOID serverSocket) {
            SOCKET socket = *((SOCKET *) serverSocket);
            addToLog ("\n WinServer socket = " + socket.ToString());
            
            SOCKET clientSocket;     // сокет для клиента
            addToLog ("\n WinServer serverSocket = " + clientSocket.ToString());
            sockaddr_in clientAddr; // адрес клиента (заполняется системой)
            int clientAddrSize = sizeof(clientAddr); // функции accept необходимо передать размер структуры по ссылке
 
            // цикл извлечения запросов на подключение из очереди
            while(true) {
                clientSocket = accept(socket,(sockaddr *) &clientAddr, &clientAddrSize);
                System::String^ blockSocket = "4294967295";
                
                if ( !blockSocket->CompareTo(clientSocket.ToString()) ) {
                    addToLog ("\n" + blockSocket + "=" + clientSocket.ToString() );//closesocket(clientSocket);             
                    continue;
                }
                
                usersList[usersCount] = clientSocket;
                usersCount++;
 
                HOSTENT *host;
                host = gethostbyaddr((char *) &clientAddr.sin_addr.s_addr,4,AF_INET); // пытаемся получить имя хоста
 
                // выводим данные о клиенте
 
                //bufferOne =host->h_name +  and_SysStringToChar( " (" + inet_ntoa(clientAddr.sin_addr) + " ) has connected" );
                
                DWORD threadID;
                CreateThread(NULL,NULL,Clients,&clientSocket,NULL,&threadID);
 
                int er = send(clientSocket,greed, sizeof(greed), 0);
                System::String^ cs = clientSocket.ToString();
                addToLog( "\nServerThr: try send( " + er + ")" +cs);
                addToLog( "\nusersCount " + usersCount);
                
            }
            return 0;
}
В строчке 183 в функцию CreateThread ввожу адрес к одному сокету. А в строчке 252(253) получаю другой сокет. И всееее!! начинает глючить программа. Ловит непонятно откуда подключения и т.д. От чего такое может быть? ((
0
Лучшие ответы (1)
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
06.09.2014, 19:40
Ответы с готовыми решениями:

Изменение свойств элементов формы в процессе работы программы
есть форма с кнопками(клавиатура) и кнопка, по нажатию которой должно меняться свойство Text. например для кнопки со значением...

Изменение надписей в пунктах меню в процессе работы программы
Вопрос такой возможны ли изменения надписей в пунктах меню в процессе работы программы!

Изменение файла конфигурации вручную в процессе работы программы
Подскажите, пожалуйста. Суть задачи: приложение настраивается через файл конфигурации и должно на лету подхватывать изменения этого...

3
567 / 198 / 70
Регистрация: 25.05.2012
Сообщений: 816
07.09.2014, 11:18
Цитата Сообщение от Alena_94 Посмотреть сообщение
В строчке 183 в функцию CreateThread ввожу адрес к одному сокету. А в строчке 252(253) получаю другой сокет.
Потому что вы передаете в поток указатель на локальную переменную serverSocket, значение которой к моменту использования в потоке уже непонятно какое.
0
0 / 0 / 0
Регистрация: 30.08.2014
Сообщений: 4
07.09.2014, 16:57  [ТС]
Цитата Сообщение от dmitry94 Посмотреть сообщение
Потому что вы передаете в поток указатель на локальную переменную serverSocket, значение которой к моменту использования в потоке уже непонятно какое.
Почему же, по логике оно не должно меняться. Это сокет, который слушает клиентов, он не уничтожается, не закрывается, не меняется нигде.
0
567 / 198 / 70
Регистрация: 25.05.2012
Сообщений: 816
07.09.2014, 18:19
Лучший ответ Сообщение было отмечено Alena_94 как решение

Решение

Цитата Сообщение от Alena_94 Посмотреть сообщение
он не уничтожается, не закрывается, не меняется нигде.
Никогда не программировал в Windows Forms, но логика подсказывает, что serverSocket - локальная переменная в функции button1_Click, соответственно она уничтожается по выходу из функции button1_Click. Следовательно вариант вполне возможен, что на момент:
C++
1
SOCKET socket = *((SOCKET *) serverSocket);
в потоке, указатель указывает на несуществующую переменную.
1
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
07.09.2014, 18:19
Помогаю со студенческими работами здесь

Отладка плагина, используемого в другом процессе
Доброго времени суток. Решил заняться написанием плагина для Revit (возникла одна потребность). Установил Revit 2018. Скачал Revit...

Как в процессе работы программы, обратиться к самому коду программы?
Никогда не сталкивалась с такой задачей, но нужно, очень нужно в процессе работы с программой изменить код самой программы, например...

Изменение PE-заголовка в процессе выполнения программы
Доброго времени суток! Задался задачей изменить часть PE-заголовка в процессе выполнения программы (сразу хочу оговориться, что это не...

Создание массивов в процессе работы программы
Итак есть папка с парой файлов-массивов. в будущем предполагается произвольное изменение количества файлов и их размера. ...

Запуск формы в процессе работы программы
Создал проект. Сделал в нём форму. Теперь надо чтобы при выборе команды меню эта форма отображалась на экране. Как это сделать? P.S....


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
4
Ответ Создать тему
Новые блоги и статьи
Модель ЗдрввоСохранения 7: больше работников, больше ресурсов.
anaschu 08.04.2026
работников и заданий может быть сколько угодно, но настроено всё так, что используется пока что только 20%
Дальние перспективы сервера - слоя сети с космологическим дизайном интефейса карты и логики.
Hrethgir 07.04.2026
Дальнейшее ближайшее планирование вывело к размышлениям над дальними перспективами. И вот тут может быть даже будут нужны оценки специалистов, так как в дальних перспективах всё может очень сильно. . .
Горе от ума
kumehtar 07.04.2026
Эта мне ментальная установка, что вот прямо сейчас, мол, мне для полного счастья не хватает (нужное вписать), и когда я этого достигну - тогда и полный кайф. Одна из самых сильных ловушек на пути. . . .
Использование значений реквизитов справочника в документе, с определенными условиями и правами
Maks 07.04.2026
1. Контроль срока действия договора Алгоритм из решения ниже реализован на примере нетипового документа "ЗаявкаНаРаботу", разработанного в конфигурации КА2. Задача: уведомлять пользователя, если. . .
Доступность команды формы по условию
Maks 07.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: сделать доступной кнопку (команда формы "ЗавершитьСписание") при. . .
Уведомление о неверно выбранном значении справочника
Maks 06.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "НарядПутевка", разработанного в конфигурации КА2. Задача: уведомлять пользователя, если в документе выбран неверный склад. . .
Установка Qt Creator для C и C++: ставим среду, CMake и MinGW без фреймворка Qt
8Observer8 05.04.2026
Среду разработки Qt Creator можно установить без фреймворка Qt. Есть отдельный репозиторий для этой среды: https:/ / github. com/ qt-creator/ qt-creator, где можно скачать установщик, на вкладке Releases:. . .
AkelPad-скрипты, структуры, и немного лирики..
testuser2 05.04.2026
Такая программа, как AkelPad существует уже давно, и также давно существуют скрипты под нее. Тем не менее, прога живет, периодически что-то не спеша дополняется, улучшается. Что меня в первую очередь. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru