pike.git / lib / modules / Sql.pmod / tds.pike

version» Context lines:

pike.git/lib/modules/Sql.pmod/tds.pike:1:   /* -  * $Id: tds.pike,v 1.20 2006/04/05 17:21:33 grubba Exp $ +  * $Id: tds.pike,v 1.21 2006/11/04 19:06:49 nilsson Exp $    *    * A Pike implementation of the TDS protocol.    *    * Henrik Grubbström 2006-02-08.    */      #define TDS_DEBUG   #define TDS_CONVERT_DEBUG      #ifdef TDS_DEBUG
pike.git/lib/modules/Sql.pmod/tds.pike:1165:    sprintf("%d", array_sscanf(raw[1..],    "%-" + (sizeof(raw)-1) + "c")[0]);       // Move decimal point @[scale] positions.    int scale = info->column_scale;    if (sizeof(res) < scale) {    res = "0." + ("0" * (scale - sizeof(res))) + res;    } else if (sizeof(res) == scale) {    res = "0." + res;    } else if (scale) { -  res = res[..sizeof(res)-(scale+1)] + "." + +  res = res[..<scale] + "." +    res[sizeof(res)-scale..];    }       // Fix the sign.    if (!res[0]) {    res = "-" + res;    }    TDS_CONV_WERROR("%O (scale: %d) ==> %O\n",    raw, scale, res);    return res;
pike.git/lib/modules/Sql.pmod/tds.pike:1672:    string|void user, string|void password)   {    if (con) {    Disconnect(1);    }    int port = DEF_PORT;    if (server) {    array(string) tmp = server/":";    if (sizeof(tmp) > 1) {    port = (int)tmp[-1]; -  server = tmp[..sizeof(tmp)-2]*":"; +  server = tmp[..<1]*":";    }    } else {    server = "127.0.0.1";    }    Connect(server, port, database || "default",    user || "", password || "");   }