🏂🏼 🤶🏼 🖇️ 9 चरणों में एक सामान्य कॉमन लिस्प वेबसाइट 🚣🏻 👧🏽 👨🏼‍🔧

परिचय

यह परिचयात्मक लेख उन लोगों के लिए है जो वेब प्रोग्रामिंग कार्यों में कॉमन लिस्प का उपयोग करने की कोशिश करना चाहते हैं। मैं इस भाषा के फायदों पर ध्यान नहीं दूंगा , अबाबो ने अपनी परिचयात्मक पोस्ट में मेरे लिए कॉमन लिस्प में वेब एप्लिकेशन डेवलप करना (भाग एक) किया।

मैं पिछले एक साल से कॉमन लिस्प पर वेब एप्लिकेशन के विकास के साथ काम कर रहा हूं और कॉमन लिस्प पर एक बड़ा ऑनलाइन स्टोर बनाया है, जो मुझे लगता है कि उन लोगों की आपत्तियों को रोक देगा जो सोचते हैं कि लिस्प व्यावसायिक उपयोग के लिए बेकार है।

आज मेरा काम उस विधि के बारे में विस्तार से बताना है जिसका उपयोग मैं सभी आवश्यक बुनियादी ढाँचों को तैनात करने के लिए करता हूँ। इस लेख को चरण-दर-चरण गाइड के रूप में उपयोग करते हुए, एक चौकस पाठक अपनी वेबसाइट को लिस्प पर तैनात करने में सक्षम होगा।

शायद मेरे दृष्टिकोण आदर्श नहीं हैं - इस मामले में मुझे रचनात्मक आलोचना करने में खुशी होगी - कृपया शर्म न करें अगर आपको कुछ पसंद नहीं है - इस लेख का एक लक्ष्य आपकी अपनी गलतियों को सुधारना था।

उन लोगों के लिए जो उबाऊ स्थापना प्रक्रियाओं को छोड़ना पसंद करते हैं - लेख के अंत में थोड़ी सी अच्छाई है जो संभवतः वेब प्रोग्रामिंग के आपके विचार का विस्तार करेंगे यदि आपने पहले लिस्प के साथ निपटा नहीं है। कीवर्ड SLIME और SWANK द्वारा खोजें :)

SBCL का नवीनतम संस्करण स्थापित करें

मैं एसबीसीएल को कॉमन लिस्प के सबसे सुविधाजनक, सामान्य और मुफ्त कार्यान्वयन के रूप में उपयोग करता हूं, जो एमएसीएस पर्यावरण के साथ घनिष्ठ रूप से एकीकृत है, जो सुविधाजनक और आरामदायक काम प्रदान करता है। रिपॉजिटरी, एक नियम के रूप में, एसबीसीएल का नवीनतम संस्करण नहीं है, इसलिए आप इसे स्रोतों से संकलित कर सकते हैं या अपनी वास्तुकला के लिए एक बाइनरी स्थापित कर सकते हैं। उत्तरार्द्ध तुच्छ है, इसलिए इस लेख में मैं स्रोत से संकलन का वर्णन करूंगा।

ताजा एसबीसीएल संकलित करने के लिए, आप पुराने का उपयोग कर सकते हैं, जिसे हम तुरंत पैकेज मैनेजर का उपयोग करके स्थापित करेंगे:

$ apt-get install sbcl

SBCL के स्रोत यहां प्राप्त किए जा सकते हैं: sbcl.sourceforge.net/platform-table.html

 #  $ wget http://downloads.sourceforge.net/project/sbcl/sbcl/1.0.45/sbcl-1.0.45-source.tar.bz2 #  : $ bzip2 -cd sbcl-1.0.45.tar.bz2 | tar xvf - #      $ cd sbcl-1.0.45/ $ sh make.sh #   SBCL    $ apt-get remove sbcl #   sbcl $ sh install.sh # ,    : $ sbcl This is SBCL 1.0.45, an implementation of ANSI Common Lisp. More information about SBCL is available at <http://www.sbcl.org/>. SBCL is free software, provided as is, with absolutely no warranty. It is mostly in the public domain; some portions are provided under BSD-style licenses. See the CREDITS and COPYING files in the distribution for more information. *

