Как принудительно завершить процесс / Caché, Ensemble, DeepSee, MiniM, IRIS, GT.M

Мобильная версия Контакт Правила FAQ Помощь

Гость

Войти | Регистрация | Профиль | Очистить

Форумы | Пользователи | Статистика | Мод. лог | Поиск

Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр

Форумы / Caché, Ensemble, DeepSee, MiniM, IRIS, GT.M [игнор отключен] [закрыт для гостей] / Как принудительно завершить процесс

22 сообщений из 22, страница 1 из 1

Как принудительно завершить процесс

#39203462

О-О-О

Гость

Запускаю программы через терминал
Do ^Programma1
Иногда запускаю программы через JOB
Все названия программ известны, могу через

$IO
$JOB
$Principal
$ZChild

узнать номер процесса каше (уникальный номер запущенного процесса) в виде |TRM|:|6900 или 6900

Имеется отдельная программа, которая ДОЛЖНА в случае сбоя отключать все запущенные процессы и завершить (мягко) работу.

Можно конечно в каждую программу встроить проверочный блок - что если с БД появилось сообщение (ключ) о завершении работы, то данные процессы самоликвидируются через "HALT" (обращается к глобальной переменной, в которой указано что нужно прекратить работу).
Проблема в том, что при большой нагрузке, начинаются сбои и ошибочно вылазит код о принудительном завершении. Редко, но все же.

Встал вопрос - знаю как определить номер процесса. Есть служебные слова (не знаю как сказать) для запуска внешних программ.
По логике, должна быть строка кода, которая также может и прервать выполнение определённой программы.

Запустил в терминале программу

Код: plaintext

1.
2.

do ^Start1
do ^Start2
do ^StopProgramm

Что должно быть в коде, чтобы выключить, остановить, завершить выполнение программ ^Start1, ^Start2 ?
Можно завершить жестко, остальное доделывает ^StopProgramm.

Если у вас есть код больше двух строк (с наворотами), то буду работать по старинке (через обращение к переменной в БД).
Ищу простое решение.

...

Рейтинг:

0 / 0

29.03.2016, 17:26

| Ответить | Цитировать | Написать

Как принудительно завершить процесс

#39203475

О-О-О

Гость

Нужно, чтобы программа не самоликвидировалась, а чтобы её остановила, прервала другая ВНЕШНЯЯ программа.

...

Рейтинг:

0 / 0

29.03.2016, 17:35

| Ответить | Цитировать | Написать

Как принудительно завершить процесс

#39203485

DAiMor

Участник

Откуда: Volzhsky -> Moscow -> CZ, Brno -> Moscow

Сообщения: 2 917

Рейтинг: 0 / 0

О-О-О,

$system.Process. Terminate (pid)
или
$zu(4,pid)

...

Рейтинг:

0 / 0

29.03.2016, 17:44

| Ответить | Цитировать | Написать

Как принудительно завершить процесс

#39203502

О-О-О

Гость

DAiMorО-О-О,

$system.Process. Terminate (pid)
или
$zu(4,pid)C первым вариантом прошло на ура, а вот второй вариант - работать не хочет.

Разобрался.
Если написать
do $zu(4,6756)
где 6756 - это номер запущенного процесса, то тогда также закрывается

DO $SYSTEM.Process.Terminate(6756)

Равнозначны

Спасибо, DAiMor.
Вопросов больше нет.

...

Рейтинг:

0 / 0

29.03.2016, 17:59

| Ответить | Цитировать | Написать

Как принудительно завершить процесс

#39203676

Alexey Maslov

Участник

Откуда: СПб

Сообщения: 1 668

Рейтинг: 0 / 0

Всё не так однозначно.
Случай из жизни: процесс мог работать очень долго, но иногда надо было его прибить (для прекращения обслуживания некоего оборудования). Но процесс мог упасть и сам из-за ошибки. Так вот на нагруженном сервере 5-ти значный номер процесса мог повториться достаточно быстро (в течение суток), поэтому знать номер процесса оказалось мало, пришлось проверять переменную процесса и прибивать его, лишь если ей присвоено правильное значение.

