spf/linux by ~yz

[ygrek-3]

Привет всем.

 Сабж в ветке branch-linux-port. Чисто механически - брался diff
относительно текущего trunk - ОС-зависимые части прятались [IF]-ом.
win-версия (теоретически) работает без изменений. linux-версия
работает. Хочется побыстрее обьединиться в основное дерево. Кто-нибудь
просмотрит изменения на предмет инвариантности windows-исходников?

--
 ~ygrek


-------------------------------------------------------------------------
This SF.net email is sponsored by: Microsoft
Defy all challenges. Microsoft(R) Visual Studio 2008.
http://clk.atdmt.com/MRT/go/vse0120000070mrt/direct/01/
_______________________________________________
Spf-dev mailing list
[hidden email]
https://lists.sourceforge.net/lists/listinfo/spf-dev

[Andrey Cherezov]

Добрый день, ygrek!

Ваше сообщение от 20.02.2008 19:17:
>  Сабж в ветке branch-linux-port. Чисто механически - брался diff
> относительно текущего trunk - ОС-зависимые части прятались [IF]-ом.
> win-версия (теоретически) работает без изменений. linux-версия
> работает. Хочется побыстрее обьединиться в основное дерево. Кто-нибудь
> просмотрит изменения на предмет инвариантности windows-исходников?
>  
Я просматривал коммиты по мере их поступления по подписке, ничего
подозрительного не заметил. Как правильно собрать виндовую версию из
этой ветки? Попробую скомпилировать Eserv, как обычно :) Линуксов тоже
под рукой пара штук, но пока не знаю, на чем реально там испытать. Просто
на запускабельность и стандартные либы - могу. Вот на праздник должно
появиться время на это :)

-------------------------------------------------------------------------
This SF.net email is sponsored by: Microsoft
Defy all challenges. Microsoft(R) Visual Studio 2008.
http://clk.atdmt.com/MRT/go/vse0120000070mrt/direct/01/
_______________________________________________
Spf-dev mailing list
[hidden email]
https://lists.sourceforge.net/lists/listinfo/spf-dev

[Yuriy Zhilovets]

ygrek пишет:

>ОС-зависимые части прятались [IF]-ом.
>
Не очень мне нравится этот [IF]. Я думал просто запихать все подключения
системных файлов в отдельный spf.f

Ю. Жиловец


-------------------------------------------------------------------------
This SF.net email is sponsored by: Microsoft
Defy all challenges. Microsoft(R) Visual Studio 2008.
http://clk.atdmt.com/MRT/go/vse0120000070mrt/direct/01/
_______________________________________________
Spf-dev mailing list
[hidden email]
https://lists.sourceforge.net/lists/listinfo/spf-dev

[Yuriy Zhilovets]

Andrey Cherezov пишет:

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

Ю. Жиловец


-------------------------------------------------------------------------
This SF.net email is sponsored by: Microsoft
Defy all challenges. Microsoft(R) Visual Studio 2008.
http://clk.atdmt.com/MRT/go/vse0120000070mrt/direct/01/
_______________________________________________
Spf-dev mailing list
[hidden email]
https://lists.sourceforge.net/lists/listinfo/spf-dev

[Andrey Cherezov]

Добрый день, ygrek!

Ваше сообщение от 20.02.2008 19:17:
>  Сабж в ветке branch-linux-port. Чисто механически - брался diff
> относительно текущего trunk - ОС-зависимые части прятались [IF]-ом.
> win-версия (теоретически) работает без изменений. linux-версия
> работает. Хочется побыстрее обьединиться в основное дерево. Кто-нибудь
> просмотрит изменения на предмет инвариантности windows-исходников?
>  
Взял branch-linux-port, скомпилировал spf4.exe. acWEB им не компилируется,
обламывается на древней ~ac/lib/win/com/com.f
Exception #-2147221005 at: COM.F:175:64:
Interface: IID_IUnknown {00000000-0000-0000-C000-000000000046}
                                                              ^
