Attachment 297141 Details for Bug 435665 – change missed reporter to bugzilla@redhat.com

change missed reporter to bugzilla@redhat.com

cleanup_reporter.pl (text/plain), 2.33 KB, created by Tony Fu on 2008-03-07 07:01:35 UTC

(hide)

Description:

Filename:

MIME Type:

Creator: Tony Fu

Created: 2008-03-07 07:01:35 UTC

Size: 2.33 KB

patch

obsolete

>#!/usr/bin/env perl
>use strict;
>use warnings;
>
>################################################################################
># script:   cleanup_reporter.pl
># purpose:  some bugs' reporter doesn't have a valid userid in profiles table.
>#           This script assign the user bugzilla@redhat.com' as these bugs' 
>#           reporter and update bugs_activity table accordingly.
>################################################################################
>
>use DBI;
>use Carp;
>
>
>###############################################
>#   variables of accessing pg db
>###############################################
>
>my $user = 'bugs';
>my $pass = '';
>my $host = 'localhost';
>my $dsn = "dbi:mysql:dbname=bugs;host=$host";
>
>my $dbh
>    = DBI->connect( $dsn, $user, $pass, { RaiseError => 1, PrintError => 0 } )
>    or croak "Couldn't connect database: " . DBI->errstr;
>
># bug_activity prepartion 1:
># get Admin User profiles.userid. Used in writing bug_activity
># get new reporter (bugzilla@redhat.com)'s userid
>my $login_name    = $dbh->quote('bugzilla@redhat.com');
>my $admin_user_id = $dbh->selectall_arrayref(
>    "SELECT userid 
>        FROM profiles 
>       WHERE login_name = $login_name"
>)->[0][0];
>
># bug_activity prepartion 2:
># get RESOLUTION's fieldid in fielddefs table
>my $field_id = $dbh->selectall_arrayref(
>    "SELECT fieldid 
>       FROM fielddefs 
>      WHERE name='reporter'"
>)->[0][0];
>
>#get bug_id of the bugs whose reporter is not in profiles table
>my $sth = $dbh->prepare(
>"SELECT bugs.bug_id FROM bugs LEFT JOIN profiles ON bugs.reporter =
>profiles.userid WHERE profiles.userid IS NULL ORDER BY bugs.bug_id");
>$sth->execute();
>
>while ( my $bug_id = $sth->fetchrow_array() ) {
>
>    #change reporter to user bugzilla@redhat.com's userid
>    $dbh->do(
>        "UPDATE bugs SET reporter=$admin_user_id WHERE bug_id=$bug_id" );
>
>    #update bugs_activity table
>    $dbh->do(
>        "INSERT INTO bugs_activity (who, 
>                                    bug_when, 
>                                    fieldid, 
>                                    added, 
>                                    removed,
>                                    bug_id) 
>              VALUES ( $admin_user_id, 
>                       NOW(), 
>                       $field_id, 
>                       $login_name,
>                       'UNKNOWN',
>                       $bug_id )"
>    );
>
>}
>

Flags:

dkl: review+

Actions: View

Attachments on bug 435665: 297002 | 297141