Загруженность процессора?

@Power_Basic · Регистрация: 08.03.2016

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

Уже нашёл ответ на Си. Помогите, пожалуйста, с "переводом" на Visual Basic.

Ну а в идеале можно и сразу на PowerBasic

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
#include "TCHAR.h"
#include "pdh.h"
 
static PDH_HQUERY cpuQuery;
static PDH_HCOUNTER cpuTotal;
 
void init(){
    PdhOpenQuery(NULL, NULL, &cpuQuery);
    // You can also use L"\\Processor(*)\\% Processor Time" and get individual CPU values with PdhGetFormattedCounterArray()
    PdhAddEnglishCounter(cpuQuery, L"\\Processor(_Total)\\% Processor Time", NULL, &cpuTotal);
    PdhCollectQueryData(cpuQuery);
}
 
double getCurrentValue(){
    PDH_FMT_COUNTERVALUE counterVal;
 
    PdhCollectQueryData(cpuQuery);
    PdhGetFormattedCounterValue(cpuTotal, PDH_FMT_DOUBLE, NULL, &counterVal);
    return counterVal.doubleValue;
}

@Pro_grammer · 17.04.2020, 22:14

Сообщение от Power_Basic

До какого-то момента всё в порядке, а потом окно программы тупо пропадает и усё

Скорее всего у вас не хорошо обстоит дело с безопасностью потоков. В какой то момент возникает конфликт между некоторыми потоками из за доступа к совместной области памяти или дискового пространства.
Без анализа вашего кода трудно сказать, выкладывайте, если не жалко, может кто скажет чего умного.

@Power_Basic · 17.04.2020, 22:21 **[ТС]**

Сообщение от locm

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

А где эти правила хоть посмотреть-то?

@Power_Basic · 17.04.2020, 23:18 **[ТС]**

Сообщение от Pro_grammer

Скорее всего у вас не хорошо обстоит дело с безопасностью потоков. В какой то момент возникает конфликт между некоторыми потоками из за доступа к совместной области памяти или дискового пространства.

Ну да, похоже на то.
А может просто надо слипов побольше понавтыкать в разные критические места?

Сообщение от Pro_grammer

Без анализа вашего кода трудно сказать, выкладывайте, если не жалко, может кто скажет чего умного.

Для хорошего дела ничего не жалко

@Power_Basic · 18.04.2020, 01:22 **[ТС]**

Сообщение от Pro_grammer

В какой то момент возникает конфликт между некоторыми потоками из за доступа к совместной области памяти или дискового пространства.

Ну вот потому-то я и хотел изначально всё в памяти делать и только в самом конце скинуть результаты на диск

А сейчас все потоки, расталкивая друг друга, бросаются записывать свои файлы на диск одновременно, ну вот он и бастует, бедолага

Возможно так.
А общего дискового пространства там очень много, да и файлы я пока озвучиваю небольшие, "учебные".

Как вариант может быть счётчик на очередь в памяти поставить?

@Pro_grammer · 18.04.2020, 08:17

Сообщение от Power_Basic

А сейчас все потоки, расталкивая друг друга, бросаются записывать свои файлы на диск одновременно, ну вот он и бастует, бедолага Возможно так.

Это вряд ли

Контроллер диска всех выставит в очередь, он свою работу знает. Если конечно, у вас нет ситуации, когда файлы с одним именем пишутся разными потоками?
Критично работа в потоке с GUI элементами - желательно чтобы все обращения были из основного потока, это связано с системной обработкой событий. Синхронизация потоков с глобальными переменными, с общей памятью, если есть такие.
И главная засада в вашей ситуации, это сам механизм работы голосового движка на запись WAV. Это черный ящик, на работу которого мы не можем влиять. Какие там критичные процессы, и могут ли они работать стабильно в многопоточном режиме?
Лично я не сталкивался с описанием работы SAPI5 именно в многопотоке.

@Power_Basic · 18.04.2020, 15:30 **[ТС]**

Сообщение от Pro_grammer

Это вряд ли
Контроллер диска всех выставит в очередь, он свою работу знает. Если конечно, у вас нет ситуации, когда файлы с одним именем пишутся разными потоками?

На самом деле, у каждого потока свой файл для записи. Но по окончании своей работы каждый из них отмечается в одном общем файле "report.txt". Ну а поскольку все они заканчивают работу почти одновременно, то там стоит пауза со случайной продолжительностью от 1 до 2000 миллисекунд и плюс ещё обработчик ошибок, который в случае чего даёт потоку дополнительную паузу, после чего повторяет действие.

Сообщение от Pro_grammer

Критично работа в потоке с GUI элементами - желательно чтобы все обращения были из основного потока, это связано с системной обработкой событий.

Это ценное замечание. На самом деле, мне это тоже приходило в голову, но пока ещё руки не дошли до практической реализации, да и технического мастерства пока ещё не хватает, если честно.
На данный момент у меня действительно каждый "рабочий" поток и звук на диск записывает, и свою собственную полосу прогресса отрисовывает. Планирую сделать так, чтобы каждый из них вместо этого отправлял соответствующее сообщение. В основном потоке мы его ловим и отрисовываем. Ещё была мысля добавить для целей "рисования" ещё один дополнительный поток "Painter".

