CPU-ID oderMAc-Adresse aus Raspi in Codesys auslesen

JüKo · 20 Juli 2025

Hallo an Euch,
ich möchte in Codesys die CPU-ID (oder MAC-Adressse) meiner Pixtend-Steuerung lesen und in eine Stringvariable schreiben.
Diese möchte ich dann mit einer Stringvariablen in meinem Programm vergleichen. Wenn diese beiden Strings nicht gleich sind dann kann das Programm nicht benützt werden. Gibt es da eine Möglichkeit?
Der Grund dafür ist, sofern das Programm kopiert wird, es dann nicht verwendet werden kann. Oder gibt es da auch andere Möglichkeiten?
Danke und Grüße,
Jürgen

DerOnkel · 20 Juli 2025

Hier wirst du fündig. Über welche Stückzahlen sprichst du bei diesem Projekt?

CODESYS Group

content.helpme-codesys.com

JüKo · 20 Juli 2025

Hallo Onkel,
das habe ich im Link gefunden >> DeviceNet MAD ID. Das sieht schonmal gut aus, aber mit welchem Befehl kann ich nun die Mac-Id in Codesys erfragen? Ich benötige eine Stringvariable zum vergleichen.
Zu den Stückzahlen kann ich noch nichts sagen, werden aber nicht so hoch sein.
Danke und Grüße,
Jürgen

DerOnkel · 20 Juli 2025

Probiere es mal hiermit, die MAC Adresse kann durchaus geändert werden, die CPU ID sollte recht sicher sein.

Code:

PROGRAM PLC_PRG
VAR
    fbGetDeviceInfo : CAA.DeviceDiagnosis.DeviceGetInfo;
    stDeviceInfo : CAA.DeviceDiagnosis.ST_DeviceInfo;
    xDone : BOOL;
    xError : BOOL;
    uiState : UINT := 0;
    myDeviceID : STRING(100);
    expectedID : STRING(100) := 'ABC123XYZ'; // Deine Ziel-ID
END_VAR

CASE uiState OF
    0:
        fbGetDeviceInfo(
            pDeviceInfo := ADR(stDeviceInfo),
            xExecute := TRUE
        );
        uiState := 1;

    1:
        IF fbGetDeviceInfo.xDone THEN
            xDone := TRUE;
            myDeviceID := stDeviceInfo.sDeviceId;   // oder sSerialNumber prüfen
            fbGetDeviceInfo.xExecute := FALSE;
            uiState := 2;
        ELSIF fbGetDeviceInfo.xError THEN
            xError := TRUE;
            fbGetDeviceInfo.xExecute := FALSE;
            uiState := 100;
        END_IF

    2:
        IF myDeviceID <> expectedID THEN
            // Zugriff verweigern
        ELSE
            // Zugriff gewähren
        END_IF

    100:
        // Fehlerbehandlung

END_CASE

JüKo · 20 Juli 2025

Hallo Onkel,

super, vielen Dank für deine Mühe, den Programmcode hab ich reinkopiert.
Dann einige Fehlermeldungen

Bin nun draufgekommen, dass ich noch eine Bibliothek brauche.
Kannst Du mir sagen welche das ist? Ich hätte ansonsten einfach die oberste Zeile genommen

Ich merk schon, dass ich ein bisschen programmieren kann, aber ansonsten noch große Lücken hab.

Danke nochmals für die tolle Arbeit, das hätte ich so nie hinbekommen.

Grüße,
Jürgen

DerOnkel · 22 Juli 2025

Nicht dafür. Welcher Version benutzt du? Eventuell muss es noch einmal angepasst werden.

JüKo · 22 Juli 2025

Hallo Onkel,
ich arbeite mit der V3.5 SP20 Patch 2 + (32bit)
Grüße,
Jürgen

DerOnkel · 22 Juli 2025

Ich habe mal ein Versuch unternommen und bin nicht zu einem Ergebnis gekommen, aber ich sehe es mir bei Gelegenheit mal an, die oben genannten Funktion läuft wohl nur bis SP14 und wahrscheinlich nicht auf dem PI.

Du könntest auch die CmpSysProcess Lib benutzen und per Konsole auslesen.

Code:

VAR
    hProcess : RTS_IEC_HANDLE;
    szCommand : STRING(255) := 'cat /proc/cpuinfo | grep Serial';
    sOutput   : STRING(64);
    Result    : RTS_IEC_RESULT;
    xDone     : BOOL := FALSE;
END_VAR

IF NOT xDone THEN
    hProcess := SysProcessExecuteCommand2(szCommand, ADR(sOutput), SIZEOF(sOutput), ADR(Result));
    xDone := TRUE;  // Nur einmal ausführen
END_IF

JüKo · 23 Juli 2025

Hallo Onkel,
werde ich morgen Abend mal testen.
Vielen Dank und Grüße,
Jürgen

WFr · 24 Juli 2025

VAR
hProcess : RTS_IEC_HANDLE;
pszCommand : STRING(255) := 'cat /proc/cpuinfo | grep Serial';
sOutput : STRING:= '';
xDone : BOOL := FALSE;
END_VAR

IF NOT xDone THEN
SysProcess.SysProcessExecuteCommand2(pszCommand, pszStdOut:=sOutput, SIZEOF(sOutput), ADR(hProcess));
xDone := TRUE; // einmal ausführen
END_IF

DeaD_EyE · 24 Juli 2025

Useless use of

has been detected.

Bash:

cat /proc/cpuinfo | grep Serial

