void
tds_env_change(TDSSOCKET * tds, int type, const char *oldvalue, const char *newvalue)
{
TDS_SMALLINT totsize;
/* If oldvalue is NULL, treat it like "" */
if (oldvalue == NULL)
oldvalue = "";
/*
* NOTE: I don't know why each type of environment value has a different
* format. According to the TDS5 specifications, they should all use
* the same format. The code for the TDS_ENV_CHARSET case *should*
* work for all environment values. -- Steve Kirkendall
*/
switch (type) {
case TDS_ENV_DATABASE:
case TDS_ENV_LANG:
case TDS_ENV_PACKSIZE:
case TDS_ENV_CHARSET:
tds_put_byte(tds, TDS_ENVCHANGE_TOKEN);
/* totsize = type + newlen + newvalue + oldlen + oldvalue */
/* FIXME ucs2 */
totsize = (IS_TDS7_PLUS(tds->conn) ? 2 : 1) * (strlen(oldvalue) + strlen(newvalue)) + 3;
tds_put_smallint(tds, totsize);
tds_put_byte(tds, type);
tds_put_byte(tds, strlen(newvalue));
/* FIXME this assume singlebyte -> ucs2 for mssql */
tds_put_string(tds, newvalue, strlen(newvalue));
tds_put_byte(tds, strlen(oldvalue));
/* FIXME this assume singlebyte -> ucs2 for mssql */
tds_put_string(tds, oldvalue, strlen(oldvalue));
break;
case TDS_ENV_LCID:
case TDS_ENV_SQLCOLLATION:
#if 1
tds_put_byte(tds, TDS_ENVCHANGE_TOKEN);
/* totsize = type + len + oldvalue + len + newvalue */
totsize = 3 + strlen(newvalue) + strlen(oldvalue);
tds_put_smallint(tds, totsize);
tds_put_byte(tds, type);
tds_put_byte(tds, strlen(newvalue));
tds_put_n(tds, newvalue, strlen(newvalue));
tds_put_byte(tds, strlen(oldvalue));
tds_put_n(tds, oldvalue, strlen(oldvalue));
break;
#endif
default:
tdsdump_log(TDS_DBG_WARN, "tds_env_change() ignoring unsupported environment code #%d", type);
}
}
void
tds_send_login_ack(TDSSOCKET * tds, const char *progname)
{
TDS_UINT ui, version;
tds_put_byte(tds, TDS_LOGINACK_TOKEN);
tds_put_smallint(tds, 10 + (IS_TDS7_PLUS(tds->conn)? 2 : 1) * strlen(progname)); /* length of message */
if (IS_TDS50(tds->conn)) {
tds_put_byte(tds, 5);
version = 0x05000000u;
} else {
tds_put_byte(tds, 1);
/* see src/tds/token.c */
if (IS_TDS73_PLUS(tds->conn)) {
version = 0x730B0003u;
} else if (IS_TDS72_PLUS(tds->conn)) {
version = 0x72090002u;
} else if (IS_TDS71_PLUS(tds->conn)) {
version = tds->conn->tds71rev1 ? 0x07010000u : 0x71000001u;
} else {
version = (TDS_MAJOR(tds->conn) << 24) | (TDS_MINOR(tds->conn) << 16);
}
}
TDS_PUT_A4BE(&ui, version);
tds_put_n(tds, &ui, 4);
tds_put_byte(tds, strlen(progname));
/* FIXME ucs2 */
tds_put_string(tds, progname, strlen(progname));
/* server version, always big endian */
TDS_PUT_A4BE(&ui, tds->conn->product_version & 0x7fffffffu);
tds_put_n(tds, &ui, 4);
}
void
tds_send_login_ack(TDSSOCKET * tds, const char *progname)
{
tds_put_byte(tds, TDS_LOGINACK_TOKEN);
tds_put_smallint(tds, 10 + (IS_TDS7_PLUS(tds->conn)? 2 : 1) * strlen(progname)); /* length of message */
if (IS_TDS50(tds->conn)) {
tds_put_byte(tds, 5);
tds_put_byte(tds, 5);
tds_put_byte(tds, 0);
} else {
tds_put_byte(tds, 1);
tds_put_byte(tds, TDS_MAJOR(tds->conn));
tds_put_byte(tds, TDS_MINOR(tds->conn));
}
tds_put_byte(tds, 0); /* unknown */
tds_put_byte(tds, 0); /* unknown */
tds_put_byte(tds, strlen(progname));
/* FIXME ucs2 */
tds_put_string(tds, progname, strlen(progname));
/* server version, for mssql 1.0.1 */
tds_put_byte(tds, 1); /* unknown */
tds_put_byte(tds, 0); /* unknown */
tds_put_byte(tds, 0); /* unknown */
tds_put_byte(tds, 1); /* unknown */
}
void
tds_send_msg(TDSSOCKET * tds, int msgno, int msgstate, int severity,
const char *msgtext, const char *srvname, const char *procname, int line)
{
int msgsz;
size_t len;
tds_put_byte(tds, TDS_INFO_TOKEN);
if (!procname)
procname = "";
len = strlen(procname);
msgsz = 4 /* msg no */
+ 1 /* msg state */
+ 1 /* severity */
/* FIXME ucs2 */
+ 4 + (IS_TDS7_PLUS(tds->conn) ? 2 : 1) * (strlen(msgtext) + strlen(srvname) + len)
+ (IS_TDS72_PLUS(tds->conn) ? 4 : 2); /* line number */
tds_put_smallint(tds, msgsz);
tds_put_int(tds, msgno);
tds_put_byte(tds, msgstate);
tds_put_byte(tds, severity);
tds_put_smallint(tds, strlen(msgtext));
/* FIXME ucs2 */
tds_put_string(tds, msgtext, strlen(msgtext));
tds_put_byte(tds, strlen(srvname));
/* FIXME ucs2 */
tds_put_string(tds, srvname, strlen(srvname));
if (len) {
tds_put_byte(tds, len);
/* FIXME ucs2 */
tds_put_string(tds, procname, len);
} else {
tds_put_byte(tds, 0);
}
if (IS_TDS72_PLUS(tds->conn))
tds_put_int(tds, line);
else
tds_put_smallint(tds, line);
}
