meillo@0: /* MasqMail meillo@0: Copyright (C) 1999-2002 Oliver Kurth meillo@0: meillo@0: This program is free software; you can redistribute it and/or modify meillo@0: it under the terms of the GNU General Public License as published by meillo@0: the Free Software Foundation; either version 2 of the License, or meillo@0: (at your option) any later version. meillo@0: meillo@0: This program is distributed in the hope that it will be useful, meillo@0: but WITHOUT ANY WARRANTY; without even the implied warranty of meillo@0: MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the meillo@0: GNU General Public License for more details. meillo@0: meillo@0: You should have received a copy of the GNU General Public License meillo@0: along with this program; if not, write to the Free Software meillo@0: Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. meillo@0: */ meillo@0: meillo@0: #include meillo@0: #include meillo@0: meillo@0: #include "masqmail.h" meillo@0: meillo@10: gint meillo@10: time_interval(gchar * str, gint * pos) meillo@0: { meillo@10: gchar buf[16]; meillo@10: gchar *p = str, *q = buf; meillo@10: gint factor = 1, val; meillo@0: meillo@10: while (*p && isdigit(*p) && (q < buf + 15)) { meillo@10: *(q++) = *(p++); meillo@10: (*pos)++; meillo@10: } meillo@10: (*pos)++; meillo@10: *q = 0; meillo@10: val = atoi(buf); meillo@10: meillo@10: /* fall through: */ meillo@10: switch (*p) { meillo@10: case 'w': meillo@10: factor *= 7; meillo@10: case 'd': meillo@10: factor *= 24; meillo@10: case 'h': meillo@10: factor *= 60; meillo@10: case 'm': meillo@10: factor *= 60; meillo@10: case 's': meillo@10: break; meillo@10: default: meillo@10: return -1; meillo@10: } meillo@10: return val * factor; meillo@0: }