自动获取公网ＩＰ并定时发送到指定邮箱

自动获取公网ＩＰ并定时发送到指定邮箱

#!/usr/bin/env python

import sys, os, smtplib, urllib
from time import sleep
from email.mime.text import MIMEText

ipaddr = urllib.urlopen("http://ip.3322.net").read()

ipaddr = os.popen("nvram get wan_ipaddr").read()
smtpserver = 'smtp.gmail.com'
username = '你的GMAIL@gmail.com'
password = '你的GMAIL密码'
sender = 'Router'
receiver = '你的移动手机号@139.com'  #或者联通号@wo.com.cn，电信号@189.cn
msg = MIMEText(ipaddr)
msg['Subject'] = 'Note: IP Address Changed!'
msg['From'] = sender
msg['To'] = receiver

smtp = smtplib.SMTP()
smtp.connect(smtpserver)
smtp.ehlo()
smtp.starttls()
smtp.ehlo()
smtp.set_debuglevel(1)
smtp.login(username, password)
smtp.sendmail(sender, receiver, msg.as_string())
sleep(5)
smtp.quit()

又一版本
#!/usr/bin/env python

# -- coding: utf-8 --

# author:      heidanine

# file:        checkWapIp.py

# modified:  2016/03/20 01:40

###########################################

# 检测外网的 Ip，发送到指定邮箱

###########################################

# 初期设置：

#    1. 填写 myMail -> 你的邮箱哦

#    2. 填写 mySmtp -> host 你自己的 smtp 服务器。 user/pwd 用户名和密码

#    3. 填写 testUrlParams -> 这个除了保留的地址，你可以多找几个，防止哪个网站不好用了。

# 测试脚本可否执行：

#    python checkWanIp.py

#    如果没什么问题就可以把这个脚本的执行交给 cron 了。

# 配置 cron(需要 root 权限),每 10 分钟检测一次,可自己按习惯定。

#    crontab -e

#    输入:

#         /10    *  python checkWapIp.py

import os

import time

import httplib

import urllib

import urllib2

import smtplib

from email.mime.text import MIMEText
################

## 发件箱地址

myMail = "XXXXXXXX@126.com"

################

# 收件地址

toMailList= [myMail

            #,'111@163.com'

]

################

# 发邮件的 SMTP 服务器设置

mySmtp = {"host": "smtp.XXX.com"

     ,"user": "XXXXXXXX"

     ,"pwd": "XXXXXXXX"

}
################

#检测外网 IP 的网站列表

testUrlParams = [{'domain': 'ifconfig.me', 'uri': '/ip'}

                ,{'domain': 'icanhazip.com', 'uri': ''}

                ]

# log 文件名

logFileName = 'checkWanIp.log'

# log 初始内容

logList = ['']

# 保存上次 IP 信息的文件

lastInfoFileName = '.lastInfo'
def getWanIpInfo():

    '''

    取得外网 IP

    '''

    ipInfo = ['']

    for urlParam in testUrlParams:

        ipInfo.append("\r\n----------")

        ipInfo.append("\r\nTest Server : http://" + urlParam['domain'] + urlParam['uri'])

        

        ip = getRequestIpInfo(urlParam)

        

        if ip is None:

            ipInfo.append("\r\nTest Fail!!!!!!!!!!!!!!!!!")

            ipInfo.append("\r\n----------")

        else:

            ipInfo.append("\r\nTest OK!")

            ipInfo.append("\r\nResult: \r\n")

            ipInfo.append(ip)

            ipInfo.append("\r\n----------")

            return "".join(ipInfo)
def getRequestIpInfo(urlParam):

    '''

    从指定的测试 IP 的网站得到当前电脑所在网络的外网 IP

    param['domain'] : 域名 (用 httplib 这个包访问不要加"http://")

    param['uri'] : URI

    '''

    global logList

    ip = None

    try:

        con = httplib.HTTPConnection(urlParam['domain'])

        con.request('GET', urlParam['uri'])

        res = con.getresponse()

        if res.status == 200 :

            ip = res.read()

        con.close()

    except Exception, e:

        logList.append(str(e))

    return ip
def sendMail(subject, info):

    '''

    发送邮件到指定的邮箱

    subject: 主题

    info:  邮件内容

    '''

    global logList

    msg = MIMEText(info)

    msg['Subject'] = subject

    msg['From'] = myMail

    msg['To'] = ";".join(toMailList)

    

    try:

        s = smtplib.SMTP();

        s.connect(mySmtp['host'])

        s.login(mySmtp['user'], mySmtp['pwd'])

        s.sendmail(myMail, toMailList, msg.as_string())

        s.close()

        return True

    except Exception, e:

        logList.append(str(e))

        return False
def readFile(fileName):

    '''

    读文件内容

    '''

    global logList

    try:  

        # 打开文件读取文件内容

        f = open(fileName, 'r')

        try:

            return f.read()

        finally:

            f.close()

    except IOError:

        logList.append("\r\n" + fileName + " - Can't open the file! Your maybe first run the script, or confirm the Read permission!")

        return None
def writeFile(fileName, str):

    return writeFileByMode(fileName , str, 'w') # 追加模式
def writeLog(str):

    '''

    写 Log 文件

    '''

    print str

    return writeFileByMode(logFileName ,str, 'a') # 追加模式
def writeFileByMode(fileName, str, mode):

    '''

    写文件内容

    '''

    global logList

    if mode is None:

        mode = 'w' # 默认写模式

    try:

        # 写入文件内容

        f= open(fileName, mode)

        try:

            f.write(str)

            return True

        finally:

            f.close()

    except IOError:

        logList.append("\r\n" + fileName + " - Can't write the file! Please confirm the write permission")

        return False
