1 /* MasqMail

2 Copyright (C) 1999-2002 Oliver Kurth

3

4 This program is free software; you can redistribute it and/or modify

5 it under the terms of the GNU General Public License as published by

6 the Free Software Foundation; either version 2 of the License, or

7 (at your option) any later version.

8

9 This program is distributed in the hope that it will be useful,

10 but WITHOUT ANY WARRANTY; without even the implied warranty of

11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the

12 GNU General Public License for more details.

13

14 You should have received a copy of the GNU General Public License

15 along with this program; if not, write to the Free Software

16 Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.

17 */

18

19 #include <ctype.h>

20 #include <glib.h>

21

22 #include "masqmail.h"

23

24 gint

25 time_interval(gchar * str)

26 {

27 gchar buf[16];

28 gchar *p = str, *q = buf;

29 gint factor = 1, val;

30

31 while (*p && isdigit(*p) && (q < buf+sizeof(buf)-1)) {

32 *(q++) = *(p++);

33 }

34 *q = '\0';

35 val = atoi(buf);

36

37 /* fall through: */

38 switch (*p) {

39 case 'w':

40 factor *= 7;

41 case 'd':

42 factor *= 24;

43 case 'h':

44 factor *= 60;

45 case 'm':

46 factor *= 60;

47 case 's':

48 break;

49 default:

50 return -1;

51 }

52 return val * factor;

53 }