मिकरोटिक राउटर ओएस, गतिशील गति विभाजन के लिए एक स्क्रिप्ट

मिकरोटिक राउटर ओएस, गतिशील गति विभाजन के लिए एक स्क्रिप्ट।

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



ध्यान से मैनुअल के एक गुच्छा का अध्ययन करने के बाद, मैं इस निष्कर्ष पर पहुंचा कि आंतरिक भाषा में स्क्रिप्ट को बढ़ाए बिना राउटर ओएस नहीं कर सकता।



स्क्रिप्ट केवल वीपीएन क्लाइंट्स के साथ काम करती है, जैसा कि मुझे व्यक्तिगत आईपी के साथ काम करने का कोई तरीका नहीं मिला।



तो चलिए!

तीन पीपीटीपी उपयोगकर्ताओं के लिए उदाहरण, प्रारंभिक सेटअप

उपयोगकर्ता पते 192.168.70.10-192.168.70.12

सर्वर का पता 192.168.70.1



तीन उपयोगकर्ता जोड़ें:



/ ppp secret add name="user1" service=pptp password="null" profile=default-encryption local address=192.168.70.1 remote-address=192.168.70.10 disabled=no

/ ppp secret add name="user2" service=pptp password="null" profile=default-encryption local-address=192.168.70.1 remote-address=192.168.70.11 disabled=no

/ ppp secret add name="user3" service=pptp password="null" profile=default-encryption local-address=192.168.70.1 remote-address=192.168.70.12 disabled=no









इंटरफ़ेस से प्रत्येक उपयोगकर्ता को जोड़ें, इंटरफ़ेस का नाम और उपयोगकर्ता नाम मेल खाना चाहिए!



/ interface pptp-server add name="user1" user="user1" disabled=no

/ interface pptp-server add name="user2" user="user2" disabled=no

/ interface pptp-server add name="user3" user="user3" disabled=no









Mangle, मुझे नहीं पता कि क्यों, लेकिन सभी उदाहरणों में, विशेषज्ञ पहले कनेक्शन को चिह्नित करते हैं और फिर उसमें पैकेट को चिह्नित करते हैं, शायद मैं विचार की पूरी गहराई को नहीं समझता, लेकिन मुझे इसमें बहुत समझ नहीं है और पैकेट को सामान्य प्रवाह में तुरंत चिह्नित करें, क्योंकि । हर अतिरिक्त नियम प्रणाली को धीमा कर देता है। चेतावनी! नए-पैकेट-चिह्न का मूल्य क्रमशः "उपयोगकर्ता नाम / सर्वर" + "_ डाउन" और "_अप" होना चाहिए।



/ ip firewall mangle add chain=forward src-address=192.168.70.10 dst-address=0.0.0.0/0 action=mark-packet new-packet-mark=user1_up passthrough=no disabled=no

/ ip firewall mangle add chain=forward src-address=192.168.70.11 dst-address=0.0.0.0/0 action=mark-packet new-packet-mark=user2_up passthrough=no disabled=no

/ ip firewall mangle add chain=forward src-address=192.168.70.12 dst-address=0.0.0.0/0 action=mark-packet new-packet-mark=user3_up passthrough=no disabled=no



/ ip firewall mangle add chain=forward src-address=0.0.0.0/0 dst-address=192.168.70.10 action=mark-packet new-packet-mark=user1_down passthrough=no disabled=no

/ ip firewall mangle add chain=forward src-address=0.0.0.0/0 dst-address=192.168.70.11 action=mark-packet new-packet-mark=user2_down passthrough=no disabled=no

/ ip firewall mangle add chain=forward src-address=0.0.0.0/0 dst-address=192.168.70.12 action=mark-packet new-packet-mark=user3_down passthrough=no disabled=no









अगला कदम कतार में एक पेड़ बनाने का है। इसमें, सभी यातायात प्रतिबंध होंगे।



/ queue tree add name="Download" parent=global-out limit-at=0 queue=hotspot-default priority=8 max-limit=0 burst-limit=0 burst-threshold=0 burst-time=0s disabled=no

/ queue tree add name="user1_down" parent=Download packet-mark=user1_down disabled=no

/ queue tree add name="user2_down" parent=Download packet-mark=user2_down disabled=no

/ queue tree add name="user3_down" parent=Download packet-mark=user3_down disabled=no



