static int edit_user_file(const char *file, const char *desc, const char *submit)
{
if (!loginok)
return BBS_ELGNREQ;
char buf[HOMELEN];
sethomefile(buf, currentuser.userid, file);
parse_post_data();
char *text = getparm("text");
if (*text != '\0') {
int fd = open(buf, O_WRONLY | O_CREAT | O_TRUNC, 0644);
if (fd < 0)
return BBS_EINTNL;
fb_flock(fd, LOCK_EX);
safer_write(fd, text, strlen(text));
fb_flock(fd, LOCK_UN);
close(fd);
xml_header("bbs");
printf("<bbseufile ");
print_session();
printf(" desc='%s'></bbseufile>", desc);
} else {
xml_header("bbs");
printf("<bbseufile ");
print_session();
printf(" desc='%s' submit='%s'>", desc, submit);
xml_printfile(buf, stdout);
printf("</bbseufile>");
}
return 0;
}
int web_fav(void)
{
if (!session_id())
return BBS_ELGNREQ;
xml_header(NULL);
printf("<bbsfav>");
print_session();
db_res_t *res = db_query("SELECT b.id, b.name, b.descr FROM boards b"
" JOIN fav_boards f ON b.id = f.board WHERE f.user_id = %d",
session_uid());
if (res) {
for (int i = 0; i < db_res_rows(res); ++i) {
int bid = db_get_integer(res, i, 0);
const char *name = db_get_value(res, i, 1);
GBK_BUFFER(descr, BOARD_DESCR_CCHARS);
convert_u2g(db_get_value(res, i, 2), gbk_descr);
printf("<brd bid='%d' brd='%s'>", bid, name);
xml_fputs(gbk_descr);
printf("</brd>");
}
}
db_clear(res);
printf("</bbsfav>");
return 0;
}
int web_sel(void)
{
xml_header("bbssel");
printf("<bbssel>");
print_session();
const char *brd = web_get_param("brd");
if (*brd != '\0') {
char name[BOARD_NAME_LEN + 3];
snprintf(name, sizeof(name), "%%%s%%", brd);
db_res_t *res = db_query(BOARD_SELECT_QUERY_BASE
"WHERE lower(b.name) LIKE %s", name);
if (res && db_res_rows(res) > 0) {
board_t board;
for (int i = 0; i < db_res_rows(res); ++i) {
res_to_board(res, i, &board);
if (has_read_perm(&board)) {
board_to_gbk(&board);
printf("<brd dir='%d' title='%s' desc='%s' />",
is_board_dir(&board), board.name, board.descr);
}
}
} else {
printf("<notfound/>");
}
db_clear(res);
}
printf("</bbssel>");
return 0;
}
int bbssec_main(void)
{
db_res_t *r1 = db_query("SELECT id, name, descr, short_descr"
" FROM board_sectors ORDER BY name ASC");
if (!r1)
return BBS_EINVAL;
db_res_t *res = db_query("SELECT b.name, b.descr, b.sector"
" FROM boards b JOIN board_sectors s ON b.sector = s.id"
" WHERE b.flag & %d <> 0", BOARD_FLAG_RECOMMEND);
if (!res) {
db_clear(r1);
return BBS_EINVAL;
}
xml_header(NULL);
printf("<bbssec>");
print_session();
int last = -1;
for (int i = 0; i < db_res_rows(r1); ++i) {
printf("<sec id='%s' desc='%s [%s]'>", db_get_value(r1, i, 1),
db_get_value(r1, i, 2), db_get_value(r1, i, 3));
int sid = db_get_integer(r1, i, 0);
last = show_sector(sid, res, last);
printf("</sec>");
}
db_clear(res);
db_clear(r1);
printf("</bbssec>");
return 0;
}
int bbsanc_main(void)
{
const char *path = web_get_param("path");
if (strstr(path, "bbslist") || strstr(path, ".Search")
|| strstr(path, ".Names") || strstr(path, "..")
|| strstr(path, "SYSHome"))
return BBS_EINVAL;
char *bname = getbfroma(path);
board_t board;
if (!bname || *bname != '\0' || !get_board(bname, &board)
|| !has_read_perm(&board)) {
return BBS_ENOFILE;
}
char fname[512];
sprintf(fname, "0Announce%s", path);
xml_header(NULL);
printf("<bbsanc ");
if (board.id)
printf(" brd='%s'", board.name);
printf(">");
print_session();
printf("<po>");
xml_printfile(fname);
printf("</po></bbsanc>");
return 0;
}
int bbssel_main(void)
{
xml_header("bbssel");
printf("<bbssel ");
print_session();
printf(">");
char *brd = getparm("brd");
if (*brd != '\0') {
struct boardheader *bp;
int found = 0;
for (int i = 0; i < MAXBOARD; i++) {
bp = bcache + i;
if (!hasreadperm(¤tuser, bp))
continue;
if (strcasestr(bp->filename, brd)
|| strcasestr(bp->title, brd)) {
printf("<brd dir='%d' title='%s' desc='%s' />",
is_board_dir(bp), bp->filename, get_board_desc(bp));
found++;
}
}
if (!found)
printf("<notfound />");
}
printf("</bbssel>");
return 0;
}
int bbsinfo_main(void)
{
if (!loginok)
return BBS_ELGNREQ;
parse_post_data();
char *type = getparm("type");
xml_header("bbs");
if (*type != '\0') {
printf("<bbsinfo ");
print_session();
printf(">%s</bbsinfo>", check_info());
} else {
printf("<bbsinfo post='%d' login='******' stay='%d' "
"since='%s' host='%s' year='%d' month='%d' "
"day='%d' gender='%c' ", currentuser.numposts,
currentuser.numlogins, currentuser.stay / 60,
getdatestring(currentuser.firstlogin, DATE_XML),
currentuser.lasthost, currentuser.birthyear,
currentuser.birthmonth, currentuser.birthday,
currentuser.gender);
print_session();
printf(" last='%s'><nick>",
getdatestring(currentuser.lastlogin, DATE_XML));
xml_fputs(currentuser.username, stdout);
printf("</nick></bbsinfo>");
}
return 0;
}
int bbsfadd_main(void)
{
if (!loginok)
return BBS_ELGNREQ;
const char *id = getparm("id");
const char *desc = getparm("desc");
if (*id != '\0') {
override_t ov;
memset(&ov, 0, sizeof(ov));
strlcpy(ov.id, id, sizeof(ov.id));
if (!searchuser(ov.id))
return BBS_ENOUSR;
strlcpy(ov.exp, desc, sizeof(ov.exp));
char file[HOMELEN];
sethomefile(file, currentuser.userid, "friends");
if (get_num_records(file, sizeof(ov)) == MAXFRIENDS)
return BBS_EFRNDQE;
// TODO: be atomic
if (!search_record(file, NULL, sizeof(ov), cmpname, ov.id))
append_record(file, &ov, sizeof(ov));
printf("Location: fall\n\n");
return 0;
}
xml_header("bbs");
printf("<bbsfadd ");
print_session();
printf(">%s</bbsfadd>", id);
return 0;
}
int bbspwd_main(void)
{
if (!loginok)
return BBS_ELGNREQ;
parse_post_data();
xml_header("bbs");
printf("<bbspwd ");
print_session();
char *pw1 = getparm("pw1");
if (*pw1 == '\0') {
printf(" i='i'></bbspwd>");
return 0;
}
printf(">", stdout);
char *pw2 = getparm("pw2");
char *pw3 = getparm("pw3");
switch (set_password(pw1, pw2, pw3)) {
case BBS_EWPSWD:
printf("ÃÜÂë´íÎó");
break;
case BBS_EINVAL:
printf("ÐÂÃÜÂ벻ƥÅä »ò ÐÂÃÜÂëÌ«¶Ì");
break;
default:
break;
}
printf("</bbspwd>");
return 0;
}
void xml_item_decimal(BYTE *item, BYTE num, BYTE *indent)
{
BYTE tmp[4];
xml_header(item, indent);
sprintf(tmp, "%d", num);
UserMessage("%s", tmp);
xml_footer(item, indent, NO_NEWLINE);
}
void Device::create_readings_xml(pugi::xml_document &doc, int n_readings)
{
doc.reset();
// client base node
pugi::xml_node node = doc.append_child("client");
xml_header(doc);
xml_readings(doc, false, n_readings);
}
void Device::create_confirm_xml(pugi::xml_document &doc, int n_readings)
{
doc.reset();
// client base node
pugi::xml_node node = doc.append_child("server");
xml_header(doc);
xml_latest_readings(doc, true, n_readings);
}
int bbsovr_main(void)
{
if (!loginok)
return BBS_ELGNREQ;
xml_header("bbs");
printf("<bbsovr ");
print_session();
printf(">");
override_info();
printf("</bbsovr>");
return 0;
}
int bbsovr_main(void)
{
if (!session_get_id())
return BBS_ELGNREQ;
xml_header(NULL);
printf("<bbsovr>");
print_session();
show_sessions_of_friends();
printf("</bbsovr>");
return 0;
}
int bbsfall_main(void)
{
if (!loginok)
return BBS_ELGNREQ;
xml_header("bbs");
printf("<bbsfall ");
print_session();
printf(">");
char file[HOMELEN];
sethomefile(file, currentuser.userid, "friends");
apply_record(file, print_override, sizeof(override_t), NULL, false,
false, true);
printf("</bbsfall>");
return 0;
}
int bbsmybrd_main(void)
{
if (!loginok)
return BBS_ELGNREQ;
int type = strtol(getparm("type"), NULL, 10);
if (type != 0)
return read_submit();
// Read '.goodbrd'.
char file[HOMELEN];
sethomefile(file, currentuser.userid, ".goodbrd");
mmap_t m;
m.oflag = O_RDONLY;
if (mmap_open(file, &m) < 0)
return BBS_ENOFILE;
struct goodbrdheader *iter, *end;
int num = m.size / sizeof(struct goodbrdheader);
if (num > GOOD_BRC_NUM)
num = GOOD_BRC_NUM;
end = (struct goodbrdheader *)m.ptr + num;
// Print 'bid's of favorite boards.
xml_header("bbs");
printf("<bbsmybrd ");
print_session();
printf(" limit='%d'>", GOOD_BRC_NUM);
for (iter = m.ptr; iter != end; iter++) {
if (!gbrd_is_custom_dir(iter))
printf("<my bid='%d'/>", iter->pos + 1);
}
mmap_close(&m);
// Print all boards available.
struct boardheader *b;
for (int i = 0; i < MAXBOARD; i++) {
b = bcache + i;
if (b->filename[0] <= 0x20 || b->filename[0] > 'z')
continue;
if (!hasreadperm(¤tuser, b))
continue;
printf("<mbrd bid='%d' desc='%s' %s/>", i + 1, b->title + 11,
is_board_dir(b) ? "dir='1'" : "");
}
printf("</bbsmybrd>");
return 0;
}
int bbsfall_main(void)
{
if (!session_get_id())
return BBS_ELGNREQ;
xml_header(NULL);
printf("<bbsfall>");
print_session();
following_list_t *fl = following_list_load(session_get_user_id());
if (fl) {
for (int i = following_list_rows(fl) - 1; i >= 0; --i) {
printf("<ov id='%s'>", following_list_get_name(fl, i));
xml_fputs(following_list_get_notes(fl, i));
printf("</ov>");
}
}
printf("</bbsfall>");
return 0;
}
int web_props(void)
{
if (!session_id())
return BBS_ELGNREQ;
prop_list_t *p = prop_list_load();
if (!p)
return BBS_EINTNL;
xml_header(NULL);
printf("<bbsprop>");
print_session();
for (int i = 0; i < prop_list_num_rows(p); ++i) {
show_prop(p, i);
}
printf("</bbsprop>");
prop_list_free(p);
return 0;
}
int web_brdadd(void)
{
if (!session_id())
return BBS_ELGNREQ;
int bid = strtol(web_get_param("bid"), NULL, 10);
int ok = fav_board_add(session_uid(), NULL, bid,
FAV_BOARD_ROOT_FOLDER, ¤tuser);
if (ok) {
xml_header(NULL);
printf("<bbsbrdadd>");
print_session();
board_t board;
get_board_by_bid(bid, &board);
printf("<brd>%s</brd><bid>%d</bid></bbsbrdadd>", board.name, board.id);
session_set_board(board.id);
return 0;
}
return BBS_EBRDQE;
}
static int buy_title(int item, const char *title)
{
xml_header(NULL);
printf("<bbsbuyprop>");
print_session();
if (title && *title) {
UTF8_BUFFER(title, TITLE_CCHARS);
convert_g2u(title, utf8_title);
if (string_validate_utf8(utf8_title, TITLE_CCHARS, false) > 0
&& title_submit_request(item, session_uid(), utf8_title, 0)) {
printf("<success/>");
}
} else {
printf("<inputs item='%d'>"
//% "<label for='title'>请输入自定义身份</label>"
"<label for='title'>\xc7\xeb\xca\xe4\xc8\xeb\xd7\xd4\xb6\xa8\xd2\xe5\xc9\xed\xb7\xdd</label>"
"<input name='title' type='text' width='%d'></input>"
"</inputs>", item, TITLE_CCHARS);
}
printf("</bbsbuyprop>");
return 0;
}
int bbsfadd_main(void)
{
if (!session_get_id())
return BBS_ELGNREQ;
const char *uname = web_get_param("id");
const char *note = web_get_param("desc");
if (*uname) {
UTF8_BUFFER(note, FOLLOW_NOTE_CCHARS);
convert_g2u(note, utf8_note);
follow(session_get_user_id(), uname, utf8_note);
printf("Location: fall\n\n");
return 0;
}
xml_header(NULL);
printf("<bbsfadd>");
print_session();
printf("%s</bbsfadd>", uname);
return 0;
}
int web_my_props(void)
{
if (!session_id())
return BBS_ELGNREQ;
int record = strtol(web_get_param("record"), NULL, 10);
int item = strtol(web_get_param("item"), NULL, 10);
if (record <= 0 || item <= 0) {
my_props_t *p = my_props_load(session_uid());
if (!p)
return BBS_EINTNL;
xml_header(NULL);
printf("<bbsmyprop>");
print_session();
for (int i = 0; i < my_props_count(p); ++i) {
show_my_prop(p, i);
}
printf("</bbsmyprop>");
my_props_free(p);
} else {
switch (item) {
case PROP_TITLE_FREE:
case PROP_TITLE_30DAYS:
case PROP_TITLE_90DAYS:
case PROP_TITLE_180DAYS:
case PROP_TITLE_1YEAR:
return show_title_detail(record);
default:
return BBS_EINVAL;
}
}
return 0;
}
static int show_title_detail(int record)
{
db_res_t *res = db_query("SELECT title, approved FROM titles"
" WHERE record_id = %d AND user_id = %"DBIdUID,
record, session_uid());
if (!res || db_res_rows(res) <= 0) {
db_clear(res);
return BBS_EINVAL;
}
GBK_BUFFER(title, TITLE_CCHARS);
convert_u2g(db_get_value(res, 0, 0), gbk_title);
xml_header(NULL);
printf("<bbspropdetail>");
print_session();
//% printf("<prop>自定义身份%s: %s</prop></bbspropdetail>",
printf("<prop>\xd7\xd4\xb6\xa8\xd2\xe5\xc9\xed\xb7\xdd%s: %s</prop></bbspropdetail>",
//% db_get_bool(res, 0, 1) ? "" : "[尚在审核]", gbk_title);
db_get_bool(res, 0, 1) ? "" : "[\xc9\xd0\xd4\xda\xc9\xf3\xba\xcb]", gbk_title);
db_clear(res);
return 0;
}
int web_all_boards(void)
{
xml_header(NULL);
printf("<bbsall>");
print_session();
db_res_t *res = db_query(BOARD_SELECT_QUERY_BASE);
if (!res)
return BBS_EINTNL;
for (int i = 0; i < db_res_rows(res); ++i) {
board_t board;
res_to_board(res, i, &board);
if (!has_read_perm(&board))
continue;
board_to_gbk(&board);
printf("<brd dir='%d' title='%s' cate='%s' desc='%s' bm='%s' />",
(board.flag & BOARD_FLAG_DIR) ? 1 : 0, board.name, board.categ,
board.descr, board.bms);
}
db_clear(res);
printf("</bbsall>");
return 0;
}
/* Read in BSDF and interpolate as Klems matrix representation */
int
main(int argc, char *argv[])
{
int dofwd = 0, dobwd = 1;
char *cp;
int i, na;
progname = argv[0];
esupport |= E_VARIABLE|E_FUNCTION|E_RCONST;
esupport &= ~(E_INCHAN|E_OUTCHAN);
scompile("PI:3.14159265358979323846", NULL, 0);
biggerlib();
for (i = 1; i < argc && (argv[i][0] == '-') | (argv[i][0] == '+'); i++)
switch (argv[i][1]) { /* get options */
case 'n':
npsamps = atoi(argv[++i]);
if (npsamps <= 0)
goto userr;
break;
case 'e':
scompile(argv[++i], NULL, 0);
single_plane_incident = 0;
break;
case 'f':
if (!argv[i][2]) {
fcompile(argv[++i]);
single_plane_incident = 0;
} else
dofwd = (argv[i][0] == '+');
break;
case 'b':
dobwd = (argv[i][0] == '+');
break;
case 'h':
kbasis = "LBNL/Klems Half";
break;
case 'q':
kbasis = "LBNL/Klems Quarter";
break;
default:
goto userr;
}
if (single_plane_incident >= 0) { /* function-based BSDF? */
if (i != argc-1 || fundefined(argv[i]) != 6) {
fprintf(stderr,
"%s: need single function with 6 arguments: bsdf(ix,iy,iz,ox,oy,oz)\n",
progname);
fprintf(stderr, "\tor 3 arguments using Dx,Dy,Dz: bsdf(ix,iy,iz)\n",
progname);
goto userr;
}
++eclock;
xml_header(argc, argv); /* start XML output */
xml_prologue(NULL);
if (dofwd) {
input_orient = -1;
output_orient = -1;
eval_function(argv[i]); /* outside reflectance */
output_orient = 1;
eval_function(argv[i]); /* outside -> inside */
}
if (dobwd) {
input_orient = 1;
output_orient = 1;
eval_function(argv[i]); /* inside reflectance */
output_orient = -1;
eval_function(argv[i]); /* inside -> outside */
}
xml_epilogue(); /* finish XML output & exit */
return(0);
}
/* XML input? */
if (i == argc-1 && (cp = argv[i]+strlen(argv[i])-4) > argv[i] &&
!strcasecmp(cp, ".xml")) {
xml_header(argc, argv); /* start XML output */
eval_bsdf(argv[i]); /* load & resample BSDF */
xml_epilogue(); /* finish XML output & exit */
return(0);
}
if (i < argc) { /* open input files if given */
int nbsdf = 0;
for ( ; i < argc; i++) { /* interpolate each component */
FILE *fpin = fopen(argv[i], "rb");
if (fpin == NULL) {
fprintf(stderr, "%s: cannot open BSDF interpolant '%s'\n",
progname, argv[i]);
return(1);
}
if (!load_bsdf_rep(fpin))
return(1);
fclose(fpin);
if (!nbsdf++) { /* start XML on first dist. */
xml_header(argc, argv);
xml_prologue(NULL);
}
eval_rbf();
}
xml_epilogue(); /* finish XML output & exit */
return(0);
}
SET_FILE_BINARY(stdin); /* load from stdin */
if (!load_bsdf_rep(stdin))
return(1);
xml_header(argc, argv); /* start XML output */
xml_prologue(NULL);
eval_rbf(); /* resample dist. */
xml_epilogue(); /* finish XML output & exit */
return(0);
userr:
fprintf(stderr,
"Usage: %s [-n spp][-h|-q][bsdf.sir ..] > bsdf.xml\n", progname);
fprintf(stderr,
" or: %s [-n spp][-h|-q] bsdf_in.xml > bsdf_out.xml\n", progname);
fprintf(stderr,
" or: %s [-n spp][-h|-q][{+|-}for[ward]][{+|-}b[ackward]][-e expr][-f file] bsdf_func > bsdf.xml\n",
progname);
return(1);
}
QByteArray Playlist::toXSPF() const
{
QDomDocument doc;
QDomElement root = doc.createElement("playlist");
root.setAttribute("version", "1");
root.setAttribute("xmlns", "http://xspf.org/ns/0");
QDomElement creator = doc.createElement("creator");
QDomText text = doc.createTextNode("audex");
creator.appendChild(text);
root.appendChild(creator);
QDomElement tracklist = doc.createElement("trackList");
int j = 0;
for (int i = 0; i < p_playlist.count(); ++i)
{
PlaylistItem pi = p_playlist[i];
if (pi.filename().isEmpty()) continue;
++j;
QDomElement track = doc.createElement("track");
QDomElement ch = doc.createElement("location");
QDomText text = doc.createTextNode(pi.filename());
ch.appendChild(text);
track.appendChild(ch);
if (!pi.artist().isEmpty())
{
ch = doc.createElement("creator");
text = doc.createTextNode(pi.artist());
ch.appendChild(text);
track.appendChild(ch);
}
ch = doc.createElement("title");
text = doc.createTextNode(pi.title());
ch.appendChild(text);
track.appendChild(ch);
ch = doc.createElement("trackNum");
text = doc.createTextNode(QString::number(j));
ch.appendChild(text);
track.appendChild(ch);
if (pi.length() > 0)
{
ch = doc.createElement("duration");
text = doc.createTextNode(QString::number(pi.length()*1000));
ch.appendChild(text);
track.appendChild(ch);
}
tracklist.appendChild(track);
}
root.appendChild(tracklist);
doc.appendChild(root);
QByteArray xml_header("<?xml version=\"1.0\" encoding=\"UTF-8\"?>\n");
return doc.toByteArray().prepend(xml_header);
}
// TODO: Handle user-defined directories.
static int read_submit(void)
{
if (!loginok)
return BBS_ELGNREQ;
if (parse_post_data() < 0)
return BBS_EINVAL;
// Read parameters.
bool boards[MAXBOARD] = {0};
int num = 0;
for (int i = 0; i < param_num; i++) {
if (!strcasecmp(param_val[i], "on")) {
int bid = strtol(param_name[i], NULL, 10);
if (bid > 0 && bid <= MAXBOARD
&& hasreadperm(¤tuser, bcache + bid - 1)) {
boards[bid - 1] = true;
++num;
}
}
}
if (num > GOOD_BRC_NUM)
return BBS_EBRDQE;
if (num <= 0)
return BBS_EINVAL;
// Read '.goodbrd'.
char file[HOMELEN];
sethomefile(file, currentuser.userid, ".goodbrd");
mmap_t m;
m.oflag = O_RDWR;
if (mmap_open(file, &m) < 0)
return BBS_ENOFILE; // TODO: empty?
if (mmap_truncate(&m, num * sizeof(struct goodbrdheader)) < 0) {
return BBS_EINTNL;
}
struct goodbrdheader *iter, *end;
end = (struct goodbrdheader *)m.ptr + num;
// Remove deselected boards.
struct goodbrdheader *dst = m.ptr;
int id = 0;
for (iter = m.ptr; iter != end; ++iter) {
if (boards[iter->pos] == true) {
boards[iter->pos] = false;
id++;
if (iter != dst) {
iter->id = id;
iter->pid = 0;
*dst = *iter;
}
++dst;
}
}
// Write out newly selected boards.
for (int i = 0; i < MAXBOARD; ++i) {
if (boards[i] == true) {
id++;
if (id > GOOD_BRC_NUM)
break;
dst->id = num;
dst->pid = 0;
dst->pos = i;
dst->flag = bcache[i].flag;
strlcpy(dst->filename, bcache[i].filename, sizeof(dst->filename));
strlcpy(dst->title, bcache[i].title, sizeof(dst->title));
++dst;
}
}
mmap_close(&m);
xml_header("bbs");
printf("<bbsmybrd ");
print_session();
printf(" limit='%d' selected='%d'></bbsmybrd>", GOOD_BRC_NUM, num);
return 0;
}
int bbs0an_main(void)
{
char path[512];
board_t board;
int bid = strtol(web_get_param("bid"), NULL, 10);
if (bid <= 0) {
strlcpy(path, web_get_param("path"), sizeof(path));
if (strstr(path, "..") || strstr(path, "SYSHome"))
return BBS_EINVAL;
char *bname = getbfroma(path);
if (*bname != '\0') {
if (!get_board(bname, &board) || !has_read_perm(&board))
return BBS_ENODIR;
}
} else {
if (!get_board_by_bid(bid, &board) || !has_read_perm(&board))
return BBS_ENOBRD;
if (board.flag & BOARD_FLAG_DIR)
return BBS_EINVAL;
path[0] = '\0';
FILE *fp = fopen("0Announce/.Search", "r");
if (fp == NULL)
return BBS_EINTNL;
char tmp[256];
int len = strlen(board.name);
while (fgets(tmp, sizeof(tmp), fp) != NULL) {
if (!strncmp(tmp, board.name, len) && tmp[len] == ':'
&& tmp[len + 1] == ' ') {
tmp[len + 1] = '/';
strlcpy(path, tmp + len + 1, sizeof(path));
path[strlen(path) - 1] = '\0';
break;
}
}
fclose(fp);
if (path[0] == '\0')
return BBS_ENODIR;
}
char names[512];
snprintf(names, sizeof(names), "0Announce%s/.Names", path);
FILE *fp = fopen(names, "r");
if (fp == NULL)
return BBS_ENODIR; // not indicating hidden directories.
char buf[512], *title;
// check directory permission.
while (true) {
if (fgets(buf, sizeof(buf), fp) == NULL) {
fclose(fp);
return BBS_ENODIR;
}
if(!strncmp(buf, "# Title=", 8)) {
title = buf + 8;
if (!hasannperm(title, ¤tuser, &board)) {
fclose(fp);
return BBS_ENODIR;
}
break;
}
}
xml_header(NULL);
printf("<bbs0an path='%s' v='%d' ", path, 1030);
if (board.id)
printf(" brd='%s'", board.name);
printf(">");
print_session();
char name[STRLEN], fpath[1024], *id = NULL, *ptr;
struct stat st;
while (fgets(buf, sizeof(buf), fp) != NULL) {
if (!strncmp(buf, "Name=", 5)) {
strlcpy(name, trim(buf + 5), sizeof(name));
if (strlen(name) > ANN_TITLE_LENGTH) {
id = name + ANN_TITLE_LENGTH;
if (!hasannperm(name + ANN_TITLE_LENGTH, ¤tuser, &board))
continue;
name[ANN_TITLE_LENGTH - 1] = '\0';
if (!strncmp(id, "BM: ", 4))
id += 4;
if ((ptr = strchr(id, ')')) != NULL)
*ptr = '\0';
} else {
id = NULL;
}
if (fgets(buf, sizeof(buf), fp) == NULL || strncmp(buf, "Path=~", 6)) {
break;
} else {
printf("<ent path='%s' t='", trim(buf + 6));
snprintf(fpath, sizeof(fpath), "0Announce%s%s", path, buf + 6);
if (stat(fpath, &st) != 0 || (!S_ISREG(st.st_mode) && !S_ISDIR(st.st_mode))) {
printf("e'");
} else if (S_ISREG(st.st_mode)) {
printf("f'");
} else {
printf("d'");
}
if (id != NULL)
printf(" id='%s'", id);
printf(" time='%s'>", format_time(st.st_mtime, TIME_FORMAT_XML));
xml_fputs4(trim(name), 0);
printf("</ent>");
}
}
}
fclose(fp);
puts("</bbs0an>");
return 0;
}
void xml_item_array(BYTE *item, BYTE *data, BYTE mask, unsigned int length, BYTE *indent)
{
xml_header(item, indent);
xml_indented_array(data, mask, length, *indent);
xml_footer(item, indent, NEWLINE);
}
int web_sector(void)
{
int sid = 0;
board_t parent = { .id = 0 };
db_res_t *res = NULL;
const char *sname = web_get_param("s");
if (*sname) {
res = db_query("SELECT id, descr"
" FROM board_sectors WHERE name = %s", sname);
if (!res || db_res_rows(res) < 1) {
db_clear(res);
return BBS_EINVAL;
}
} else {
const char *pname = web_get_param("board");
if (*pname)
get_board(pname, &parent);
else
get_board_by_bid(strtol(web_get_param("bid"), NULL, 10), &parent);
if (!parent.id || !(parent.flag & BOARD_FLAG_DIR)
|| !has_read_perm(&parent))
return BBS_ENOBRD;
}
xml_header(NULL);
printf("<bbsboa link='%sdoc' ", get_post_list_type_string());
if (*sname) {
char path[HOMELEN];
sprintf(path, "%s/info/egroup%d/icon.jpg", BBSHOME,
(int) strtol(sname, NULL, 16));
if (dashf(path))
printf(" icon='%s'", path);
const char *utf8_sector = db_get_value(res, 0, 1);
if (web_request_type(UTF8)) {
printf(" title='%s'>", utf8_sector);
} else {
GBK_BUFFER(sector, BOARD_SECTOR_NAME_CCHARS);
convert_u2g(utf8_sector, gbk_sector);
printf(" title='%s'>", gbk_sector);
}
sid = db_get_integer(res, 0, 0);
db_clear(res);
} else {
if (web_request_type(UTF8)) {
printf(" dir= '1' title='%s'>", parent.descr);
} else {
GBK_BUFFER(descr, BOARD_DESCR_CCHARS);
convert_u2g(parent.descr, gbk_descr);
printf(" dir= '1' title='%s'>", gbk_descr);
}
}
if (sid)
res = db_query(BOARD_SELECT_QUERY_BASE "WHERE b.sector = %d", sid);
else
res = db_query(BOARD_SELECT_QUERY_BASE "WHERE b.parent = %d", parent.id);
if (res && db_res_rows(res) > 0)
show_board(res);
db_clear(res);
print_session();
printf("</bbsboa>");
return 0;
}
int bbsclear_main(void)
{
if (!session_id())
return BBS_ELGNREQ;
board_t board;
if (!get_board(web_get_param("board"), &board)
|| !has_read_perm(&board))
return BBS_ENOBRD;
session_set_board(board.id);
const char *start = web_get_param("start");
brc_init(currentuser.userid, board.name);
brc_clear_all();
brc_sync(currentuser.userid);
char buf[STRLEN];
snprintf(buf, sizeof(buf), "doc?board=%s&start=%s", board.name, start);
http_header();
refreshto(0, buf);
printf("</head></html>");
return 0;
}
int bbsnot_main(void)
{
board_t board;
if (!get_board(web_get_param("board"), &board)
|| !has_read_perm(&board))
return BBS_ENOBRD;
if (board.flag & BOARD_FLAG_DIR)
return BBS_EINVAL;
session_set_board(board.id);
char fname[HOMELEN];
snprintf(fname, sizeof(fname), "vote/%s/notes", board.name);
mmap_t m;
m.oflag = O_RDONLY;
if (mmap_open(fname, &m) < 0)
return BBS_ENOFILE;
xml_header(NULL);
printf("<bbsnot brd='%s'>", board.name);
xml_fputs2((char *) m.ptr, m.size);
mmap_close(&m);
print_session();
printf("</bbsnot>");
return 0;
}
