قائمة الانتظار :: MMAP.

امتداد بيرل لقائمة انتظار مشتركة عبر ملف mmap-ed
التحميل الان

قائمة الانتظار :: MMAP. الترتيب والملخص

الإعلانات

  • Rating:
  • رخصة:
  • Perl Artistic License
  • اسم الناشر:
  • Ildar Efremov
  • موقع ويب الناشر:
  • http://search.cpan.org/~iefremov/

قائمة الانتظار :: MMAP. العلامات


قائمة الانتظار :: MMAP. وصف

امتداد بيرل لقائمة انتظار مشتركة عبر ملف mmap-ed قائمة انتظار :: MMAP هي قائمة انتظار دائرة مشتركة على ملف mmap-ed.usefull في قائمة انتظار مهمة العملية المتعددة السن رسالة واحدة العملية (ES) اضغط على رسالة مهمة، وغيرها من عمليات البوب (ES) وتنفيذ هذه المهام. الوصول إلى قفل (FCNTL) مضمون الطلب الصحيح دون تعارض. إذا كانت البيانات المدفوعة الحجم أكبر من سجل بيانات LEN الموضوعة في بعض السجلات. إذا كانت البيانات التي تم دفعها، فاحصح بالحجم الأكثر سعة (سجل * قائمة الانتظار) قد أتراجع undef.new params إنشاء كائن قائمة انتظار جديدة لي $ Q = قائمة انتظار جديدة :: MMAP (FILE.DAT "، قائمة انتظار => 10، # طول قائمة الانتظار الطابق => 20، # طول سجل واحد (إذا كانت البيانات أطول سجل، والبيانات الموضوعة في بعض السجلات) MOD => 0666، # وضع وضع للملف)؛ ادفع سلسلة $ دفع سلسلة $ في قائمة الانتظار مع كتلة العودة كاذبة على الفشل RETURE ($ TIME_SPEND، $ TIME_WAIT_LOCK) في عائد سياق الصفيف $ time_spend في العددية contextpop ذات قيمة أعلى من قائمة الانتظار مع block return c على نسخ Queuetop فارغة أعلى قيمة من قائمة الانتظار دون إرجاع كتلة C على القيمة الأولى من قائمة الانتظار مع عدد عائدات BlockLength من السجلات في قائمة السجلات في قائمة السجلات الأعلى - مؤشر السجلات الأعلى - فهرس السجلات الأخيرة Que_len - سعة قائمة الانتظار REC_LEN - Lental Accordaligments مدة التسجيل محاذاة لمدة 4 بايت. طول الملف محاذاة ل 4k.synopsis استخدام قائمة انتظار :: MMAP؛ My $ Q = قائمة انتظار جديدة :: mmap (file => "file.dat"، قائمة الانتظار => 10، # طول قائمة انتظار الطابق => 20، # طول سجل واحد (إذا كانت البيانات أطول سجل، البيانات الموضوعة في بعض السجلات) => 0666، # وضع وضع للملف)؛ ما لم يكن ($ q-> ادفع ("abcdefgheijklmnopqrstuvwxyz")) {die "فشل دفع"؛ } بلدي $ W = $ Q-> دفع ("abcdefghijk")؛ printf " .6f \ n"، $ W؛ بلدي ($ t، $ l) = $ q-> ادفع ("abcdefghejk")؛ printf "المجموع = .6f، انتظر قفل .6f \ n"، $ t، $ l؛ طباعة "طول قائمة الانتظار هو"، $ q-> الطول، "\ n"؛ بلدي أعلى $ = $ Q-> أعلى؛ بينما (محددة (بلدي $ v = $ q- q-> pop)) {print $ v، "\ n"؛ } طباعة "لا بيانات \ N"؛ متطلبات: perl.


قائمة الانتظار :: MMAP. برامج ذات صلة