Displaying 2 results from an estimated 2 matches for "tquota".
Did you mean:
quota
2011 Sep 29
2
Timeout leak in get quota
...=============
#!/usr/bin/perl
use strict;
use Socket;
use IO::Handle;
socket(TSOCK, PF_UNIX, SOCK_STREAM,0);
connect(TSOCK, sockaddr_un("/var/run/dovecot/doveadm-server")) or print("ERROR!");
print "VERSION\tdoveadm-server\t1\t0\n";
print "\tguest\@testmail.com\tquota get\n";
print "=" x 20 . "\n";
if (defined(my $messg = <TSOCK>)) {
print $messg;
print TSOCK "VERSION\tdoveadm-server\t1\t0\n";
TSOCK->flush;
print TSOCK "\tguest\@testmail.com\tquota get\n";
TSOCK->flush;
$messg = <TSOCK...
2013 Feb 27
2
how to talk with doveadmin unix socket
...t0\nUSER\t1\tpiotr.rotter at active24.pl\tservice=doveadm\n",
60) = 60
read(9, "VERSION\t1\t1\nSPID\t20805\n", 8192) = 23
read(9,
"USER\t1\tpiotr.rotter at active24.pl\temail=piotr.rotter at active24.pl\tclear=7T33z456\thome=/vm/08/A/active24.pl/piotr.rotter/\tuid=502\tgid=502\tquota_rule=*:storage=2097152000B\tquota_rule2=*:messages=50000\n",
8169) = 196
and I wrote super simple client in php:
<?php
$sock = stream_socket_client('unix:///var/run/dovecot/doveadm-server',
$errno, $errstr);
fwrite($sock,
"VERSION\t1\t0\nUSER\t1\tpiotr.rotter at active24.p...