ref: 37a8fc6168b3bf82df198fb20be5a8a53996187c
dir: /sys/src/cmd/ip/cifsd/util.c/
#include <u.h>
#include <libc.h>
#include "dat.h"
#include "fns.h"
void
logit(char *fmt, ...)
{
char buf[8192];
va_list arg;
va_start(arg, fmt);
vseprint(buf, buf + sizeof(buf), fmt, arg);
va_end(arg);
if(debug)
fprint(2, "%s\n", buf);
syslog(0, progname, "(%s\\%s) %s", remotesys, remoteuser, buf);
}
char*
getremote(char *dir)
{
int fd, n;
char remfile[256];
static char buf[256];
sprint(remfile, "%s/remote", dir);
fd = open(remfile, OREAD);
if(fd < 0)
return nil;
if((n = read(fd, buf, sizeof(buf)-1))>0)
buf[n-1] = 0;
else
strcpy(buf, remfile);
close(fd);
return buf;
}
char*
conspath(char *base, char *name)
{
return cleanname(smprint("%s/%s", base, name ? name : ""));
}
int
splitpath(char *path, char **base, char **name)
{
char *p, *b;
b = strdup(path);
if((p = strrchr(b, '/')) == nil){
free(b);
if(name)
*name = nil;
if(base)
*base = nil;
return 0;
}
if(p == b){
if(name) *name = strdup(p+1);
p[1] = 0;
} else {
*p++ = 0;
if(name) *name = strdup(p);
}
if(base)
*base = b;
else
free(b);
return 1;
}
void
dumphex(char *s, uchar *h, uchar *e)
{
int i, n;
n = e - h;
for(i=0; i<n; i++){
if((i % 16) == 0)
fprint(2, "%s%s: [%.4x] ", i ? "\n" : "", s, i);
fprint(2, "%.2x ", (int)h[i]);
}
fprint(2, "\n");
}
void
todatetime(long time, int *pdate, int *ptime)
{
Tm *tm;
tm = gmtime(time);
if(pdate)
*pdate = (tm->mday) | ((tm->mon + 1) << 5) | ((tm->year - 80) << 9);
if(ptime)
*ptime = (tm->sec >> 1) | (tm->min << 5) | (tm->hour << 11);
}
long
fromdatetime(int date, int time)
{
Tm tm;
memset(&tm, 0, sizeof(tm));
strcpy(tm.zone, "GMT");
tm.mday = date & 0x1f;
tm.mon = ((date >> 5) & 0xf) - 1;
tm.year = (date >> 9) + 80;
tm.yday = 0;
tm.sec = (time & 0x1f) << 1;
tm.min = (time >> 5) & 0x3f;
tm.hour = time >> 11;
return tm2sec(&tm);
}
vlong
tofiletime(long time)
{
return ((vlong)time + 11644473600LL) * 10000000;
}
long
fromfiletime(vlong filetime)
{
return filetime / 10000000 - 11644473600LL;
}
int
filesize32(vlong size)
{
if(size > 0xFFFFFFFFUL)
return 0xFFFFFFFF;
return size;
}
vlong
allocsize(vlong size, int blocksize)
{
return ((size + blocksize-1)/blocksize)*blocksize;
}
int
extfileattr(Dir *d)
{
int a;
a = (d->qid.type & QTDIR) ? ATTR_DIRECTORY : ATTR_NORMAL;
if((d->qid.type & QTTMP) == 0)
a |= ATTR_ARCHIVE;
if((d->mode & 0222) == 0)
a |= ATTR_READONLY;
if(d->name[0] == '.' && d->name[1] && d->name[1] != '.')
a |= ATTR_HIDDEN;
return a;
}
int
dosfileattr(Dir *d)
{
return extfileattr(d) & DOSMASK;
}
ulong
namehash(char *s)
{
ulong h, t;
Rune r;
h = 0;
while(*s){
s += chartorune(&r, s);
r = toupperrune(r);
t = h & 0xf8000000;
h <<= 5;
h ^= t>>27;
h ^= (ulong)r;
}
return h;
}
char*
strtr(char *s, Rune (*tr)(Rune))
{
char buf[UTFmax], *p, *w;
Rune r;
int n;
p = s;
w = s;
while(*p){
p += chartorune(&r, p);
r = (*tr)(r);
n = runetochar(buf, &r);
if(w + n <= p){
memmove(w, buf, n);
w += n;
}
}
*w = 0;
return s;
}
char*
strchrs(char *s, char *c)
{
Rune r;
int n;
while(*s){
n = chartorune(&r, s);
if(strchr(c, r))
return s;
s += n;
}
return nil;
}
static int
strpack8(uchar *, uchar *p, uchar *e, char *s, int term, Rune (*tr)(Rune))
{
uchar *t;
Rune r;
t = p;
while((p < e) && *s){
s += chartorune(&r, s);
r = tr(r);
*p++ = r & 0x7F;
}
if(p >= e)
return 0;
if(term)
*p++ = 0;
return p - t;
}
static int
strpack16(uchar *b, uchar *p, uchar *e, char *s, int term, Rune (*tr)(Rune))
{
unsigned int rr;
uchar *t;
Rune r;
t = p;
if((p - b) % 2){
if(p >= e)
return 0;
*p++ = 0;
}
while((p+1 < e) && *s){
s += chartorune(&r, s);
rr = tr(r);
if(rr > 0xFFFF){
if(p+3 >= e)
break;
rr -= 0x10000;
*p++ = (rr>>10) & 0xFF;
*p++ = ((rr>>18)&3) + 0xD8;
*p++ = rr & 0xFF;
*p++ = ((rr>>8)&3) + 0xDC;
} else {
*p++ = rr & 0xFF;
*p++ = rr>>8;
}
}
if(p+1 >= e)
return 0;
if(term){
*p++ = 0;
*p++ = 0;
}
return p - t;
}
static int
strunpack8(uchar *, uchar *p, uchar *e, char **dp, int term, Rune (*tr)(Rune))
{
uchar *t;
char *d;
Rune r;
int n;
t = p;
n = 0;
while((p < e) && (!term || *p)){
p++;
n++;
}
if(term && ((p >= e) || *p))
return 0;
p -= n;
*dp = d = malloc(n*UTFmax+1);
while(n--){
r = *p & 0x7F;
r = tr(r);
d += runetochar(d, &r);
p++;
}
*d = 0;
if(term)
p++;
return p - t;
}
static int
strunpack16(uchar *b, uchar *p, uchar *e, char **dp, int term, Rune (*tr)(Rune))
{
unsigned int rr;
uchar *t;
char *d;
Rune r;
int n;
t = p;
if((p - b) % 2)
p++;
n = 0;
while((p+1 < e) && (!term || (p[0] || p[1]))){
p += 2;
n++;
}
if(term && ((p+1 >= e) || p[0] || p[1]))
return 0;
p -= 2*n;
*dp = d = malloc(n*UTFmax+1);
while(n--){
if(p[1] >= 0xD8 && p[1] <= 0xDB){
if(!n--)
break;
rr = ((p[0]<<10) | ((p[1]-0xD8)<<18) | p[2] | ((p[3]-0xDC)<<8))+0x10000;
p += 2;
} else
rr = p[0] | (p[1]<<8);
r = tr(rr);
d += runetochar(d, &r);
p += 2;
}
*d = 0;
if(term)
p += 2;
return p - t;
}
static Rune
notr(Rune r)
{
return r;
}
static Rune
fromnametr(Rune r)
{
switch(r){
case '\\':
return '/';
case ' ':
if(trspaces)
return 0xa0;
}
return r;
}
static Rune
tonametr(Rune r)
{
switch(r){
case '/':
return '\\';
case 0xa0:
if(trspaces)
return ' ';
}
return r;
}
int smbstrpack8(uchar *b, uchar *p, uchar *e, void *arg){
return strpack8(b, p, e, (char*)arg, 1, notr);
}
int smbstrpack16(uchar *b, uchar *p, uchar *e, void *arg){
return strpack16(b, p, e, (char*)arg, 1, notr);
}
int smbstrunpack8(uchar *b, uchar *p, uchar *e, void *arg){
return strunpack8(b, p, e, (char**)arg, 1, notr);
}
int smbstrunpack16(uchar *b, uchar *p, uchar *e, void *arg){
return strunpack16(b, p, e, (char**)arg, 1, notr);
}
int smbnamepack8(uchar *b, uchar *p, uchar *e, void *arg){
return strpack8(b, p, e, (char*)arg, 1, tonametr);
}
int smbnamepack16(uchar *b, uchar *p, uchar *e, void *arg){
return strpack16(b, p, e, (char*)arg, 1, tonametr);
}
int smbnameunpack8(uchar *b, uchar *p, uchar *e, void *arg){
return strunpack8(b, p, e, (char**)arg, 1, fromnametr);
}
int smbnameunpack16(uchar *b, uchar *p, uchar *e, void *arg){
return strunpack16(b, p, e, (char**)arg, 1, fromnametr);
}
int smbuntermstrpack8(uchar *b, uchar *p, uchar *e, void *arg){
return strpack8(b, p, e, (char*)arg, 0, notr);
}
int smbuntermstrpack16(uchar *b, uchar *p, uchar *e, void *arg){
return strpack16(b, p, e, (char*)arg, 0, notr);
}
int smbuntermnamepack8(uchar *b, uchar *p, uchar *e, void *arg){
return strpack8(b, p, e, (char*)arg, 0, tonametr);
}
int smbuntermnamepack16(uchar *b, uchar *p, uchar *e, void *arg){
return strpack16(b, p, e, (char*)arg, 0, tonametr);
}