बधाई हो, अब आपके पास sbcl का एक नया संस्करण है। फिलहाल, मैं संभावित अशुद्धि से बचने के लिए अपने सर्वर पर इसे आपके साथ तैनात कर रहा हूं, और लेख के अंत में आप यह सुनिश्चित कर सकते हैं कि कम से कम मेरे लिए सब कुछ काम किया हो। खैर, उम्मीद करते हैं कि यह ऐसा ही होगा :)

हम जल्दी डालते हैं

पुस्तकालयों का प्रबंधन करने के लिए, दो पैकेज प्रबंधकों का सबसे अधिक उपयोग किया जाता है - एएसडीएफ और क्विक लिस्प। उत्तरार्द्ध बहुत मित्रवत है, और एसबीसीएल के साथ पूर्व को पहले से ही स्थापित किया गया है, इसलिए अब हम खुद के लिए क्विक लिस्प स्थापित करेंगे। Quicklisp.org में सभी पृष्ठभूमि की जानकारी है, इसलिए मैंने इसे दोहराया नहीं है और हम सीधे स्थापना पर जाएंगे:

 $ wget http://beta.quicklisp.org/quicklisp.lisp $ sbcl --load quicklisp.lisp * (quicklisp-quickstart:install) * (ql:add-to-init-file)

हमने हुनकूट डाला

अब हमारे पास लाइब्रेरी मैनेजर है, हम इंस्टॉल करते हैं

hunchentoot वेब सर्वर, एक साथ अपने सभी निर्भरता के साथ, एक कमांड में:

 * (ql:quickload 'hunchentoot)

हम सर्वर पर हंस और कीचड़ डालते हैं

“और 1998 में नासा के डीप स्पेस 1 मिशन में दूरस्थ डिबगिंग का एक और प्रभावशाली उदाहरण भी हुआ। अंतरिक्ष यान के प्रक्षेपण के छह महीने बाद, एक छोटे लिस्प कोड को प्रयोगों की एक श्रृंखला का संचालन करने के लिए दो दिनों के लिए अंतरिक्ष यान का संचालन करना था। हालांकि, जमीन पर परीक्षण के दौरान कोड में मायावी दौड़ की स्थिति का पता नहीं लगाया गया था और पहले से ही अंतरिक्ष में खोजा गया था। जब अंतरिक्ष में त्रुटि का पता चला (पृथ्वी से 100 मिलियन मील), टीम कार्य कोड का निदान और सही करने में सक्षम थी, जिसने हमें प्रयोग पूरा करने की अनुमति दी। इस बारे में निम्नलिखित में से एक प्रोग्रामर ने कहा:

- 100 मिलियन डॉलर के उपकरणों पर 100 मिलियन मील दूर चल रहे प्रोग्राम को डिबेट करना एक दिलचस्प अनुभव है। "REPL, एक अंतरिक्ष यान पर काम कर रहा है, समस्याओं को खोजने और ठीक करने में अमूल्य अवसर प्रदान करता है।"

मैंने इस घटना के बारे में सुना, इससे पहले कि मैं खुद लिस्प से निपटना शुरू करूं, और ईमानदार होने के लिए मैंने इसे एक बाइक के रूप में लिया, जो अब बहु-मेगाबाइट निष्पादन योग्य फाइलों की हमारी आधुनिक दुनिया में खुद को दोहराने के लिए नियत नहीं थी और न ही कम गतिशील रूप से जुड़े पुस्तकालयों से। हालांकि, जब मैं लिस्प छवि के रिमोट कंट्रोल क्षमताओं से परिचित हो गया, तो मुझे यकीन हो गया कि यह मेरी मशीन पर कोड के साथ काम करने से ज्यादा मुश्किल नहीं था। और कोई वृद्धिशील निर्माण, लम्बी संकलन या एफ़टीपी के माध्यम से स्क्रिप्ट डाउनलोड करना - कीचड़ का उपयोग करके मैं एक कार्य प्रणाली से जुड़ता हूं और लगभग सब कुछ देख और बदल सकता हूं, उदाहरण के लिए, हॉट-स्वैपिंग कोड को लागू करना, या शक्तिशाली आत्मनिरीक्षण साधनों के साथ किसी भी वस्तु, फ़ंक्शन या मैक्रो का निरीक्षण करना।

यह कैसे काम करता है? - आप पूछें। दूरस्थ सर्वर पर लिस्प छवि के अंदर, SWANK काम करता है - एक विशेष पुस्तकालय जो एक बैकएंड प्रदान करता है जो लिस्प छवि के नियंत्रण के सभी लीवर तक पहुंच प्रदान करता है। SWANK को कॉमन लिस्प में लिखा गया है और एक बहुत ही सरल टेक्स्ट प्रोटोकॉल का उपयोग करके SLIME के साथ संचार करता है।

मेरा Emacs-e, SLIME चलाता है, जो Emacs Lisp में लिखा गया है, जो मुझे एक कोड फ़ाइल को संपादित करते समय दूरस्थ कॉमन लिस्प छवि में कमांड, कोड के टुकड़े, वस्तुओं और संरचनाओं की परिभाषा भेजने की अनुमति देता है। इस प्रकार, आपके पास दूरस्थ सर्वर पर स्रोत कोड की एक प्रति भी नहीं हो सकती है - जिस स्थिति में कोई भी हमलावर इसे संशोधित नहीं कर सकता है, उदाहरण के लिए, पिछले दरवाजे को सुरक्षित करने के लिए।

और कोड पीढ़ी के विकसित साधनों को देखते हुए, जो लिस्प को अलग करता है, आपके पास लगभग कोई कोड नहीं हो सकता है - इसे डेटा द्वारा स्वयं उत्पन्न किया जाए - एक समुराई से बेहतर है जो लड़ाई नहीं करता है, शायद केवल एक प्रोग्रामर जो कोड नहीं लिखता है ... हम्म, कुछ मैं यहाँ ले जाया गया, वापस स्थापना के लिए :)

