File: debpkg-wrapper.c

package info (click to toggle)
devscripts 2.12.6%2Bdeb7u2
  • links: PTS, VCS
  • area: main
  • in suites: wheezy
  • size: 3,976 kB
  • sloc: perl: 15,544; sh: 5,482; python: 534; makefile: 170; ansic: 17
file content (17 lines) | stat: -rw-r--r-- 379 bytes parent folder | download | duplicates (15) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
 
/* Wrapper for debpkg so that we don't have to use suidperl any longer
   (it's deprecated as of Perl 5.8.0) */

#include <stdio.h>
#include <unistd.h>
#include <errno.h>
#include <string.h>

#define REAL_PATH "/usr/share/devscripts/debpkg"

int main(int ac, char **av)
{
  execv(REAL_PATH, av);

  fprintf(stderr, "Error executing debpkg: %s\n", strerror(errno));
  return 1;
}