|
|
Why was EhLib chosen in morethan 80 countries around the world?EhLib is powerful and therewith intuitive to use!
Using the library, you will receive:
Platform support: VCL, LCL
Support IDEs: Borland Delphi 7 – 2006, CodeGear Delphi 2007, RAD Studio 2009, Embarcadero RAD Studio 2010, XE - XE10, Lazarus (Win32).
|
System Watch สารพัดวิธีการเฝ้ามองระบบลีนุกซ์ copy จาก http://www.itdestination.com/articles/systemwatch/ | ||||||||||
| โดย ธีรภัทร มนตรีศาสตร์,RHCE | ||||||||||
|
ผู้บริหารจัดการระบบปฏิบัติการลีนุกซ์มีภาระหน้าที่ที่จะต้องดูแลระบบต่างๆ
ภายในเครือข่ายให้มีความพร้อมอยู่เสมอที่จะทำหน้าที่ต่างๆ ที่ได้วางระบบไว้
หลังจากที่ระบบและแอปพลิเคชั่นทั้งหลายได้ทำงานเป็นไปตามที่ต้องการแล้ว
ก็ไม่ได้หมายความว่า ภารกิจของผู้บริหารระบบจะหมดลง
หากแต่ยังคงต้องเฝ้าตรวจตราความเปลี่ยนแปลงต่างๆ
ที่เกิดขึ้นในระบบต่อไปอีกอย่างต่อเนื่อง เพื่อให้ระบบมีสภาพที่ดีอยู่เสมอ จุดประสงค์ของการเฝ้ามองระบบ
ดังนั้นจะเห็นว่า ลำพังเฉพาะคำสั่งพื้นฐานทั่วไปในระบบปฏิบัติการ ก็สามารถช่วยงานด้านการเฝ้ามองระบบได้แล้ว ทักษะในการใช้คำสั่งต่างๆ ของผู้ปฏิบัติงานจึงมีความสำคัญ และจำเป็นต้องศึกษาเพื่อสามารถนำมาใช้ได้ในสภาพการทำงานปรกติที่ต้องรู้ สถานะของระบบอยู่เสมอหรือทันทีทันใดที่ต้องการ
 รูปที่ 1 ตัวอย่างผลลัพธ์คำสั่ง vmstat -d  รูปที่ 2 การใช้คำสั่ง lsof แสดงความสัมพันธ์ระหว่างโปรแกรมกับโปรเซส โปรเซสทั้งหลายได้อย่างชัดเจน โดยสาระสำคัญที่สุดคงเป็นตัวเลขซ้ายมือสุด ซึ่งเป็นหมายเลข โปรเซส (PID)  รูปที่ 3 ตัวอย่างผลลัพธ์คำสั่ง ps aF มากกว่า  รูปที่ 4 การมอนิเตอร์ภาพรวมของระบบด้วยคำสั่ง top  รูปที่ 5 โปรแกรม htop ที่มีคุณสมบัติเหนือกว่าคำสั่ง top  รูปที่ 6 การใช้คำสั่ง fuser แสดงการเปิดไฟล์ของยูสเซอร์  รูปที่ 7 เปรียบเทียบผลลัพธ์คำสั่ง w และ who  รูปที่ 8 ผลลัพธ์คำสั่ง last เครือ ข่ายก็เช่นกัน เช่น ถ้าเราต้องการรู้ว่ามีการติดต่อเข้าออกที่โฮสต์ของเรามากน้อยแค่ไหน คำสั่งง่ายๆ เช่น iptables ก็สามารถรายงานได้แล้ว ดังรูปที่ 9 จะเห็นว่าอ๊อปชั่น -v จะทำให้แสดงจำนวน แพคเกตและไบต์ที่ไหลผ่าน chain ต่างๆ ได้ โดยเป็นปริมาณข้อมูลแบบภาพรวมนั่นเอง เล็กน้อยก็จะได้ระบบเฝ้ามองโปรโตคอลและทิศทางการสื่อสารขึ้นใช้งานแล้ว  รูปที่ 9 การใช้คำสั่ง iptables แสดงจำนวนแพคเก็ต โปรโตคอล ช่วยให้เห็นภาพรวมของการรับส่งข้อมูลได้เป็นอย่างดี  รูปที่ 10 ตัวอย่างผลลัพธ์คำสั่ง netstat ดิสทริบิวชั่น หมายความว่า โปรแกรมนี้มักจะมีมาพร้อมในชุดโปรแกรมติดตั้งลีนุกซ์เลยทีเดียว ตามรูปที่ 11 จะเห็นว่า เราสามารถใช้โปรแกรม IPTraf นี้ในการมอนิเตอร์ระบบเครือข่ายโดยแยกตามชนิดของโปรโตคอลได้อย่างสวยงาม ทำให้ง่ายต่อการอ่านผลลัพธ์ (รันโปรแกรมโดยใช้คำสั่ง iptraf -s eth0 )  รูปที่ 11 การใช้โปรแกรม iptraf แสดงพอร์ตที่เชื่อมต่ออยู่  รูปที่ 12 ตัวอย่างการใช้คำสั่ง watch  รูปที่ 13 รายงานที่ได้จากคำสั่ง sar สนับ สนุนการรายงานข้อมูลจากระบบได้เช่นกัน หากพิจารณาเท่าที่มีมาพร้อมแล้วในเดสทอปแบบ KDE จะมีแอปเพล็ตเล็กๆ ให้ติดตั้งใช้งานได้ทันที (ดังรูป 14) โดยคลิ๊กขวาบน Main Panel แล้วเลือก Add applet to panel... จากนั้นก็จะมีรายชื่อ Applet ให้เลือกติดตั้งได้ตามใจชอบ ที่เห็นนี้เป็น Applet ชื่อ System Guard และ System Monitor  รูปที่ 14 KDE Applet ที่ช่วยแสดงสถานะของระบบ  รูปที่ 15 การแสดงผลของ KInfoCenter |