2147746291(-2147221005) Unknown error
2147746291 HEX U.
800401F3  Ok
0x800401F3 ErrorMessage ANSI>OEM TYPE CR
Недопустимая строка с указанием класса

Не расковыривал еще причину. Но уже понятно, что "без изменений" - это
пока действительно теоретически.
А обложку надо бы заменить:
SP-FORTH - ANS FORTH 94 for Win95/98/Me/NT/2k/XP/Vista
на
SP-FORTH - ANS FORTH 94 for Win9x/Me/NT/200x/XP/Vista/Linux :)
А то теперь только по размеру можно между бинарниками ориентироваться -
эти новые в два раза меньше.

-------------------------------------------------------------------------
This SF.net email is sponsored by: Microsoft
Defy all challenges. Microsoft(R) Visual Studio 2008.
http://clk.atdmt.com/MRT/go/vse0120000070mrt/direct/01/
_______________________________________________
Spf-dev mailing list
[hidden email]
https://lists.sourceforge.net/lists/listinfo/spf-dev

[Andrey Cherezov]

Моё сообщение от 20.02.2008 23:46:
> обламывается на древней ~ac/lib/win/com/com.f
> Exception #-2147221005 at: COM.F:175:64:
> Interface: IID_IUnknown {00000000-0000-0000-C000-000000000046}
>                                                               ^
> 0x800401F3 ErrorMessage ANSI>OEM TYPE CR
> Недопустимая строка с указанием класса
>
> Не расковыривал еще причину.
Понятно. Отбой тревоги :) В этой версии BL WORD в конце строки включает
в результирующую строку 0x0D, а не должен.
Это у меня с UNIX-LINES сохранился бинарник, сам виноват. Включил
DOS-LINES, скомпилировалось! И вроде работает.
acWEB.exe получился на 11Кб меньше чем раньше.

-------------------------------------------------------------------------
This SF.net email is sponsored by: Microsoft
Defy all challenges. Microsoft(R) Visual Studio 2008.
http://clk.atdmt.com/MRT/go/vse0120000070mrt/direct/01/
_______________________________________________
Spf-dev mailing list
[hidden email]
https://lists.sourceforge.net/lists/listinfo/spf-dev

[ygrek-3]

On Thu, 21 Feb 2008 00:12:22 +0200
Andrey Cherezov <[hidden email]> wrote:

> Моё сообщение от 20.02.2008 23:46:
> > обламывается на древней ~ac/lib/win/com/com.f
> > Exception #-2147221005 at: COM.F:175:64:
> > Interface: IID_IUnknown {00000000-0000-0000-C000-000000000046}
> >                                                               ^
> > 0x800401F3 ErrorMessage ANSI>OEM TYPE CR
> > Недопустимая строка с указанием класса
> >
> > Не расковыривал еще причину.
> Понятно. Отбой тревоги :) В этой версии BL WORD в конце строки включает
> в результирующую строку 0x0D, а не должен.
> Это у меня с UNIX-LINES сохранился бинарник, сам виноват. Включил
> DOS-LINES, скомпилировалось! И вроде работает.
> acWEB.exe получился на 11Кб меньше чем раньше.

Хм, а почему меньше получился?.. странно.
Насчёт переводов строк - тоже с этим сталкивался - и в этом же месте :)
Вариант решения в ветке wide-char - локальные опции компиляции в spf.compile.ini

--
 ~ygrek


-------------------------------------------------------------------------
This SF.net email is sponsored by: Microsoft
Defy all challenges. Microsoft(R) Visual Studio 2008.
http://clk.atdmt.com/MRT/go/vse0120000070mrt/direct/01/
_______________________________________________
Spf-dev mailing list
[hidden email]
https://lists.sourceforge.net/lists/listinfo/spf-dev

[Yuriy Zhilovets]

>Насчёт переводов строк - тоже с этим сталкивался - и в этом же месте :)
>Вариант решения в ветке wide-char - локальные опции компиляции в spf.compile.ini
>  
>
Нельзя ли, чтобы INTERPRET просто выкидывал все пробельные символы в
конце строки?

