add packaging
[platform/upstream/gdbm.git] / src / progname.c
1 /* This file is part of GDBM, the GNU data base manager.
2    Copyright (C) 2011, 2013 Free Software Foundation, Inc.
3
4    GDBM 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 3, or (at your option)
7    any later version.
8
9    GDBM 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 GDBM. If not, see <http://www.gnu.org/licenses/>.   */
16
17 # include "autoconf.h"
18 # include "gdbm.h"
19 # include "gdbmapp.h"
20 # include <string.h>
21
22 const char *progname;
23
24 void
25 set_progname (const char *arg)
26 {
27   const char *p = strrchr (arg, '/');
28   if (p)
29     ++p;
30   else
31     p = arg;
32   if (strncmp (p, "lt-", 3) == 0)
33     p += 3;
34   progname = p;
35 }