NetStumbler :: Stumbler เป็นโมดูล Perl ที่จะแยกข้อมูล NetStumbler
สรุป
& nbsp; ใช้ NetStumbler :: Stumbler;
& nbsp; $ lin ของฉัน = NetStumbler :: Stumbler-> ใหม่ ();
& nbsp; $ lin-> isSummary ($ file);
& nbsp; $ lin-> isNS1 ($ file);
& nbsp; $ lin-> parseNS1 ($ file);
ชั้นนี้มีหลายวิธีที่จะแยก NetStumbler แฟ้มข้อมูลสิ่งที่ต้องทำ: เพิ่มโชคชะตาและการสนับสนุน iStumbler
วิธีวัตถุ
ใหม่ ()
ส่งกลับวัตถุ Stumbler ใหม่
parseNSSummaryLine ($ line)
params: -string เส้นจากผลตอบแทนไฟล์สรุป: อาร์เรย์ของค่าแยกที่สอดคล้องกับการส่งออกของสรุปการส่งออก NetStumbler ** หมายเหตุ ** การแปลงข้อมูล GPS อย่างละเอียดเพื่อคู่ในรูปแบบมาตรฐานจีพีเอสที่ว่างเปล่า SSID จะถูกตั้งค่า "ที่ซ่อนอยู่ "ข้อมูลจะมีเวลา GMT ถ้าถอดสายที่ไม่ได้เกิดขึ้นอย่างถูกต้องกลับมารายการที่ว่างเปล่าตัวอย่าง: @line ของฉัน = $ obj-> parseNSSummaryLine ($ line); พิมพ์ "สาย [@line]
";
isSummary (ไฟล์ $)
params: -string ชื่อไฟล์ที่มีคุณสมบัติครบถ้วนคืน: จริงถ้าไฟล์ที่อยู่ในรูปแบบย่อ NetStumbler ตัวอย่าง: ถ้า ($ obj-> isSummary ($ file)) {# ทำอะไรบางอย่างที่นี่}
isNS1 (ไฟล์ $)
params: -string ชื่อไฟล์ที่มีคุณสมบัติครบถ้วนคืน: จริงถ้าไฟล์ที่อยู่ใน NetStumbler NS1 ไฟล์ตัวอย่าง: ถ้า ($ obj-> isNS1 ($ file)) {# ทำอะไรบางอย่างที่นี่}
isKismetCSV (ไฟล์ $)
params: -string ชื่อไฟล์ที่มีคุณสมบัติครบถ้วนคืน: จริงถ้าไฟล์ที่อยู่ในแฟ้ม CSV Kismet ตัวอย่าง: ถ้า ($ obj-> isKismetCSV ($ file)) {# ทำอะไรบางอย่างที่นี่}
parseKismetCSV (ไฟล์ $)
params: -string ชื่อไฟล์ที่มีคุณสมบัติครบถ้วนคืน: รายการของรายการสินค้าในแต่ละรายการย่อยสอดคล้องกับรายการจากแฟ้มสรุป Kismet ตัวอย่าง: $ อ้างอิง = $ obj-> parseKismetCSV ($ file); # รายการเป็นดังนี้ 0 1 เครือข่าย NetType ESSID 2 3 4 BSSID ข้อมูล 5 6 ช่องทางปิดบัง 7 8 ถอดรหัส WEP 9 MaxRate 10 MaxSeenRate Beacon 11 12 13 LLC ข้อมูล 14 หลุม 15 16 อ่อนแอรวม 17 Carrier เข้ารหัส 18 19 20 firsttime LastTime 21 BestQuality 22 BestSignal 23 BestNoise 24 GPSMinLat 25 GPSMinLon 26 GPSMinAlt 27 GPSMinSpd 28 GPSMaxLat 29 GPSMaxLon 30 GPSMaxAlt 31 GPSMaxSpd 32 GPSBestLat 33 GPSBestLon 34 GPSBestAlt 35 DataSize 36 IPType 37 IP #
parseNS1 (ไฟล์ $)
params: -string ชื่อไฟล์ที่มีคุณสมบัติครบถ้วนคืน: รายการของรายการสินค้าในแต่ละรายการย่อยสอดคล้องกับรายการจาก parseNSSummary ตัวอย่าง: $ อ้างอิง = $ obj-> parseNS1 ($ file);
วิธีการส่วนตัว
readAPInfo ($ filehandle $ FileVersion)
params: อ้างอิง - เลขที่อ้างอิง filehandle - NS1 รุ่น Returns: รายการ - รูปแบบ smae เป็น parseNSSummary
readAPData ($ filehandle $ FileVersion)
params: อ้างอิง - เลขที่อ้างอิง filehandle - NS1 รุ่นส่งกลับ: สิ่งที่ต้องทำอะไร: เพิ่มค่าตอบแทนให้กับวิธีการนี้ในการสร้างกราฟ
readGPSData ($ filehandle)
params: อ้างอิง - ผลตอบแทนอ้างอิง filehandle: สิ่งที่ต้องทำอะไร: เพิ่มค่าตอบแทนให้กับวิธีการนี้ในการสร้างกราฟ
readint64 ($ filehandle)
params: อ้างอิง - อ้างอิง filehandle ผลตอบแทน: จำนวน 64bit
readDouble ($ filehandle)
params: อ้างอิง - ผลตอบแทนอ้างอิง filehandle: คู่
readint32 ($ filehandle)
params: อ้างอิง - อ้างอิง filehandle ผลตอบแทน: จำนวน 32bit
readUint32 ($ filehandle)
params: อ้างอิง - ผลตอบแทนอ้างอิง filehandle: จำนวน 32bit ไม่ได้ลงนาม
readUint8 ($ filehandle)
params: อ้างอิง - ผลตอบแทนอ้างอิง filehandle: จำนวน 8bit ไม่ได้ลงนาม
readChars ($ filehandle ยาว $)
params: อ้างอิง - ยาวอ้างอิง filehandle - จำนวนไบต์ในการอ่านผลตอบแทน: สตริง
ensurePos ($ filehandle $ บุพบท, $ postposition $ amountNeeded)
วิธีการนี้ถูก aadded เนื่องจากพฤติกรรมแปลก ๆ กับ Perl5.8 อ่านบางครั้งจะใส่ตัวชี้แฟ้ม 1 ไบต์เกินกว่าที่มันควรจะเป็น วิธีนี้แก้ไขปัญหา params ที่: อ้างอิง - เลขที่อ้างอิง filehandle - ตำแหน่งก่อนอ่านจำนวนไฟล์ - ตำแหน่งโพสต์ของจำนวนไฟล์ - จำนวนเงินที่ถูกต้องข้อมูลที่ควรจะอ่านได้
ต้องการ
- Perl
ความคิดเห็นที่ไม่พบ