<?xml version="1.0" encoding="utf-8"?>
<rss version="2.0"
					xmlns:content="http://purl.org/rss/1.0/modules/content/"
					xmlns:wfw="http://wellformedweb.org/CommentAPI/"
					xmlns:atom="http://www.w3.org/2005/Atom"
				  >
<channel>
<atom:link rel="self"  type="application/rss+xml"  href="http://rulinux.net/rss_from_sect_4_subsect_10_thread_39409"  />
<title>rulinux.net - Форум - Talks - усложнить скрипт</title>
<link>http://rulinux.net/</link>
<description><![CDATA[Портал о GNU/Linux и не только]]></description>
<image><title>rulinux.net - Форум - Talks - усложнить скрипт</title>
<link>http://rulinux.net/</link>
<url>http://rulinux.net/rss_icon.png</url>
</image>
<item>
<title>Re:усложнить скрипт</title>
<link>https://rulinux.net/message.php?newsid=39409&amp;page=1#171801</link>
<guid>https://rulinux.net/message.php?newsid=39409&amp;page=1#171801</guid>
<pubDate>Fri, 17 May 2013 14:50:31 +0400</pubDate>
<description><![CDATA[<p>Так я же не Путен, я и на истребителе не могу летать, и на подлодке плавать, не говоря уже о стерхах</p>]]></description>
</item>
<item>
<title>Re:усложнить скрипт</title>
<link>https://rulinux.net/message.php?newsid=39409&amp;page=1#171800</link>
<guid>https://rulinux.net/message.php?newsid=39409&amp;page=1#171800</guid>
<pubDate>Fri, 17 May 2013 14:50:00 +0400</pubDate>
<description><![CDATA[<p>я просто под впечатлением от автомобиля Саши Серовой</p>]]></description>
</item>
<item>
<title>Re:усложнить скрипт</title>
<link>https://rulinux.net/message.php?newsid=39409&amp;page=1#171799</link>
<guid>https://rulinux.net/message.php?newsid=39409&amp;page=1#171799</guid>
<pubDate>Fri, 17 May 2013 14:24:09 +0400</pubDate>
<description><![CDATA[<p>&gt; Прошу понять, не могу же я на ладе калине ездить...
<br><br>
Почему ты думаешь, что анонимус имел в виду страну с Ладой Калиной?</p>]]></description>
</item>
<item>
<title>Re:усложнить скрипт</title>
<link>https://rulinux.net/message.php?newsid=39409&amp;page=1#171798</link>
<guid>https://rulinux.net/message.php?newsid=39409&amp;page=1#171798</guid>
<pubDate>Fri, 17 May 2013 14:19:30 +0400</pubDate>
<description><![CDATA[<p>Путин может, а ты - нет? А почему?</p>]]></description>
</item>
<item>
<title>Re:усложнить скрипт</title>
<link>https://rulinux.net/message.php?newsid=39409&amp;page=1#171797</link>
<guid>https://rulinux.net/message.php?newsid=39409&amp;page=1#171797</guid>
<pubDate>Fri, 17 May 2013 14:12:28 +0400</pubDate>
<description><![CDATA[<p>так это игрушки и фильтр воздушный к машине.  А мне надо саму машину. Прошу понять, не могу же я на ладе калине ездить...</p>]]></description>
</item>
<item>
<title>Re:усложнить скрипт</title>
<link>https://rulinux.net/message.php?newsid=39409&amp;page=1#171796</link>
<guid>https://rulinux.net/message.php?newsid=39409&amp;page=1#171796</guid>
<pubDate>Fri, 17 May 2013 13:59:45 +0400</pubDate>
<description><![CDATA[<p>Да любой может её себе позволить: <a href="http://market.yandex.ru/search.xml?text=ferrari%20testarossa">http://market.yandex.ru/search.xml?text=ferrari%20testarossa</a></p>]]></description>
</item>
<item>
<title>Re:усложнить скрипт</title>
<link>https://rulinux.net/message.php?newsid=39409&amp;page=1#171795</link>
<guid>https://rulinux.net/message.php?newsid=39409&amp;page=1#171795</guid>
<pubDate>Fri, 17 May 2013 12:56:23 +0400</pubDate>
<description><![CDATA[<p>А ferrari testarossa у вас почём можно взять?</p>]]></description>
</item>
<item>
<title>Re:усложнить скрипт</title>
<link>https://rulinux.net/message.php?newsid=39409&amp;page=1#171794</link>
<guid>https://rulinux.net/message.php?newsid=39409&amp;page=1#171794</guid>
<pubDate>Fri, 17 May 2013 12:40:37 +0400</pubDate>
<description><![CDATA[<p>Ну так перезжай к нам. У нас с провайдерами всё нормально - показывают заявленные картинки. Да и страна тоже нормальная.</p>]]></description>
</item>
<item>
<title>Re:усложнить скрипт</title>
<link>https://rulinux.net/message.php?newsid=39409&amp;page=1#171793</link>
<guid>https://rulinux.net/message.php?newsid=39409&amp;page=1#171793</guid>
<pubDate>Fri, 17 May 2013 11:50:29 +0400</pubDate>
<description><![CDATA[<p>&gt; получается что проблема либо в твоем провайдере либо в твоей стране проживания
<br><br>
Ага, это мой провайдер или страна проживания редиректят меня вместо изображения на какую-то ХТМЛ-страницу, набитую рекламой. При чём подобное наблюдается только с картинками, размещёнными на том сайте.</p>]]></description>
</item>
<item>
<title>Re:усложнить скрипт</title>
<link>https://rulinux.net/message.php?newsid=39409&amp;page=1#171792</link>
<guid>https://rulinux.net/message.php?newsid=39409&amp;page=1#171792</guid>
<pubDate>Fri, 17 May 2013 10:59:09 +0400</pubDate>
<description><![CDATA[<p><i>>Слушай, ты наверное удивишься, но я, например, твоих картинок не вижу, а при попытке перейти по ихним УРЛам наблюдаю такую вот картину</i><br><br><br>Если допустить то что ты не пиздишь (хотя я в силу некоторой циничности не исключаю такой возможности) то получается что проблема либо в твоем провайдере либо в твоей  стране проживания, поскольку кроме тебя никто вроде не пожаловался что картинки не отображаются или какие то странные.<br><br></p>]]></description>
</item>
<item>
<title>Re:усложнить скрипт</title>
<link>https://rulinux.net/message.php?newsid=39409&amp;page=1#171788</link>
<guid>https://rulinux.net/message.php?newsid=39409&amp;page=1#171788</guid>
<pubDate>Fri, 17 May 2013 00:39:24 +0400</pubDate>
<description><![CDATA[<p><i>>&gt;Надо признаться, меня просто шокировал тот факт, что бэкапы могут храниться на одном-единственном яндексе</i><br> откуда такой сказочный вывод взялся?</p>]]></description>
</item>
<item>
<title>Re:усложнить скрипт</title>
<link>https://rulinux.net/message.php?newsid=39409&amp;page=1#171786</link>
<guid>https://rulinux.net/message.php?newsid=39409&amp;page=1#171786</guid>
<pubDate>Thu, 16 May 2013 23:26:21 +0400</pubDate>
<description><![CDATA[<p><i>>Ну теперь, когда с клиентской частью разобрались, надо подумать и о серверной стороне. Надо признаться, меня просто шокировал тот факт, что бэкапы могут храниться на одном-единственном яндексе. А что если яндекс сгорит, будет заблокирован роскомнадзором или главврачом Онищенко? Или того хуже, в России сменится власть и во главе государства окажется какой-нибудь Навальный, который пользуясь случаем, первым делом продаст Яндекс «Вятской лесной компании»?</i><br> Да, рассчитывать только на яндекс совершенно не стоит. Тем более, что даже без таких чрезвычайных проишествий могут быть проблемы. Например, яндекс станет клиентом, а бэкапить его самого на себя явно не получится.<br><br><i>>Тут надо соображать как минимум зеркалирование между несколькими доступными онлайновыми хранилищами</i><br> Нужно придумать распределённую файловую систему, работающую поверх всех известных хранилищ. Мы в 21-м веке, поэтому надо активно использовать облака и все доступные онлайн-ресурсы, где можно хранить даже небольшое количество информации. Думаю, кроме популярных сейчас дропбоксов и амазонов, надо предусмотреть работу этой системы и поверх, например, хранилища писем gmail-а. Вон, был же проект gmailfs, нужно его воскресить.<br><br><i>>и предусмотреть какую-то программу, нацеленную на стабилизацию обстановки в странах, где размещены бэкапы.</i><br> Возможно, начать нужно с создания небольших отрядов быстрого реагирования, которые в краткие сроки могут направить политику небольших стран в нужном направлении. Для начала надо отработать систему на какой-нибудь Голландии, где много датацентров, но большие силы для влияния на правительства не нужны. Потом уже можно думать и о более крупных странах. </p>]]></description>
</item>
<item>
<title>Re:усложнить скрипт</title>
<link>https://rulinux.net/message.php?newsid=39409&amp;page=1#171785</link>
<guid>https://rulinux.net/message.php?newsid=39409&amp;page=1#171785</guid>
<pubDate>Thu, 16 May 2013 23:15:10 +0400</pubDate>
<description><![CDATA[<p>&gt; Сча запощу фотки, а то кое кто тут плакался что я выкладываю не оригинальный контент.
<br><br>
Слушай, ты наверное удивишься, но я, например, твоих картинок не вижу, а при попытке перейти по ихним УРЛам наблюдаю такую вот картину:
<br>
<img src="http://i.imgur.com/dGt6mGz.png" style="max-width: 1024px" alt="[путь к изображению некорректен]" />
<br>
Это и есть тот самый оригинальный контент, которым ты с нами хотел поделиться? :)</p>]]></description>
</item>
<item>
<title>Re:усложнить скрипт</title>
<link>https://rulinux.net/message.php?newsid=39409&amp;page=1#171784</link>
<guid>https://rulinux.net/message.php?newsid=39409&amp;page=1#171784</guid>
<pubDate>Thu, 16 May 2013 22:53:17 +0400</pubDate>
<description><![CDATA[<p>Ну теперь, когда с клиентской частью разобрались, надо подумать и о серверной стороне. Надо признаться, меня просто шокировал тот факт, что бэкапы могут храниться на одном-единственном яндексе. А что если яндекс сгорит, будет заблокирован роскомнадзором или главврачом Онищенко? Или того хуже, в России сменится власть и во главе государства окажется какой-нибудь Навальный, который пользуясь случаем, первым делом продаст Яндекс «Вятской лесной компании»? Тут надо соображать как минимум зеркалирование между несколькими доступными онлайновыми хранилищами и предусмотреть какую-то программу, нацеленную на стабилизацию обстановки в странах, где размещены бэкапы.</p>]]></description>
</item>
<item>
<title>Re:усложнить скрипт</title>
<link>https://rulinux.net/message.php?newsid=39409&amp;page=1#171782</link>
<guid>https://rulinux.net/message.php?newsid=39409&amp;page=1#171782</guid>
<pubDate>Thu, 16 May 2013 21:01:31 +0400</pubDate>
<description><![CDATA[<p><i>>...а для тех, кто только сейчас включается в тред, я хочу обратить внимание, что речь идет о небольшом усложении однострочного скрипта...</i><br> Скрипт ещё недостаточно сложен. </p>]]></description>
</item>
<item>
<title>Re:усложнить скрипт</title>
<link>https://rulinux.net/message.php?newsid=39409&amp;page=1#171779</link>
<guid>https://rulinux.net/message.php?newsid=39409&amp;page=1#171779</guid>
<pubDate>Thu, 16 May 2013 20:46:53 +0400</pubDate>
<description><![CDATA[<p><i>>...а для тех, кто только сейчас включается в тред, я хочу обратить внимание, что речь идет о небольшом усложении однострочного скрипта...</i><br><br><br> да разберуццо люди, это же рулинукс</p>]]></description>
</item>
<item>
<title>Re:усложнить скрипт</title>
<link>https://rulinux.net/message.php?newsid=39409&amp;page=1#171778</link>
<guid>https://rulinux.net/message.php?newsid=39409&amp;page=1#171778</guid>
<pubDate>Thu, 16 May 2013 20:41:01 +0400</pubDate>
<description><![CDATA[<p>...а для тех, кто только сейчас включается в тред, я хочу обратить внимание, что речь идет о небольшом усложении однострочного скрипта...</p>]]></description>
</item>
<item>
<title>Re:усложнить скрипт</title>
<link>https://rulinux.net/message.php?newsid=39409&amp;page=1#171777</link>
<guid>https://rulinux.net/message.php?newsid=39409&amp;page=1#171777</guid>
<pubDate>Thu, 16 May 2013 20:10:58 +0400</pubDate>
<description><![CDATA[<p><img src="http://i47.fastpic.ru/big/2013/0516/f3/f6718f78861f734d51d28e380ef916f3.jpg" style="max-width: 1024px" alt="[путь к изображению некорректен]" /><br><br> <img src="http://i47.fastpic.ru/big/2013/0516/12/5bb8174671546407cf8947508d2fc012.jpg" style="max-width: 1024px" alt="[путь к изображению некорректен]" /></p>]]></description>
</item>
<item>
<title>Re:усложнить скрипт</title>
<link>https://rulinux.net/message.php?newsid=39409&amp;page=1#171776</link>
<guid>https://rulinux.net/message.php?newsid=39409&amp;page=1#171776</guid>
<pubDate>Thu, 16 May 2013 20:09:40 +0400</pubDate>
<description><![CDATA[<p><img src="http://i47.fastpic.ru/big/2013/0516/de/83d8dc92645a6b907e9636a39cdb79de.jpg" style="max-width: 1024px" alt="[путь к изображению некорректен]" /><br><br> <img src="http://i47.fastpic.ru/big/2013/0516/93/2b03b7c313e3398079b3b7dfe6c9cb93.jpg" style="max-width: 1024px" alt="[путь к изображению некорректен]" /></p>]]></description>
</item>
<item>
<title>Re:усложнить скрипт</title>
<link>https://rulinux.net/message.php?newsid=39409&amp;page=1#171775</link>
<guid>https://rulinux.net/message.php?newsid=39409&amp;page=1#171775</guid>
<pubDate>Thu, 16 May 2013 20:07:49 +0400</pubDate>
<description><![CDATA[<p><img src="http://i47.fastpic.ru/big/2013/0516/39/02edd3af2e4859c69f21ae4a71490c39.jpg" style="max-width: 1024px" alt="[путь к изображению некорректен]" /><br><br> <img src="http://i47.fastpic.ru/big/2013/0516/9d/b7525bae99127aed835fbc6c7560b89d.jpg" style="max-width: 1024px" alt="[путь к изображению некорректен]" /></p>]]></description>
</item>
<item>
<title>Re:усложнить скрипт</title>
<link>https://rulinux.net/message.php?newsid=39409&amp;page=1#171774</link>
<guid>https://rulinux.net/message.php?newsid=39409&amp;page=1#171774</guid>
<pubDate>Thu, 16 May 2013 20:06:03 +0400</pubDate>
<description><![CDATA[<p><img src="http://i47.fastpic.ru/big/2013/0516/8f/02a98f774012724af95730776a91348f.jpg" style="max-width: 1024px" alt="[путь к изображению некорректен]" /><br><br> <img src="http://i47.fastpic.ru/big/2013/0516/1f/3c4d9a0a106813a8b08222685bfb871f.jpg" style="max-width: 1024px" alt="[путь к изображению некорректен]" /></p>]]></description>
</item>
<item>
<title>Re:усложнить скрипт</title>
<link>https://rulinux.net/message.php?newsid=39409&amp;page=1#171773</link>
<guid>https://rulinux.net/message.php?newsid=39409&amp;page=1#171773</guid>
<pubDate>Thu, 16 May 2013 20:02:32 +0400</pubDate>
<description><![CDATA[<p><i>>Еспотро выкатит предложение позже, когда будет понятна мощность, потребляемая комплексом.</i><br><br><br>а что тут выкатывать самая новомодная фишка это - динамический ИБП,а там все начинается с 2 МВт,есть фактически готовое, (релизованное решение) ЦОД &quot;Электронная Москва&quot;. м. Нагорное, Электролитный проезд д.3 с4 <br><br> На базе силовых установок компании Hitec единичной мощностью 2000кВА.  Работу системы гарантированного и бесперебойного электроснабжения обеспечивают 5 ДИБП на базе дизельных двигателей Cummins QSK60-G13 (3 из 5 ДИБП будут смонтированы во вторую очередь).<br><br> Для питания ДИБП дизельным топливом, была спроектирована и реализована система внешнего и внутреннего топливоснабжения, состоящая из контейнера хранения топлива объемом 20000л, подземной аварийной емкости объемом 10000л, пяти расходных баков 1000л (для каждого ДИБП внутри помещения), а так же насосного оборудования и автоматики системы. <br><br> Одного оборудования более чем на 200 мультов, а еще проектирование и монтаж.<br><br> Сча запощу фотки, а то кое кто тут плакался что я выкладываю не оригинальный контент.</p>]]></description>
</item>
<item>
<title>Re:усложнить скрипт</title>
<link>https://rulinux.net/message.php?newsid=39409&amp;page=1#171772</link>
<guid>https://rulinux.net/message.php?newsid=39409&amp;page=1#171772</guid>
<pubDate>Thu, 16 May 2013 19:33:14 +0400</pubDate>
<description><![CDATA[<p>мужики, да вы упоролись )))</p>]]></description>
</item>
<item>
<title>Re:усложнить скрипт</title>
<link>https://rulinux.net/message.php?newsid=39409&amp;page=1#171768</link>
<guid>https://rulinux.net/message.php?newsid=39409&amp;page=1#171768</guid>
<pubDate>Thu, 16 May 2013 18:25:51 +0400</pubDate>
<description><![CDATA[<p>От себя могу предложить систему обнаружения недоступности ноды в кластере. Ведь понятно, что запуск скрипта должен быть задублирован во избежания SPOF.</p>]]></description>
</item>
<item>
<title>Re:усложнить скрипт</title>
<link>https://rulinux.net/message.php?newsid=39409&amp;page=1#171764</link>
<guid>https://rulinux.net/message.php?newsid=39409&amp;page=1#171764</guid>
<pubDate>Thu, 16 May 2013 17:36:00 +0400</pubDate>
<description><![CDATA[<p>Вобщем, vitroot, значит так, SystemV утвердил ТЗ, так что можешь начинать. С деталями уточнимся по ходу. По источнику бесперебойного питания для для твоего curl HAC server'a Еспотро выкатит предложение позже, когда будет понятна мощность, потребляемая комплексом.</p>]]></description>
</item>
<item>
<title>Re:усложнить скрипт</title>
<link>https://rulinux.net/message.php?newsid=39409&amp;page=1#171761</link>
<guid>https://rulinux.net/message.php?newsid=39409&amp;page=1#171761</guid>
<pubDate>Thu, 16 May 2013 17:08:50 +0400</pubDate>
<description><![CDATA[<p><i>>Эй, это всё-таки 21й век. Если клиентский сервер упадёт, то автоматически должен быть введён бэкапный клиентский сервер из горячего резерва. А холодный бэкапный клиентский сервер поставлен прогреваться на случай если предыдущий бэкапный клиентский сервер тоже упадёт.</i><br> Да, и ведь правда. <br><br>А что, отличное решение получается. Думаю, Витруту будет чем заняться, и перед клиентом не стыдно.</p>]]></description>
</item>
<item>
<title>Re:усложнить скрипт</title>
<link>https://rulinux.net/message.php?newsid=39409&amp;page=1#171759</link>
<guid>https://rulinux.net/message.php?newsid=39409&amp;page=1#171759</guid>
<pubDate>Thu, 16 May 2013 17:01:15 +0400</pubDate>
<description><![CDATA[<p>&gt; если клиентский сервер упадёт
<br><br>
Эй, это всё-таки 21й век. Если клиентский сервер упадёт, то автоматически должен быть введён бэкапный клиентский сервер из горячего резерва. А холодный бэкапный клиентский сервер поставлен прогреваться на случай если предыдущий бэкапный клиентский сервер тоже упадёт. 
</p>]]></description>
</item>
<item>
<title>Re:усложнить скрипт</title>
<link>https://rulinux.net/message.php?newsid=39409&amp;page=1#171757</link>
<guid>https://rulinux.net/message.php?newsid=39409&amp;page=1#171757</guid>
<pubDate>Thu, 16 May 2013 16:57:18 +0400</pubDate>
<description><![CDATA[<p><i>>Плагины надо подписывать цифровой подпесью. Для безопасности.</i><br> Хм, а про безопасность я и не вспомнил. А ведь пароли-то хранятся на сервере! Нет, тут нужно сделать нормальное решение.<br><br>Нужно сделать ещё один сервер, на нём сделать центральное приложение, используя проверенные технологии, например IBM WebSphere. Можно даже несколько серверов, чтобы система была распределённой. Пароли хранить именно на нём, сервер разместить в защищённом датацентре. По расписанию он будет соединяться с клиентом (откуда и надо делать бэкап) по какому-нибудь протоколу, обязательно с шифрованием и прочими вкусностями, чтобы ключи были и сертификаты. После этого сервер выкачивает указанный в конфиге файл бэкапа, и грузит его на яндекс сам. Благодаря этому не надо будет держать данные для входа на яндекс на клиентских серверах.<br><br>Ну и главное - если клиентский сервер упадёт, то главный сервер сможет показать красивое сообщение об этом. А это важно для пользователя. </p>]]></description>
</item>
<item>
<title>Re:усложнить скрипт</title>
<link>https://rulinux.net/message.php?newsid=39409&amp;page=1#171754</link>
<guid>https://rulinux.net/message.php?newsid=39409&amp;page=1#171754</guid>
<pubDate>Thu, 16 May 2013 16:49:33 +0400</pubDate>
<description><![CDATA[<p>Плагины надо подписывать цифровой подпесью. Для безопасности.</p>]]></description>
</item>
<item>
<title>Re:усложнить скрипт</title>
<link>https://rulinux.net/message.php?newsid=39409&amp;page=1#171753</link>
<guid>https://rulinux.net/message.php?newsid=39409&amp;page=1#171753</guid>
<pubDate>Thu, 16 May 2013 16:39:33 +0400</pubDate>
<description><![CDATA[<p><i>>Это никуда не годится!</i><br> В принципе да, тут есть простор для усовершенствований. Стоит, как минимум, использовать curl напрямую, сделав обёртку через FFI. Или сразу взять коммон ЛNСП, ведь если использовать тот же SBCL, то и потребление памяти будет как у нормальной приличной программы, а не как у мелкого скрипта, что энтерпрайзно.<br><br>Также стоит реализовать плагины и сделать всё модульным, чтобы, например, можно было использовать wget.</p>]]></description>
</item>
<item>
<title>Re:усложнить скрипт</title>
<link>https://rulinux.net/message.php?newsid=39409&amp;page=1#171751</link>
<guid>https://rulinux.net/message.php?newsid=39409&amp;page=1#171751</guid>
<pubDate>Thu, 16 May 2013 16:29:24 +0400</pubDate>
<description><![CDATA[<p><div class="quote"><pre>Executng: curl -T /tmp/test.txt --user username:password https://webdav.yandex.ru/</pre></div>
<br>
Это никуда не годится! 
<br>
Пользователь должен видеть, что программа работает, а не хреном груши околачивает.
<br>
После запуска скрипт должен написать &quot;Intitialization&quot; и инкрементировать градусник несколько секунд. После этого то же самое с &quot;Preparing to execute: curl ...&quot;, и только потом &quot;Executng: curl&quot; - тоже с градусником. Периодически должны выдаваться ошибки типа &quot;Критическое отклонение фазы на субторсионном уровне поля. Преодолеть? [Да/Нет]&quot; и после получения ввода от пользователя опять же с градусником выводить: &quot;Производится преодоление критического отклонения фазы на субторсионном уровне&quot; или же, если пользователь на предыдущем шаге выбрал &quot;нет&quot;, то выводить: &quot;Производится отмена преодоления критического отклонения фазы на субторсионном уровне&quot; - разумеется тоже с градусником, секунд на пять-шесть.
</p>]]></description>
</item>
<item>
<title>Re:усложнить скрипт</title>
<link>https://rulinux.net/message.php?newsid=39409&amp;page=1#171748</link>
<guid>https://rulinux.net/message.php?newsid=39409&amp;page=1#171748</guid>
<pubDate>Thu, 16 May 2013 16:09:59 +0400</pubDate>
<description><![CDATA[<p><fieldset><legend>text</legend><code><br />
#!/usr/bin/guile <br />
-e main -s<br />
!#<br />
<br />
;;; Some documentation here<br />
<br />
(use-modules (ice-9 getopt-long)<br />
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;(ice-9 format))<br />
<br />
(define (get-curl-cmd file username password)<br />
&nbsp; (format #f<br />
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &quot;curl -T ~a --user ~a:~a https://webdav.yandex.ru/&quot;<br />
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; file<br />
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; username<br />
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; password))<br />
<br />
(define (put-file file username password debug)<br />
&nbsp; (let ((cmd (get-curl-cmd file username password)))<br />
&nbsp; &nbsp; (if debug<br />
&nbsp; &nbsp; &nbsp; &nbsp; (format #t &quot;Executng: ~a~%&quot; cmd)<br />
&nbsp; &nbsp; &nbsp; &nbsp; (system cmd))))<br />
<br />
(define (main args)<br />
&nbsp; (define (show-help-text)<br />
&nbsp; &nbsp; &nbsp; (format #t &quot;<br />
Usage: [options]<br />
&nbsp; -f|--file &lt;path&gt;tPath to archive<br />
&nbsp; -d|--debugttDebug<br />
&nbsp; -h|--helpttShow this text~%&quot;))<br />
&nbsp; (let* ((option-spec '((debug (single-char #d) (value #f))<br />
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; (file (single-char #f) (value #t))<br />
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; (help (single-char #h) (value #f))))<br />
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp;(options (getopt-long args option-spec))<br />
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp;(show-help (option-ref options 'help #f))<br />
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp;(file (option-ref options 'file #f))<br />
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp;(debug (option-ref options 'debug #f)))<br />
&nbsp; &nbsp; (cond<br />
&nbsp; &nbsp; &nbsp;(show-help<br />
&nbsp; &nbsp; &nbsp; (show-help-text))<br />
&nbsp; &nbsp; &nbsp;((not file)<br />
&nbsp; &nbsp; &nbsp; (begin<br />
&nbsp; &nbsp; &nbsp; &nbsp; (show-help-text)<br />
&nbsp; &nbsp; &nbsp; &nbsp; (format #t &quot;File required~%&quot;)))<br />
&nbsp; &nbsp; &nbsp;(else<br />
&nbsp; &nbsp; &nbsp; (put-file file &quot;username&quot; &quot;password&quot; debug))))) ; Set username and password here<br />
&nbsp;</code></fieldset><br><br><fieldset><legend>text</legend><code><br />
$ ./backup.scm -d -f /tmp/test.txt <br />
Executng: curl -T /tmp/test.txt --user username:password https://webdav.yandex.ru/<br />
&nbsp;</code></fieldset><br><br>С -d только печатает команду, без -d, соответственно, исполняет. На реальном яндексе не проверял, но должно. Пароль с юзернеймом внутри исходника в последней строке.</p>]]></description>
</item>
<item>
<title>Re:усложнить скрипт</title>
<link>https://rulinux.net/message.php?newsid=39409&amp;page=1#171747</link>
<guid>https://rulinux.net/message.php?newsid=39409&amp;page=1#171747</guid>
<pubDate>Thu, 16 May 2013 15:34:21 +0400</pubDate>
<description><![CDATA[<p>некрасиво это, уж если так делаешь, хоть бы не палися тут...</p>]]></description>
</item>
<item>
<title>Re:усложнить скрипт</title>
<link>https://rulinux.net/message.php?newsid=39409&amp;page=1#171742</link>
<guid>https://rulinux.net/message.php?newsid=39409&amp;page=1#171742</guid>
<pubDate>Thu, 16 May 2013 14:11:34 +0400</pubDate>
<description><![CDATA[<p>да ладно вам, я прекрасно понимаю, что усложнять бредово, но иногда и развлечься никто не запрещает :)</p>]]></description>
</item>
<item>
<title>Re:усложнить скрипт</title>
<link>https://rulinux.net/message.php?newsid=39409&amp;page=1#171741</link>
<guid>https://rulinux.net/message.php?newsid=39409&amp;page=1#171741</guid>
<pubDate>Thu, 16 May 2013 14:08:06 +0400</pubDate>
<description><![CDATA[<p>&gt; он и так мой постоянный клиент
<br><br>
Это до тех пор, пока ты не начал без нужды скрипты усложнять :) Представь тебя хирург после операции не просто зашьёт, а всего крестиком вышьет как рушник какой-нибудь. Потому что ты ему случайно больше заплатил, чем он ожидал. Ты обрадуешься?</p>]]></description>
</item>
<item>
<title>Re:усложнить скрипт</title>
<link>https://rulinux.net/message.php?newsid=39409&amp;page=1#171740</link>
<guid>https://rulinux.net/message.php?newsid=39409&amp;page=1#171740</guid>
<pubDate>Thu, 16 May 2013 14:05:03 +0400</pubDate>
<description><![CDATA[<p>Ну проверяй там все параметры и результат на правильность, в случае отказа - какую-нибудь обработку вкрячь.. Но вообще ненужное усложнение - это непрофессионально, со школьниками же никто из-за этого и не связывается, лучше заплатить опытному специалисту, который сделает просто, понятно, надёжно. Отсюда и насчёт оплаты нехрен беспокоиться: рубль за удар молотком, а 49 - за то, что знаю куда ударить.</p>]]></description>
</item>
<item>
<title>Re:усложнить скрипт</title>
<link>https://rulinux.net/message.php?newsid=39409&amp;page=1#171739</link>
<guid>https://rulinux.net/message.php?newsid=39409&amp;page=1#171739</guid>
<pubDate>Thu, 16 May 2013 13:57:47 +0400</pubDate>
<description><![CDATA[<p><i>>&gt;Задокументируй договор, возьми деньги и покажи ему простейшее решение. Может он тебе предложит постоянную работу.</i><br> он и так мой постоянный клиент</p>]]></description>
</item>
<item>
<title>Re:усложнить скрипт</title>
<link>https://rulinux.net/message.php?newsid=39409&amp;page=1#171738</link>
<guid>https://rulinux.net/message.php?newsid=39409&amp;page=1#171738</guid>
<pubDate>Thu, 16 May 2013 13:57:08 +0400</pubDate>
<description><![CDATA[<p>Заюзай http://common-lisp.net/project/cl-curl/, клиент как глянет с ахуя еще пару тыщь накинет)))<br><br>Кстати, там пример почти то что тебе нужно)))</p>]]></description>
</item>
<item>
<title>Re:усложнить скрипт</title>
<link>https://rulinux.net/message.php?newsid=39409&amp;page=1#171737</link>
<guid>https://rulinux.net/message.php?newsid=39409&amp;page=1#171737</guid>
<pubDate>Thu, 16 May 2013 13:50:41 +0400</pubDate>
<description><![CDATA[<p>perl</p>]]></description>
</item>
<item>
<title>Re:усложнить скрипт</title>
<link>https://rulinux.net/message.php?newsid=39409&amp;page=1#171736</link>
<guid>https://rulinux.net/message.php?newsid=39409&amp;page=1#171736</guid>
<pubDate>Thu, 16 May 2013 13:43:42 +0400</pubDate>
<description><![CDATA[<p>Задокументируй договор, возьми деньги и покажи ему простейшее решение. Может он тебе предложит постоянную работу.</p>]]></description>
</item>
<item>
<title>Re:усложнить скрипт</title>
<link>https://rulinux.net/message.php?newsid=39409&amp;page=1#171735</link>
<guid>https://rulinux.net/message.php?newsid=39409&amp;page=1#171735</guid>
<pubDate>Thu, 16 May 2013 13:41:42 +0400</pubDate>
<description><![CDATA[<p>Ну я просто обфускатором проходился в таких случаях. </p>]]></description>
</item>
<item>
<title>Re:усложнить скрипт</title>
<link>https://rulinux.net/message.php?newsid=39409&amp;page=1#171734</link>
<guid>https://rulinux.net/message.php?newsid=39409&amp;page=1#171734</guid>
<pubDate>Thu, 16 May 2013 13:40:49 +0400</pubDate>
<description><![CDATA[<p>объяснять поведение не потребуется. Но клиент такой, что интереса ради заглянуть в &quot;скрипт&quot; может. При этом, ничего он мне не скажет, цену он сам предложил. Просто чтобыне выглядело так смешно</p>]]></description>
</item>
<item>
<title>Re:усложнить скрипт</title>
<link>https://rulinux.net/message.php?newsid=39409&amp;page=1#171733</link>
<guid>https://rulinux.net/message.php?newsid=39409&amp;page=1#171733</guid>
<pubDate>Thu, 16 May 2013 13:40:10 +0400</pubDate>
<description><![CDATA[<p>Кажется, у перла были биндинги к курлу.<br><br>Соответственно, берешь нужный модуль и копипастишь из него код.</p>]]></description>
</item>
<item>
<title>Re:усложнить скрипт</title>
<link>https://rulinux.net/message.php?newsid=39409&amp;page=1#171732</link>
<guid>https://rulinux.net/message.php?newsid=39409&amp;page=1#171732</guid>
<pubDate>Thu, 16 May 2013 13:09:20 +0400</pubDate>
<description><![CDATA[<p>сконпеляй бинарник, который будет запускать эту программу, логин внутри проги в Б64 зашей. Можно будет этим обосновать своё недостойное поведение: хотел логин защитить.</p>]]></description>
</item>
<item>
<title>усложнить скрипт</title>
<link>https://rulinux.net/message.php?newsid=39409&amp;page=1#171731</link>
<guid>https://rulinux.net/message.php?newsid=39409&amp;page=1#171731</guid>
<pubDate>Thu, 16 May 2013 13:02:20 +0400</pubDate>
<description><![CDATA[<p>Всем привет. Забавная задачка. Заливаю курлом одной командой файло на яндекс.диск:<br><br>curl -T /backup/bk.tar.gz --user username:password https://webdav.yandex.ru/<br><br> но есть хороший клиент, который ок платит и на трех серверах за такие деньги светить такой мега-скрипт как-то стыдно. Вот думаю визульно усложнить, чтобы страшно стало. Объявлять переменные на все и вся банально и уже сделано. Взываю к кодерам-извращенцам, спящим внутри вас, мужики :)</p>]]></description>
</item>
</channel>
</rss>