इसलिए, यदि आपके पास मेरा जैसा रिमोट सर्वर है, तो आप उस पर SWANK, और SLIME को अपनी कार्यशील मशीन पर रख सकते हैं। या

उस और दोनों को और वहाँ और वहाँ - मुख्य बात तो भ्रमित होने के लिए नहीं। SWANK स्थापित करें:

 $ sbcl * (ql:quickload 'swank)

... और SLIME

 $ wget http://common-lisp.net/project/slime/snapshots/slime-current.tgz $ tar xvzf slime-current.tgz $ cd slime-2011-01-06/

इस निर्देशिका में README को ध्यान से पढ़ें और अपने में जोड़ें

~ / .emacs / init.el सही रास्तों का पालन करते हुए कोड का पालन करें

 ;; SBCL (setq inferior-lisp-program "/opt/sbcl/bin/sbcl") ; your Lisp system (setq slime-lisp-implementations '((sbcl ("sbcl")))) (setq slime-startup-animation nil) ;; SLIME (add-to-list 'load-path "~/.emacs.d/slime") ;;   slime (require 'slime) (setq slime-net-coding-system 'utf-8-unix) (slime-setup '(slime-fancy)) (setq slime-enable-evaluate-in-emacs t)

स्क्रीन लगाओ

चूंकि मेरे सर्वर कभी भी क्रैश नहीं करते हैं (ठीक है, हां :) - मैं एसबीसीएल की हमेशा ऑन-कॉपी रखने के लिए स्क्रीन का उपयोग करता हूं, हालांकि, जहां तक मुझे पता है, बेहतर प्रैक्टिस हैं (जो कि सक्षम पाठकों को निस्संदेह टिप्पणियों में याद करेंगे)

यदि आपके पास अभी तक नहीं है - यह डालने का समय है:

 $ apt-get install screen

सर्वर पर स्क्रीन में sbcl चलाएं और पोर्ट 4005 पर स्वांक सर्वर शुरू करें

 $ screen -S sbcl $ sbcl * (require 'asdf) * (asdf:oos 'asdf:load-op 'swank) * (setq swank:*use-dedicated-output-stream* nil) * (swank:create-server :coding-system "utf-8-unix" :dont-close t :port 4005)

हम अपने मशीन पर एमएसीएस से चल रहे सर्वर पर लिस्प इमेज से कनेक्ट करते हैं

टर्मिनल में, हम मेजबान के लिए ssh सुरंग को अग्रेषित करते हैं

 ssh -2 -N -f -L 4005:localhost:4005 user@host.tld

Emacs में, हम इस सुरंग के माध्यम से जुड़ते हैं

 Mx slime-connect 127.0.0.1 4005

या, यदि आपका सर्वर आपकी होम मशीन है - तो आपको कुछ भी फेंकने और SWANK बढ़ाने की आवश्यकता नहीं है - बस Emacs-e में टाइप करें:

 Mx slime

पोर्ट 4242 पर वेब-सर्वर hunchentoot लॉन्च करें

अब हम hunchentoot वेब सर्वर को उठाने के लिए तैयार हैं। मैं इसे 4242 पोर्ट करने के लिए उठाता हूं और nginx को प्रॉक्सी के रूप में उपयोग करता हूं। नग्नेक्स स्टैटिक्स को भी दूर करता है और कई चीजों को करता है जिसके लिए इसे सबसे अच्छा बनाया गया है।

हमारे परीक्षण के उद्देश्यों के लिए नेगनेक्स विन्यास बहुत सरल हो सकता है:

 सर्वर {
    80 सुनो;
    server_name लोकलहोस्ट;
     स्थान / {
       प्रॉक्सी_पास http: // लोकलहोस्ट: 4242;
       xy_redirect बंद;
    }
 }

निम्नलिखित कोड, आर्किमैग -ए के लेखक के लिए, एक विशेष वर्ग बनाता है जो आपको दूरस्थ त्रुटि पर स्टैक ट्रेस के साथ-साथ एक दूरस्थ ई-मेल पर त्रुटि उत्पन्न होने पर तुरंत इस त्रुटि की अनुमति देता है, जहां आप इसके साथ ठीक से व्यवहार कर सकते हैं। इस प्रकार, यदि आप उस सर्वर से जुड़े हैं जहाँ आपकी साइट चल रही है, तो आपको हमेशा उन त्रुटियों के बारे में पता चलेगा जो उस समय होती हैं, जो वेब प्रोग्रामिंग में प्रयुक्त कई अन्य भाषाओं के विपरीत होती हैं।

यदि बहुत अधिक त्रुटियां हैं, उदाहरण के लिए, विज़िटर लगातार गलत पृष्ठ पर आते हैं - आप बिना किसी व्यवधान के यह समझने के लिए कि मूल्य * कैच-एरर-पी * बदल सकते हैं, क्योंकि आपके पास पहले से ही क्या त्रुटियां आ चुकी हैं।

 (defparameter *catch-errors-p* nil) (defclass debuggable-acceptor (hunchentoot:acceptor) ()) (defmethod hunchentoot:acceptor-request-dispatcher ((acceptor debuggable-acceptor)) (if *catch-errors-p* (call-next-method) (let ((dispatcher (handler-bind ((error #'invoke-debugger)) (call-next-method)))) (lambda (request) (handler-bind ((error #'invoke-debugger)) (funcall dispatcher request)))))) (defun request-dispatcher (request) "Hello!") (defparameter *debuggable-acceptor* (make-instance 'debuggable-acceptor :request-dispatcher 'request-dispatcher :port 4242)) (hunchentoot:start *debuggable-acceptor*) (setf hunchentoot:*handle-http-errors-p* nil)
      
      

        
        
        
      

    
        
        
        
      
      

        
        
        
      

    
     )) (defparameter *catch-errors-p* nil) (defclass debuggable-acceptor (hunchentoot:acceptor) ()) (defmethod hunchentoot:acceptor-request-dispatcher ((acceptor debuggable-acceptor)) (if *catch-errors-p* (call-next-method) (let ((dispatcher (handler-bind ((error #'invoke-debugger)) (call-next-method)))) (lambda (request) (handler-bind ((error #'invoke-debugger)) (funcall dispatcher request)))))) (defun request-dispatcher (request) "Hello!") (defparameter *debuggable-acceptor* (make-instance 'debuggable-acceptor :request-dispatcher 'request-dispatcher :port 4242)) (hunchentoot:start *debuggable-acceptor*) (setf hunchentoot:*handle-http-errors-p* nil)

अनुरोध-प्रेषण समारोह को प्रत्येक आने वाले अनुरोध पर कहा जाता है और हमारे मामले में बस "हैलो!" लौटाता है - हम अगले लेख में इसके विस्तार के बारे में बात करेंगे।

यदि आप इस जगह पर पढ़ते हैं ~~तो आपको एक बोतल डालने की जरूरत है~~

~~बीयर~~ , और यहां तक कि लिस्प में एक परीक्षण साइट को उठाया - मैं आपको बता रहा हूं

मैं ईर्ष्या करता हूं! लिस्प के साथ परिचित ने मुझे लगभग डेढ़ साल दिया

इस अद्भुत भाषा का आनंद ले रहे हैं - और आपके पास इस संबंध में सब कुछ है

सामने। हैप्पी हैकिंग!

9 चरणों में एक सामान्य कॉमन लिस्प वेबसाइट