http://freesource.info/wiki/AltLinux/Sisyphus/Alterator/internals/6 History/revisions of FreeSource/AltLinux/Sisyphus/Alterator/internals/6 en-us http://freesource.info/wiki/AltLinux/Sisyphus/Alterator/internals/6/show?time=2006-10-31+17%3A14%3A09 <div class="pageBefore"><img src="http://freesource.info/wiki/images/z.gif" width="1" height="1" border="0" alt="" style="display:block" align="top" /></div><div class="page"> <b>Сравнение версий <a name=".altlinux.sisyphus.alterator.internals.6" href="http://freesource.info/wiki/AltLinux/Sisyphus/Alterator/internals/6&" class="">/Alt&nbsp;Linux&nbsp;/&nbsp;Sisyphus&nbsp;/&nbsp;Alterator&nbsp;/&nbsp;internals&nbsp;/&nbsp;6</a> за <a href="http://freesource.info/wiki/AltLinux/Sisyphus/Alterator/internals/6?time=2006-10-31+17%3A14%3A09">2006-10-31 17:14:09</a> и <a href="http://freesource.info/wiki/AltLinux/Sisyphus/Alterator/internals/6">2006-10-31 17:15:22</a></b><br /> <br /> <b>Добавлено:</b><br /> <div class="additions"><div class="action" style="float:right; width:250px"><div class="action-content">Эта&nbsp;страница была перенесена на&nbsp;<a href="http://altlinux.org/Alterator/internals/6" target="_blank" title="" class="outerlink">altlinux.org</a>. Текст на&nbsp;freesource.info заморожен.</div></div><a name="h5148-1"></a><h2>12 локальные переменные (продолжение)</h2></div><br /> <b>Удалено:</b><br /> <div class="deletions"><a name="h5148-1"></a><h2>11 локальные переменные</h2></div></div> http://freesource.info/wiki/AltLinux/Sisyphus/Alterator/internals/6/show?time=2006-10-31+17%3A13%3A08 <div class="pageBefore"><img src="http://freesource.info/wiki/images/z.gif" width="1" height="1" border="0" alt="" style="display:block" align="top" /></div><div class="page"> <b>Сравнение версий <a href="http://freesource.info/wiki/AltLinux/Sisyphus/Alterator/internals/6&" class="">/Alt&nbsp;Linux&nbsp;/&nbsp;Sisyphus&nbsp;/&nbsp;Alterator&nbsp;/&nbsp;internals&nbsp;/&nbsp;6</a> за <a href="http://freesource.info/wiki/AltLinux/Sisyphus/Alterator/internals/6?time=2006-10-31+17%3A13%3A08">2006-10-31 17:13:08</a> и <a href="http://freesource.info/wiki/AltLinux/Sisyphus/Alterator/internals/6?time=2006-10-31+17%3A14%3A09">2006-10-31 17:14:09</a></b><br /> <br /> <b>Удалено:</b><br /> <div class="deletions"><span class="missingpage">Продолжение следует ...</span><a href="http://freesource.info/wiki/7/edit?add=1&" title="Создать эту страницу">?</a></div></div> http://freesource.info/wiki/AltLinux/Sisyphus/Alterator/internals/6/show?time=2005-11-08+23%3A58%3A43 <div class="pageBefore"><img src="http://freesource.info/wiki/images/z.gif" width="1" height="1" border="0" alt="" style="display:block" align="top" /></div><div class="page"> <b>Сравнение версий <a href="http://freesource.info/wiki/AltLinux/Sisyphus/Alterator/internals/6&" class="">/Alt&nbsp;Linux&nbsp;/&nbsp;Sisyphus&nbsp;/&nbsp;Alterator&nbsp;/&nbsp;internals&nbsp;/&nbsp;6</a> за <a href="http://freesource.info/wiki/AltLinux/Sisyphus/Alterator/internals/6?time=2005-11-08+23%3A58%3A43">2005-11-08 23:58:43</a> и <a href="http://freesource.info/wiki/AltLinux/Sisyphus/Alterator/internals/6?time=2006-10-31+17%3A13%3A08">2006-10-31 17:13:08</a></b><br /> <br /> <b>Добавлено:</b><br /> <div class="additions"><a name="h5148-1"></a><h2>11 локальные переменные</h2> Продолжаем неустанно совершенствоваться в&nbsp;Scheme. Вы&nbsp;уже видели в&nbsp;предыдущий раз, что&nbsp;локальные переменные можно объявлять в&nbsp;теле функции, пользуясь тем&nbsp;же&nbsp;самым define</div><br /> <b>Удалено:</b><br /> <div class="deletions">Продолжение истории<a name="h5148-1"></a><h2>3.3 Интерфейс</h2> Что&nbsp;ж, backend у&nbsp;нас уже&nbsp;есть. Давайте создадим для&nbsp;него некий простейший интерфейс и&nbsp;сразу же&nbsp;включим всё что&nbsp;получилось в&nbsp;ифраструктуру системного конфигуратора.<br /> Хочу сразу отметить что&nbsp;в&nbsp;этом месте alterator меняется сейчас как&nbsp;никогда часто, поэтому возможны некоторые несостыковки при&nbsp;прочтении этого текста месяца эдак через два.<br /> Всё сказанное относится к&nbsp;сборке 1.99-alt41.<a name="h5148-2"></a><h3>3.3.1 Карта</h3> Как&nbsp;вы, должно быть, помните каждый диалог имеет свой идентификатор и&nbsp;есть карта которая даёт соответствие между этими идентификаторами и&nbsp;файлами описаний.<br /> Назовём наш&nbsp;диалог &laquo;/simple_i18n&raquo;.<br /> Вот&nbsp;как выглядит для&nbsp;него карта:<br /> <hr noshade="noshade" size="1" />simple_i18n.map<hr noshade="noshade" size="1" /> (/acc-hook view /simple_i18n)<br /> (/simple_i18n file &laquo;/usr/share/alterator/ui/simple_i18n/i18n.scm&raquo;<br /> <div class="indent"><div class="indent"><div class="indent"><div class="indent"><div class="indent"><div class="indent"><div class="indent">acc-icon &laquo;/usr/share/icons/mini/nvu.png&raquo;<br /> </div></div></div></div></div></div> description, (i18n:tr &#8220;Simple i18n config&#8221; &#8220;alterator-simple_i18n&#8221;))</div> <hr noshade="noshade" size="1" /> Помимо понятного уже&nbsp;<tt>(/simple_i18n file &laquo;/usr/share/alterator/ui/simple_i18n/i18n.scm&raquo;)</tt> появилось ещё несколько невразумительных конструкций. Не&nbsp;вдаваясь пока в&nbsp;подробности расскажу для&nbsp;чего они:<br /> <tt>(/acc-hook view /simple_i18n)</tt><br /> Эта&nbsp;фраза означает, что&nbsp;мы&nbsp;вешаем наш&nbsp;диалог по&nbsp;имени &laquo;/simple_i18n&raquo; на&nbsp;&laquo;крючок&raquo; к&nbsp;ALT Linux Control Center и&nbsp;он появится в&nbsp;списке предлагаемых модулей.<br /> Дополнительные параметры:<br /> <tt>acc-iсon &laquo;/usr/share/alterator/ui/simple_i18n/i18n.png&raquo;</tt><br /> Иконка которая будет отображаться рядом с&nbsp;шагом в&nbsp;Control Center. Если иконку не&nbsp;указывать, то&nbsp;будет использована некоторая стандартная.<br /> <tt>description, (i18n:tr &#8220;Simple i18n config&#8221; &#8220;alterator-simple_i18n&#8221;)</tt><br /> Описание которое будет использоваться для&nbsp;имени модуля в&nbsp;Control Center и&nbsp;не только в&nbsp;нём, а&nbsp;вообще где&nbsp;это может потребоваться.<a name="h5148-3"></a><h3>3.3.2 Диалог</h3> Мы&nbsp;сделаем простейшее окно, которое просто выведет нам&nbsp;список доступных локалей, когда пользователь будет выбирать ту&nbsp;или иную из&nbsp;них, мы&nbsp;будем её выставлять в&nbsp;системном конфигурационном файле с&nbsp;кодировкой UTF-8.<br /> Вот&nbsp;тут настал момент истины. Нам&nbsp;надо из&nbsp;диалога исполнить и&nbsp;обработать результат woo-команд &laquo;/i18n/available action=list&raquo; и&nbsp;&laquo;/i18n/current action=write lang=локаль.UTF-8&raquo;.<br /> Делается это&nbsp;следующим образом.<br /> (woo-list &laquo;/i18n/available&raquo;) &ndash; вернёт список ответов, но&nbsp;он будет выглядеть примерно так:<br /> /i18n/available/Russian locale for&nbsp;Ukraine<br /> /i18n/available/Russian locale for&nbsp;Russia<br /> Поэтому надо пройтись по&nbsp;ответу и&nbsp;&laquo;выдернуть&raquo; нужные нам&nbsp;имена объектов из&nbsp;полного их&nbsp;описания. Для&nbsp;этого есть готовая функция woo-read-names, которой передаются в&nbsp;качестве параметров, имя&nbsp;&laquo;каталога объектов&raquo; и&nbsp;список ответов на&nbsp;нашу woo-команду.<br /> Итак, (woo-read-names &laquo;/i18n/available&raquo; (woo-list &laquo;/i18n/available&raquo;) &ndash; даст нам&nbsp;список строк<br /> '(&laquo;Russian locale for&nbsp;Ukraine&raquo; &#8220;Russian locale for&nbsp;Russia&#8221;), который можно будет уже&nbsp;передать в&nbsp;listbox.<br /> (woo-write &laquo;/i18n/current&raquo; lang &laquo;локаль.UTF8&raquo;) &ndash; соответствует, как&nbsp;можно догадаться, командена модификацию<br /> Приступим, вот&nbsp;первая версия диалога:<br /> (document:surround &laquo;/std/base&raquo;)<br /> (document:id locales<br /> <div class="indent"><div class="indent">(listbox<br /> </div>(items (woo-read-names &laquo;/i18n/available&raquo;<br /> <div class="indent"><div class="indent">(woo-list &laquo;/i18n/available&raquo;)))))</div></div></div> Что-то тут&nbsp;явно не&nbsp;хватает? А&nbsp;конечно же&nbsp;надо бы&nbsp;какую-нибудь кнопку для&nbsp;того чтобы принять изменения.<br /> Но&nbsp;мы не&nbsp;будем сознательно делать эту&nbsp;кнопку, нам&nbsp;её предоставит &laquo;рамка&raquo; в&nbsp;которую вставляется наш&nbsp;диалог в&nbsp;системном конфигураторе. Достаточно просто сказать какое действие мы&nbsp;хотим сделать при&nbsp;нажатии на&nbsp;кнопку по&nbsp;имени &laquo;Принять&raquo;.<br /> Сначала на&nbsp;русском языке скажем что&nbsp;нам надо сделать:<br /> <ol type="1"><li> Выяснить как&nbsp;зовут текущий выделенный элемент в&nbsp;listbox </li></ol><div class="indent">делается это&nbsp;так: (locales text)<br /> </div><ol type="2"><li> Далее нам&nbsp;нужно выяснить у&nbsp;выбранной локали, какое её стандартное имя, то&nbsp;есть выполнить woo-команду примерно такого вида: <div class="indent"><div class="indent"><div class="indent">&laquo;/i18n/available/Russian locale for&nbsp;Russia&raquo; action="read"</div></div></div></li></ol> и&nbsp;обработать её результаты.<br /> <ol type="3"><li> Склеить полученное стандартное имя&nbsp;(ru_RU в&nbsp;нашем примере) и&nbsp;кодировку &#8220;UTF-8&#8221; и&nbsp;выполнить команду на&nbsp;модификацию </li></ol><div class="indent">/i18n/current action="write" lang=ru_RU.UTF8</div> Чтение данных из&nbsp;локали осуществляется следующим образом:<br /> (woo-read (string-append &laquo;/i18n/available/&raquo; (locales text)))<br /> В&nbsp;ответ приходит список ответов который в&nbsp;случае read состоит из&nbsp;одного, возьмём этот ответ:<br /> <div class="indent">(woo-first-command<br /> <div class="indent">(woo-read (string-append &laquo;/i18n/available/&raquo; (locales text))))</div></div> Далее в&nbsp;ответе может быть перечислено множество атрибутов, нас&nbsp;интересует только один &#8220;stdname&#8221;, попросим именно его:<br /> (woo-get-option<br /> <div class="indent"><div class="indent">(woo-first-command<br /> <div class="indent">(woo-read (string-append &laquo;/i18n/available/&raquo; (locales text))))<br /> 'stdname)</div></div></div> Ну&nbsp;и наконец можно выполнить запрос на&nbsp;запись.<br /> Чтобы окончательно не&nbsp;убить вас&nbsp;разворачивающейся гирляндой, назовём всё что&nbsp;было перечислено выше функцией get-current-stdname и&nbsp;тогда долгожданный запрос на&nbsp;запись будет выглядеть так:<br /> (woo-write &laquo;/i18n/current&raquo; 'lang (string-append (get-current-stdname)<br /> <div class="indent"><div class="indent"><div class="indent"><div class="indent"><div class="indent"><div class="indent"><div class="indent"><div class="indent"><div class="indent"><div class="indent"><div class="indent"><div class="indent"><div class="indent"><div class="indent"><div class="indent"><div class="indent"><div class="indent"><div class="indent"><div class="indent"><div class="indent"><div class="indent"><div class="indent"><div class="indent"><div class="indent">&#8220;.UTF-8&#8221;))</div></div></div></div></div></div></div></div></div></div></div></div></div></div></div></div></div></div></div></div></div></div></div></div> Добавим его&nbsp;в&nbsp;обработчик on-apply, который вызывается при&nbsp;нажатии кнопки &laquo;Принять&raquo; в&nbsp;окружающей нас&nbsp;&laquo;рамке&raquo;, предоставляемой Control Center.<br /> Объединим всё это&nbsp;в&nbsp;окончательную версию диалога:<br /> (document:surround &laquo;/std/base&raquo;)<br /> (on-apply<br /> <div class="indent">(woo-write &laquo;/i18n/current&raquo; 'lang (string-append (get-current-stdname)<br /> <div class="indent"><div class="indent"><div class="indent"><div class="indent"><div class="indent"><div class="indent"><div class="indent"><div class="indent"><div class="indent"><div class="indent"><div class="indent"><div class="indent"><div class="indent"><div class="indent"><div class="indent"><div class="indent"><div class="indent"><div class="indent"><div class="indent"><div class="indent"><div class="indent"><div class="indent"><div class="indent">&#8220;.UTF-8&#8221;)))</div></div></div></div></div></div></div></div></div></div></div></div></div></div></div></div></div></div></div></div></div></div></div></div> (define (get-current-stdname)<br /> <div class="indent">(woo-get-option<br /> <div class="indent">(woo-first-command<br /> <div class="indent">(woo-read (string-append &laquo;/i18n/available/&raquo; (locales text))))<br /> 'stdname))</div></div></div> (document:id locales<br /> <div class="indent"><div class="indent">(listbox<br /> <div class="indent"><div class="indent">(items (woo-read-names &laquo;/i18n/available&raquo;<br /> <div class="indent"><div class="indent"><div class="indent"><div class="indent"><div class="indent"><div class="indent"><div class="indent"><div class="indent">(woo-list &laquo;/i18n/available&raquo;)))))</div></div></div></div></div></div></div></div></div></div></div></div> Вот&nbsp;и&nbsp;всё, разложим получившиеся файлы следующим образом:<br /> /usr/lib/alterator/backend/i18n &ndash; наш&nbsp;бакенд<br /> /usr/share/alterator/ui/simple_i18n/i18n.scm &ndash; описание диалога<br /> /usr/share/alterator/maps/simple_18n.map &ndash; наша карта<br /> Запускаем acc&nbsp;и&nbsp;наблюдаем свой первый модуль конфигуратора.<br /> Хотите получить standalone версию модуля, которая будет работать без&nbsp;acc? Нет&nbsp;ничего проще, запустите: /usr/bin/alterator-standalone /simple_i18n<a name="h5148-4"></a><h2>3.4 Опять про&nbsp;схему: локальные переменные</h2> Продолжаем неустанно совершенствоваться в&nbsp;Scheme &ndash; основном языке программирования alterator.<br /> Вы&nbsp;уже видели в&nbsp;предыдущий раз, что&nbsp;локальные переменные можно объявлять в&nbsp;теле функции, пользуясь тем&nbsp;же&nbsp;самым define</div></div> http://freesource.info/wiki/AltLinux/Sisyphus/Alterator/internals/6/show?time=2005-09-26+16%3A15%3A42 <div class="pageBefore"><img src="http://freesource.info/wiki/images/z.gif" width="1" height="1" border="0" alt="" style="display:block" align="top" /></div><div class="page"> <b>Сравнение версий <a href="http://freesource.info/wiki/AltLinux/Sisyphus/Alterator/internals/6&" class="">/Alt&nbsp;Linux&nbsp;/&nbsp;Sisyphus&nbsp;/&nbsp;Alterator&nbsp;/&nbsp;internals&nbsp;/&nbsp;6</a> за <a href="http://freesource.info/wiki/AltLinux/Sisyphus/Alterator/internals/6?time=2005-09-26+16%3A15%3A42">2005-09-26 16:15:42</a> и <a href="http://freesource.info/wiki/AltLinux/Sisyphus/Alterator/internals/6?time=2005-11-08+23%3A58%3A43">2005-11-08 23:58:43</a></b><br /> <br /> <b>Добавлено:</b><br /> <div class="additions"><div class="indent">(let <span class="missingpage">5</span><a href="http://freesource.info/wiki/a/edit?add=1&" title="Создать эту страницу">?</a></div></div><br /> <b>Удалено:</b><br /> <div class="deletions"><div class="indent">(let <span class="missingpage">3</span><a href="http://freesource.info/wiki/a/edit?add=1&" title="Создать эту страницу">?</a></div></div></div> http://freesource.info/wiki/AltLinux/Sisyphus/Alterator/internals/6/show?time=2005-07-20+01%3A00%3A35 <div class="pageBefore"><img src="http://freesource.info/wiki/images/z.gif" width="1" height="1" border="0" alt="" style="display:block" align="top" /></div><div class="page"> <b>Сравнение версий <a href="http://freesource.info/wiki/AltLinux/Sisyphus/Alterator/internals/6&" class="">/Alt&nbsp;Linux&nbsp;/&nbsp;Sisyphus&nbsp;/&nbsp;Alterator&nbsp;/&nbsp;internals&nbsp;/&nbsp;6</a> за <a href="http://freesource.info/wiki/AltLinux/Sisyphus/Alterator/internals/6?time=2005-07-20+01%3A00%3A35">2005-07-20 01:00:35</a> и <a href="http://freesource.info/wiki/AltLinux/Sisyphus/Alterator/internals/6?time=2005-09-26+16%3A15%3A42">2005-09-26 16:15:42</a></b><br /> <br /> <b>Добавлено:</b><br /> <div class="additions">(document:surround &laquo;/std/base&raquo;)<br /> (document:id locales<br /> (document:surround &laquo;/std/base&raquo;)<br /> (document:id locales</div><br /> <b>Удалено:</b><br /> <div class="deletions">(id 'locales<br /> (id 'locales</div></div> http://freesource.info/wiki/AltLinux/Sisyphus/Alterator/internals/6/show?time=2005-07-20+00%3A59%3A21 <div class="pageBefore"><img src="http://freesource.info/wiki/images/z.gif" width="1" height="1" border="0" alt="" style="display:block" align="top" /></div><div class="page"> <b>Сравнение версий <a href="http://freesource.info/wiki/AltLinux/Sisyphus/Alterator/internals/6&" class="">/Alt&nbsp;Linux&nbsp;/&nbsp;Sisyphus&nbsp;/&nbsp;Alterator&nbsp;/&nbsp;internals&nbsp;/&nbsp;6</a> за <a href="http://freesource.info/wiki/AltLinux/Sisyphus/Alterator/internals/6?time=2005-07-20+00%3A59%3A21">2005-07-20 00:59:21</a> и <a href="http://freesource.info/wiki/AltLinux/Sisyphus/Alterator/internals/6?time=2005-07-20+01%3A00%3A35">2005-07-20 01:00:35</a></b><br /> <br /> <b>Добавлено:</b><br /> <div class="additions">Помимо понятного уже&nbsp;<tt>(/simple_i18n file &laquo;/usr/share/alterator/ui/simple_i18n/i18n.scm&raquo;)</tt> появилось ещё несколько невразумительных конструкций. Не&nbsp;вдаваясь пока в&nbsp;подробности расскажу для&nbsp;чего они:<br /> <tt>(/acc-hook view /simple_i18n)</tt><br /> <tt>acc-iсon &laquo;/usr/share/alterator/ui/simple_i18n/i18n.png&raquo;</tt><br /> <tt>description, (i18n:tr &#8220;Simple i18n config&#8221; &#8220;alterator-simple_i18n&#8221;)</tt></div><br /> <b>Удалено:</b><br /> <div class="deletions">Помимо понятного уже&nbsp;<i>Formatter &laquo;highlight//simple_i18n&raquo; not&nbsp;found</i> появилось ещё несколько невразумительных конструкций. Не&nbsp;вдаваясь пока в&nbsp;подробности расскажу для&nbsp;чего они:<br /> <i>Formatter &laquo;highlight//acc-hook&raquo; not&nbsp;found</i>acc-iсon &laquo;/usr/share/alterator/ui/simple_i18n/i18n.png&raquo;<!--notypo--><textarea class="code" rows="2" readonly="readonly"></textarea><!--/notypo-->description, (i18n:tr &#8220;Simple i18n config&#8221; &#8220;alterator-simple_i18n&#8221;)%%</div></div>