Solved

file locker?

Posted on 2000-04-04
2
218 Views
Last Modified: 2013-12-25
how to create a file locker so that only one person can make writeing to
a file?

thanks!
0
Comment
Question by:she25
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
2 Comments
 
LVL 16

Accepted Solution

by:
maneshr earned 50 total points
ID: 2685805
if you are using PERL, you can use the flock function.

                    flock FILEHANDLE, OPERATION

                    Establishes or removes a lock on a file opened with filehandle. This function calls one of the
                    Unix functions flock, lockf, or
                    the locking capabilities of fcntl, whichever your system supports. If none of these functions
                    exist on your system, flock will
                    produce a fatal error.

                    operation is the type of locking function to perform. The number by each operation name is the
                    argument that Perl's flock
                    takes by default. You may also use the operation names if you explicitly import them from the
                    Fcntl module with use Fcntl
                    ":flock".

                         LOCK_SH (1)

                              Establishes a shared lock on the file (read lock).

                         LOCK_EX (2)

                              Establishes an exclusive lock on the file (write lock).

                         LOCK_UN (8)

                              Removes a lock from the file.

                         LOCK_NB (4)

                              Prevents flock from blocking while trying to establish a lock with LOCK_SH or LOCK_EX
                    and instructs it to return
                              immediately. LOCK_NB must be ored with the other operation as an expression for the
                    operation argument, i.e.,
                              (LOCK_EX | LOCK_NB).



                    This function calls flock(2) on FILEHANDLE. See the manual page for flock(2) for the definition of
                    OPERATION. Invoking flock will produce a fatal error if used on a machine that doesn't
                    implement flock(2) or emulate it through some other locking mechanism. Here's a mailbox
                    appender for some BSD-based systems:

                    $LOCK_SH = 1;
                    $LOCK_EX = 2;
                    $LOCK_NB = 4;
                    $LOCK_UN = 8;

                    sub lock {
                        flock MBOX, $LOCK_EX;
                        # and, in case someone appended
                        # while we were waiting...
                        seek MBOX, 0, 2;
                    }

                    sub unlock {
                        flock MBOX, $LOCK_UN;
                    }

                    open MBOX, ">>/usr/spool/mail/$ENV{'USER'}" or die "Can't open mailbox: $!";

                    lock();
                    print MBOX $msg, "\n\n";
                    unlock();

                    Note that flock is unlikely to work on a file being accessed through a network file system.
                    =====================================================
0
 

Expert Comment

by:dtabacco
ID: 2710417
I don't think flock works under windows implementations of perl such as activeperl, though.
0

Featured Post

The Ultimate Checklist to Optimize Your Website

Websites are getting bigger and complicated by the day. Video, images, custom fonts are all great for showcasing your product/service. But the price to pay in terms of reduced page load times and ultimately, decreased sales, can lead to some difficult decisions about what to cut.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

This article is meant to give a basic understanding of how to use R Sweave as a way to merge LaTeX and R code seamlessly into one presentable document.
Active Directory replication delay is the cause to many problems.  Here is a super easy script to force Active Directory replication to all sites with by using an elevated PowerShell command prompt, and a tool to verify your changes.
Learn the basics of lists in Python. Lists, as their name suggests, are a means for ordering and storing values. : Lists are declared using brackets; for example: t = [1, 2, 3]: Lists may contain a mix of data types; for example: t = ['string', 1, T…
Learn the basics of modules and packages in Python. Every Python file is a module, ending in the suffix: .py: Modules are a collection of functions and variables.: Packages are a collection of modules.: Module functions and variables are accessed us…

717 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question