/ queue tree add name="Upload" parent=global-out limit-at=0 queue=hotspot-default priority=8 max-limit=0 burst-limit=0 burst-threshold=0 burst-time=0s disabled=no

/ queue tree add name="user1_up" parent=Upload packet-mark=user1_up disabled=no

/ queue tree add name="user2_up" parent=Upload packet-mark=user2_up disabled=no

/ queue tree add name="user3_up" parent=Upload packet-mark=user3_up disabled=no









अंतिम चरण स्क्रिप्ट के कम्प्यूटेशनल भाग को कॉन्फ़िगर करना और सिस्टम शेड्यूलर में 10-60 सेकंड के अंतराल के साथ रखना होगा। अपने mikrotik के प्रदर्शन के आधार पर, अंतराल जितना छोटा होता है - बेहतर।

चर और कंप्यूटिंग भाग सेटिंग्स की कुछ विशेषताएं

MaxRateDownload - ()

MaxRateUpload - ()

ActiveThresholddown - ()

ActiveThresholdup - ()

ParentDownload - ()

ParentUpload - ()









:local MaxRateDownload ("2000000");

:local MaxRateUpload ("2000000");









आपको अपने चैनल की चौड़ाई से थोड़ा कम सेट करना चाहिए ताकि ब्रेक से बचने के लिए जब कोई अन्य उपयोगकर्ता जो पहले इंटरनेट का उपभोग नहीं करता है, सक्रिय हो।



:local ActiveThresholddown ("5000");

:local ActiveThresholdup ("5000");









अपनी आवश्यकताओं के अनुसार इन मूल्यों को सेट करें, लेकिन गणना के आधार पर: थ्रेसहोल्डडाउन द्वारा गुणा किए जाने वाले उपयोगकर्ताओं की संख्या = मैक्सरेडडाउनलोड से अधिक नहीं होनी चाहिए अन्यथा आपके उपयोगकर्ता हमेशा निष्क्रिय रहेंगे! स्वाभाविक रूप से उपयोगकर्ता * ActiveThresholdup = MaxRateUpload से अधिक नहीं होना चाहिए। हमेशा कुछ मार्जिन छोड़ दें।

लिपि का सिद्धांत

स्क्रिप्ट उस गति को मापती है जिसके साथ ग्राहक काम करता है और यदि वह ActiveThresholddown से अधिक है, तो इसे रिसेप्शन पर एक सक्रिय के रूप में जोड़ता है,

यदि उपयोगकर्ता अपने खाते के PPTP से जुड़ा है तो भी काउंटर बढ़ाता है।

इसके बाद, स्क्रिप्ट ActiveThresholdup की जांच करती है, यदि उपयोगकर्ता ने इस चिह्न को पार कर लिया है, तो इसे वापसी पर सक्रिय रूप से जोड़ता है।



यदि सक्रिय क्लाइंट की संख्या शून्य है, तो यह एक से बदल जाता है, क्योंकि बाद में गणितीय गणना करने के लिए, अन्यथा कुछ शून्य से विभाजित नहीं होता है :)



गणना करता है:

MaxRateDownload प्रति रिसेप्शन सक्रिय उपयोगकर्ताओं की संख्या से विभाजित होता है, प्रति उपयोगकर्ता गति प्रदर्शित करता है।

MaxRateUpload प्रति उपयोगकर्ता सक्रिय उपयोगकर्ताओं की संख्या से विभाजित होता है, प्रति उपयोगकर्ता गति प्रदर्शित करता है।



इसके बाद, यह ऊपर की गणना के रूप में क्यू ट्री में सभी उपयोगकर्ताओं के लिए एक सीमा निर्धारित करता है।



फिर यह किलोबाइट में मूल्य की गणना करता है और लॉग में आंकड़े प्रदर्शित करता है।

स्क्रिप्ट कोड

राउटर ओएस के विभिन्न संस्करणों के लिए, आपको स्क्रिप्ट के अपने संस्करण की आवश्यकता है। यह इस तथ्य के कारण है कि भाषा का आंतरिक सिंटैक्स धीरे-धीरे विकसित हो रहा है और इस तरह हमेशा उपयोगकर्ताओं को खुश नहीं करता है।

संस्करणों के लिए स्क्रिप्ट कोड 2.9.xx:

######################

:local MaxRateDownload ("2000000");

:local MaxRateUpload ("2000000");

:local ActiveThresholddown ("5000");

:local ActiveThresholdup ("5000");

:local ParentDownload ("Download");