Ю. Жиловец


-------------------------------------------------------------------------
This SF.net email is sponsored by: Microsoft
Defy all challenges. Microsoft(R) Visual Studio 2008.
http://clk.atdmt.com/MRT/go/vse0120000070mrt/direct/01/
_______________________________________________
Spf-dev mailing list
[hidden email]
https://lists.sourceforge.net/lists/listinfo/spf-dev

[Andrey Cherezov]

Some javascript/style in this post has been disabled (why?)

Добрый день, Yuriy Zhilovets!

Ваше сообщение от 21.02.2008 22:24:

Нельзя ли, чтобы INTERPRET просто выкидывал все пробельные символы в 
конце строки?
  

Если бы я использовал не BL WORD COUNT (старорежимный способ в очень древней
либе com.f), а NextWord, или как он там по новомодному - PARSE-WORD, то пробельные
символы отрезались бы. А раз явно указано BL, то не отрезались.
INTERPRET использует NextWord, поэтому там все работает нормально и в случае 13
в качестве разделителя.

-------------------------------------------------------------------------
This SF.net email is sponsored by: Microsoft
Defy all challenges. Microsoft(R) Visual Studio 2008.
http://clk.atdmt.com/MRT/go/vse0120000070mrt/direct/01/
_______________________________________________
Spf-dev mailing list
[hidden email]
https://lists.sourceforge.net/lists/listinfo/spf-dev

[Andrey Cherezov]

Some javascript/style in this post has been disabled (why?)

Добрый день, ygrek!

Ваше сообщение от 21.02.2008 21:34:

Это у меня с UNIX-LINES сохранился бинарник, сам виноват. Включил 
DOS-LINES, скомпилировалось! И вроде работает.
acWEB.exe получился на 11Кб меньше чем раньше.
    

Хм, а почему меньше получился?.. странно

Не выяснял пока. Может быть у меня в исходном spf4.exe не самый последний
оптимизатор использовался, хотя я вроде регулярно скачиваю изменения и
перекомпилирую его. Да и новый spf4.exe скомпилировал с каталогом lib от
"старого" spf4, т.к. с CVS взял только ветку src.

Собственно и сам spf4.exe - 56Кб против прежних 108Кб - опции компилятора/
оптимизатора по умолчанию видать такие разные в этих ветвях?

-------------------------------------------------------------------------
This SF.net email is sponsored by: Microsoft
Defy all challenges. Microsoft(R) Visual Studio 2008.
http://clk.atdmt.com/MRT/go/vse0120000070mrt/direct/01/
_______________________________________________
Spf-dev mailing list
[hidden email]
https://lists.sourceforge.net/lists/listinfo/spf-dev

[ygrek-3]

> Собственно и сам spf4.exe - 56Кб против прежних 108Кб - опции компилятора/
> оптимизатора по умолчанию видать такие разные в этих ветвях?

А, да. Отключён оптимизатор. Вообще в линукс версии он сейчас не работает я так понял.

--
 ~ygrek


-------------------------------------------------------------------------
This SF.net email is sponsored by: Microsoft
Defy all challenges. Microsoft(R) Visual Studio 2008.
http://clk.atdmt.com/MRT/go/vse0120000070mrt/direct/01/
_______________________________________________
Spf-dev mailing list
[hidden email]
https://lists.sourceforge.net/lists/listinfo/spf-dev

[Yuriy Zhilovets]

>А, да. Отключён оптимизатор. Вообще в линукс версии он сейчас не работает я так понял.
>  
>
Он не работает во время сборки, но работает в готовой системе. Поэтому
неплохо будет ее потом саму под себя скомпилировать.

Ю. Жиловец


-------------------------------------------------------------------------
This SF.net email is sponsored by: Microsoft
Defy all challenges. Microsoft(R) Visual Studio 2008.
http://clk.atdmt.com/MRT/go/vse0120000070mrt/direct/01/
_______________________________________________
Spf-dev mailing list
[hidden email]
https://lists.sourceforge.net/lists/listinfo/spf-dev

