[devel] RFC: perl deps versioning

[Alexey Tourbin]

Здравствуйте,

Напомню суть проблемы: для проверки версии требуемого модуля в перле
используются числа с десятичной точкой (напр. `use Data::Dumper 2.121',
в данном случае это текущая версия Data::Dumper).  При этом точность
требуемой версии (число знаков после точки) может не совпадать
с точностью версии, указанной в самом этом модуле (напр. новая версия
Data::Dumper может иметь версию 2.20 (хм... колбасная версия:))).

RPM использует другой алгоритм сравнения версий: разбивает версию как
строку на цифровые и буквенные сегменты, после чего цифровые сегменты
сравниваются как целые числа, а буквенные -- как строки.

В результате без корректировки точности версий возможны следующие
казусы:

1) перебор в смысле Requires, в результате которого получается unmet
dependency:
Requires: perl(Data/Dumper) >= 0:2.121
Provides: perl(Data/Dumper)  = 0:2.20

2) перебор в смысле Provides, в результате которого необходимая
зависимость фактически теряется:
Requires: perl(Data/Dumper) >= 0:2.12
Provides: perl(Data/Dumper)  = 0:2.100

Простым и действенным решением этой проблемы мне представляется
ограничение как Requires, так и Provides с точностью до двух знаков
после точки.  Обоснование: статистика текущего использования такого
рода зависимостей.

$ rpm -qa --requires --provides |grep 'perl(' |grep = >perl_ver_deps

(У меня на машине установлены далеко не все пакеты, но большинство
перловых всё же установлено.)

Зависимости Requires с одним знаками после точки:

$ perl -ne 'print if />= 0:\d+\.\d$/' perl_ver_deps
perl(Chart/Base.pm) >= 0:2.0
perl(Socket.pm) >= 0:1.3
perl(HTTP/Request.pm) >= 0:1.3
perl(File/Spec.pm) >= 0:0.8
perl(Socket.pm) >= 0:1.3
perl(File/Spec.pm) >= 0:0.8
$

Зависимости Requires с двумя знаками после точки:

$ perl -ne 'print if />= 0:\d+\.\d\d$/' perl_ver_deps
perl(HTML/Element.pm) >= 0:3.15
perl(Config/General.pm) >= 0:1.18
perl(IO/Pty.pm) >= 0:0.97
perl(Pod/Escapes.pm) >= 0:1.03
perl(HTML/Element.pm) >= 0:3.05
perl(HTML/TreeBuilder.pm) >= 0:3.01
perl(Getopt/Long.pm) >= 0:2.17
perl(HTML/Parser.pm) >= 0:2.19
perl(HTML/Tagset.pm) >= 0:3.02
perl(Convert/ASN1.pm) >= 0:0.07
perl(HTML/Parser.pm) >= 0:3.24
perl(Convert/ASN1.pm) >= 0:0.07
perl(LWP.pm) >= 0:5.76
perl(Net/SSLeay.pm) >= 0:1.08
perl(Search/Dict.pm) >= 0:1.02
perl(Tie/IxHash.pm) >= 0:1.21
perl(Pod/Usage.pm) >= 0:1.12
perl(XML/Stream.pm) >= 0:1.18
perl(MIME/Base64.pm) >= 0:2.04
perl(MIME/QuotedPrint.pm) >= 0:2.03
perl(Mail/Field.pm) >= 0:1.05
perl(Mail/Header.pm) >= 0:1.09
perl(Mail/Internet.pm) >= 0:1.28
perl(XML/LibXML.pm) >= 0:1.57
perl(Crypt/DES.pm) >= 0:2.03
perl(Digest/HMAC.pm) >= 0:1.00
perl(Digest/MD5.pm) >= 0:2.11
perl(Digest/SHA1.pm) >= 0:1.02
$

Зависимости Requires с тремя и более знаками после точки:

$ perl -ne 'print if />= 0:\d+\.\d\d\d+$/' perl_ver_deps
perl(Text/Wrap.pm) >= 0:98.112902
perl(LWP/UserAgent.pm) >= 0:2.003
perl(IO/Lines.pm) >= 0:1.108
perl(IO/Scalar.pm) >= 0:1.117
perl(IO/ScalarArray.pm) >= 0:1.114
$

Т.е. наиболее востребованный формат указания зависимостей -- с двумя
знаками после точки.

PS: зависимость может быть также указана с помощью v-string (такие
зависимости имеют Serial:1), в этом случае проблем не возникает.
Однако появляется проблема сопоставления версии v-string и десятичной
версии.
----------- следующая часть -----------
Было удалено вложение не в текстовом формате...
Имя     : =?iso-8859-1?q?=CF=D4=D3=D5=D4=D3=D4=D7=D5=C5=D4?=
Тип     : application/pgp-signature
Размер  : 189 байтов
Описание: =?iso-8859-1?q?=CF=D4=D3=D5=D4=D3=D4=D7=D5=C5=D4?=
Url     : <http://lists.altlinux.org/pipermail/devel/attachments/20041201/3d7e42b2/attachment-0001.bin>