מידע רשת

setnetent

פותח או מחזיר לאחור את מסד נתוני הרשתות לאיטרציה.

setnetent מכין את מסד נתוני הרשתות של המערכת כך שקריאות עוקבות ל־getnetent מחזירות רשומות החל מהראשונה. זוהי עטיפה ישירה סביב setnetent(3) של ספריית C והוא קורא מאותו מקור בסיסי כמו קריאת ה־C - בדרך כלל /etc/networks ב־Linux, או מכל ש־nsswitch.conf / backends של NSS הוגדרו לספק.

The STAYOPEN argument is a hint to the C library: a true value asks it to keep the database file open across related calls (getnetbyname, getnetbyaddr, getnetent) so individual lookups do not each pay the cost of opening and closing the file. On modern glibc this flag is effectively ignored - the database is handled efficiently either way

• but passing it costs nothing and keeps the code portable to systems where it still matters.

תקציר

setnetent STAYOPEN
setnetent 0
setnetent 1

מה מקבלים בחזרה

setnetent אינו מחזיר דבר משמעותי. בהקשר רשימה הוא מחזיר רשימה ריקה, בהקשר סקלר undef. אל תסתמך על ערך ההחזרה; השפעת הקריאה היא תופעת הלוואי של מיקום איטרטור מסד הנתונים בהתחלה.

אם קריאת C הבסיסית נכשלת (לדוגמה קובץ מסד הנתונים חסר או לא־קריא) השגיאה היא שקטה מנקודת המבט של Perl - getnetent פשוט יחזיר רשימה ריקה בקריאה הראשונה.

מצב גלובלי שהוא נוגע בו

• סמן מסד־נתוני־הרשתות הכלל־תהליכי המתוחזק על־ידי ספריית C. כל קריאה ל־getnetent מקדמת את הסמן הזה; setnetent מחזיר אותו לאחור. endnetent סוגר את מסד הנתונים ומשחרר כל משאבים המוחזקים על־ידי רמז STAYOPEN.

• לא נקראים או נכתבים משתנים מיוחדים של Perl.

מאחר שהסמן הוא לכל־תהליך, לא לכל־thread, שילוב איטרציה על מסד נתוני הרשתות ממספר threads באותו מפרש ישחית את מיקום כל איטרטור. בצע את האיטרציה מ־thread יחיד, או סדר את הגישה.

דוגמאות

החזרה לאחור של מסד הנתונים ואיטרציה מהרשומה הראשונה:

setnetent(1);
while (my ($name, $aliases, $addrtype, $net) = getnetent()) {
    printf "%-20s %d\n", $name, $net;
}
endnetent();

הרצה מחדש של האיטרציה מהראש ללא סגירה בין לבין. ה־setnetent השני מחזיר לאחור, כך שהלולאה השנייה רואה כל רשומה שוב:

setnetent(1);
my @first_pass  = collect_nets();
setnetent(1);
my @second_pass = collect_nets();
endnetent();

sub collect_nets {
    my @out;
    while (my @ent = getnetent()) { push @out, $ent[0] }
    return @out;
}

התאמה עם Net::netent לממשק שדות־בעלי־שם על אותו מקור נתונים - setnetent עדיין שולט בסמן:

use Net::netent;
setnetent(1);
while (my $n = getnetent()) {
    printf "%s -> %s\n", $n->name, $n->net;
}
endnetent();

מקרי קצה

• STAYOPEN הוא רמז, לא הבטחה. במערכות שבהן ספריית C מתעלמת ממנו, העברת 1 והעברת 0 מפיקות התנהגות נצפית זהה.

• אין setnetent משתמע לפני getnetent. תהליך רענן שקורא ל־getnetent מבלי לקרוא תחילה ל־setnetent עדיין מתחיל מהרשומה הראשונה ברוב המערכות, אך זוהי מוסכמה של libc ולא הבטחה. קרא ל־setnetent במפורש כשאתה רוצה להיות בטוח.

• קריאה ל־setnetent באמצע איטרציה מחזירה את הסמן לאחור. כל לולאת while (getnetent) בעיצומה מתחילה מחדש מהראש - שימושי למעבר שני מכוון, באג אם זה קורה בטעות מתת־שגרת עזר שגם מבצעת איטרציה.

• אינטראקציה עם getnetbyname / getnetbyaddr. במערכות שבהן ספריית C מכבדת STAYOPEN, חיפוש לפי שם או לפי כתובת במהלך איטרציה לא יפריע לאיטרטור. במערכות המתעלמות מהרמז, כל חיפוש עשוי לאפס את הסמן. אל תערבב חיפושים לפי שם עם איטרציית getnetent אם אתה צריך מיקום יציב.

• הרשאות. מסד נתוני הרשתות בדרך כלל קריא לכולם, אך backends של NSS (LDAP, sssd) עשויים לכפות הרשאה משלהם. חיפוש שעבד כ־root עלול להניב כלום כמשתמש רגיל מבלי ש־Perl רואה שגיאה.

• /etc/networks ריק או חסר. ברוב מערכות Linux קובץ זה ריק או חסר כברירת מחדל. setnetent עדיין מצליח; ה־getnetent שלאחריו מחזיר רשימה ריקה בקריאה הראשונה. זה אינו תנאי שגיאה.

הבדלים מהמקור

תאימות מלאה עם Perl 5.42 המקורי.

ראו גם

• getnetent - האיטרטור שמופעל על־ידי setnetent; מושיט יד לשורה הבאה בכל קריאה

• endnetent - סוגר את מסד הנתונים ומשחרר כל משאבים שהוחזקו פתוחים על־ידי STAYOPEN; קרא לו כשהאיטרציה הסתיימה

• getnetbyname - מחפש רשומה אחת לפי שם מבלי להריץ את האיטרטור

• getnetbyaddr - מחפש רשומה אחת לפי כתובת ארוזה מבלי להריץ את האיטרטור

• sethostent - אותו אידיום למסד נתוני המארחים

• setservent - אותו אידיום למסד נתוני השירותים

• Net::netent - עטיפה מונחית־עצמים שמחזירה שדות בעלי שם במקום רשימה מיקומית