[Andrey Cherezov]

Привет!

В Срд, 20/02/2008 в 21:36 +0200, Yuriy Zhilovets пишет:
> Имей в виду, что при этом собирается только объектный файл, а не
> исполняемый.
> Его еще надо линковать.

Слинковал под FC8, запускается, первые простые тесты прошли на ура,
включая многопоточные.

Из неприятностей:
1) другой SEH, при сбое слетает процесс, ну это мелочи пока
2) стек у нового DLOPEN неудачный - строки нефортовые, и ior не
добъешься - в ядре мы так обычно не делаем. Предлагаю использовать
мой старый вариант DLOPEN/DLSYM, который я встраивал в LinuxSPF,
и который совместим и с Windows, и есть кроссплатформенные примеры,
и реально используемые почти кроссплатформенные либы (в ~ac/lib/lin).
Впрочем, мне тоже не сложно переименовать свой DLOPEN во что-то
другое, просто изменений будет больше.
3) ModuleDirName дает "./" вместо полного пути, в результате
что-то скомпилировать можно, только находясь в корне spf, что
неудобно (ModuleDirName и делался для отвязки от этого неудобства).
4) придется подстраиваться к регистрочувствительным именам файлов
(в либах) - это тоже мелочи, т.к. наверное только у меня остались либы
с заглавными буквами в названиях - с досовых времен.
5) дальше идут не неудобства, а непонятки
[root@rainbow ~]# ./spf4
[титры]
REQUIRE [UNDEFINED] lib/include/tools.f
----------------------------------------------------------------
[Segmentation fault]  Code:1  Address:080507A6  Word:Ошибка
сегментирования

Если включить трассировку строк, то:

: [ELSE]   \ 94 TOOLS EXT
...
\ [ELSE] - ...
    1
    BEGIN
      NextWord DUP
      IF  

----------------------------------------------------------------
[Segmentation fault]  Code:1  Address:080507A6  Word:Ошибка
сегментирования

Код вроде в границу не упирается (пробовал скомпилировать большой
кусок мусора в HERE - не слетает). В общем, пока не разобрался.
-------------------------------------------------------------------------
This SF.net email is sponsored by: Microsoft
Defy all challenges. Microsoft(R) Visual Studio 2008.
http://clk.atdmt.com/MRT/go/vse0120000070mrt/direct/01/
_______________________________________________
Spf-dev mailing list
[hidden email]
https://lists.sourceforge.net/lists/listinfo/spf-dev

[Andrey Cherezov]

В Сбт, 23/02/2008 в 01:51 +0200, Andrey Cherezov пишет:
> Слинковал под FC8, запускается, первые простые тесты прошли на ура,
> включая многопоточные.
> 5) дальше идут не неудобства, а непонятки
> [root@rainbow ~]# ./spf4
> [титры]
> REQUIRE [UNDEFINED] lib/include/tools.f
> ----------------------------------------------------------------
> [Segmentation fault]  Code:1  Address:080507A6  Word:Ошибка
> сегментирования

Поковырял немного, без результата, сбоило даже на обычном VOCABULARY.
В конце концов решил попробовать оригинал - spf4posix.googlecode.com -
собрал под wine под FC8, файл получился 136 Кб, и все что раньше глючило
- работает. Wine деинсталлировал, завтра попробую собирать без jpf375c.
-------------------------------------------------------------------------
This SF.net email is sponsored by: Microsoft
Defy all challenges. Microsoft(R) Visual Studio 2008.
http://clk.atdmt.com/MRT/go/vse0120000070mrt/direct/01/
_______________________________________________
Spf-dev mailing list
[hidden email]
https://lists.sourceforge.net/lists/listinfo/spf-dev

[Yuriy Zhilovets]

Andrey Cherezov пишет:

