def send_FLAP(chain,chan):
    global total_send
    global s
    global sequ
    if chan==1:
        chain = '\x00\x00\x00\x01'+chain
    fmt='!BBHH'
    buf1=struct.pack(fmt,0x2a,chan,sequ,len(chain))
    sequ=sequ+1
    if sequ >= 0x8000:
        sequ=0x1000
    s.send((buf1+chain))
    total_send=total_send+len((buf1+chain))
    return
    
def encode_password(pwd):
    list = map(lambda x,y: chr(x^ord(y)), xor_table[:len(pwd)], pwd)
    return string.join(list,'')

def tlv_make(type, value):
  l=len(value)
  fmt='!hh %ds' % l
  return struct.pack(fmt, type, l, value)

def get_PLAP(rs):#Если rs=="i", то опрашиваем сервер icq
    global total_recv
    global s
    if rs == "i":
      res1=s.recv(6)
    else:
      res1=rs
    total_recv=total_recv+6
    if (len(res1)==6):
      dlina=struct.unpack('!h',res1[4:6])
      del res1
      res1=s.recv(dlina[0])
      total_recv=total_recv+dlina[0]
    return res1

def send_HELO():
    global s
    global sequ
    sequ=22784 #must be random(0x1000-0x8000)
    chain = \
        tlv_make(1,uin)+\
        tlv_make(2,encode_password(password))+\
        tlv_make(3,CLIENT_)+\
        tlv_make(0x16, '\x01\x0a') + \
        tlv_make(0x17, '\x00\x04') + \
        tlv_make(0x18, '\x00\x3c') + \
        tlv_make(0x19, '\x00\x01') + \
        tlv_make(0x1a, '\x0c\x0e') + \
        tlv_make(0x14, '\x00\x00\x00\x55') + \
        tlv_make(0xe,'us') + tlv_make(0xf,'en')
    send_FLAP(chain,01)

def proc_tlv(dat3):
    ret_val = {}
    while 1:
        if len(dat3) < 4:
            break
        iden,l	= struct.unpack('!hh', dat3[:4])
        content	= dat3[4:(l+4)]
        ret_val[iden] = content
        dat3 = dat3[4+l:]
    return ret_val
#==========================================================
#ICQ witn proxy============================================
#==========================================================
print "connecting to proxy..."
s=socket.socket(socket.AF_INET,socket.SOCK_STREAM)
s.connect(proxyadress)
print "conected!"
st="CONNECT login.icq.com:5190/ HTTP/1.0\n\r\n"
print "sending request to proxy..."
s.send(st)
print "sended!"
try:
  print "please wait..."
  d=s.recv(1024)#Получаем ответ от прокси о результате нашего запроса
  d=d.split(" ")
  print "geted!"
  td=d[len(d)-1]#Здесь берем концовку ответа от прокси, в котором содеожится ответ от icq
  td=td.split("*")
  td=td[1]
  td2=td[0:5]
  td3="\x2a"+td2#Немного подкорректировали и получили нужный нам ответ
  try:
    print 'try...'
    buf=get_PLAP(td3)
    print 'geted! = '+u
    print "send Hello..."
    send_HELO()
    print 'sended!'
    print 'please wait...'
    buf=get_PLAP("i")###Вот на этом этапе в ответ приходит ПУСТОЙ ответ
    print 'geted!'
    try:
      tlv_chain=proc_tlv(buf)
      cookie=tlv_chain[TLV_COOKIE]
      h,p = string.split(tlv_chain[TLV_REDIR],':')
      print "password ok"
      print h,p
    except:
      print "wrong password"
  except: print "dont work"
except:
  print "can't get"
s.close()
del s
print "closed"

TLV_UIN=0x01
TLV_PWD=0x02
TLV_REDIR=0x05
TLV_COOKIE=0x06
CLIENT_='AOL Instant Messenger'
s=''
chain=''
seq=''
sequ=0
runn=0
total_send=0
total_recv=0
xor_table=[0xf3, 0x26, 0x81, 0xc4, 0x39, 0x86, 0xdb, 0x92, 0x71, 0xa3, 0xb9, 0xe6, 0x53, 0x7a, 0x95, 0x7c]
servericq="login.icq.com"
porticq="5190"
#proxyserver="189.57.202.1"
#proxyport="3128"
proxyserver="84.22.134.50"
proxyport="3128"
uin='123456789'#поменять на рабочий
password='123456'#поменять на рабочий
proxyadress=(proxyserver,int(proxyport))