summaryrefslogtreecommitdiff
path: root/contrib/datetime
diff options
context:
space:
mode:
Diffstat (limited to 'contrib/datetime')
-rw-r--r--contrib/datetime/Makefile66
-rw-r--r--contrib/datetime/datetime_functions.c281
-rw-r--r--contrib/datetime/datetime_functions.h28
-rw-r--r--contrib/datetime/datetime_functions.sql.in100
4 files changed, 0 insertions, 475 deletions
diff --git a/contrib/datetime/Makefile b/contrib/datetime/Makefile
index 8f43ff83b7..e69de29bb2 100644
--- a/contrib/datetime/Makefile
+++ b/contrib/datetime/Makefile
@@ -1,66 +0,0 @@
-#-------------------------------------------------------------------------
-#
-# Makefile --
-#
-# Makefile for new datetime module.
-#
-#-------------------------------------------------------------------------
-
-PGDIR = ../..
-SRCDIR = $(PGDIR)/src
-
-include $(SRCDIR)/Makefile.global
-
-CFLAGS += -I. $(CFLAGS_SL)
-
-MODNAME = datetime_functions
-
-SQLDEFS = $(MODNAME).sql
-
-MODULE = $(MODNAME)$(DLSUFFIX)
-
-MODDIR = $(LIBDIR)/modules
-
-SQLDIR = $(LIBDIR)/sql
-
-all: module sql
-
-module: $(MODULE)
-
-sql: $(SQLDEFS)
-
-install: $(MODULE) $(SQLDEFS) $(MODDIR) $(SQLDIR)
- cp -p $(MODULE) $(MODDIR)/
- strip $(MODDIR)/$(MODULE)
- cp -p $(SQLDEFS) $(SQLDIR)/
-
-install-doc:
- if [ -d "$(DOCDIR)" ]; then \
- cp -p *.doc $(DOCDIR); \
- else \
- cp -p *.doc $(SQLDIR); \
- fi
-
-$(MODDIR):
- mkdir -p $@
-
-$(SQLDIR):
- mkdir -p $@
-
-%.sql: %.sql.in
- sed "s|MODULE_PATHNAME|$(MODDIR)/$(MODULE)|" < $< > $@
-
-.SUFFIXES: $(DLSUFFIX)
-
-%$(DLSUFFIX): %.c
- $(CC) $(CFLAGS) -shared -o $@ $<
-
-depend dep:
- $(CC) -MM $(CFLAGS) *.c >depend
-
-clean:
- rm -f *~ $(MODULE) $(MODNAME).sql
-
-ifeq (depend,$(wildcard depend))
-include depend
-endif
diff --git a/contrib/datetime/datetime_functions.c b/contrib/datetime/datetime_functions.c
index ca9c8afe35..e69de29bb2 100644
--- a/contrib/datetime/datetime_functions.c
+++ b/contrib/datetime/datetime_functions.c
@@ -1,281 +0,0 @@
-/*
- * datetime_functions.c --
- *
- * This file defines new functions for the time and date data types.
- *
- * Copyright (C) 1999, Massimo Dal Zotto <dz@cs.unitn.it>
- *
- * Date2mjd code contributed by Reiner Dassing <dassing@wettzell.ifag.de>
- *
- * This software is distributed under the GNU General Public License
- * either version 2, or (at your option) any later version.
- */
-
-#include <stdio.h>
-#include <string.h>
-#include <limits.h>
-#ifdef HAVE_FLOAT_H
-#include <float.h>
-#endif
-
-#include "postgres.h"
-#include "miscadmin.h"
-#include "utils/builtins.h"
-#include "utils/nabstime.h"
-#include "utils/datetime.h"
-#include "access/xact.h"
-
-#include "datetime_functions.h"
-
-/* Constant to replace calls to date2j(2000,1,1) */
-#define JDATE_2000 2451545
-
-/*
- * decode_24h_time()
- *
- * Decode time string 00:00:00 through 24:00:00.
- */
-static int
-decode_24h_time(char *str, struct tm * tm, double *fsec)
-{
- char *cp;
-
- tm->tm_hour = strtol(str, &cp, 10);
- if (*cp != ':')
- return -1;
- str = cp + 1;
- tm->tm_min = strtol(str, &cp, 10);
- if (*cp == '\0')
- {
- tm->tm_sec = 0;
- *fsec = 0;
- }
- else if (*cp != ':')
- return -1;
- else
- {
- str = cp + 1;
- tm->tm_sec = strtol(str, &cp, 10);
- if (*cp == '\0')
- *fsec = 0;
- else if (*cp == '.')
- {
- str = cp;
- *fsec = strtod(str, &cp);
- if (cp == str)
- return -1;
- }
- else
- return -1;
- }
-
- /* do a sanity check */
- if ((tm->tm_hour < 0) || (tm->tm_hour > 24)
- || (tm->tm_min < 0) || (tm->tm_min > 59)
- || (tm->tm_sec < 0) || (tm->tm_sec > 59)
- || (*fsec < 0))
- return -1;
-
- return 0;
-}
-
-/*
- * A modified version of time_in which allows the value 24:00:00 for
- * time and converts it to TimeADT data type forcing seconds to 0.
- * This can be useful if you need to handle TimeADT values limited
- * to hh:mm like in timetables.
- */
-
-TimeADT *
-hhmm_in(char *str)
-{
- TimeADT *time;
-
- double fsec;
- struct tm tt,
- *tm = &tt;
-
- if (!PointerIsValid(str))
- elog(ERROR, "Bad (null) time external representation");
-
- if (decode_24h_time(str, tm, &fsec) != 0)
- elog(ERROR, "Bad time external representation '%s'", str);
-
- if ((tm->tm_hour < 0) || (tm->tm_hour > 24)
- || ((tm->tm_hour == 24)
- && ((tm->tm_min != 0) || (tm->tm_sec != 0) || (fsec != 0.0))))
- {
- elog(ERROR,
- "Time must be limited to values 00:00:00 through 24:00:00 "
- "in \"%s\"",
- str);
- }
-
- time = palloc(sizeof(TimeADT));
- *time = ((((tm->tm_hour * 60) + tm->tm_min) * 60));
-
- return (time);
-}
-
-/*
- * A modified version of time_out which converts from TimeADT data type
- * omitting the seconds field when it is 0.
- * Useful if you need to handle TimeADT values limited to hh:mm.
- */
-
-char *
-hhmm_out(TimeADT *time)
-{
- char *result;
- struct tm tt,
- *tm = &tt;
- char buf[MAXDATELEN + 1];
-
- if (!PointerIsValid(time))
- return NULL;
-
- tm->tm_hour = (*time / (60 * 60));
- tm->tm_min = (((int) (*time / 60)) % 60);
- tm->tm_sec = (((int) *time) % 60);
-
- if (tm->tm_sec == 0)
- sprintf(buf, "%02d:%02d", tm->tm_hour, tm->tm_min);
- else
- sprintf(buf, "%02d:%02d:%02d", tm->tm_hour, tm->tm_min, tm->tm_sec);
-
- result = palloc(strlen(buf) + 1);
- strcpy(result, buf);
-
- return (result);
-}
-
-TimeADT *
-hhmm(TimeADT *time)
-{
- TimeADT *result = palloc(sizeof(TimeADT));
-
- *result = (((int) *time) / 60 * 60);
-
- return (result);
-}
-
-TimeADT *
-time_difference(TimeADT *time1, TimeADT *time2)
-{
- TimeADT *time = palloc(sizeof(TimeADT));
-
- *time = (*time1 - *time2);
- return (time);
-}
-
-int4
-time_hours(TimeADT *time)
-{
- return (((int) *time) / 3600);
-}
-
-int4
-time_minutes(TimeADT *time)
-{
- return ((((int) *time) / 60) % 60);
-}
-
-int4
-time_seconds(TimeADT *time)
-{
- return (((int) *time) % 60);
-}
-
-int4
-as_minutes(TimeADT *time)
-{
- return (((int) *time) / 60);
-}
-
-int4
-as_seconds(TimeADT *time)
-{
- return ((int) *time);
-}
-
-int4
-date_day(DateADT val)
-{
- int year,
- month,
- day;
-
- j2date(val + JDATE_2000, &year, &month, &day);
-
- return (day);
-}
-
-int4
-date_month(DateADT val)
-{
- int year,
- month,
- day;
-
- j2date(val + JDATE_2000, &year, &month, &day);
-
- return (month);
-}
-
-int4
-date_year(DateADT val)
-{
- int year,
- month,
- day;
-
- j2date(val + JDATE_2000, &year, &month, &day);
-
- return (year);
-}
-
-TimeADT *
-currenttime()
-{
- TimeADT *result = palloc(sizeof(TimeADT));
- struct tm *tm;
- time_t current_time;
-
- current_time = time(NULL);
- tm = localtime(&current_time);
- *result = ((((tm->tm_hour * 60) + tm->tm_min) * 60) + tm->tm_sec);
-
- return (result);
-}
-
-DateADT
-currentdate()
-{
- DateADT date;
- struct tm tt,
- *tm = &tt;
-
- GetCurrentTime(tm);
- date = (date2j(tm->tm_year, tm->tm_mon, tm->tm_mday) - JDATE_2000);
- return (date);
-}
-
-int4
-date2mjd(DateADT val)
-{
- int result;
-
- result = val + JDATE_2000 - 2400000.5;
-
- return result;
-}
-
-/* end of file */
-
-/*
- * Local Variables:
- * tab-width: 4
- * c-indent-level: 4
- * c-basic-offset: 4
- * End:
- */
diff --git a/contrib/datetime/datetime_functions.h b/contrib/datetime/datetime_functions.h
index 4b0eb49988..e69de29bb2 100644
--- a/contrib/datetime/datetime_functions.h
+++ b/contrib/datetime/datetime_functions.h
@@ -1,28 +0,0 @@
-#ifndef DATETIME_FUNCTIONS_H
-#define DATETIME_FUNCTIONS_H
-
-TimeADT *hhmm_in(char *str);
-char *hhmm_out(TimeADT *time);
-TimeADT *hhmm(TimeADT *time);
-TimeADT *time_difference(TimeADT *time1, TimeADT *time2);
-int4 time_hours(TimeADT *time);
-int4 time_minutes(TimeADT *time);
-int4 time_seconds(TimeADT *time);
-int4 as_minutes(TimeADT *time);
-int4 as_seconds(TimeADT *time);
-int4 date_day(DateADT val);
-int4 date_month(DateADT val);
-int4 date_year(DateADT val);
-TimeADT *currenttime(void);
-DateADT currentdate(void);
-int4 date2mjd(DateADT val);
-
-#endif
-
-/*
- * Local Variables:
- * tab-width: 4
- * c-indent-level: 4
- * c-basic-offset: 4
- * End:
- */
diff --git a/contrib/datetime/datetime_functions.sql.in b/contrib/datetime/datetime_functions.sql.in
index 8c35dad55f..e69de29bb2 100644
--- a/contrib/datetime/datetime_functions.sql.in
+++ b/contrib/datetime/datetime_functions.sql.in
@@ -1,100 +0,0 @@
--- datetime_functions.sql --
---
--- SQL code to define the new date and time functions and operators
---
--- Copyright (c) 1998, Massimo Dal Zotto <dz@cs.unitn.it>
---
--- This file is distributed under the GNU General Public License
--- either version 2, or (at your option) any later version.
-
--- Define the new time functions.
---
-create function hhmm_in(opaque) returns time
- as 'MODULE_PATHNAME'
- language 'c';
-
-create function hhmm_out(opaque) returns int4
- as 'MODULE_PATHNAME'
- language 'c';
-
-create function hhmm(time) returns time
- as 'MODULE_PATHNAME'
- language 'c';
-
-create function time_difference(time,time) returns time
- as 'MODULE_PATHNAME'
- language 'c';
-
-create function time_hours(time) returns int4
- as 'MODULE_PATHNAME'
- language 'c';
-
-create function time_minutes(time) returns int4
- as 'MODULE_PATHNAME'
- language 'c';
-
-create function time_seconds(time) returns int4
- as 'MODULE_PATHNAME'
- language 'c';
-
-create function as_minutes(time) returns int4
- as 'MODULE_PATHNAME'
- language 'c';
-
-create function as_seconds(time) returns int4
- as 'MODULE_PATHNAME'
- language 'c';
-
-create function date_day(date) returns int4
- as 'MODULE_PATHNAME'
- language 'c';
-
-create function date_month(date) returns int4
- as 'MODULE_PATHNAME'
- language 'c';
-
-create function date_year(date) returns int4
- as 'MODULE_PATHNAME'
- language 'c';
-
-create function currenttime() returns time
- as 'MODULE_PATHNAME'
- language 'c';
-
-create function currentdate() returns date
- as 'MODULE_PATHNAME'
- language 'c';
-
--- Define new operator - for time.
---
-create operator - (
- leftarg=time,
- rightarg=time,
- procedure=time_difference);
-
--- Define functions to switch from time to hhmm representation.
---
--- select hhmm_mode();
--- select time_mode();
---
-create function hhmm_mode() returns text
- as 'update pg_type set typinput =''hhmm_in'' where typname=''time'';
- update pg_type set typoutput=''hhmm_out'' where typname=''time'';
- select ''hhmm_mode''::text;'
- language 'sql';
-
-create function time_mode() returns text
- as 'update pg_type set typinput =''time_in'' where typname=''time'';
- update pg_type set typoutput=''time_out'' where typname=''time'';
- select ''time_mode''::text;'
- language 'sql';
-
--- Use these to do the updates manually
---
--- update pg_type set typinput ='hhmm_in' where typname='time';
--- update pg_type set typoutput='hhmm_out' where typname='time';
---
--- update pg_type set typinput ='time_in' where typname='time';
--- update pg_type set typoutput='time_out' where typname='time';
-
--- end of file
View Lorry Controller Status