[devel] Помогите собрать mysql-mmm

[devel] Помогите собрать mysql-mmm

[Dubrovskiy Viacheslav]

[-- Attachment #1: Type: text/plain, Size: 2311 bytes --]

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

Очень нужно собрать http://mysql-mmm.org/
Сделал пакетик как обычно
ssh://git.alt/people/dubrsl/packages/mysql-mmm.git, но оно не собирается:

find-requires: running scripts
(cpp,debuginfo,files,lib,pam,perl,pkgconfig,pkgconfiglib,python,rpmlib,shebang,shell,static,symlinks)
/usr/src/tmp/mysql-mmm-buildroot/usr/lib/mysql-mmm/monitor/checker syntax OK
/usr/src/tmp/mysql-mmm-buildroot/usr/sbin/mmm_control syntax OK
/usr/src/tmp/mysql-mmm-buildroot/usr/sbin/mmm_mond syntax OK
/usr/src/tmp/mysql-mmm-buildroot/usr/share/perl5/MMM/Monitor/Agent.pm
syntax OK
/usr/src/tmp/mysql-mmm-buildroot/usr/share/perl5/MMM/Monitor/Agents.pm
syntax OK
/usr/src/tmp/mysql-mmm-buildroot/usr/share/perl5/MMM/Monitor/CheckResult.pm
syntax OK
/usr/src/tmp/mysql-mmm-buildroot/usr/share/perl5/MMM/Monitor/Checker.pm
syntax OK
Name "main::check" used only once: possible typo at
/usr/src/tmp/mysql-mmm-buildroot/usr/share/perl5/MMM/Monitor/Checker/Checks.pm
line 221.
/usr/src/tmp/mysql-mmm-buildroot/usr/share/perl5/MMM/Monitor/Checker/Checks.pm
syntax OK
/usr/src/tmp/mysql-mmm-buildroot/usr/share/perl5/MMM/Monitor/ChecksStatus.pm
syntax OK
Subroutine main redefined at
/usr/src/tmp/mysql-mmm-buildroot/usr/share/perl5/MMM/Monitor/Commands.pm
line 19.
#
/usr/src/tmp/mysql-mmm-buildroot/usr/share/perl5/MMM/Monitor/Commands.pm: deparse
failed, trying to recover with -MMMM::Monitor
Can't locate MMM/Monitor.pm in @INC (@INC contains: /usr/lib/rpm
/usr/src/tmp/mysql-mmm-buildroot/usr/share/perl5
/usr/src/tmp/mysql-mmm-buildroot/usr/share/perl5 /usr/lib64/perl5
/usr/share/perl5 /usr/lib64/perl5 /usr/share/perl5 /etc/perl5
/usr/lib/perl5/vendor_perl /usr/local/lib64/perl/5.12
/usr/local/share/perl/5.12 /usr/lib64/perl5 /usr/share/perl5
/usr/lib64/perl5 /usr/share/perl5 /etc/perl5 /usr/lib/perl5/vendor_perl .).
BEGIN failed--compilation aborted.
#
/usr/src/tmp/mysql-mmm-buildroot/usr/share/perl5/MMM/Monitor/Commands.pm: deparse
failed. prefix=/usr/src/tmp/mysql-mmm-buildroot/usr/share/perl5
find-requires: ERROR: /usr/lib/rpm/perl.req failed
error: /bin/sh failed
error: Failed to find Requires


Если есть перловоды, помогите решить вопрос что там не так?

-- 
WBR,
Dubrovskiy Viacheslav


