path: root/mbbsd/kaede.c

/* $Id$ */
#include "bbs.h"

// TODO move stuff to libbbs(or util)/string.c, ...
// this file can be removed (or not?)

char           *
Ptt_prints(char *str, size_t size, int mode)
{
    char           *strbuf = alloca(size);
    int             r, w;
    for( r = w = 0 ; str[r] != 0 && w < (size - 1) ; ++r )
    if( str[r] != ESC_CHR )
        strbuf[w++] = str[r];
    else{
        if( str[++r] != '*' ){
        if(w+2>=size-1) break;
        strbuf[w++] = ESC_CHR;
        strbuf[w++] = str[r];
        }
        else{
        /* Note, w will increased by copied length after */
        switch( str[++r] ){

            // secure content
            
        case 't':   // current time
            strlcpy(strbuf+w, Cdate(&now), size-w);
            w += strlen(strbuf+w);
            break;
        case 'u':   // current online users
            w += snprintf(&strbuf[w], size - w,
                  "%d", SHM->UTMPnumber);
            break;

            // insecure content
        
        case 's':   // current user id
            strlcpy(strbuf+w, cuser.userid, size-w);
            w += strlen(strbuf+w);
            break;
        case 'n':   // current user nickname
            strlcpy(strbuf+w, cuser.nickname, size-w);
            w += strlen(strbuf+w);
            break;
        case 'l':   // current user logins
            w += snprintf(&strbuf[w], size - w,
                  "%d", cuser.numlogins);
            break;
        case 'p':   // current user posts
            w += snprintf(&strbuf[w], size - w,
                  "%d", cuser.numposts);
            break;

        /* It's saver not to send these undefined escape string. 
        default:
            strbuf[w++] = ESC_CHR;
            strbuf[w++] = '*';
            strbuf[w++] = str[r];
            */
        }
        }
    }
    strbuf[w] = 0;
    strip_ansi(str, strbuf, mode);
    return str;
}

// utility from screen.c
void
outs_n(const char *str, int n)
{
    while (*str && n--) {
    outc(*str++);
    }
}

// XXX left-right (for large term)
// TODO someday please add ANSI detection version
void 
outslr(const char *left, int leftlen, const char *right, int rightlen)
{
    if (left == NULL)
    left = "";
    if (right == NULL)
    right = "";
    if(*left && leftlen < 0)
    leftlen = strlen(left);
    if(*right && rightlen < 0)
    rightlen = strlen(right);
    // now calculate padding
    rightlen = t_columns - leftlen - rightlen;
    outs(left);

    // ignore right msg if we need to.
    if(rightlen >= 0)
    {
    while(--rightlen > 0)
        outc(' ');
    outs(right);
    } else {
    rightlen = t_columns - leftlen;
    while(--rightlen > 0)
        outc(' ');
    }
}


/* Jaky */
void
out_lines(const char *str, int line)
{
    int y, x;
    getyx(&y, &x);
    while (*str && line) {
        if (*str == '\n')
        {
            move(++y, 0);
            line--;
        } else 
        {
            outc(*str);
        }
        str++;
    }
}

void
outmsg(const char *msg)
{
    move(b_lines - msg_occupied, 0);
    clrtoeol();
    outs(msg);
}

void
outmsglr(const char *msg, int llen, const char *rmsg, int rlen)
{
    move(b_lines - msg_occupied, 0);
    clrtoeol();
    outslr(msg, llen, rmsg, rlen);
    outs(ANSI_RESET ANSI_CLRTOEND);
}

void
prints(const char *fmt,...)
{
    va_list         args;
    char            buff[1024];

    va_start(args, fmt);
    vsnprintf(buff, sizeof(buff), fmt, args);
    va_end(args);
    outs(buff);
}

void
mouts(int y, int x, const char *str)
{
    move(y, x);
    clrtoeol();
    outs(str);
}

// vim:ts=4