| type |
| TGenericContainer<T> = class |
| Value : T; |
| end; |
| var |
| genericInt : TGenericContainer<integer>; |
| genericStr : TGenericContainer<string>; |
| begin |
| genericInt := TGenericContainer<integer>.Create; |
| genericInt.Value := 2009; //only integers |
| genericInt.Free; |
|
| genericStr := TGenericContainer<string>.Create; |
| genericStr.Value := 'Delphi Generics'; //only strings |
| genericStr.Free; |
| end; |
function CreateProcessSimple(sExecutableFilePath: string ): string; var pi: TProcessInformation; si: TStartupInfo; begin FillMemory(@si, sizeof(si), 0); si.cb := sizeof(si); CreateProcess( nil, PChar( sExecutableFilePath ), // path to the executable file: nil, nil, False, NORMAL_PRIORITY_CLASS, nil, nil, si, pi ); // "after calling code" such as // the code to wait until the // process is done should go here CloseHandle(pi.hProcess); CloseHandle(pi.hThread); end;
CreateProcessSimple('notepad');
| ...show a form without focusing | ||
//Char 类型与其编码值的转换: var b: Byte; c: Char; begin b := Ord('A'); {返回: 65} b := Ord(#65); {返回: 65} b := Ord($41); {返回: 65} b := Ord(#$41); {返回: 65} b := Byte('A'); {返回: 65} b := Byte(#65); {返回: 65} b := Byte($41); {返回: 65} b := Byte(#$41); {返回: 65} c := Chr(65); {返回: A } c := Chr($41); {返回: A } c := Char(65); {返回: A } c := Char($41); {返回: A } end;
//WideChar 类型与其编码值的转换; 汉字的 UniCode 编码范围是: $4E00..$9FA5 var w : Word; c : WideChar; ws: WideString; s : string; begin {准备工作} ws := '万一'; c := ws[1]; //ShowMessage(c); {万} {从汉字到 UniCode 编码} w := Ord(c); {返回十进制数 : 19975} w := Word(c); {返回十进制数 : 19975} s := Format('%.4x',[Ord(c)]); {返回十六进制的字符串: 4E07 } s := IntToHex(Ord(c), 4); {返回十六进制的字符串: 4E07 } {从 UniCode 编码到汉字} c := #19975; {万} c := #$4E07; {万} c := #$4e07; {万} c := WideChar(19975); {万} c := WideChar($4E07); {万} end;
RadXE
2012-01-30 03:45
1阅读次数：9