expected timestamp not found in data source

[Mardor]

Hallo,

nachdem ich nun Stunden um Stunden damit verbracht habe das Problem zu lösen und keinen Schritt weiter gekommen bin hoffe ich hier einen Tipp zu erhalten.

Ich möchte RRD Tool benutzen, dies funktioniert auch soweit d.h. ich sehe den Graphen etc. sobald ich im folgenden Script einen festen Übergabewert eintrage (in diesem Fall 64. Sobald ich aber den Wert übergebe das per "ps aux | wc -l" raugekommen ist erhalte ich folgende Fehlermeldung:

ERROR: expected timestamp not found in data source from 66

Die Zahl 66 entspricht der Anzahl der aktuellen Prozesse.

#!/usr/bin/perl

# Definition
$PATH = "/data/rrdtool/process";

# Command
$NUM_PROCESS = `ps aux | wc -l`;
chomp($NUM_PROCESS);

# RRDTool update
`/usr/local/bin/rrdtool update $PATH/process.rrd N:$NUM_PROCESS`;
# `/usr/local/bin/rrdtool update $PATH/process.rrd N:64`;

Ich habe bereits das gleiche Problem wenn ich ein Shell Script benutze.

Wenn ich anstatt des ps Befehls folgenden Befehl eingebe bekomme ich auch keine Fehlermeldung.

$NUM_PROCESS = "55";

Ich denke das dies irgend ein winziges Problem ist, aber ich komme einfach nicht drauf.

Gruß Mardor

[h^2]

Bei
ps aux | wc -l
sind bei mir noch Leerzeichen/tabs vor der Zahl. Vielleicht solltest du die wegmachen (intuitiv würd ich das mit awk machen, geht aber sicher einfacher).

[Mardor]

Hi,

vielen Dank für den Tipp. Ich habe die Leerzeichen über regex entfernt. Leider hat es nicht geholfen, ich bekomme immer noch die Fehlermeldung:

#!/usr/bin/perl

# Definition
$PATH = "/data/rrdtool/process";

# Command
$NUM_PROCESS = `ps aux | wc -l`;
chomp($NUM_PROCESS);
$NUM_PROCESS =~ s/ //;

# RRDTool update
`/usr/local/bin/rrdtool update $PATH/process.rrd N:$NUM_PROCESS`;

ERROR: expected timestamp not found in data source from 61

Hättest du noch eine Idee oder einen Tipp ?

Gruß Mardor

[h^2]

Ich glaube deine RE fänngt nur spaces und keine tabs ab. Aber kannst du $NUM_PROCESS nicht byteweise ausgeben (ich kenne mich mit perl nicht aus), dann wüsstest du doch was drin steht?

[Mardor]

Hallo,

ich habe jetzt die Tabs rausgenommen und dann noch zusätzlich alle anderen Sonderzeichen, leider ohne Erfolg.

#!/usr/bin/perl

# Definition
$PATH = "/data/rrdtool/process";

# Command
$NUM_PROCESS = `ps aux | wc -l`;
chomp($NUM_PROCESS);
$NUM_PROCESS =~ s/ //;
$NUM_PROCESS =~ s/\t//;

$NUM_PROCESS =~ s/\s//;


# RRDTool update
`/usr/local/bin/rrdtool update $PATH/process.rrd N:$NUM_PROCESS`;

Gruß Mardor

[Mardor]

Ich glaube deine RE fänngt nur spaces und keine tabs ab. Aber kannst du $NUM_PROCESS nicht byteweise ausgeben (ich kenne mich mit perl nicht aus), dann wüsstest du doch was drin steht?

Was meinst du genau mit byteweise ?

[Yamagi]

Deine RE wird so nicht funktionieren. Das Minimum um eine beliebige Anzahl Spaces und Tabs am Anfang(!) der Zeile zu entfernen wäre:

s/^\s*//g

^ -> Zeilenanfang (damit wir nichts hinter der Zahl wegholzen)
\s -> Greift alle Leerzeichen (Whitespace, Tab, Newline, evtl. noch mehr Abarten)
* -> Beliebige viele \s
/g -> Global, wende die Regex so oft an, bis sie nicht mehr greift. Hier nicht zwingend notwendig, schadet aber auch nicht.

Davon abgesehen, würde ich dir ganz stark raten, Perl in den "strict"-Mode zu schalten. Das Script initialisiert z.B. seine Variablen nicht. Das macht es nicht nur schwer lesbar, ist stattdessen auch potentiell gefährlich. Insgesamt würde es denn grob so aussehen. Ist allerdings ungetestet:

!/usr/bin/env perl

use warnings;
use strict;

# Hier könnte man auch ein Perl-Modul nutzen
my $num_proc = `ps aux | wc -l`;

# Leerzeichen davor weg
$num_proc =~ s/^\s*//g;

# Leerzeichen danach weg
$num_proc =~ s/\s*$//g;

# (Die beiden RE könnte man auch in eine kombinieren,
#  aber das ist dann nicht mehr klar verständlich, bzw.
#  verlangt etwas tiefergehendes Verständnis der RE
#  Engine)

`/usr/local/bin/rrdtool update $PATH/process.rrd N:$num_proc`

[Mardor]

Hallo Yamagi und h^2,

vielen vielen Dank für eure Hilfe. Jetzt funktioniert das Script ohne Problem.


Eine Verständnisfrage zu meinem Script hätte ich noch:

- Welchen Grund hat es in einer Zeile die Sonderzeichen vor und in einer die Sonderzeichen danach zu löschen.

- Warum hat mein Script in diesem Fall nicht funktioniert ?


Gruß Mardor

[Yamagi]

Zitat von Mardor

- Welchen Grund hat es in einer Zeile die Sonderzeichen vor und in einer die Sonderzeichen danach zu löschen.

Einzig und allein, um die RE lesbarer zu bekommen. Es in einer Zeile zu machen,wäre schneller, da nur eine RE übersetzt und angewandt werden muss, aber für dein Script sind die paar CPU-Zyklen sehr wahrscheinlich irrelevant. Es wäre:

$num_proc =~ s/^\s*(\d+)\s*$/$1/;

$1 ist ein Backtracking-Bucket, der von der ersten definierten Gruppe "(\d+)" - greift einige beliebige Anzahl Ziffern, mindestens aber eine - gefüllt wird. perlre erklärt es halbwegs verständlich: http://perldoc.perl.org/perlre.html#Backtracking

Zitat von Mardor

- Warum hat mein Script in diesem Fall nicht funktioniert ?

Weil deine RE falschen waren:
- "$NUM_PROCESS =~ s/ //;" greift das erste Leerzeichen, was er findet und entfernt es.
- "$NUM_PROCESS =~ s/\t//;" greift des ersten Tab, den er findet und entfernt ihn.
- "$NUM_PROCESS =~ s/\s//;" greift das erste Tab / Leerzeichen / Newline und entfernt es.
Es reicht aber nicht aus, nur das erste Zeichen zu entfernen. Es müssen alle vor und nach dem gewünschten Wert entfernt werden. Sonst sieht der CMD-Parser vom rrdtool etwas wie "N: 123" in seinem Aufruf und hält die Zahl 123 für einen eigenen Wert ohne Bezug zum N:. Das ist dann falscher Syntax und geht nicht.

[KobRheTilla]

Zitat von Yamagi

Einzig und allein, um die RE lesbarer zu bekommen. Es in einer Zeile zu machen,wäre schneller, da nur eine RE übersetzt und angewandt werden muss, aber für dein Script sind die paar CPU-Zyklen sehr wahrscheinlich irrelevant. Es wäre:

$num_proc =~ s/^\s*(\d+)\s*$/$1/;

Man kann auch einfach jedes Zeichen entfernen, dass keine Zahl ist:

s/[^0-9]+//g

Rob

[Yamagi]

Ja, das wäre natürlich noch einfacher und vor allem robuster. Hatte ich nun gar nicht bedacht.

[Mardor]

Hi Yamagi,

vielen dank für die super ausführliche Erklärung. Ich habe verstanden warum mein Script nicht funktionieren konnte.

Auch vielen Dank an h^2 und KobRheTilla.

Gruß Mardor