...

Рейтинг:

0 / 0

29.03.2016, 21:51

| Ответить | Цитировать | Написать

Как принудительно завершить процесс

#39203765

misha_shar

Гость

Alexey MaslovВсё не так однозначно.
Случай из жизни: процесс мог работать очень долго, но иногда надо было его прибить (для прекращения обслуживания некоего оборудования). Но процесс мог упасть и сам из-за ошибки. Так вот на нагруженном сервере 5-ти значный номер процесса мог повториться достаточно быстро (в течение суток), поэтому знать номер процесса оказалось мало, пришлось проверять переменную процесса и прибивать его, лишь если ей присвоено правильное значение.
Чтобы управлять процессами во внешней программе необходимо вести Pidы запущенных процессов и если появился дубликат, то предыдущий процесс уже удален и значит по нему никаких действий предпринимать не надо.

...

Рейтинг:

0 / 0

30.03.2016, 06:04

| Ответить | Цитировать | Написать

Как принудительно завершить процесс

#39203797

О-О-О

Гость

Alexey MaslovВсё не так однозначно.
Случай из жизни: процесс мог работать очень долго, но иногда надо было его прибить (для прекращения обслуживания некоего оборудования). Но процесс мог упасть и сам из-за ошибки. Так вот на нагруженном сервере 5-ти значный номер процесса мог повториться достаточно быстро (в течение суток), поэтому знать номер процесса оказалось мало, пришлось проверять переменную процесса и прибивать его, лишь если ей присвоено правильное значение. Вот этот вопрос у меня сегодня и возник утром.
Как узнать перечень ВСЕХ запущенных процессов с их ИМЕНЕМ и НОМЕРОМ PID, чтобы затем, можно было вручную поотключать их.
Как на снимке

Alexey Maslov, ваше решение проблемы было бы интересно (опять ищу функцию, которая бы выводила список всех запущенных процессов с их именами и PID-ами).

P.S.
Кстати, $ZU очень интересная/занимательная функция.

...

Рейтинг:

0 / 0

30.03.2016, 08:03

| Ответить | Цитировать | Написать

Как принудительно завершить процесс

#39203798

О-О-О

Гость

Снимок

...

Рейтинг:

0 / 0

30.03.2016, 08:04

| Ответить | Цитировать | Написать

Как принудительно завершить процесс

#39203803

О-О-О

Гость

Кстати, по моим соображениям,
Получение списка всех запущенных процессов существенно распараллеливает процессы.
К примеру, нужно вывести несколько графиков в один отчет.
Каждый выводится от 3 до 7 сек, причем всегда по разному. Обычно, я не замарачиваюсь и запускаю их последовательно. Получается примерно 15 сек на один отчет. Все графики выводятся по одной анализируемой дате. Таких дат за раз около 180-250.
Если же знать номер процесса и его название, то можно задать генерацию графиков одновременно и опрашивать запущенные процессы. После генерации PDF отчета с графиками, программа завершает работу через Halt.
Итого в остатке получаем - как только в списке запущенных процессов не осталось запущенных программ по генерации графиков, можем запускать следующий цикл по генерации отчетов PDF с графиками.

Ориентировочное время сокращение работы уменьшится с 15 сек до 5-6 секунд.
Наверняка у многих периодически возникают такие задачи (генерации отчетов по одним данным) и затем генерация следующего отчета (после успешной генерации предыдущего отчета). А это возможно только при последовательном выполнении отчетов, программы, чтобы не запустить процесс генерации нового отчета раньше времени.

...

Рейтинг:

0 / 0

30.03.2016, 08:18

| Ответить | Цитировать | Написать

Как принудительно завершить процесс

#39203808

CacheUK

Гость

О-О-О, Мы запускаем программу в Job-е. Чтобы узнать PID процесса, в котором она исполняется используем код:

Код: plaintext

