OberonCore

Как получить данные в программу BlackBox по URL?
Существует ли специальная функция для этого? В справке не обнаружил.
============

Небольшой HTTP клиент.
https://svn.oberoncore.ru/community/bbcc/Dia/Dia/Mod/HTTPClient.odc

Пример использования (скачивает по URL документ и открывает в новом окне):
DiaHTTPClient.LoadInAux('www.uniprot.org/uniprot/P68871.fasta')

На его основе сделал лист для установки модулей — DiaSetupList.

(устаревшие вложения удалены)

Если я правильно понял, вопрос - об HTTP-клиенте в ББ. Есть ли такой в природе?

Вроде того... или надо писать с нуля используя имеющийся пакет TCP? Судя по переносу темы так и есть

В системе O3 есть подозрительный модуль O3bbWebClient.

Написал свой клиент с минимальными функциями в итоге прикреплю к первому сообщению.

Из которого логически вытек лист для установки модулей — DiaSetupList.
Загрузил в первое сообщение.

д'Иван, это же просто замечательно то, что вы сделали! : )
Серьёзно! Давно пора было обзавестись автоматической установкой плагинов в ББ.

Почему такой грустный код? (Кстати, опечатка в комментарии.)Достаточно сделать len[j] := 0X сразу после WHILE. Аналогичный код есть в процедуре Load.

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

Замечу также мимоходом, что Reader у вас никогда не заканчивает работу:Проверка всегда будет давать истину. Я бы порекомендовал проверять хотя бы ~r.ready, а по-хорошему, надо бы и при ошибках заканчивать работу. Например, если заголовок "HTTP" не найден и т.п.

В процедуре Load, я считаю, вам не нужен циклВо-первых, stream.r.ready может никогда не наступить. Во-вторых, вы уже научились пользоваться Services.Action, так и пользуйтесь ими! И вообще, пользователь ведь может в процессе вашего цикла с ProcessMessages повторно нажать на коммандер. Почему бы не избавиться от глобальной переменной и не запустить несколько закачек параллельно?

В процедуре Setup рекомендую заменить код
на следующий:

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

Не успел поправить на случай совпадения длины сообщения с 1000.

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

Не согласен с формулировкой Что может быть для разработчика непонятного в "распаковать и нажать командер компиляции" (или в редких случаях дописать данный кусок текста в документ Strings/Menus)? Про не разработчика, которому даётся архив распаковал-запустил-пользуйся, тут речь не идёт и не может идти.

Но это не значит, что я против тулзы, которая выполняет определённую рутинную работу.
И, пожалуй, было бы полезно выписать, какие действия эта тулза автоматизирует. Т.е. сформулировать ТЗ.

P.S. Поглядтие обсуждение: viewtopic.php?p=16368#p16368

Здорово и остроактуально, сам хотел уж браться.

---------------------
Только почему бы просто не нумеровать версии? Зачем существуют номера версий?
Зарезервировать позиции четыре: 0000, 0001 ... для легкости упорядочивания в файл-менеджерах, и вперед.
Вторая цифра будет major-version. В случае чего можно и перепрыгнуть сколько-то номеров.

Просто заменитенаИ кстати, не использовали бы вы одиночную букву l в качестве имени переменной: плохо читается, похожа на 1 и i.

Процедуру Process логично переименовать в Install, и сделайте ей строки IN-параметрами.

To: Александр
Поправил, а также сделал чтобы после установки открывался Quick-Start.odc или *-Quick-Start.odc

To: Евгений
Убрал "идею", теперь там просто просьба расширить лист. По моему мнению там должны быть все доступные в интернете подсистемы для КП. Но вот что касается порядка и комментариев, тут надо подумать. Звездочкой помечать, например те, системы которые рекомендуются для пробы (это когда речь про Ext).

Касаемо удаления, то для подсистем из oberoncore есть список файлов в отдельном файле, по которому реально составить список для удаления, но вот у Цина таких файлов нету. Тут нужна таблица, которая в линуксе например тоже хранится в интернете. Таблицу с описанием подсистем (какие файлы включаются, версия, зависимости, источник т.п.) можно хранить и к ней обращаться за инструкциями, тогда отпадает необходимость строго называть файл Quick-Start.odc и т.п.

Вы там по умолчанию качаете у Цинна Pac-файлы, но сам Pac не у всех установлен. Логично его качать и устанавливать первым.

нет нет, везде стандартное все. StdCoder.

Виноват, это я не так понял. Предложение снимается.

А у меня не заработал
Выдаёт тряп, upd: заработало, ибо надо было указать localAdr='0.0.0.0' ибо Win7
кстати, зачем внутри модуля используется WinAPI? наверное, для блокировки процесса в ожидании подключения. но зачем если есть (s: CommStreams.Stream)IsConnected(): BOOLEAN;

Сейчас SetupListV0003.odc более правильно организован, чем клиент, там было обсуждение по улучшению кода.
WinApi понадобился для
Который используется в
Сейчас в SetupListV0003.odc все совсем подругому организованно, через Services.Action
Но такой вариант тоже может оказаться полезным, поскольку так (с WHILE) сохраняется последовательность выполнения программы и не нужно выдумывать ничего с синхронизацией.

это хорошо, а то винапи - вызывает оторопь

Спасибо, что обратили внимание на WinApi, а то таскался код мусорный, который стал не нужен в новой реализации. Почистил и заменил модуль DiaSetupList в первом сообщении.

а вы не думали выделить клиент в отдельную подсистему? ну, реализовать хотя-бы http/1.1, это было бы полезно в плане накопления функционала.