View | Details | Raw Unified
Collapse All | Expand All

(-) DBD-mysql-4.004.old/dbdimp.c (-33 lines)
 Lines 3423-3433   dbd_st_fetch(SV *sth, imp_sth_t* imp_sth Link Here 
  if (!imp_sth->result)
  if (!imp_sth->result)
  {
  {
    do_error(sth, JW_ERR_SEQUENCE, "fetch() without execute()"
    do_error(sth, JW_ERR_SEQUENCE, "fetch() without execute()"
#if MYSQL_VERSION_ID >= SQL_STATE_VERSION
             ,NULL);
             ,NULL);
#else
            );
#endif
    return Nullav;
    return Nullav;
  }
  }
 Lines 3587-3598   dbd_st_fetch(SV *sth, imp_sth_t* imp_sth Link Here 
      if (mysql_errno(&imp_dbh->mysql))
      if (mysql_errno(&imp_dbh->mysql))
        do_error(sth, mysql_errno(&imp_dbh->mysql),
        do_error(sth, mysql_errno(&imp_dbh->mysql),
                 mysql_error(&imp_dbh->mysql)
                 mysql_error(&imp_dbh->mysql)
#if MYSQL_VERSION_ID >= SQL_STATE_VERSION
                 , mysql_sqlstate(&imp_dbh->mysql));
                 , mysql_sqlstate(&imp_dbh->mysql));
#else
                );
#endif
#if MYSQL_VERSION_ID >= MULTIPLE_RESULT_SET_VERSION
#if MYSQL_VERSION_ID >= MULTIPLE_RESULT_SET_VERSION
      if (!mysql_more_results(svsock))
      if (!mysql_more_results(svsock))
 Lines 3925-3935   dbd_st_FETCH_internal( Link Here 
  /* Are we asking for a legal value? */
  /* Are we asking for a legal value? */
  if (what < 0 ||  what >= AV_ATTRIB_LAST)
  if (what < 0 ||  what >= AV_ATTRIB_LAST)
    do_error(sth, JW_ERR_NOT_IMPLEMENTED, "Not implemented"
    do_error(sth, JW_ERR_NOT_IMPLEMENTED, "Not implemented"
#if MYSQL_VERSION_ID >= SQL_STATE_VERSION
             , NULL);
             , NULL);
#else
              );
#endif
  /* Return cached value, if possible */
  /* Return cached value, if possible */
  else if (cacheit  &&  imp_sth->av_attr[what])
  else if (cacheit  &&  imp_sth->av_attr[what])
 Lines 3939-3949   dbd_st_FETCH_internal( Link Here 
  else if (!res)
  else if (!res)
    do_error(sth, JW_ERR_NOT_ACTIVE,
    do_error(sth, JW_ERR_NOT_ACTIVE,
	     "statement contains no result"
	     "statement contains no result"
#if MYSQL_VERSION_ID >= SQL_STATE_VERSION
             ,NULL);
             ,NULL);
#else
            );
#endif
  /* Do the real work. */
  /* Do the real work. */
  else
  else
  {
  {
 Lines 4258-4268   int dbd_bind_ph (SV *sth, imp_sth_t *imp Link Here 
  {
  {
    do_error(sth, JW_ERR_ILLEGAL_PARAM_NUM,
    do_error(sth, JW_ERR_ILLEGAL_PARAM_NUM,
             "Illegal parameter number"
             "Illegal parameter number"
#if MYSQL_VERSION_ID >= SQL_STATE_VERSION
             , NULL);
             , NULL);
#else
            );
#endif
    return FALSE;
    return FALSE;
  }
  }
 Lines 4285-4295   int dbd_bind_ph (SV *sth, imp_sth_t *imp Link Here 
              "Binding non-numeric field %d, value %s as a numeric!",
              "Binding non-numeric field %d, value %s as a numeric!",
              param_num, neatsvpv(value,0));
              param_num, neatsvpv(value,0));
      do_error(sth, JW_ERR_ILLEGAL_PARAM_NUM, err_msg
      do_error(sth, JW_ERR_ILLEGAL_PARAM_NUM, err_msg
#if MYSQL_VERSION_ID >= SQL_STATE_VERSION
               ,NULL);
               ,NULL);
#else
                );
#endif
    }
    }
  }
  }
 Lines 4297-4307   int dbd_bind_ph (SV *sth, imp_sth_t *imp Link Here 
  {
  {
    do_error(sth, JW_ERR_NOT_IMPLEMENTED,
    do_error(sth, JW_ERR_NOT_IMPLEMENTED,
             "Output parameters not implemented"
             "Output parameters not implemented"
#if MYSQL_VERSION_ID >= SQL_STATE_VERSION
             ,NULL);
             ,NULL);
#else
                );
#endif
    return FALSE;
    return FALSE;
  }
  }
 Lines 4459-4469   int mysql_db_reconnect(SV* h) Link Here 
  if (!my_login(h, imp_dbh))
  if (!my_login(h, imp_dbh))
  {
  {
    do_error(h, mysql_errno(&imp_dbh->mysql), mysql_error(&imp_dbh->mysql)
    do_error(h, mysql_errno(&imp_dbh->mysql), mysql_error(&imp_dbh->mysql)
#if MYSQL_VERSION_ID >= SQL_STATE_VERSION
             , mysql_sqlstate(&imp_dbh->mysql));
             , mysql_sqlstate(&imp_dbh->mysql));
#else
              );
#endif
    memcpy (&imp_dbh->mysql, &save_socket, sizeof(save_socket));
    memcpy (&imp_dbh->mysql, &save_socket, sizeof(save_socket));
    ++imp_dbh->stats.auto_reconnects_failed;
    ++imp_dbh->stats.auto_reconnects_failed;
    return FALSE;
    return FALSE;