टेलनेट क्लाइंट पर कमांड इतिहास कैसे कार्यान्वित करें? (ऊपर/नीचे तीर)

Question

मेरे पास एक सर्वर है जो प्रबंधन के लिए टेलनेट कनेक्शन स्वीकार करता है। मुझे कमांड इतिहास याद आती है इसलिए मैं अपना टेलनेट सत्र इसे समर्थन देना चाहता हूं। मेरे प्रश्न:

1) क्या मुझे इसे सर्वर की तरफ लागू करना है, तो सर्वर क्लाइंट को पिछले आदेश भेज देगा और फिर क्लाइंट फिर से निष्पादित कर सकता है?

2) क्या टेलनेट क्लाइंट (सर्वर के साथ गड़बड़ नहीं) में इस कार्यक्षमता को लागू करने के लिए वैसे भी है?

यदि उत्तर 1 है) तो मुझे पता होना चाहिए कि प्रवेश करने के बिना मेरे टेलनेट सत्र पर ऊपर और नीचे तीर कुंजियों को कैप्चर और भेजना है।

Answer 1

यह एक सर्वर समस्या नहीं है। अपने टेलनेट क्लाइंट के साथ बस rlwrap का उपयोग करें। यह आपको प्रोग्रामिंग के साथ readline देता है।

$ rlwrap telnet server port 

(। मैं वास्तव में nc बजाय telnet के बाद से यह उपयोग करने के लिए आसान है और अधिक मजबूत है का उपयोग करें)

Answer 2

उपयोग socat:

socat readline,history=$HOME/.telnet_history TCP:host:23 

Answer 3

मैं यह सोचते कर रहा हूँ कि यह एक आप सेवा है आपके टैग के आधार पर पर्ल में लिखा है।

आप सीपीएएन से टर्म :: रीडलाइन मॉड्यूल का उपयोग कर सकते हैं जो आप चाहते हैं। सीपीएएन वेबसाइट से, यहां एक मूल उदाहरण है:

use Term::ReadLine; 
    my $term = Term::ReadLine->new('My Management Service'); 
    my $prompt = "Enter your management command: "; 
    my $OUT = $term->OUT || \*STDOUT; 
    while (defined ($_ = $term->readline($prompt))) { 
     my $res = eval($_); 
     warn $@ if $@; 
     print $OUT $res, "\n" unless $@; 
     $term->addhistory($_) if /\S/; 
    }