>Из неприятностей:
>1) другой SEH, при сбое слетает процесс, ну это мелочи пока
>  
>
Обработки исключений под Линуксом нет вообще. Тот дамп, что выводится,
сделан полушаманским путем (через какое-то секретное расширение
обработчиков сигналов) и в принципе не может продолжать работу после
исключения.
Уж на что я не люблю Билла Гейтса, но вынужден признать, что
внутренности Линукс выглядят довольно архаично.

>2) стек у нового DLOPEN неудачный - строки нефортовые, и ior не
>добъешься - в ядре мы так обычно не делаем. Предлагаю использовать
>мой старый вариант DLOPEN/DLSYM, который я встраивал в LinuxSPF,
>и который совместим и с Windows, и есть кроссплатформенные примеры,
>и реально используемые почти кроссплатформенные либы (в ~ac/lib/lin).
>Впрочем, мне тоже не сложно переименовать свой DLOPEN во что-то
>другое, просто изменений будет больше.
>  
>
Мой DLOPEN работает на довольно низком уровне и очень рано, когда
форт-система еще толком не скомпилирована. ior он возвращать никак не
может, поскольку для этого надо вызывать функцию _errorno, а ее нельзя
вызвать без работающего DLOPEN. То же самое со строками - их надо
куда-то копировать и врисовывать ноль. Поэтому он сделан именно так.
Но поскольку это низкоуровневое слово, давайте переименуем его,
допустим, в (DLOPEN) или DYNOPEN и определим позже высокоуровневое
DLOPEN с идентичным твоему интерфейсом. Тем более, что твои библиотеки
уже используются, а в SPF/Linux о совместимости пока речь не идет.

>3) ModuleDirName дает "./" вместо полного пути, в результате
>что-то скомпилировать можно, только находясь в корне spf, что
>неудобно (ModuleDirName и делался для отвязки от этого неудобства).
>  
>
Придется вModuleName вместо чтения ARGV[0] вызывать getcwd
(http://www.opengroup.org/onlinepubs/009695399/functions/getcwd.html) и
объединять его с именем модуля..

>4) придется подстраиваться к регистрочувствительным именам файлов
>(в либах) - это тоже мелочи, т.к. наверное только у меня остались либы
>с заглавными буквами в названиях - с досовых времен.
>  
>
Заодно надо будет во всех библиотеках менять в путях REQUIRE "\" на "/".

>5) дальше идут не неудобства, а непонятки
>[root@rainbow ~]# ./spf4
>[титры]
>REQUIRE [UNDEFINED] lib/include/tools.f
>----------------------------------------------------------------
>[Segmentation fault]  Code:1  Address:080507A6  Word:Ошибка
>сегментирования
>
>  
>

Похоже на оптимизатор.

Ю. Жиловец


-------------------------------------------------------------------------
This SF.net email is sponsored by: Microsoft
Defy all challenges. Microsoft(R) Visual Studio 2008.
http://clk.atdmt.com/MRT/go/vse0120000070mrt/direct/01/
_______________________________________________
Spf-dev mailing list
[hidden email]
https://lists.sourceforge.net/lists/listinfo/spf-dev

[Ruvim Pinka]

Привет!

On 2/23/08, Yuriy Zhilovets <[hidden email]> wrote:
> Но поскольку это низкоуровневое слово, давайте переименуем его,
> допустим, в (DLOPEN) или DYNOPEN и определим позже высокоуровневое
> DLOPEN с идентичным твоему интерфейсом.

да, это будет правильно!  еще вариант к рассмотрению: "__DLOPEN"


> Заодно надо будет во всех библиотеках менять в путях REQUIRE "\" на "/".

Или даже быстрей будет, эту функцию возложить и на само слово REQUIRE

--
Ruvim
-------------------------------------------------------------------------
This SF.net email is sponsored by: Microsoft
Defy all challenges. Microsoft(R) Visual Studio 2008.
http://clk.atdmt.com/MRT/go/vse0120000070mrt/direct/01/
_______________________________________________
Spf-dev mailing list
[hidden email]
https://lists.sourceforge.net/lists/listinfo/spf-dev

