$ cat > adddrop.py <<EOF

  > from mercurial import cmdutil

  > cmdtable = {}

  > command = cmdutil.command(cmdtable)

  > @command('debugadddrop',

  >   [('', 'drop', False, 'drop file from dirstate', 'FILE'),

  >    ('', 'normal-lookup', False, 'add file to dirstate', 'FILE')],

  >     'hg debugadddrop')

  > def debugadddrop(ui, repo, *pats, **opts):

  >   '''Add or drop unnamed arguments to or from the dirstate'''

  >   drop = opts.get('drop')

  >   nl = opts.get('normal_lookup')

  >   if nl and drop:

  >       raise error.Abort('drop and normal-lookup are mutually exclusive')

  >   wlock = repo.wlock()

  >   try:

  >     for file in pats:

  >       if opts.get('normal_lookup'):

  >         repo.dirstate.normallookup(file)

  >       else:

  >         repo.dirstate.drop(file)

  > 

  >     repo.dirstate.write(repo.currenttransaction())

  >   finally:

  >     wlock.release()

  > EOF

  $ echo "[extensions]" >> $HGRCPATH

  $ echo "debugadddrop=`pwd`/adddrop.py" >> $HGRCPATH

  $ hg debugadddrop --normal-lookup file1 file2

  $ hg debugadddrop --drop bar

  $ hg debugadddrop --drop

  $ hg debugstate --nodates

  n   0         -1 unset               file1

  n   0         -1 unset               file2

  n 644         -1 set                 foo

  $ hg debugrebuildstate