Der Befehl grep kann auch Dateien einlesen:

Bash:

grep Serial /proc/cpuinfo

Das hat den Vorteil, dass nur ein Programm gestartet wird.

Könnte man auch mit AWK machen:

Bash:

awk -F ': ' '/Serial/ { print $2 }' /proc/cpuinfo

Vorteil: Es wird nur die Seriennummer ausgegeben. Serial : wird dann nicht mit ausgeben.

JüKo · 24 Juli 2025

Hallo zusammen,
Ich hab die Variablen vom Onkel in die Variablenliste und den Code in den Programmteil kopiert.
Nun kommen diese beiden Fehlermeldungen:
[FEHLER] Xup_20250723_2: PLC_PRG [Device: SPS-Logik: Application](Zeile 23, Spalte 1 (Impl)): C0032: Typ 'POINTER TO STRING(64)' kann nicht in Typ 'REFERENCE TO STRING' konvertiert werden

[FEHLER] Xup_20250723_2: PLC_PRG [Device: SPS-Logik: Application](Zeile 23, Spalte 1 (Impl)): C0417: VAR_IN_OUT- beziehungsweise REFERENCE-Parameter 'pszStdOut' von 'SysProcessExecuteCommand2' benötigt eine Variable mit Schreibzugriff als Eingang

Da ich den Code nicht verstehe dann ich auch nichts mit den Fehlermeldungen anfangen.
Hab auch noch nie etwas mit einem Pointer gemacht.

Danke an euch und Grüße,
Jürgen

WFr · 24 Juli 2025

JüKo · 24 Juli 2025

Den Code von WFr reinkopiert und sieht gut aus. Die CPU-ID erkene ich.

Was macht denn diese Zeile nun?
SysProcess.SysProcessExecuteCommand2(pszCommand, pszStdOut:=sOutput, SIZEOF(sOutput), ADR(hProcess));

Das "pszCommand" gibt den Betriebssystembefehl denke ich.

Im "pszCommand" steht die CPU-ID.

SIZEOF... keine Ahnung

ADR... auch keine Ahnung

und wie bekomme ich nun die CPU-ID in eine Stringvariable zum Vergleichen?

Danke an euch und Grüße,
Jürgen

Oberchefe · 24 Juli 2025

Das "pszCommand" gibt den Betriebssystembefehl denke ich.

pszCommand ist der String, der ein paar Zeilen oben mit

'grep Serial /proc/cpuinfo'

deklariert wird

SIZEOF... keine Ahnung

das ermittelt die Speichergröße der Stringvariable sOutput

ADR... auch keine Ahnung

hier wird die Speicheradresse von hProcess ermittelt

und wie bekomme ich nun die CPU-ID in eine Stringvariable zum Vergleichen?

Steht die nicht schon in der Stringvariable sOutput?

WFr · 24 Juli 2025

WFr · 24 Juli 2025

das kannst du abfragen mit cat /proc/cpuinfo

mfg willi

JüKo · 25 Juli 2025

Passt alles soweit!
Hab den Befehl "cat /proc/cpuinfo | grep Serial" verwendet. Freue mich!

Jetzt sind aber noch zwei Fragen aufgetaucht.
1. Warum ist die pszCommand (also die Stringvar.) 255 Zeichen lang? Hat das einen bestimmten Grund?
Kürzer würde doch reichen? Also nur für mein Verständniss um etwas zu lernen. Danke!
2 In der Var. sOutput steht jetzt: Serial :"und hier die Seriennummer".
Wie kann ich nur die Seriennummer anzeigen lassen, also ohne "Serial :" ? Nochmal Danke!

Grüße an Alle,
Jürgen

DeaD_EyE · 28 Juli 2025

JüKo schrieb:
1. Warum ist die pszCommand (also die Stringvar.) 255 Zeichen lang? Hat das einen bestimmten Grund?

255 Byte ist die maximale Länge eines String bei Codesys. Die Seriennummer ist kürzer. Also kann man den String auch kürzer machen.

JüKo schrieb:
2 In der Var. sOutput steht jetzt: Serial :"und hier die Seriennummer".
Wie kann ich nur die Seriennummer anzeigen lassen, also ohne "Serial :" ? Nochmal Danke!

D

Beitrag im Thema 'CPU-ID oderMAc-Adresse aus Raspi in Codesys auslesen'

24 Juli 2025

Useless use of

has been detected.

Bash:

cat /proc/cpuinfo | grep Serial

Der Befehl grep kann auch Dateien einlesen:

Bash:

grep Serial /proc/cpuinfo

Das hat den Vorteil, dass nur ein Programm gestartet wird.

Könnte man auch mit AWK machen:

Bash:

awk -F ': ' '/Serial/ { print $2 }' /proc/cpuinfo

Vorteil: Es wird nur die Seriennummer ausgegeben. Serial : wird dann nicht mit ausgeben.

Theoretisch könntest du das aber auch mit Codesys machen.

JüKo · 29 Juli 2025

Hallo an Alle,

dann bedanke ich mich für die tolle Unterstützung.

Grüße an Euch,
Jürgen

CPU-ID oderMAc-Adresse aus Raspi in Codesys auslesen

Level-2

Level-2

Level-2

Level-2

Level-2

Level-2

Level-2

Level-2

Level-2

Level-2

Level-2

Level-2

Level-2

Level-2

Level-3

Level-2

Level-2

Level-2

Level-2

Level-2

Similar threads

Wir schützen deine Privatsphäre