Parameter $ AiType value: 1: IP, 2: MAC, 3: IP + MAC Parameter $ AiType value: 1: IP, 2: MAC, 3: IP + MAC
Return string: address string
Function GetClientAddr ($ AiType = 0) { $ SMac = ""; $ Ip = getenv ("REMOTE_ADDR "); $ Ip1 = getenv ("HTTP_X_FORWARDED_FOR "); $ Ip2 = getenv ("HTTP_CLIENT_IP "); ($ Ip1 )? $ Ip = $ ip1: null; ($ Ip2 )? $ Ip = $ ip2: null; If ($ AiType> 1) { $ SCmd = "nbtstat-a". $ ip; $ SString = shell_exec ($ sCmd ); $ ATemp = split ("=", $ sString ); $ SMac = trim ($ aTemp [count ($ aTemp)-1]); } Switch ($ AiType) { Case 0: $ SResult = ""; Break; Case 1: $ SResult = $ ip; Break; Case 2: $ SResult = $ sMac; Break; Case 3: $ SResult = $ ip. "". $ sMac; Break; Default: $ SResult = ""; Break; } Return $ sResult; } ?> |
Parameter $ AiType value: 1: IP, 2: MAC, 3: IP + MAC
Return string: address string
Function GetClientAddr ($ AiType = 0) { $ SMac = ""; $ Ip = getenv ("REMOTE_ADDR "); $ Ip1 = getenv ("HTTP_X_FORWARDED_FOR "); $ Ip2 = getenv ("HTTP_CLIENT_IP "); ($ Ip1 )? $ Ip = $ ip1: null; ($ Ip2 )? $ Ip = $ ip2: null; If ($ AiType> 1) { $ SCmd = "nbtstat-a". $ ip; $ SString = shell_exec ($ sCmd ); $ ATemp = split ("=", $ sString ); $ SMac = trim ($ aTemp [count ($ aTemp)-1]); } Switch ($ AiType) { Case 0: $ SResult = ""; Break; Case 1: $ SResult = $ ip; Break; Case 2: $ SResult = $ sMac; Break; Case 3: $ SResult = $ ip. "". $ sMac; Break; Default: $ SResult = ""; Break; } Return $ sResult; } ?> |