Mail Archives: djgpp-workers/1997/10/20/21:21:18
/* this is the Autoconf test program that GNU programs use
to detect if strftime is working.
Apart from missing formats (which probably can be ignored)
it seems that the results from "%c" and "%C" are wrong.
*/
#include <stdlib.h>
#include <stdio.h>
#include <sys/time.h>
#include <time.h>
static int
compare (const char *fmt, const struct tm *tm, const char *expected)
{
char buf[99];
strftime (buf, 99, fmt, tm);
if (strcmp (buf, expected))
{
#if 1
printf ("fmt: \"%s\", expected \"%s\", got \"%s\"\n",
fmt, expected, buf);
#endif
return 1;
}
return 0;
}
int
main ()
{
int n_fail = 0;
struct tm *tm;
time_t t = 738367; /* Fri Jan 9 13:06:07 1970 */
tm = gmtime (&t);
/* This is necessary to make strftime give consistent zone strings and
e.g., seconds since the epoch (%s). */
putenv ("TZ=GMT0");
#undef CMP
#define CMP(Fmt, Expected) n_fail += compare ((Fmt), tm, (Expected))
CMP ("%-m", "1"); /* GNU */
CMP ("%A", "Friday");
CMP ("%^A", "FRIDAY"); /* The ^ is a GNU extension. */
CMP ("%B", "January");
CMP ("%^B", "JANUARY");
CMP ("%C", "19"); /* POSIX.2 */
CMP ("%D", "01/09/70"); /* POSIX.2 */
CMP ("%G", "1970"); /* GNU */
CMP ("%H", "13");
CMP ("%I", "01");
CMP ("%M", "06");
CMP ("%M", "06");
CMP ("%R", "13:06"); /* POSIX.2 */
CMP ("%S", "07");
CMP ("%T", "13:06:07"); /* POSIX.2 */
CMP ("%U", "01");
CMP ("%V", "02");
CMP ("%W", "01");
CMP ("%X", "13:06:07");
CMP ("%Y", "1970");
CMP ("%Z", "GMT");
CMP ("%===============================================================================
Markus F.X.J. Oberhumer <markus DOT oberhumer AT jk DOT uni-linz DOT ac DOT at>
Subject: little patch for alien 5.18
To: Joey Hess <joey AT kite DOT ml DOT org>
===============================================================================
Joey,
many thanks for alien - this is really a useful package.
Below is a little patch for fromrpm.pl so that the time stamp
of files in a RPM archive will not get lost.
Markus
*** fromrpm.pl.org Fri Sep 12 19:21:47 1997
--- fromrpm.pl Sat Oct 18 15:21:26 1997
***************
*** 97,101 ****
# Unpack a rpm file.
sub Unpack { my ($file,%fields)=@_;
! SafeSystem("(cd ..;rpm2cpio $file) | cpio --extract --make-directories --no-absolute-filenames",
"Error unpac
- Raw text -