[ygrek-3]

Привет,

> Обработки исключений под Линуксом нет вообще. Тот дамп, что выводится,
> сделан полушаманским путем (через какое-то секретное расширение
> обработчиков сигналов) и в принципе не может продолжать работу после
> исключения.
> Уж на что я не люблю Билла Гейтса, но вынужден признать, что
> внутренности Линукс выглядят довольно архаично.

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

--
 ~ygrek


-------------------------------------------------------------------------
This SF.net email is sponsored by: Microsoft
Defy all challenges. Microsoft(R) Visual Studio 2008.
http://clk.atdmt.com/MRT/go/vse0120000070mrt/direct/01/
_______________________________________________
Spf-dev mailing list
[hidden email]
https://lists.sourceforge.net/lists/listinfo/spf-dev

[Yuriy Zhilovets]

Ruvim Pinka пишет:

>Или даже быстрей будет, эту функцию возложить и на само слово REQUIRE
>  
>
Нельзя - под Линуксом "\" вполне может быть в имени файла.

Ю. Жиловец


-------------------------------------------------------------------------
This SF.net email is sponsored by: Microsoft
Defy all challenges. Microsoft(R) Visual Studio 2008.
http://clk.atdmt.com/MRT/go/vse0120000070mrt/direct/01/
_______________________________________________
Spf-dev mailing list
[hidden email]
https://lists.sourceforge.net/lists/listinfo/spf-dev

[Yuriy Zhilovets]

Some javascript/style in this post has been disabled (why?)

ygrek пишет:

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

Можно, но не все. Смотри сюда:

The behaviour of a process is undefined after it returns normally from a signal-catching function for a  SIGBUS, SIGFPE, SIGILL or SIGSEGV signal that was not generated by kill(), sigqueue() or raise().

(http://www.opengroup.org/onlinepubs/7990989775/xsh/sigaction.html)

Я же говорю: архаика. Куча нереентерабельных во время прерывания функций живо напоминает незабвенную RT-11.

Ю. Жиловец



-------------------------------------------------------------------------
This SF.net email is sponsored by: Microsoft
Defy all challenges. Microsoft(R) Visual Studio 2008.
http://clk.atdmt.com/MRT/go/vse0120000070mrt/direct/01/
_______________________________________________
Spf-dev mailing list
[hidden email]
https://lists.sourceforge.net/lists/listinfo/spf-dev

[Andrey Cherezov]

Добрый день, Yuriy Zhilovets!

Ваше сообщение от 23.02.2008 15:05:
> Уж на что я не люблю Билла Гейтса, но вынужден признать, что
> внутренности Линукс выглядят довольно архаично.
>  
Да я вообще всегда говорил, что Линукс - это DOS на стероидах.
> куда-то копировать и врисовывать ноль. Поэтому он сделан именно так.
> Но поскольку это низкоуровневое слово, давайте переименуем его,
> допустим, в (DLOPEN) или DYNOPEN и определим позже высокоуровневое
> DLOPEN с идентичным твоему интерфейсом. Тем более, что твои библиотеки
> уже используются, а в SPF/Linux о совместимости пока речь не идет.
>  
Да, тогда (DLOPEN) вполне подойдет.
> Заодно надо будет во всех библиотеках менять в путях REQUIRE "\" на "/".
>  
Мне почти нигде не придется, т.к. я всегда в REQUIRE старался писать "/",
в рассчете правда не на линукс, а на автозагрузку либ через веб (если
кто помнит
историю появления REQUIRE в SPF :).

-------------------------------------------------------------------------
This SF.net email is sponsored by: Microsoft
Defy all challenges. Microsoft(R) Visual Studio 2008.
http://clk.atdmt.com/MRT/go/vse0120000070mrt/direct/01/
_______________________________________________
Spf-dev mailing list
[hidden email]
https://lists.sourceforge.net/lists/listinfo/spf-dev