Сообщение от Pro_grammer

Синхронизация потоков с глобальными переменными, с общей памятью, если есть такие.

Вот здесь я не совсем уловил вашу мысль, если честно. А это очень важный момент.
Вы имеете в виду, что в многопотоковых приложениях безопаснее использовать именно локальные?

Сообщение от Pro_grammer

И главная засада в вашей ситуации, это сам механизм работы голосового движка на запись WAV. Это черный ящик, на работу которого мы не можем влиять.

Ну это да. Не переписывать же все COM-библиотеки с нуля

Сообщение от Pro_grammer

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

Ну вот это-то как раз и интересно. Чувствовать себя, в некоторой степени, первопроходцем

Я же говорил уже не раз, что для меня программирование это вовсе не профессия, а одно из хобби, что-то вроде творчества. Кто-то стихи для души пишет, а я вот программы

Хотя, сказать по правде, стихи тоже иногда пишу

@Pro_grammer · 18.04.2020, 15:48

Сообщение от Power_Basic

Вы имеете в виду, что в многопотоковых приложениях безопаснее использовать именно локальные?

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

Сообщение от Power_Basic

Но по окончании своей работы каждый из них отмечается в одном общем файле "report.txt".

Это тоже так то не гуд, особенно

Сообщение от Power_Basic

пауза со случайной продолжительностью от 1 до 2000 миллисекунд

. Тут тоже нужны мьютексы или семафоры, в общем инструмент который позволяет захватить этот файл потоком на время его записи и защита от от других потоков.

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

@Power_Basic · 19.04.2020, 01:28 **[ТС]**

Сообщение от Power_Basic

Вы имеете в виду, что в многопотоковых приложениях безопаснее использовать именно локальные?

Сообщение от Pro_grammer

именно так.

Попробую избавиться от глобальных переменных, где это возможно.

Сообщение от Pro_grammer

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

Погуглил... Мьютексы, семафоры... Попробую почитать на эту тему, разобраться.

Сообщение от Power_Basic

Но по окончании своей работы каждый из них отмечается в одном общем файле "report.txt".

Сообщение от Pro_grammer

Это тоже так то не гуд, особенно

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

Сообщение от Pro_grammer

пауза со случайной продолжительностью от 1 до 2000 миллисекунд

Сообщение от Pro_grammer

Тут тоже нужны мьютексы или семафоры, в общем инструмент который позволяет захватить этот файл потоком на время его записи и защита от от других потоков.

Буду изучать.

Сообщение от Pro_grammer

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

Все визуальные эффекты отключил, запись в общий файл контроля отключил, считывание показателей со счётчика загрузки процессора отключил, "интеллектуальное" управление загрузкой процессора отключил. В результате немного изменений

Нет, если задействовать всего 2-3 "рабочих" потока и повтыкать в разные места DOEVENT, тогда не зависает вроде, но очень уж медленно работает. Да и даже без DOEVENT тоже вроде бы не зависает. Склоняюсь к тому, что моя первоначальная идея всё-таки была правильной - оптимальный подход это задействовать такое число потоков, которое не превышает количество физических ядер процессора.

Новые блоги и статьи Все статьи Все блоги /
моя боль iceja 24.01.2026 Выложила интерполяцию кубическими сплайнами www. iceja. net REST сервисы временно не работают, только через Web. Написала за 56 рабочих часов этот сайт с нуля. При помощи perplexity. ai PRO , при. . .	Модель сукцессии микоризы anaschu 24.01.2026 Решили писать научную статью с неким РОманом	http://iceja.net/ математические сервисы iceja 20.01.2026 Обновила свой сайт http:/ / iceja. net/ , приделала Fast Fourier Transform экстраполяцию сигналов. Однако предсказывает далеко не каждый сигнал (см ограничения http:/ / iceja. net/ fourier/ docs ). Также. . .	http://iceja.net/ сервер решения полиномов iceja 18.01.2026 Выкатила http:/ / iceja. net/ сервер решения полиномов (находит действительные корни полиномов методом Штурма). На сайте документация по API, но скажу прямо VPS слабенький и 200 000 полиномов. . .
Расчёт переходных процессов в цепи постоянного тока igorrr37 16.01.2026 / * Дана цепь(не выше 3-го порядка) постоянного тока с элементами R, L, C, k(ключ), U, E, J. Программа находит переходные токи и напряжения на элементах схемы классическим методом(1 и 2 з-ны. . .	Восстановить юзерскрипты Greasemonkey из бэкапа браузера damix 15.01.2026 Если восстановить из бэкапа профиль Firefox после переустановки винды, то список юзерскриптов в Greasemonkey будет пустым. Но восстановить их можно так. Для этого понадобится консольная утилита. . .	Сукцессия микоризы: основная теория в виде двух уравнений. anaschu 11.01.2026 https:/ / rutube. ru/ video/ 7a537f578d808e67a3c6fd818a44a5c4/	WordPad для Windows 11 Jel 10.01.2026 WordPad для Windows 11 — это приложение, которое восстанавливает классический текстовый редактор WordPad в операционной системе Windows 11. После того как Microsoft исключила WordPad из. . .