Description: Read ~/.dcrc at startup of dc

 Patch taken from old version of dc by Paul Dwerryhouse

 Was initially applied by Francois Marier <francois@debian.org> in the NMU

 1.06.94-3.1 to close http://bugs.debian.org/472250 .

 Then it disappeared along the way, until users asked for it again.

 Jan Braun <janbraun@gmx.net> updated it to read .drcr before argument

 processing so that

     $ dc

     $ dc -

     $ dc -f -

 all have the same behaviour

Origin: vendor

Author: upstream

Author: Jan Brawn <janbraun@gmx.net>

Bug-Debian: http://bugs.debian.org/582137

Bug-Ubuntu: https://bugs.launchpad.net/debian/+source/bc/+bug/918836

Forwarded: no

Reviewed-by: Ryan Kavanagh <rak@debian.org>

Last-Update: 2013-06-02

---

This patch header follows DEP-3: http://dep.debian.net/deps/dep3/

Index: bc/dc/dc.c

===================================================================

--- bc.orig/dc/dc.c	2017-07-26 17:33:17.976925633 -0400

+++ bc/dc/dc.c	2017-07-26 17:33:17.976925633 -0400

@@ -43,6 +43,8 @@

 # include <sys/stat.h>

 #endif

 #include <getopt.h>

+#include <pwd.h>

+#include <unistd.h>

 #include "dc.h"

 #include "dc-proto.h"

@@ -246,6 +248,29 @@

 	return r;

 }

+static void

+try_rcfile(void)

+{

+    char *homedir;

+    struct passwd *pw;

+    char *rcfile;

+    FILE *input;

+

+    homedir=getenv("HOME");

+    if (!homedir)

+    {

+	pw=getpwuid(getuid());

+	homedir=pw->pw_dir;

+    }

+    rcfile=malloc(strlen(homedir)+8);

+    sprintf(rcfile, "%s/.dcrc", homedir);

+    if (!(input=fopen(rcfile, "r")))

+	return;

+    if (dc_evalfile(input))

+	exit(EXIT_FAILURE);

+    fclose(input);

+}

+

 int

 main DC_DECLARG((argc, argv))

@@ -268,6 +293,8 @@

 	dc_register_init();

 	dc_array_init();

+	try_rcfile();

+

 	while ((c = getopt_long(argc, argv, "hVe:f:", long_opts, (int *)0)) != EOF) {

 		switch (c) {

 		case 'e':

Index: bc/doc/dc.1

===================================================================

--- bc.orig/doc/dc.1	2017-07-26 17:33:17.976925633 -0400

+++ bc/doc/dc.1	2017-07-26 17:33:17.976925633 -0400

@@ -514,6 +514,14 @@

 because the 2 was stored in an instance of 0:a that

 was later popped.

 .SH

+FILES

+.TP 15

+~/.dcrc

+The commands in this file will be executed when

+.I dc

+is first run.

+.PP

+.SH

 BUGS

 .PP

 Email bug reports to