:local ParentUpload ("Upload");

######################



######################

:local z;

:local i;

:local ii;

:local userX;

:global onlineclientsdown (0);

:global onlineclientsup (0);

:global connected (0);

######################



######################

:foreach i in=[/ppp active find] do={ :set userX [/ppp active get $i name];

:global connected ($connected+1);

/interface monitor-traffic [/interface find name=$userX] once do {:if ($received-bits-per-second>=$ActiveThresholddown) do { :set onlineclientsdown ($onlineclientsdown+1);}} };



:foreach ii in=[/ppp active find] do={ :set userX [/ppp active get $ii name];

/interface monitor-traffic [/interface find name=$userX] once do {:if ($sent-bits-per-second>=$ActiveThresholdup) do { :set onlineclientsup ($onlineclientsup+1);}} };



:if ($onlineclientsdown = 0) do {:set onlineclientsdown (1)};

:if ($onlineclientsup= 0) do {:set onlineclientsup (1)};



:local ratelimitdown ($MaxRateDownload/$onlineclientsdown)

:local ratelimitup ($MaxRateUpload/$onlineclientsup)



:foreach z in=[/ppp active find] do={ :set userX [/ppp active get $z name];

/queue tree set [/queue tree find name=($userX . "_down")] parent=$ParentDownload packet-mark=($userX . "_down") queue=hotspot-default priority=8 max-limit=$ratelimitdown



/queue tree set [/queue tree find name=($userX . "_up")] parent=$ParentUpload packet-mark=($userX . "_up") queue=hotspot-default priority=8 max-limit=$ratelimitup};

######################



######################

:local kbsmaxdown ($MaxRateDownload/1000);

:local kbsmaxup ($MaxRateUpload /1000);

:local kbsthr ($ActiveThresholddown/1000);

:local kbsdown ($ratelimitdown/1000);

:local kbsup ($ratelimitup/1000);



:log warning ("Shaper:");

:log info ("MaxRate Download : " . $MaxRateDownload . " bps /" . $kbsmaxdown . " kbs / Upload : " . $MaxRateUpload . " bps /" . $kbsmaxup . " kbs");

:log info ("Threshold: Download : " . $ActiveThresholddown . " bps /" . $kbsthr . " kbs / Upload : " . $ActiveThresholdup . " bps /" . $kbsthr . " kbs");

:log info ("Connected Users : " . $connected);

:log info ("Active Users : Download : " . $onlineclientsdown . " / Upload : " . $onlineclientsup);

:log info ("User Speed Download : " . $ratelimitdown . " bps /" . $kbsdown . " kbs / Upload : " . $ratelimitup . " bps /" . $kbsup . " kbs");

######################

# (C) Inlarion icq 429-587 Copyright!



संस्करण 3.22 के लिए स्क्रिप्ट कोड:

######################

:local MaxRateDownload ("2000000");

:local MaxRateUpload ("2000000");

:local ActiveThresholddown ("5000");

:local ActiveThresholdup ("5000");

:local ParentDownload ("Download");

:local ParentUpload ("Upload");

######################



######################

:local z;

:local i;

:local ii;

:local userX;

:global onlineclientsdown (0);

:global onlineclientsup (0);

:global connected (0);

######################



######################

:foreach i in=[/ppp active find] do={ :set userX [/ppp active get $i name];

:global connected ($connected+1);

/interface monitor-traffic [/interface find name=$userX] once do {:if ($"received-bits-per-second">=$ActiveThresholddown) do { :set onlineclientsdown ($onlineclientsdown+1);}} };



:foreach ii in=[/ppp active find] do={ :set userX [/ppp active get $ii name];

/interface monitor-traffic [/interface find name=$userX] once do {:if ($"sent-bits-per-second">=$ActiveThresholdup) do { :set onlineclientsup ($onlineclientsup+1);}} };



:if ($onlineclientsdown = 0) do {:set onlineclientsdown (1)};

:if ($onlineclientsup= 0) do {:set onlineclientsup (1)};



:local ratelimitdown ($MaxRateDownload/$onlineclientsdown)

:local ratelimitup ($MaxRateUpload/$onlineclientsup)



:foreach z in=[/ppp active find] do={ :set userX [/ppp active get $z name];

/queue tree set [/queue tree find name=($userX . "_down")] parent=$ParentDownload packet-mark=($userX . "_down") queue=hotspot-default priority=8 max-limit=$ratelimitdown



/queue tree set [/queue tree find name=($userX . "_up")] parent=$ParentUpload packet-mark=($userX . "_up") queue=hotspot-default priority=8 max-limit=$ratelimitup};

