Login or Register to Ask a Question and Join Our Community

Sponsored Content
Full Discussion: Problem executing setuid script in perl-5.8.6
Top Forums Shell Programming and Scripting Problem executing setuid script in perl-5.8.6 Post 81653 by sarmakdvsr on Tuesday 23rd of August 2005 02:11:32 AM
Old 08-23-2005
Problem executing setuid script in perl-5.8.6
Hi,

I have a script (a.pl) that can be run by anyone. The script internally has to read a file and write into few files which are owned by user 'myUser'.

Has to read the following file:
-rwx------ 1 myuser myuser 4986 Aug 20 18:11 my.file
Has to write into following files:

-rw-rw-r-- 1 myuser myuser 2187 Aug 21 15:11 a.log
-rw-rw-r-- 1 myuser myuser 0 Aug 20 17:53 b.log
-rw-rw-r-- 1 myuser myuser 4933 Aug 20 17:57 v.log

So, I have made a.pl as setuid script. It used to work fine in perl-5.6.1
In perl-5.8.6, it started to throw the following famous fatal error
"Insecure dependency at system ...." where i use system() to execute a java class.

system "/usr/local/java/jdk1.5/bin/java", "mypackage.mysubpackage.MyClass";

Could somebody help me out either by suggesting a different approach to accomplish the above task or mentioning a workaround for executing setuid scripts in perl-5.8.6?

thanks in advance,
Sarma.
 

10 More Discussions You Might Find Interesting

1. Shell Programming and Scripting

Executing .profile from perl script

Hi, How can i execute .profile from a perl script I need this - i am trying to run perl script from crontab and it looses the environment variables Please provide help Your help is greatly appreciated Thanks (1 Reply)
Discussion started by: prekida
1 Replies

2. Shell Programming and Scripting

Problem executing script through at

Hey fellows, i've got a probkem while executing a command through a scheduled at-job; Somehow my script starts looping, when triggered throug at; It doesnt do so if started manually. Any ideas? #!/bin/sh # atrun uid=33 gid=33 # mail www-data 0 umask 22 cd /var/django/webripper/ripper... (2 Replies)
Discussion started by: viktor4124
2 Replies

3. Shell Programming and Scripting

Perl script not executing

Hi All, I have been given a perl script to modify but which is not running completely.And it is not showing any errors also. The script is : #!/usr/local/bin/perl print "Which transaction? "; print "\n"; print "1 - Inquiry"; print "\n"; print "2 - Delete Bank"; print "\n"; print... (8 Replies)
Discussion started by: usha rao
8 Replies

4. Programming

Date time problem while executing perl script.

Hi All, This Monday 15th March 2010, i have faced a weired issue with my Perl script execution, this script is scheduled to run at 1 minute past midnight on daily basis ( 00:01 EST ) generally for fetching previous business date , say if it is Monday it should give last Friday date, for Tuesday... (0 Replies)
Discussion started by: ravimishra
0 Replies

5. Shell Programming and Scripting

Executing AWK in a perl script using 'system'...

I have a simple perl script that looks similar to this: #!/usr/bin/perl/ # Have a lot of PERL code in the front of this script. #Would now like to execute a system command using AWK system (qq(cd /location && awk '/full/ {print $1;exit}' /myfile)); The system command in my perl script... (4 Replies)
Discussion started by: SysAdm2
4 Replies

6. Shell Programming and Scripting

Error in executing Perl script

Hello All I am facing an issue The unix script is running fine in unix environment which uses ssh connection but when I try to run the same in informatica environment (same server where I was running the unix script manually successfully) its showing the below error command-line line 0:... (11 Replies)
Discussion started by: Pratik4891
11 Replies

7. Shell Programming and Scripting

Problem executing perl script on remote server

Hello, I am running in to a problem running a perl script on a remote server. I can run a simple script test.pl which contains just a print statment without issue by running ssh root@1.2.3.4 perl test.pl However, I have a more complex script that does not execute as expected. I think I... (3 Replies)
Discussion started by: colinireland
3 Replies

8. Shell Programming and Scripting

executing perl script from another perl script : NOT WORKING

Hi Folks, I have 2 perl scripts and I need to execute 2nd perl script from the 1st perl script in WINDOWS. In the 1st perl script that I had, I am calling the 2nd script main.pl =========== print "This is my main script\n"; `perl C:\\Users\\sripathg\\Desktop\\scripts\\hi.pl`; ... (3 Replies)
Discussion started by: giridhar276
3 Replies

9. Shell Programming and Scripting

Help in executing select query from perl script

Hi, I have a perl snippet that call a select query with a bind variable,when i compile the script I'm unable to get the query output. The same query when i fire in sqlplus fetches few rows. The query takes bit time to fetch results in sqlplus. my $getaccts = $lda->prepare("select distinct ... (1 Reply)
Discussion started by: rkrish
1 Replies

10. UNIX for Beginners Questions & Answers

What keeps me from abusing setuid(0) and programs with setuid bit set?

Just learning about the privilege escalation method provided by setuid. Correct me if I am wrong but what it does is change the uid of the current process to whatever uid I set. Right ? So what stops me from writing my own C program and calling setuid(0) within it and gaining root privileges ? ... (2 Replies)
Discussion started by: sreyan32
2 Replies

LEARN ABOUT DEBIAN

merge_fonts

merge_fonts(3alleg4)						  Allegro manual					      merge_fonts(3alleg4)

NAME

       merge_fonts - Merges two fonts into one font. Allegro game programming library.

SYNOPSIS

       #include <allegro.h>

       FONT *merge_fonts(FONT *f1, FONT *f2)

DESCRIPTION

       This function merges the character ranges from two fonts and returns a new font containing all characters in the old fonts. In general, you
       cannot merge fonts of different types (eg, TrueType fonts and bitmapped fonts), but as a special case, this function can  promote  a  mono-
       chrome bitmapped font to a color font and merge those. Example:

	  FONT *myfont;
	  FONT *myfancy_font;
	  FONT *lower_range;
	  FONT *upper_range;
	  FONT *capitals;
	  FONT *combined_font;
	  FONT *tempfont;
	  ...
	  /* Create a font that contains the capitals from  */
	  /* the fancy font but other characters from myfont */
	  lower_range = extract_font_range(myfont, -1, 'A'-1);
	  upper_range = extract_font_range(myfont, 'Z'+1, -1);
	  capitals = extract_font_range(myfancy_font, 'A', 'Z');

	  tempfont = merge_fonts(lower_range, capitals);
	  combined_font = merge_fonts(tempfont, upper_range);

	  /* Clean up temporary fonts */
	  destroy_font(lower_range);
	  destroy_font(upper_range);
	  destroy_font(capitals);
	  destroy_font(tempfont);

RETURN VALUE

       Returns a pointer to the new font or NULL on error. Remember that you are responsible for destroying the font when you are finished with it
       to avoid memory leaks.

SEE ALSO

       extract_font_range(3alleg4), is_trans_font(3alleg4), is_color_font(3alleg4), is_mono_font(3alleg4), exfont(3alleg4)

Allegro 							   version 4.4.2					      merge_fonts(3alleg4)
All times are GMT -4. The time now is 01:50 AM.
Unix & Linux Forums Content Copyright 1993-2022. All Rights Reserved.
Privacy Policy