if name == 'main':

    try:

        # 从网站上取得 IP

        ipInfo = getWanIpInfo()

        logList.append(ipInfo)

        #读取上次保存的内容

        lastInfo = readFile(lastInfoFileName)

        # 判断和上次取得的内容是否有变化

        if lastInfo == ipInfo:

            logList.append("\r\n\r\n IP is not change!")

            print "".join(logList)

        else:

            # 把取得的内容存入文件中，下次用来进行比较

            writeFile(lastInfoFileName, ipInfo)

            logList.append("\r\n\r\nWrite new IP to '" + lastInfoFileName + "'")

            # 取得开始时间字符串

            timeStr = time.strftime('%Y-%m-%-d %H:%M:%S', time.localtime(time.time()))

            # 设置邮件主题

            subject = '[Get IP]host:buhe9(' + timeStr + ')'

            # 发送到指定邮箱

            sendMail(subject, ipInfo)

            #写入 log

            logList.append("\r\n Subject: " + subject)

            logList.append("\r\n Send mail ok!")

            logList.append("\r\n")

            writeLog("".join(logList))

    except Exception, e:

        writeLog(str(e))

shell 命令

假设你的邮箱是 abc@163.com，密码是 123456，你要向 def@163.com 发信：

echo -e "From: abc@163.com\nContent-Type: text/plain;\nSubject: IP\n\n"wget -O- http://ip.3322.net | sendmail -v -Ssmtp.163.com -fabc@163.com -auabc -ap123456 def@163.com

wget -O- http://ip.3322.net | sendmail -v -S 邮件 SMTP 服务器 -f 发信人 -au 用户名 -ap 密码 邮箱

VBS 代码

<服务器 class="codetitle"> 

代码如下:

getIP 

set http=createobject("Microsoft.XMLHTTP") 

ipp="http://www.ip138.com/ip2city.asp" 

http.open "get",ipp,false 

http.send 

ss=bytes2BSTR(Http.responsebody) 

intStrA = InStr(1,ss,"[",1)+1 

sss=mid(ss,intStrA) 

intStrB = InStr(1,sss,"]",1)-1 

ss=mid(ss,intStrA,intStrB) 

wscript.echo ss 

Function bytes2BSTR(vIn) 

strReturn = "" 

For i = 1 To LenB(vIn) 

ThisCharCode = AscB(MidB(vIn,i,1)) 

If ThisCharCode < &H80 Then 

strReturn = strReturn & Chr(ThisCharCode) 

Else 

NextCharCode = AscB(MidB(vIn,i+1,1)) 

strReturn = strReturn & Chr(CLng(ThisCharCode) * &H100 + CInt(NextCharCode)) 

i = i + 1 

End If 

Next 

bytes2BSTR = strReturn 

End Function 
SendEmail 

NameSpace = "http://schemas.microsoft.com/cdo/configuration/" 

Set Email = CreateObject("CDO.Message") 

Email.From = "发送邮箱" 

Email.To = "接收邮箱" 

Email.Subject = "主题" 

Email.Textbody = ss&date() ss 为获取到的 ip 

Email.AddAttachment "附件的路径例如：C:\foo.zip" 

With Email.Configuration.Fields 

.Item(NameSpace&"sendusing") = 2 

.Item(NameSpace&"smtpserver") = "smtp.163.com" smtp 服务器地址 

.Item(NameSpace&"smtpserverport") = 25 

.Item(NameSpace&"smtpauthenticate") = 1 

.Item(NameSpace&"sendusername") = "账户名，发送邮箱的" 

.Item(NameSpace&"sendpassword") = "密码" 

.Update 

End With 

Email.Send
注意代码中的参数设置 。

<服务器 class="codetitle">复制代码 代码如下:

getIP 

set http=createobject("Microsoft.XMLHTTP") 

ipp="http://www.ip138.com/ip2city.asp" 

http.open "get",ipp,false 

http.send 

ss=bytes2BSTR(Http.responsebody) 

intStrA = InStr(1,ss,"[",1)+1 

sss=mid(ss,intStrA) 

intStrB = InStr(1,sss,"]",1)-1 

ss=mid(ss,intStrA,intStrB) 

wscript.echo ss 
Function bytes2BSTR(vIn) 

strReturn = "" 

For i = 1 To LenB(vIn) 

ThisCharCode = AscB(MidB(vIn,i,1)) 

If ThisCharCode < &H80 Then 

strReturn = strReturn & Chr(ThisCharCode) 

Else 

NextCharCode = AscB(MidB(vIn,i+1,1)) 

strReturn = strReturn & Chr(CLng(ThisCharCode) * &H100 + CInt(NextCharCode)) 

i = i + 1 

End If 

Next 

bytes2BSTR = strReturn 

End Function 
SendEmail 

NameSpace = "http://schemas.microsoft.com/cdo/configuration/" 

Set Email = CreateObject("CDO.Message") 

Email.From = "发送邮箱" 

Email.To = "接收邮箱" 

Email.Subject = "主题" 

Email.Textbody = ss&date() ss 为获取到的 ip 

Email.AddAttachment "附件的路径例如：C:\foo.zip" 

With Email.Configuration.Fields 

.Item(NameSpace&"sendusing") = 2 

.Item(NameSpace&"smtpserver") = "smtp.163.com" smtp 服务器地址 

.Item(NameSpace&"smtpserverport") = 25 

.Item(NameSpace&"smtpauthenticate") = 1 

.Item(NameSpace&"sendusername") = "账户名，发送邮箱的" 

.Item(NameSpace&"sendpassword") = "密码" 

.Update 

End With 

Email.Send
注意代码中的参数设置 。