######################



######################

:local kbsmaxdown ($MaxRateDownload/1000);

:local kbsmaxup ($MaxRateUpload /1000);

:local kbsthr ($ActiveThresholddown/1000);

:local kbsdown ($ratelimitdown/1000);

:local kbsup ($ratelimitup/1000);



:log warning ("Shaper:");

:log info ("MaxRate Download : " . $MaxRateDownload . " bps /" . $kbsmaxdown . " kbs / Upload : " . $MaxRateUpload . " bps /" . $kbsmaxup . " kbs");

:log info ("Threshold: Download : " . $ActiveThresholddown . " bps /" . $kbsthr . " kbs / Upload : " . $ActiveThresholdup . " bps /" . $kbsthr . " kbs");

:log info ("Connected Users : " . $connected);

:log info ("Active Users : Download : " . $onlineclientsdown . " / Upload : " . $onlineclientsup);

:log info ("User Speed Download : " . $ratelimitdown . " bps /" . $kbsdown . " kbs / Upload : " . $ratelimitup . " bps /" . $kbsup . " kbs");

######################

# (C) Inlarion icq 429-587 Copyright!



संस्करणों के लिए स्क्रिप्ट कोड 3.30 - 4.x - 5.x:

######################

:local MaxRateDownload ("2000000");

:local MaxRateUpload ("2000000");

:local ActiveThresholddown ("5000");

:local ActiveThresholdup ("5000");

:local ParentDownload ("Download");

:local ParentUpload ("Upload");

######################



######################

:local z;

:local i;

:local ii;

:local userX;

:global onlineclientsdown (0);

:global onlineclientsup (0);

:global connected (0);

######################



######################

:foreach i in=[/ppp active find] do={ :set userX [/ppp active get $i name];

:global connected ($connected+1);

/interface monitor-traffic [/interface find name=$userX] once do {:if ($"rx-bits-per-second">=$ActiveThresholddown) do { :set onlineclientsdown ($onlineclientsdown+1);}} };



:foreach ii in=[/ppp active find] do={ :set userX [/ppp active get $ii name];

/interface monitor-traffic [/interface find name=$userX] once do {:if ($"tx-bits-per-second">=$ActiveThresholdup) do { :set onlineclientsup ($onlineclientsup+1);}} };



:if ($onlineclientsdown = 0) do {:set onlineclientsdown (1)};

:if ($onlineclientsup= 0) do {:set onlineclientsup (1)};



:local ratelimitdown ($MaxRateDownload/$onlineclientsdown)

:local ratelimitup ($MaxRateUpload/$onlineclientsup)



:foreach z in=[/ppp active find] do={ :set userX [/ppp active get $z name];

/queue tree set [/queue tree find name=($userX . "_down")] parent=$ParentDownload packet-mark=($userX . "_down") queue=hotspot-default priority=8 max-limit=$ratelimitdown



/queue tree set [/queue tree find name=($userX . "_up")] parent=$ParentUpload packet-mark=($userX . "_up") queue=hotspot-default priority=8 max-limit=$ratelimitup};

######################



######################

:local kbsmaxdown ($MaxRateDownload/1000);

:local kbsmaxup ($MaxRateUpload /1000);

:local kbsthr ($ActiveThresholddown/1000);

:local kbsdown ($ratelimitdown/1000);

:local kbsup ($ratelimitup/1000);



:log warning ("Shaper:");

:log info ("MaxRate Download : " . $MaxRateDownload . " bps /" . $kbsmaxdown . " kbs / Upload : " . $MaxRateUpload . " bps /" . $kbsmaxup . " kbs");

:log info ("Threshold: Download : " . $ActiveThresholddown . " bps /" . $kbsthr . " kbs / Upload : " . $ActiveThresholdup . " bps /" . $kbsthr . " kbs");

:log info ("Connected Users : " . $connected);

:log info ("Active Users : Download : " . $onlineclientsdown . " / Upload : " . $onlineclientsup);

:log info ("User Speed Download : " . $ratelimitdown . " bps /" . $kbsdown . " kbs / Upload : " . $ratelimitup . " bps /" . $kbsup . " kbs");

######################

# (C) Inlarion icq 429-587 Copyright!