Apparaat :: TNC Apparaat :: TNC is een PERL-module die als een generieke interface op een TNC werkt.
Download nu

Apparaat :: TNC Rangschikking & Samenvatting

Apparaat :: TNC Tags

Perl-module apparaat Perl-interface TNC TNC-interface

Apparaat :: TNC Beschrijving

Device :: TNC is een PERL-module die als een generieke interface op een TNC werkt. Device :: TNC is een PERL-module die als een generieke interface inwerkt op een TNC.Deze module implementeert een generieke interface met een terminalknoopcontroller (TNC). Het laadt subklassen die de interface op het laagste niveau bieden voor de juiste TNC die moet worden gebruikt, en biedt methoden op hogere niveau om frames van gegevens aan de gebruiker te retourneren is menselijk leesbaar formulier. Synopsis-apparaat :: TNC; mijn $ tnc_type = 'kus'; My% TNC_CONFIG = ('PORT' => ($ config {'OSNAME'} EQ "MSWIN32")? "COM3": "/ Dev / TNC-X", 'BAUDRATE' => 9600, 'WARN_MALFORMED_KISS' => 1 , 'Raw_Log' => "raw_packet.log",); Mijn $ TNC = nieuw apparaat :: TNC ($ TNC_TYPE,% TNC_CONFIG); Die "Fout: er is iets misgegaan met het verbinden met de TNC.N" Tenzij $ TNC; terwijl (1) {mijn $ gegevens = $ TNC-> Read_frame (); Mijn $ Repeesters = Join ",", @ {$ data -> {'adres'} -> {'Repeaters'}}; My $ Info = Join "", @ {$ data -> {'info'}}; Afdrukken "van: $ Gegevens -> {'Adres'} -> {'SOURCE'}"; Print "naar: $ Gegevens -> {'adres'} -> {'bestemming'}"; Print "via $ REPEATERSN"; Print "Data: $ Infon"; } NIEUW () MIJN $ TYPE = "KISS"; mijn% tnc_data = {'optie' => 'waarde'}; Mijn $ TNC = nieuw apparaat :: TNC ($ TYPE,% TNC_DATA); de nieuwe methode creëert en retourneert een nieuw apparaat :: TNC-object dat kan worden gebruikt om te communiceren met een terminale knooppuntcontroller (TNC) van het type doorgegeven. Methode vereist dat het eerste gepasseerde argument het type TNC is om verbinding mee te maken. Dit zal proberen de juiste module voor het TNC-type te laden. De volgende opties worden doorgegeven aan de module die is geladen om verbinding te maken met de gewenste TNC. Voor meer informatie over deze opties Zie de documentatie Module voor het TNC Type.read_frame () My $ frame_data = $ tnc-> lees_frame (); Mijn% frame_data = $ TNC-> Read_frame (); deze methode leest een HDLC-frame van de TNC en retourneert een structuur als een hash of een hash-referentie die de velden van het frame bevat. De structuur van de geretourneerde gegevens is als de volgend. {'Info' => , 'PID' => 'F0', 'Control' => {Poll_final '=> 0, 'FIELD_TYPE' => 'UI', 'Frame_Type' => 'U'}, 'Adres' => {'bestemming' => 'APT311', 'Repeaters' => ,' SOURCE '=>' VK2KFJ-7 '}} Tijdens het ontwikkelen van deze module ontving ik alleen U (UI) type frames en dus de ontwikkeling van de code om met I en S Frames niet echt vooruitgang te boeken. Als iemand dat wil lezen, laat het me weten en ik zal het implementeren van ze bekijken. Maak een kuslog van de gegevens en e-mail het naar mij. Vereisten: · Perl

Apparaat :: TNC Gerelateerde software