[-- Attachment #2: S/MIME Cryptographic Signature --]
[-- Type: application/pkcs7-signature, Size: 6229 bytes --]

Re: [devel] Помогите собрать mysql-mmm

[Paul Wolneykien]

02.08.2011 21:39, Dubrovskiy Viacheslav пишет:
> Can't locate MMM/Monitor.pm in @INC

  А он точно есть?

Re: [devel] Помогите собрать mysql-mmm

[Dubrovskiy Viacheslav]

[-- Attachment #1: Type: text/plain, Size: 474 bytes --]

02.08.2011 13:43, Paul Wolneykien пишет:
> 02.08.2011 21:39, Dubrovskiy Viacheslav пишет:
>> Can't locate MMM/Monitor.pm in @INC
>   А он точно есть?
есть /usr/src/tmp/mysql-mmm-buildroot/usr/share/perl5/MMM/Monitor/Monitor.pm
а не /usr/src/tmp/mysql-mmm-buildroot/usr/share/perl5/MMM/Monitor.pm нету.
Как исправить? Не вижу в файле где там инклюдится MMM/Monitor.pm


-- 
WBR,
Dubrovskiy Viacheslav


[-- Attachment #2: S/MIME Cryptographic Signature --]
[-- Type: application/pkcs7-signature, Size: 6229 bytes --]

Re: [devel] Помогите собрать mysql-mmm

[Paul Wolneykien]

02.08.2011 22:13, Dubrovskiy Viacheslav пишет:
> 02.08.2011 13:43, Paul Wolneykien пишет:
>> 02.08.2011 21:39, Dubrovskiy Viacheslav пишет:
>>> Can't locate MMM/Monitor.pm in @INC
>>   А он точно есть?
> есть /usr/src/tmp/mysql-mmm-buildroot/usr/share/perl5/MMM/Monitor/Monitor.pm
> а не /usr/src/tmp/mysql-mmm-buildroot/usr/share/perl5/MMM/Monitor.pm нету.
> Как исправить? Не вижу в файле где там инклюдится MMM/Monitor.pm

  Действительно… А если с помощью grep поискать по всем файлам?

> 
> 
> 
> 
> 
> _______________________________________________
> Devel mailing list
> Devel@lists.altlinux.org
> https://lists.altlinux.org/mailman/listinfo/devel

Re: [devel] Помогите собрать mysql-mmm

[thecrux]

On Tue, Aug 02, 2011 at 01:39:17PM -0400, Dubrovskiy Viacheslav wrote:
> Здравствуйте.
> 
> Очень нужно собрать http://mysql-mmm.org/
> Сделал пакетик как обычно
> ssh://git.alt/people/dubrsl/packages/mysql-mmm.git, но оно не собирается:
...
> Subroutine main redefined at
> /usr/src/tmp/mysql-mmm-buildroot/usr/share/perl5/MMM/Monitor/Commands.pm
> line 19.

При проверке файла Commands.pm выдаётся warning о том, что процедура main
переопределена (т.е. опеределение встречается либо раньше в коде, либо в
каких-то других подключаемых модулях). А поскольку используется конструкция

  use warnings FATAL => 'all';

это расценивается как ошибка.

Чтобы обойти проблему можно в файле lib/Monitor/Commands.pm (и также
lib/Monitor/Monitor.pm) попробовать заменить эту конструкцию на:

  use warnings FATAL => 'all', NONFATAL => 'redefine';

Работать будет, но ошибка в архитектуре программы похоже имеется.

-- 
Vladimir Lettiev aka crux ✉ theCrux@gmail.com

Re: [devel] Помогите собрать mysql-mmm

[Dubrovskiy Viacheslav]

[-- Attachment #1: Type: text/plain, Size: 2903 bytes --]

02.08.2011 15:03, thecrux@gmail.com пишет:
> On Tue, Aug 02, 2011 at 01:39:17PM -0400, Dubrovskiy Viacheslav wrote:
>> Здравствуйте.
>>
>> Очень нужно собрать http://mysql-mmm.org/
>> Сделал пакетик как обычно
>> ssh://git.alt/people/dubrsl/packages/mysql-mmm.git, но оно не собирается:
> ...
>> Subroutine main redefined at
>> /usr/src/tmp/mysql-mmm-buildroot/usr/share/perl5/MMM/Monitor/Commands.pm
>> line 19.
> При проверке файла Commands.pm выдаётся warning о том, что процедура main
> переопределена (т.е. опеределение встречается либо раньше в коде, либо в
> каких-то других подключаемых модулях). А поскольку используется конструкция
>
>   use warnings FATAL => 'all';
>
> это расценивается как ошибка.
>
> Чтобы обойти проблему можно в файле lib/Monitor/Commands.pm (и также
> lib/Monitor/Monitor.pm) попробовать заменить эту конструкцию на:
>
>   use warnings FATAL => 'all', NONFATAL => 'redefine';
>
> Работать будет, но ошибка в архитектуре программы похоже имеется.
Спасибо.
теперь там такое вылазит:

Bareword "main::MMM_PROTOCOL_VERSION" not allowed while "strict subs" in
use at
/usr/src/tmp/mysql-mmm-buildroot/usr/share/perl5/MMM/Agent/Agent.pm line 90.
Bareword "main::MMM_PROTOCOL_VERSION" not allowed while "strict subs" in
use at
/usr/src/tmp/mysql-mmm-buildroot/usr/share/perl5/MMM/Agent/Agent.pm line 91.
/usr/src/tmp/mysql-mmm-buildroot/usr/share/perl5/MMM/Agent/Agent.pm had
compilation errors.
# perl(Unix/Uptime.pm) at line 18 (depth 3) inside eval SKIP
# /usr/src/tmp/mysql-mmm-buildroot/usr/share/perl5/MMM/Agent/Agent.pm:
deparse failed, trying to recover with -MMMM::Agent
Can't locate MMM/Agent.pm in @INC (@INC contains: /usr/lib/rpm
/usr/src/tmp/mysql-mmm-buildroot/usr/share/perl5
/usr/src/tmp/mysql-mmm-buildroot/usr/share/perl5 /usr/lib/perl5
/usr/share/perl5 /usr/lib/perl5 /usr/share/perl5 /etc/perl5
/usr/lib/perl5/vendor_perl /usr/local/lib/perl/5.12
/usr/local/share/perl/5.12 /usr/lib/perl5 /usr/share/perl5
/usr/lib/perl5 /usr/share/perl5 /etc/perl5 /usr/lib/perl5/vendor_perl .).
BEGIN failed--compilation aborted.
# /usr/src/tmp/mysql-mmm-buildroot/usr/share/perl5/MMM/Agent/Agent.pm:
deparse failed. prefix=/usr/src/tmp/mysql-mmm-buildroot/usr/share/perl5
find-requires: ERROR: /usr/lib/rpm/perl.req failed
error: /bin/sh failed
error: Failed to find Requires


Похоже поделие еще то. Может кто-то подскажет схожее по функционалу и
рабочее?

-- 
WBR,
Dubrovskiy Viacheslav


[-- Attachment #2: S/MIME Cryptographic Signature --]
[-- Type: application/pkcs7-signature, Size: 6229 bytes --]

Re: [devel] Помогите собрать mysql-mmm

[thecrux]

On Tue, Aug 02, 2011 at 06:28:41PM -0400, Dubrovskiy Viacheslav wrote:
> Спасибо.
> теперь там такое вылазит:
> 
> Bareword "main::MMM_PROTOCOL_VERSION" not allowed while "strict subs" in
> use at
> /usr/src/tmp/mysql-mmm-buildroot/usr/share/perl5/MMM/Agent/Agent.pm line 90.
> Bareword "main::MMM_PROTOCOL_VERSION" not allowed while "strict subs" in
> use at
> /usr/src/tmp/mysql-mmm-buildroot/usr/share/perl5/MMM/Agent/Agent.pm line 91.
> /usr/src/tmp/mysql-mmm-buildroot/usr/share/perl5/MMM/Agent/Agent.pm had
> compilation errors.

Константа MMM_PROTOCOL_VERSION определена в скрипте, который вызывает этот
модуль. Поэтому на этапе проверки синтаксиса модуля это ошибка, но при вызове 
из скрипта - всё будет работать. 
 
Для решения проблемы можно добавить префикс '&', т.е.
  &main::MMM_PROTOCOL_VERSION
используя тот факт, что все скалярные константы в perl на самом деле inline
процедуры.
 
Или, как вариант, выделить проблемный блок и указать в нём директиву
`no strict 'subs';` :
 
 
-
-   if ($version > main::MMM_PROTOCOL_VERSION) {
-       WARN "Version in command '$cmd_name' ($version) is greater than mine (", main::MMM_PROTOCOL_VERSION, ")"
-   }
+
+   {
+       no strict 'subs';
+       if ($version > main::MMM_PROTOCOL_VERSION) {
+           WARN "Version in command '$cmd_name' ($version) is greater than mine (", main::MMM_PROTOCOL_VERSION, ")"
+       }
+   }

-- 
Vladimir Lettiev aka crux ✉ theCrux@gmail.com