1.
2.
3.
4.
5.
6.
7.
8.

 zn "%SYS"
 Set rs = ##class(%ResultSet).%New()
 d rs.Prepare("Select Pid,Routine from %SYS.ProcessQuery where Routine='MyProgName'")
 d rs.Execute()
 While rs.Next(){
  set PidS=rs.Pid  // номер процесса, в котором работает программа ^MyProgName
 }
 do rs.Close()
 zn "workns"

Дальше с эти процессом делайте то, что Вам нужно.

...

Рейтинг:

0 / 0

30.03.2016, 08:34

| Ответить | Цитировать | Написать

Как принудительно завершить процесс

#39203824

О-О-О

Гость

CacheUK,

Спасибо.
То что нужно. Направление понял.
Ваш код сработал без запинок.

Если указать
s Process=##CLASS(%SYS.ProcessQuery).Open("J14")
то будет выведен процесс под номером 14 (самый первый столбец #Job). Здесь уже идёт нумерация подряд и без дырок в нумерации.
Не путать нумерацию Pid (где каше выдаёт случайное число) и нумерацию кол-ва запущенных процессов (Job).
Таким способом можно перебрать все существующие процессы, запущенные в Cache.

Более подробно %SYS.ProcessQuery

...

Рейтинг:

0 / 0

30.03.2016, 09:22

| Ответить | Цитировать | Написать

Как принудительно завершить процесс

#39203828

servit

Участник

Откуда: г. Кишинёв, Республика Молдова

Сообщения: 3 167

Рейтинг: 0 / 0

О-О-ОНужно, чтобы программа не самоликвидировалась, а чтобы её остановила, прервала другая ВНЕШНЯЯ программа.Было: 9162920 , 6973280 О-О-ОP.S.
Кстати, $ZU очень интересная/занимательная функция.Которой не следует пользоваться.
О-О-ОКак узнать перечень ВСЕХ запущенных процессов с их ИМЕНЕМ и НОМЕРОМ PID, чтобы затем, можно было вручную поотключать их.ДокументацияFor other aspects of process management, refer to the %SYS.ProcessQuery class.

Process Management
PS: ещё может пригодиться останов зависших процессов: $SYSTEM.Util.CleanDeadJobs() .

...

Рейтинг:

0 / 0

30.03.2016, 09:27

| Ответить | Цитировать | Написать

Как принудительно завершить процесс

#39203925

eduard93

Участник

Сообщения: 176

Рейтинг: 0 / 0

О-О-ОКстати, по моим соображениям,
Получение списка всех запущенных процессов существенно распараллеливает процессы.
К примеру, нужно вывести несколько графиков в один отчет.
Каждый выводится от 3 до 7 сек, причем всегда по разному. Обычно, я не замарачиваюсь и запускаю их последовательно. Получается примерно 15 сек на один отчет. Все графики выводятся по одной анализируемой дате. Таких дат за раз около 180-250.
Если же знать номер процесса и его название, то можно задать генерацию графиков одновременно и опрашивать запущенные процессы. После генерации PDF отчета с графиками, программа завершает работу через Halt.
Итого в остатке получаем - как только в списке запущенных процессов не осталось запущенных программ по генерации графиков, можем запускать следующий цикл по генерации отчетов PDF с графиками.

Ориентировочное время сокращение работы уменьшится с 15 сек до 5-6 секунд.
Наверняка у многих периодически возникают такие задачи (генерации отчетов по одним данным) и затем генерация следующего отчета (после успешной генерации предыдущего отчета). А это возможно только при последовательном выполнении отчетов, программы, чтобы не запустить процесс генерации нового отчета раньше времени.Для достижения этого эффекта можно и даже нужно использовать события . Вот минимальный пример кода:

Код: plaintext

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.

Class Utils.Job
{

/// do ##class(Utils.Job).PrintParralelWS()
ClassMethod PrintParralelWS(JobCount As %Integer = 4, Timeout As %Integer = 1)
{
  
 write "Start",!
 for i=1:1:JobCount {
   job ..exec1(Timeout)
 }
 write "All jobs started",!
 for i=1:1:JobCount {
   set msg = $listget($system.Event.WaitMsg(), 2)
   write msg,!
 }
 write "All jobs complete"
}

ClassMethod exec1(Timeout As %Integer = 1)
{
 hang Timeout
 do $system.Event.Signal($zparent, "Job " _ $job _ " complete")
}

}

Метод do ##class(Utils.Job).PrintParralelWS() будет выполняться примерно 1 секунду.
Более развёрнутые примеры выложены на GitHub тут и тут . Также есть обсуждение на community портале InterSystems .

...

Рейтинг:

0 / 0

30.03.2016, 11:18

| Ответить | Цитировать | Написать

Как принудительно завершить процесс

#39203947

servit

Участник

Откуда: г. Кишинёв, Республика Молдова

Сообщения: 3 167

Рейтинг: 0 / 0

eduard93Более развёрнутые примеры выложены на GitHub тут и тут . Также есть обсуждение на community портале InterSystems .И даже тут ( 17624921 ) и тут ( 13880300 ), причём на русском, чего очень бы хотелось и от ветки intersystems-ru .

...

Рейтинг:

0 / 0

30.03.2016, 11:32

| Ответить | Цитировать | Написать

Как принудительно завершить процесс

#39204014

eduard93

Участник

Сообщения: 176

Рейтинг: 0 / 0

servitпричём на русском, чего очень бы хотелось и от ветки intersystems-ru .
Несмотря на название у нас там всё-таки международное комьюнити, так что английский язык выбран выбран в качестве основного при написании кода/комментариев.

...

Рейтинг:

0 / 0

30.03.2016, 12:37

| Ответить | Цитировать | Написать

Как принудительно завершить процесс

#39204031

servit

Участник

Откуда: г. Кишинёв, Республика Молдова

Сообщения: 3 167

Рейтинг: 0 / 0

eduard93servitпричём на русском, чего очень бы хотелось и от ветки intersystems-ru .Несмотря на название у нас там всё-таки международное комьюнити, так что английский язык выбран выбран в качестве основного при написании кода/комментариев.К коду/комментариям вопросов нет и не было, а вот описания, инструкции, возможно и документацию, хотелось бы видеть в том числе и на русском, как это сделано у других:

...

Рейтинг:

0 / 0

30.03.2016, 13:01

| Ответить | Цитировать | Написать

Как принудительно завершить процесс

#39204044

servit

Участник

Откуда: г. Кишинёв, Республика Молдова

Сообщения: 3 167

Рейтинг: 0 / 0

eduard93 ,

А ведь был же русский когда-то:

...

Рейтинг:

0 / 0

30.03.2016, 13:11

| Ответить | Цитировать | Написать

Как принудительно завершить процесс

#39204146

eduard93

Участник

Сообщения: 176

Рейтинг: 0 / 0

servit eduard93 ,

А ведь был же русский когда-то:

вики проекта MDX2JSON (кроме примеров вывода) полностью доступны как на английском так и на русском языках.

...

Рейтинг:

0 / 0

30.03.2016, 14:10

| Ответить | Цитировать | Написать

Как принудительно завершить процесс

#39204174

servit

Участник

Откуда: г. Кишинёв, Республика Молдова

Сообщения: 3 167

Рейтинг: 0 / 0

eduard93А это и сейчас бывает.Вот именно, что бывает.

PS: что ж, бывает.

...

Рейтинг:

0 / 0

30.03.2016, 14:25

| Ответить | Цитировать | Написать

Как принудительно завершить процесс

#39204191

Alexey Maslov

Участник

Откуда: СПб

Сообщения: 1 668

Рейтинг: 0 / 0

О-О-ОAlexey Maslov, ваше решение проблемы было бы интересноНомера процессов были известны из $zchild (все они были JOB-нутыми) и сохранялись в глобале, поэтому получение их списка с PID и т.д. не требовалось.
Проблема состояла в том, как достоверно узнать, является ли процесс с известным номером (PID) тем самым процессом, который мы когда-то запустили для решения определённой задачи, или его номер случайно совпал с номером "нашего" процесса (а наш аварийно завершился). Определить это по имени программы было нельзя, т.к. одна и та же программа могла использоваться в различных процессах. Поэтому остановились на запросе значения переменной с известным именем у процесса с известным PID, для чего вполне подошёл запрос VariableByPid класса %SYS.ProcessQuery.

...

Рейтинг:

0 / 0

30.03.2016, 14:36

| Ответить | Цитировать | Написать

Как принудительно завершить процесс

#39204417

О-О-О

Гость

Alexey Maslov,

Я так же хотел пойти по вашей схеме - при запуске программы записывать в глобал название программы и его PID. В моём случае - проще, т.к. программы запускаются утром а отключаются часов с 16 до 20 вечера.Alexey MaslovПоэтому остановились на запросе значения переменной с известным именем у процесса с известным PID, для чего вполне подошёл запрос VariableByPid класса %SYS.ProcessQuery.Имеете ввиду, что даже связка PID+имя процесса не даёт уникальность. В результате чего потребовалась третья переменная. Типа внутри процесса висит переменная доступная для внешних программ (типа Public) и при её опросе - если она та самая - глушите, убиваете процесс "имя_процесса+PID+значение_переменной_из_имя_запущенной_программы".

Никогда с таким решением не сталкивался.

Есть повод подумать на будущее.

Честно говоря даже не ожидал такого количества решений.
Мне в принципе подойдет любое из предложенных решение, т.к. одновременно запущенных процессов от 45 до 80, а с таким количеством вариантов справится любой из предложенных вариантов.
Буду взвешивать плюсы и минусы
P.S. Об "Аварийное завершение программ" и дальнейшем их "зависании" в списке PID даже не задумывался. Так что этот вариант точно придётся брать в расчёт.

Всем спасибо.

...

Рейтинг:

0 / 0

30.03.2016, 18:05

| Ответить | Цитировать | Написать

Как принудительно завершить процесс

#39204506

Alexey Maslov

Участник

Откуда: СПб

Сообщения: 1 668

Рейтинг: 0 / 0

О-О-ОНикогда с таким решением не сталкивался.Благодаря вам задумался: зачем было делать так сложно?

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

Однако гораздо проще было написать код для JOB^%ZSTOP, в котором всего-навсего удалять:

Код: javascript

Kill ^MyProcessTable($job)

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

...

Рейтинг:

0 / 0

30.03.2016, 19:34

| Ответить | Цитировать | Написать

22 сообщений из 22, страница 1 из 1

Форумы / Caché, Ensemble, DeepSee, MiniM, IRIS, GT.M [игнор отключен] [закрыт для гостей] / Как принудительно завершить процесс

Цитировать

Написать

Автор*:

Ввести пароль для входа

Тема*:

Сообщение

Данное сообщение тематическое

Сообщение содержит картинки или видео 18+

Автор:

ВНИМАНИЕ! На данном подфоруме действуют строгие правила. Удостоверьтесь, что ваше сообщение соответствует им!

Форум или тема закрыты для гостей. Необходима авторизация!

Загрузить последнюю сохраненную версию

Вложение:

Вставить как галерею

Максимальный размер вложений: 4,0 МБ, аудио/видео: 8,0 МБ. Картинки большего размера ужимаются, если возможно.

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

Отправляя сообщение, я выражаю свое согласие с правилами форума и принимаю пользовательское соглашение.

Читали тему (0):

Читали форум (0):

Пользователи онлайн (0):

start [/forum/topic.php?fid=39&msg=39203475&tid=1556502]:	0ms
get settings:	11ms
get forum list:	14ms
check forum access:	3ms
check topic access:	3ms
track hit:	38ms
get topic data:	9ms
get forum data:	2ms
get page messages:	51ms
get tp. blocked users:	1ms
others:	298ms

total:	430ms