=========================================================== .___ __ __ _________________ __ __ __| _/|__|/ |_ / ___\_` __ \__ \ | | \/ __ | | \\_ __\ / /_/ > | \// __ \| | / /_/ | | || | \___ /|__| (____ /____/\____ | |__||__| /_____/ \/ \/ grep rough audit - static analysis tool v2.8 written by @Wireghoul =================================[justanotherhacker.com]=== libdbix-dbschema-perl-0.45/DBSchema/DBD/Pg.pm-40- FROM pg_class c, pg_attribute a, pg_type t libdbix-dbschema-perl-0.45/DBSchema/DBD/Pg.pm:41: WHERE c.relname = '$table' libdbix-dbschema-perl-0.45/DBSchema/DBD/Pg.pm-42- AND a.attnum > 0 AND a.attrelid = c.oid AND a.atttypid = t.oid ############################################## libdbix-dbschema-perl-0.45/DBSchema/DBD/Pg.pm-65- SELECT substring(d.adsrc for 128) FROM pg_attrdef d, pg_class c libdbix-dbschema-perl-0.45/DBSchema/DBD/Pg.pm:66: WHERE c.relname = '$table' AND c.oid = d.adrelid AND d.adnum = $attnum libdbix-dbschema-perl-0.45/DBSchema/DBD/Pg.pm-67-END ############################################## libdbix-dbschema-perl-0.45/DBSchema/DBD/Pg.pm-104- FROM pg_class c, pg_attribute a, pg_type t libdbix-dbschema-perl-0.45/DBSchema/DBD/Pg.pm:105: WHERE c.relname = '${table}_pkey' libdbix-dbschema-perl-0.45/DBSchema/DBD/Pg.pm-106- AND a.attnum > 0 AND a.attrelid = c.oid AND a.atttypid = t.oid ############################################## libdbix-dbschema-perl-0.45/DBSchema/DBD/Pg.pm-133- FROM pg_class c, pg_class c2, pg_index i libdbix-dbschema-perl-0.45/DBSchema/DBD/Pg.pm:134: WHERE c.relname = '$table' AND c.oid = i.indrelid AND i.indexrelid = c2.oid libdbix-dbschema-perl-0.45/DBSchema/DBD/Pg.pm-135-END ############################################## libdbix-dbschema-perl-0.45/DBSchema/DBD/Pg.pm-146- FROM pg_class c, pg_attribute a, pg_type t libdbix-dbschema-perl-0.45/DBSchema/DBD/Pg.pm:147: WHERE c.relname = '$index' libdbix-dbschema-perl-0.45/DBSchema/DBD/Pg.pm-148- AND a.attnum > 0 AND a.attrelid = c.oid AND a.atttypid = t.oid ############################################## libdbix-dbschema-perl-0.45/DBSchema/DBD/Pg.pm-159- FROM pg_index i, pg_class c, pg_am a libdbix-dbschema-perl-0.45/DBSchema/DBD/Pg.pm:160: WHERE i.indexrelid = c.oid AND c.relname = '$index' AND c.relam = a.oid libdbix-dbschema-perl-0.45/DBSchema/DBD/Pg.pm-161-END ############################################## libdbix-dbschema-perl-0.45/DBSchema/DBD/Pg.pm-188- WHERE r.conrelid = ( SELECT oid FROM pg_class libdbix-dbschema-perl-0.45/DBSchema/DBD/Pg.pm:189: WHERE relname = '$table' libdbix-dbschema-perl-0.45/DBSchema/DBD/Pg.pm-190- AND pg_catalog.pg_table_is_visible(oid) ############################################## libdbix-dbschema-perl-0.45/DBSchema/DBD/Pg.pm-264- "UPDATE pg_attribute SET attnotnull = TRUE ". libdbix-dbschema-perl-0.45/DBSchema/DBD/Pg.pm:265: " WHERE attname = '$name' ". libdbix-dbschema-perl-0.45/DBSchema/DBD/Pg.pm:266: " AND attrelid = ( SELECT oid FROM pg_class WHERE relname = '$table' )"; libdbix-dbschema-perl-0.45/DBSchema/DBD/Pg.pm-267- ############################################## libdbix-dbschema-perl-0.45/DBSchema/DBD/Pg.pm-335- "UPDATE pg_attribute SET attnotnull = FALSE libdbix-dbschema-perl-0.45/DBSchema/DBD/Pg.pm:336: WHERE attname = '$name' libdbix-dbschema-perl-0.45/DBSchema/DBD/Pg.pm-337- AND attrelid = ( SELECT oid FROM pg_class libdbix-dbschema-perl-0.45/DBSchema/DBD/Pg.pm:338: WHERE relname = '$table' libdbix-dbschema-perl-0.45/DBSchema/DBD/Pg.pm-339- )"; ############################################## libdbix-dbschema-perl-0.45/DBSchema/DBD/Pg.pm-352- "UPDATE pg_attribute SET attnotnull = TRUE libdbix-dbschema-perl-0.45/DBSchema/DBD/Pg.pm:353: WHERE attname = '$name' libdbix-dbschema-perl-0.45/DBSchema/DBD/Pg.pm-354- AND attrelid = ( SELECT oid FROM pg_class libdbix-dbschema-perl-0.45/DBSchema/DBD/Pg.pm:355: WHERE relname = '$table' libdbix-dbschema-perl-0.45/DBSchema/DBD/Pg.pm-356- )"; ############################################## libdbix-dbschema-perl-0.45/DBSchema/DBD/Sybase.pm-80- FROM sysindexes libdbix-dbschema-perl-0.45/DBSchema/DBD/Sybase.pm:81: WHERE id = object_id('$table') and indid between 1 and 254 libdbix-dbschema-perl-0.45/DBSchema/DBD/Sybase.pm-82-END ############################################## libdbix-dbschema-perl-0.45/DBSchema/DBD/Sybase.pm-94- libdbix-dbschema-perl-0.45/DBSchema/DBD/Sybase.pm:95: my ($indid) = $dbh->selectrow_array("select indid from sysindexes where id = object_id('$table') and name = '$index'"); libdbix-dbschema-perl-0.45/DBSchema/DBD/Sybase.pm-96- for (1..30) { ############################################## libdbix-dbschema-perl-0.45/DBSchema/DBD/Sybase.pm-105- libdbix-dbschema-perl-0.45/DBSchema/DBD/Sybase.pm:106: my ($isunique) = $dbh->selectrow_array("select status & 2 from sysindexes where id = object_id('$table') and name = '$index'"); libdbix-dbschema-perl-0.45/DBSchema/DBD/Sybase.pm-107-