ओआरएम के बिना जीवन है?

जावा से क्लोजर तक हमारी परियोजनाओं में संक्रमण के बाद, हमें डेटाबेस के साथ काम करने के सामान्य साधनों के लिए एक प्रतिस्थापन खोजने की आवश्यकता थी।

क्लोजर के पास clojure.java.jdbc डेटाबेस और इसके आधार पर कई लाइब्रेरी के साथ काम करने के लिए एक मानक पुस्तकालय है जो आपको प्रदान किए गए ईडीएसएल में प्रश्न लिखने की अनुमति देता है। लेकिन "दैनिक उपयोग" के लिए हमें जेपा से मिलता-जुलता और आईडीई में इसके साथ काम करने में सुविधा चाहिए।

हमने सोचा, क्यों न अपनी खुद की लाइब्रेरी लिखी जाए, जो आदर्श रूप से हमारी आवश्यकताओं के अनुरूप हो। और आवश्यकताएं इस प्रकार थीं:

• तालिकाओं, क्षेत्रों के स्वत: पूर्णता;
• कुछ तालिकाओं (बाद में) से स्थिरांक का स्वत: पूर्ण होना;
• सुविधाजनक ईडीएसएल प्रश्न;
• मैनुअल अनुरोध के बिना एक विदेशी कुंजी (बाद में) से जुड़ी तालिकाओं से मूल्यों को प्राप्त करने की क्षमता।

फिर डेटाबेस के साथ काम करना पहले की तरह सुविधाजनक हो सकता है। इसलिए, 2-3 दिनों के बाद पुस्तकालय तैयार था।

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

उदाहरण का उपयोग करें

उदाहरण के लिए, हमारे पास कनेक्शन का विवरण है:

( def db { : classname "com.mysql.jdbc.Driver"
: उपप्रोकोल " मायस्कल "
: सबनाम "// लोकलहोस्ट: 3306 / clj_query"
: उपयोगकर्ता "clj"
: पासवर्ड "clj" } )

हम टेबल से काम के आधार, उनके क्षेत्र और कुछ स्थिरांक उत्पन्न करते हैं:

उपयोगकर्ता > ( आवश्यकता है [[ libs । db । gentablecolumns : as gen ] )
शून्य
उपयोगकर्ता > ( आवश्यकता है [[ libs । db । gencolumnvalues : genval के रूप में ] )
शून्य
उपयोगकर्ता > ( जनरल / जेनरेट-टेबल-कॉलम-नाम db )
शून्य
उपयोगकर्ता > ( जेनेवल / जेनरेट-कॉलम-वैल्यू-कॉन्स्टेंट db टेबल-रिकॉर्डटाइप्स ( : नाम रिकॉर्डटाइप्स / नाम ) )
शून्य

परिणामस्वरूप, हमें निम्नलिखित स्रोत मिलते हैं:

entities.clj:

( एनएस डीबी संस्थाएं )

;;;; खिलाड़ियों
( डीईई टेबल-प्लेयर "खिलाड़ी" )
( डिफ प्लेयर्स-आईडी { : टाइप { : 10 आकार ,: नाम "INT UNSIGNED" } ,: टेबल "खिलाड़ी" ,: नाम "आईडी" } )
( डिफ प्लेयर्स- नेम { : टाइप { : साइज़ 255 ,: नाम "वर्कर" } ,: टेबल "प्लेयर्स" ,: नेम "नेम" } )
( डिफ प्लेयर्स-टाइप_िड { : टाइप { : 10 आकार ,: नाम "INT UNSIGNED" } ,: टेबल "प्लेयर्स ",: नाम "टाइप_आईडी" } )

;;;; playertypes
( डीईई टेबल-प्लेर्टेपीस "प्लेएर्टिपेस" )
( def playypypes-id { : type { : size 10 ,: name "INT UNSIGNED" } ,: टेबल "playertypes" ,: name "id" } )
( डीप प्लेर्टेपीज़- नाम { : टाइप { : साइज़ 255 ,: नाम " वर्चुअर " } ,: टेबल "प्लेटरिपेस",: नाम "नाम" } )

;;;; अभिलेख
( डीईई टेबल-रिकॉर्ड "रिकॉर्ड" )
( डिफ रिकॉर्ड-आईडी { : टाइप { : 10 आकार ,: नाम "INT UNSIGNED" } ,: टेबल "रिकॉर्ड" ,: नाम "आईडी" } )
( डिफ़ॉल्‍ट-टाइप_आईडी { : टाइप { : आकार 10 ,: नाम "INT UNSIGNED" } ,: टेबल "रिकॉर्ड ",: नाम "type_id" } )
( रिकॉर्ड्स-स्कोर { : टाइप { : आकार 19 ,: नाम "BIGINT" } ,: टेबल "रिकॉर्ड" ,: नाम "स्कोर" } )
( डिफ रिकॉर्ड्स- player_id { : टाइप { : 10 आकार ,: "INT UNSIGNED" } ,: टेबल "रिकॉर्ड ",: नाम "player_id" } )

;;;; recordtypes
( डीईई टेबल-रिकॉर्डटिप्स "रिकॉर्डटाइप्स" )
( डीफ़ रिकॉर्डटिप्स-आईडी { : टाइप { : 10 आकार ,: नाम "INT UNSIGNED" } ,: टेबल "रिकॉर्डटाइप्स",: नाम "आईडी" } )
( डीफ़ रिकॉर्डटाइप्स- नाम { : टाइप { : साइज़ 255 ,: नाम " वर्चुअर " } ,: टेबल "रिकॉर्डटाइप्स",: "नेम" नाम " } )

recordtypes.clj:

( एनएस डीबी । रिकॉर्डटाइप्स )

( डीईएम नेम-किल्स-प्रति-राउंड-आईडी १ )
( def name-kills-per-round "राउंड्स मारता है" )
( def name-kills-per-game-id 2 )
( डीईएम नाम-हत्या-प्रति-गेम "प्रति गेम मारता है" )
( डीईएम का नाम-सबसे लंबा-समय-समय-आईडी ३ )
( डीईएम नाम-सबसे लंबे समय तक मरे समय "सबसे लंबे समय तक मरे समय" )

मान लें कि हम उपयोगकर्ता को जानना चाहते हैं या बॉट के पास राउंड के दौरान सबसे ज्यादा मार करने का रिकॉर्ड है:

उपयोगकर्ता > ( 'की आवश्यकता है [ डीबी । रिकॉर्डपाइप्स : रेक्टाइपेस के रूप में ))
शून्य
उपयोगकर्ता > ( डीबी संस्थाओं का उपयोग करें )
शून्य
उपयोगकर्ता > ( डीफ़ रिकॉर्ड ( पहला ( q / select-deep db table-Records)
: [ [ table-recordtypes [ : = recordtypes-id record-type_id ] ] में शामिल हों
: जहां [ : = recordtypes-id rectypes / name-kills-per-round-id ] ) ) )
# उपयोगकर्ता / रिकॉर्ड

हमें एक विदेशी कुंजी द्वारा लिंक की गई तालिकाओं के माध्यम से खिलाड़ी का प्रकार मिलता है:

उपयोगकर्ता > ( q / get-field-from-row रिकॉर्ड रिकॉर्ड-player_id खिलाड़ियों-type_id playertypes- नाम )
"बॉट"

परिणाम: रिकॉर्ड का धारक "बॉट" है।
और सबसे महत्वपूर्ण बात, ऐड-ऑन ने हर जगह काम किया है (केवल पूरक नहीं: कीवर्ड),

लाइब्रेरी प्लस

- स्थिरांक, तालिकाओं और क्षेत्रों के ऑटो-समापन;
- तालिका, फ़ील्ड या स्थिरांक के नाम बदलते समय एक निश्चित तरीके से उपरोक्त पीढ़ी को मैक्रोज़ में सम्मिलित करना, आपको संकलन समय पर त्रुटियों को ठीक से प्राप्त करने की अनुमति देता है, न कि निष्पादन स्तर पर;
- सुविधाजनक ईडीएसएल (अपडेट, इंसर्ट, सिलेक्ट -..., विद डीबी) जो जेनरेट डेटा के साथ काम कर सकता है।

परिणामस्वरूप, क्लोजर पर हमारी परियोजनाओं में डेटाबेस के साथ काम करना पहले की तुलना में आसान, अधिक लचीला और अधिक सुविधाजनक हो गया है।